WTS/game/scripts/characters/astoria/events/imperio_practice.rpy
LoafyLemon dc212e80d1 Audio
* Added `sound` sfx channel
* Refactored and unified sound & music calls
* Fixed missing sounds in astoria events
* Removed hide_screens label (Redundant)
* Removed play_music, play_sound call labels
2023-03-11 22:01:39 +00:00

1033 lines
50 KiB
Plaintext

### Susan Imperio Events ###
label ag_se_imperio_sb: # Move label
hide astoria_main
with d3
menu:
gen "{size=-4}(Should I ask her to cast Imperio on Miss Bones?){/size}" ("base", xpos="far_left", ypos="head")
"\"(Yes, let's do it!)\"":
pass
"\"(Not right now.)\"":
jump astoria_spells
# Setup
$ sus_outfit_last.save() # Store current outfit.
$ ast_outfit_last.save() # Store current outfit.
$ susan.equip(sus_outfit_default)
$ astoria.equip(ast_outfit_default)
$ astoria_chibi.zorder = 4 # In front of Susan.
call ast_chibi("stand",530,"base") #Align with spell casting chibi
$ ag_se_imperio_sb.start()
label end_ag_se_imperio_sb:
# Reset
$ astoria_chibi.zorder = 3 # Default
$ susan.equip(sus_outfit_last) # Equip player outfit.
$ astoria.equip(ast_outfit_last) # Equip player outfit.
$ astoria_busy = True
$ susan_busy = True
call music_block
jump main_room_menu
label ag_se_imperio_sb_E1:
gen "I think it's time for you to try that spell on another person." ("base", xpos="far_left", ypos="head")
ast "Another person?" ("open", "narrow", "base", "mid", xpos="base", ypos="base", trans=dissolve)
ast "But I thought professor Tonks--" ("annoyed", "narrow", "worried", "mid")
gen "I've already spoken to your teacher and we both think it'd be best if I took over the lessons for now." ("base", xpos="far_left", ypos="head")
ast "Really?" ("open", "narrow", "worried", "mid")
gen "*Err*...{w=0.4} Yes." ("base", xpos="far_left", ypos="head")
ast "*Hmm*... Well you're the headmaster so whatever you say..." ("base", "narrow", "base", "mid")
gen "Good!" ("grin", xpos="far_left", ypos="head")
gen "Then Let's have you try it on that Susan girl again..." ("base", xpos="far_left", ypos="head")
ast "You want me to... What?!" ("open", "base", "base", "mid")
ast "But I thought--" ("angry", "narrow", "worried", "mid")
gen "Don't tell me you wouldn't have given in to the temptation anyway." ("base", xpos="far_left", ypos="head")
ast "...{w} I mean..." ("annoyed", "narrow", "base", "down")
gen "You got lucky last time, if you were to be caught again then I don't think even I would be able to save you..." ("base", xpos="far_left", ypos="head")
gen "This way, you'll get that anger of yours out of your system and we can both move on with our lives." ("base", xpos="far_left", ypos="head")
ast "No thanks!" ("base", "closed", "angry", "mid")
gen "What? How could you say no to this?" ("angry", xpos="far_left", ypos="head")
ast "If I can't use it to embarrass her in front of the other students then what's the point?" ("angry", "narrow", "base", "mid")
gen "You don't think she'd be more embarrassed if you got her to do something in front of her headmaster?" ("base", xpos="far_left", ypos="head")
ast "I suppose..." ("annoyed", "narrow", "worried", "R")
ast "But don't you think she'll figure out you're in on it? Surely she'd just report--" ("angry", "narrow", "worried", "mid")
gen "We'll just wipe her memory." ("base", xpos="far_left", ypos="head")
gen "That should let you cast it on her as many times as you like..." ("base", xpos="far_left", ypos="head")
ast "You can do that?" ("open", "narrow", "base", "mid")
gen "Apparent--{w=0.4} Yes!" ("base", xpos="far_left", ypos="head")
gen "They haven't taught you that one?" ("base", xpos="far_left", ypos="head")
ast "You're the one in charge here...{w=0.4} It's the first time I've heard of it." ("annoyed", "narrow", "base", "mid")
gen "(Maybe there's a good reason for it...)" ("base", xpos="far_left", ypos="head")
ast "..." ("annoyed", "narrow", "base", "down")
gen "So, what do you say?" ("grin", xpos="far_left", ypos="head")
ast "..." ("annoyed", "closed", "base", "mid")
ast "...{fast} Heck yes!" ("smile", "narrow", "base", "mid")
gen "Great! Then let me just bring her up here..." ("grin", xpos="far_left", ypos="head")
stop music fadeout 1
hide astoria_main
with d3
pause .8
nar "You summon Susan to your office."
play sound "sounds/knocking.ogg"
call bld
"*knock-knock-knock*"
sus "*Uhm*... Professor Dumbledore, you wanted to see me?"
gen "Yes Miss Bones, and that would require you to come in here..." ("base", xpos="far_left", ypos="head")
sus "Oh... Right..."
call sus_walk(action="enter")
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
ast "Hey [name_susan_astoria]!" ("grin", "narrow", "base", "L", xpos="right", ypos="base")
sus "Astoria? What are you doing here?" ("angry", "wide", "shocked", "left", xpos="base", ypos="base")
ast "Oh, don't mind me..." ("base", "base", "base", "R")
gen "Come up here for a moment, Miss Bones..." ("base", xpos="far_left", ypos="head")
sus "Oh... Okay sir." ("soft", "base", "base", "mid")
call sus_walk("desk")
pause.2
gen "Alright, so the reason--" ("base", xpos="far_left", ypos="head")
call ast_chibi("wand",530,"base")
ast "Is so that I could put a curse on you!" ("grin", "narrow", "angry", "mid", xpos="base", ypos="base")
sus "P-Put a curse on me?!!" ("open", "wide", "shocked", "stare", xpos="right", ypos="base")
call ast_chibi("wand_casting",530,"base")
sus "No! Professor, do someth--" ("angry", "base", "base", "mid")
# Astoria casts imperio.
stop music fadeout 2.0
hide susan_main
ast "IMPERIO!" ("scream", "base", "angry", "mid")
call hide_characters
hide screen bld1
with d3
pause.2
# chibi spell animation.
play sound "sounds/magic2.ogg"
call ast_chibi("wand_imperio",530,"base")
with hpunch
pause.8
play music "music/Under-the-Radar by PhobyAk.ogg" fadein 1
sus "W-what{w=0.3} are{w=0.3} y{w=0.1}o{w=0.1}u--" ("soft", "base", "base", "stare")
nar "Susan's eyes flicker and a blank expression spreads across her face."
sus "..." ("soft", "narrow", "base", "stare")
call ast_chibi("wand",530,"base")
ast "Finally..." ("grin", "base", "angry", "mid")
ast "So what should we do now?" ("open", "base", "base", "R")
ast "We could do whatever we want [name_genie_astoria]!" ("open", "base", "base", "R")
gen "How about we have her take her clothes off?" ("base", xpos="far_left", ypos="head")
ast "All of them?!" ("clench", "base", "worried", "mid")
gen "What? Didn't that work last time?" ("base", xpos="far_left", ypos="head")
gen "Let's find out if she really is a secret exhibitionist!" ("grin", xpos="far_left", ypos="head")
ast "I only made her take her top off." ("open", "base", "base", "mid")
gen "Then there you go!" ("grin", xpos="far_left", ypos="head")
ast "Okay then..." ("smile", "base", "base", "L")
ast "Susan, are you listening?" ("open", "closed", "base", "mid")
sus "Yes..." ("normal", "narrow", "base", "stare")
ast "Good, I want you to pay attention..." ("open", "base", "base", "L")
sus "..." ("soft", "narrow", "base", "stare")
ast "I want you to...{w} to..." ("open", "base", "base", "L")
gen "Tell her to take off her top!" ("base", xpos="far_left", ypos="head")
ast "Very well, [name_genie_astoria]..." ("clench", "base", "base", "L")
ast "Susan, I want you to take off your...{w} your...{w} Take your top off!" ("clench", "base", "base", "L")
sus "..." ("soft", "wide", "shocked", "stare", cheeks="blush")
sus "..." ("soft", "narrow", "low", "stare", cheeks="blush")
play sound "sounds/gulp.ogg"
gen "*Gulp!*" ("angry", xpos="far_left", ypos="head")
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.strip("top")
sus "" ("angry", "narrow", "base", "stare")
pause.5
gen "Oh no, Miss Bones!" ("base", xpos="far_left", ypos="head")
gen "What are you doing?!" ("grin", xpos="far_left", ypos="head")
hide screen bld1
with d3
pause.8
call gen_chibi("jerk_off_behind_desk")
pause.5
sus "..." ("angry", "wide", "sad", "stare", cheeks="blush")
ast "Speak, [name_susan_astoria]!" ("annoyed", "narrow", "base", "mid")
sus "I-I-I'm sorry, Professor Dumbledore, I don't know what's come over me..." ("open", "wide", "sad", "stare", cheeks="blush")
sus "I'm Sorry you have to see this..." ("angry", "narrow", "sad", "stare", cheeks="blush")
ast "See what Suzy?" ("grin", "narrow", "angry", "mid")
sus "My gross boobs..." ("open", "happy", "worried", "stare", cheeks="blush")
ast "(I knew they were gross!)" ("grin", "base", "angry", "L")
sus "Please Sir--" ("open", "narrow", "worried", "stare", cheeks="blush")
sus "Don't think less of me..." ("soft", "narrow", "worried", "stare", cheeks="blush")
ast "Now take them out!" ("angry", "narrow", "base", "L")
sus "" ("soft", "narrow", "base", "stare", cheeks="blush")
pause .8
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.strip("bra")
sus "" ("soft", "narrow", "low", "stare", cheeks="blush")
gen "{size=+10}Nice!{/size}" ("angry", xpos="far_left", ypos="head")
ast "Sir!" ("base", "narrow", "angry", "mid")
gen "What? You can't blame me for this!" ("base", xpos="far_left", ypos="head")
ast "We're doing this so I can cast the spell more successfully." ("clench", "narrow", "angry", "mid")
ast "(Please...)" ("annoyed", "narrow", "angry", "R",cheeks="blush")
gen "Don't you think her breasts are pretty?" ("base", xpos="far_left", ypos="head")
ast "{b}No!{/b} they're huge and soft and squishy and, and, and... gross!" ("clench", "closed", "angry", "mid")
gen "Well, you've got two out of three..." ("grin", xpos="far_left", ypos="head")
gen "You're right about them being huge and soft." ("grin", xpos="far_left", ypos="head")
ast "Sir!" ("clench", "narrow", "angry", "mid")
sus "Did I do something wrong?" ("angry", "happy", "worried", "stare", cheeks="blush")
ast "Your ugly tits are all wrong, they belong on a cow!" ("scream", "base", "angry", "L")
sus "Cow!? W-why are you always being so mean to me?" ("angry", "wide", "sad", "stare", cheeks="blush")
ast "*Pfft*... you know..." ("annoyed", "narrow", "angry", "R")
sus "A-{w=0.3}Are you just going to let her say that, s-sir?" ("soft", "happy", "worried", "stare", cheeks="blush")
ast "Shut up cow!" ("angry", "narrow", "angry", "R")
sus "" ("upset", "happy", "sad", "stare", cheeks="blush")
pause .8
nar "You keep stroking your rock-hard cock whilst marvelling at Susan's heaving chest."
gen "(So big...{w=0.4} Soft...{w=0.4} And squishy...)" ("angry", xpos="far_left", ypos="head")
sus "..." ("upset", "happy", "sad", "stare", cheeks="blush")
ast "Alright, I think you're enjoying this a little too much!" ("clench", "base", "angry", "mid")
gen "Just give me a minute..." ("base", xpos="far_left", ypos="head")
pause.2
stop music fadeout 1
call hide_characters
call ast_chibi("reset",530,"base")
hide screen bld1
with fade
pause.8
ast "" ("annoyed", "base", "angry", "R")
sus "W--{w=0.2} what..." ("angry", "narrow", "base", "stare")
nar "Susan's eyes flicker once more as the spell lessens its hold."
call gen_chibi("sit_behind_desk")
with d3
pause.1
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
gen "(Damn it! Why did she do that?)" ("angry", xpos="far_left", ypos="head")
sus "..." ("soft", "narrow", "base", "stare")
ast "Put your clothes on, Suzy." ("smile", "base", "base", "mid")
sus "..." ("normal", "narrow", "base", "stare")
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.wear("bra", "top")
sus "" ("soft", "narrow", "base", "stare")
pause.5
hide susan_main
sus "" ("soft", "narrow", "base", "stare")
pause.5
nar "Susan dresses herself... Her eyes still looking quite unfocused and seemingly struggling to properly take in her surroundings."
gen "*Aww*...{w=0.4} Why would you do that?" ("base", xpos="far_left", ypos="head")
ast "You were getting too excited, old man." ("clench", "base", "angry", "mid")
gen "So what?" ("base", xpos="far_left", ypos="head")
ast "How am I going to get any better if you keep distracting me?" ("annoyed", "narrow", "angry", "R")
gen "Couldn't you have made her dance or something at least..." ("base", xpos="far_left", ypos="head")
ast "We could do that..." ("annoyed", "base", "base", "L")
gen "Then why don't we?" ("base", xpos="far_left", ypos="head")
ast "Because it's boring!" ("annoyed", "narrow", "base", "ahegao")
ast "I want to do something fun!" ("open", "closed", "base", "mid")
gen "*Ugh*... fine..." ("base", xpos="far_left", ypos="head")
ast "But not today..." ("annoyed", "base", "base", "mid")
ast "I should put Bessy here back in her barn before people start to notice." ("grin", "base", "angry", "L")
sus "(*Hmm*...)" ("soft", "narrow", "base", "stare")
gen "Alright..." ("base", xpos="far_left", ypos="head")
ast "Just call me for the next practice session!" ("smile", "narrow", "base", "mid")
gen "Will do." ("base", xpos="far_left", ypos="head")
gen "Oh, please escort Miss Bones to professor Tonks to be obliterated..." ("base", xpos="far_left", ypos="head")
ast "Obliviated?" ("base", "base", "worried", "mid")
gen "Yeah, that!" ("base", xpos="far_left", ypos="head")
ast "Can't you do it?" ("annoyed", "base", "base", "mid")
nar "Susan's eyes shift and become a bit more focused as she begins to recognize where she is..."
sus "Wait, where...{w=0.4} am..." ("soft", "narrow", "base", "downL")
gen "My wand casting hand is a bit tired for some reason..." ("base", xpos="far_left", ypos="head")
ast "Fine..." ("annoyed", "base", "worried", "R")
gen "And hurry up will you?" ("base", xpos="far_left", ypos="head")
ast "Yeah, yeah..." ("annoyed", "narrow", "base", "mid")
call ast_walk("door","base")
pause.2
call ast_chibi("stand","door","base", flip=False)
with d3
pause.5
ast "Come on Suzy, time to give professor Tonks a visit." ("open", "base", "base", "mid")
sus "Professor...{w=0.4} Tonks?" ("soft", "narrow", "shocked", "downL")
call sus_walk(680, "base")
call sus_chibi("leave")
call hide_characters
call ast_chibi("stand","door","base", flip=True)
pause .3
call ast_chibi("leave")
hide screen bld1
with d3
pause.5
call bld
gen "(*Hmm*... Looks like Miss Bones had more of a lingering effect than Tonks...)" ("base", xpos="far_left", ypos="head")
gen "(Maybe leaving Tonks out of this was a bad idea...)" ("base", xpos="far_left", ypos="head")
gen "(Nah...{w=0.3} She's had her fun...)" ("base", xpos="far_left", ypos="head")
# Increase affection once (this is the first event)
if ag_se_imperio_sb.counter == 1:
$ ast_whoring += 1
jump end_ag_se_imperio_sb
label ag_se_imperio_sb_E2:
ast "Let's try something else this time!" ("grin", "narrow", "base", "mid", xpos="close", ypos="base", trans=fade)
gen "Of course!" ("grin", xpos="far_left", ypos="head")
ast "Great, I can't wait to see the look on Susan's dumb face..." ("grin", "closed", "base", "mid")
gen "Let me just bring her up here." ("base", xpos="far_left", ypos="head")
stop music fadeout 1
gen "..." ("base", xpos="far_left", ypos="head")
ast "..." ("annoyed", "base", "base", "R")
call hide_characters
hide screen bld1
with d3
call sus_walk(action="enter")
pause.2
sus "You wanted to see me, sir?" ("soft", "base", "base", "mid", xpos="base", ypos="base")
sus "Astoria? Why are you here?" ("angry", "wide", "base", "left")
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
ast "Oh... no reason..." ("annoyed", "base", "base", "down", xpos="right", ypos="base")
gen "Come up here for a moment Miss Bones..." ("base", xpos="far_left", ypos="head")
sus "Okay..." ("open", "base", "base", "mid")
call hide_characters
with d3
call sus_walk("desk")
pause.2
sus "Is there something wrong, Professor?" ("open", "happy", "base", "left", xpos="right", ypos="base")
gen "As a matter of fact there is..." ("base", xpos="far_left", ypos="head")
sus "R-really? Is this about me returning my books to the library a day late?" ("angry", "happy", "base", "mid")
sus "I swear it won't happen again!" ("angry", "happy", "worried", "mid")
gen "What? No, I'm afraid there's an issue with your uniform..." ("base", xpos="far_left", ypos="head")
sus "Oh... Is it because I'm not wearing the school robe?" ("soft", "happy", "base", "mid")
sus "I can wear it from now on if you like!" ("soft", "wide", "sad", "mid")
gen "Actually, Wearing too many clothes is the problem." ("base", xpos="far_left", ypos="head")
sus "W-w-what???" ("angry", "wide", "base", "mid")
sus "You can't be serious sir!" ("clench", "wide", "base", "mid")
gen "I am, Miss Bones..." ("base", xpos="far_left", ypos="head")
gen "Hiding away those glorious milk duds of yours is a serious offence!" ("grin", xpos="far_left", ypos="head")
ast "(*Pffft*, gloriously gross...)" ("annoyed", "base", "angry", "R", xpos="base", ypos="base")
sus "P-professor Dumbledore! Why would you want me to do s-something like that!" ("angry", "wide", "sad", "stare", cheeks="blush", trans=hpunch) #Perhaps she should be a bit intrigued =Blush
call ast_chibi("wand",530,"base")
sus "I think I better go..." ("disgust", "base", "sad", "right", cheeks="blush")
call ast_chibi("wand_casting",530,"base")
ast "" ("grin", "base", "angry", "L")
pause.5
# Astoria casts imperio.
stop music fadeout 2.0
hide susan_main
ast "IMPERIO!{w=0.8}{nw}" ("scream", "base", "angry", "mid", trans=hpunch) # Screams it even louder
call hide_characters
hide screen bld1
with d3
pause.2
# chibi spell animation.
play sound "sounds/magic2.ogg"
call ast_chibi("wand_imperio",530,"base")
with hpunch
pause.8
play music "music/Under-the-Radar by PhobyAk.ogg" fadein 1
sus "..." ("soft", "happy", "shocked", "stare")
ast "*ha-ha-ha-ha!*" ("grin", "closed", "base", "mid")
ast "Her face was priceless when you said milk duds..." ("grin", "base", "base", "L")
gen "You liked that?" ("base", xpos="far_left", ypos="head")
ast "Of course! Anything to bring Bessy here down a peg." ("smile", "base", "base", "L")
call ast_chibi("wand",530,"base")
ast "So what should we make her do today, [name_genie_astoria]?" ("smile", "base", "base", "mid")
gen "Something fun, perhaps?" ("base", xpos="far_left", ypos="head")
ast "*Hmm*..." ("annoyed", "narrow", "base", "R")
gen "Maybe something a little more... adventurous?" ("base", xpos="far_left", ypos="head")
ast "You mean like making her show you her milk duds?" ("upset", "narrow", "base", "mid")
gen "Well if you insist..." ("base", xpos="far_left", ypos="head")
ast "*ugh*... you're such a filthy pervert!" ("clench", "narrow", "angry", "mid")
gen "We can do something else if you--" ("base", xpos="far_left", ypos="head")
ast "I didn't say no..." ("upset", "closed", "base", "mid")
gen "Oh... well how about you make it so--" ("base", xpos="far_left", ypos="head")
ast "I get to choose, [name_genie_astoria]!" ("scream", "closed", "angry", "mid")
gen "What? Why?" ("base", xpos="far_left", ypos="head")
ast "Because it's my spell and my wand!" ("open", "narrow", "angry", "mid")
ast "Not to mention you'd probably do something over the top and gross..." ("open", "narrow", "angry", "R")
gen "Probably..." ("base", xpos="far_left", ypos="head")
gen "So what's your plan?" ("base", xpos="far_left", ypos="head")
ast "Just wait and see old man!" ("clench", "narrow", "angry", "mid")
ast "Susan, can you hear me?" ("open", "closed", "base", "L")
sus "Yes..." ("open", "happy", "base", "stare")
ast "You now have an uncontrollable urge to take your top off, okay?" ("open", "closed", "base", "mid")
sus "Okay..." ("soft", "happy", "base", "stare")
ast "Awesome! Now act like you normally would, [name_susan_astoria]!" ("grin", "base", "angry", "L")
sus "..." ("normal", "base", "base", "stare")
nar "The blank expression slowly fades from Susan's eyes..."
sus "ugh..." ("angry", "narrow", "low", "down")
sus "What happened?" ("angry", "narrow", "base", "mid")
ast "Nothing Suzy, Dumbledore was just explaining how your uniform wasn't up to scratch." ("grin", "base", "base", "mid")
sus "My uniform... You're right... Too many clothes..." ("disgust", "happy", "sad", "downL")
sus "I need to take off my top..." ("soft", "narrow", "low", "down")
ast "*Mhmm*, that's right, Suzy... Why don't you show the old man here your gross boobs... Don't you think he's old?" ("grin", "base", "angry", "mid")
sus "I... I suppose..." ("open", "happy", "low", "downL")
ast "That's right... Only a nasty slut would show her boobs to such a wrinkly old man..." ("grin", "narrow", "angry", "L")
gen "Hey!" ("base", xpos="far_left", ypos="head")
ast "Quiet sir... don't ruin my fun!" ("clench", "narrow", "angry", "mid")
gen "Fine..." ("base", xpos="far_left", ypos="head")
sus "I-I'm not a slut..." ("angry", "happyCl", "base", "down")
ast "Well I'm sure you'll be able to keep your top on then, [name_susan_astoria]." ("open", "closed", "base", "mid")
sus "I... There's something wrong sir!" ("angry", "happyCl", "low", "mid", cheeks="blush")
sus "I can't help it..." ("angry", "happy", "worried", "down", cheeks="blush")
ast "" ("grin", "base", "angry", "L")
pause.2
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.strip("top", "bra")
sus "" ("angry", "wide", "shocked", "down", cheeks="blush")
call ctc
gen "Nice!" ("angry", xpos="far_left", ypos="head")
hide screen bld1
with d3
pause.1
call gen_chibi("jerk_off_behind_desk")
pause.8
ast "[name_genie_astoria]! Are you touching yourself?" ("scream", "base", "base", "mid")
gen "*Ugh*... can you blame me?" ("base", xpos="far_left", ypos="head")
gen "It's not every day you get to see a rack like this..." ("angry", xpos="far_left", ypos="head")
ast "Well stop it! It's gross!" ("clench", "narrow", "angry", "mid")
gen "Alri--" ("base", xpos="far_left", ypos="head")
sus "Please sir... it's too much!" ("angry", "happy", "worried", "downR", cheeks="blush")
sus "It's bad enough that I can't help showing you my breasts..." ("disgust", "happyCl", "worried", "mid", cheeks="blush")
ast "Wait..." ("smile", "base", "base", "mid")
ast "Keep going, sir!" ("clench", "narrow", "angry", "mid")
gen "What?" ("base", xpos="far_left", ypos="head")
sus "What?" ("angry", "wide", "sad", "right", cheeks="blush")
ast "Well if Bessy here hates it... Then I love it!" ("clench", "narrow", "angry", "L")
ast "Besides, it's not like I can see anything under the desk." ("open", "closed", "base", "mid")
sus "(...)" ("annoyed", "happy", "sad", "right", cheeks="blush")
gen "So you're okay with this?" ("base", xpos="far_left", ypos="head")
ast "*Mhmm*... just don't expect me to touch it old man!" ("upset", "narrow", "angry", "mid")
sus "W-why is this happening!" ("angry", "closed", "worried", "mid", cheeks="blush")
ast "No one asked you, slut!" ("clench", "narrow", "angry", "L")
sus "I am not a slut!" ("angry", "happy", "low", "stare", cheeks="blush")
ast "Ha! You're standing here, letting old man dumbledore ogle your fat tits while he jerks his wrinkly old cock!" ("open", "closed", "base", "mid")
ast "If that's not a slut then I don't know what is!" ("clench", "narrow", "angry", "L")
gen "(There's no way Tonks would allow this, perhaps this was a good idea after all...)" ("base", xpos="far_left", ypos="head")
sus "I-- don't know why I'm doing this..." ("angry", "narrow", "base", "down", cheeks="blush")
sus "You probably cursed me!" ("angry", "base", "sad", "downR", cheeks="blush")
ast "Duh!" ("grin", "narrow", "angry", "L")
sus "Well stop it!" ("angry", "narrow", "base", "right", cheeks="blush")
ast "*Nuh-uh*!" ("open", "closed", "base", "mid")
sus "Please Astoria..." ("angry", "narrow", "shocked", "right", cheeks="blush")
nar "You start to zone out as the two girls argue, focusing on Susan's heaving bosom."
gen "Yeah... that's it..." ("angry", xpos="far_left", ypos="head")
ast "You can leave once Dumbledore here's done." ("open", "closed", "base", "mid")
sus "What? you mean I have to wait until he..." ("angry", "wide", "worried", "mid", cheeks="blush")
sus "This is unbelievable!" ("angry", "wide", "sad", "mid", cheeks="blush")
sus "I'm going to report both of you to the ministry of magic!" ("upset", "happyCl", "annoyed", "mid", cheeks="blush")
sus "My aunt is the head of the department of magical law enforcement I'll have you know!" ("angry", "narrow", "annoyed", "mid", cheeks="blush")
ast "yeah... I've met your creepy old aunt." ("annoyed", "narrow", "base", "L")
sus "What? Did you curse her too, you evil little witch?" ("open", "base", "angry", "right", cheeks="blush")
ast "I wish..." ("base", "narrow", "base", "R")
sus "Well she's going to lock both of you away in Azkaban!" ("annoyed", "closed", "angry", "mid", cheeks="blush")
sus "You'll never see me or anyone else again..." ("base", "closed", "annoyed", "mid", cheeks="blush")
ast "Yeah, sure!" ("grin", "base", "angry", "L")
sus "*Ugh*! You're both sick!" ("disgust", "narrow", "annoyed", "stare", cheeks="blush")
ast "Says the slut baring her chest for the headmaster." ("smile", "base", "base", "L")
gen "*Mmmm*... Keep shaking those tits of yours..." ("angry", xpos="far_left", ypos="head")
sus "I am not a {size=+10}slut!{/size}" ("angry", "base", "angry", "stare", cheeks="blush")
nar "As Susan yells at the top of her voice, the effort causes her gigantic tits to rise and slap back together."
gen "{size=+10}HERE IT COMES!{/size}" ("angry", xpos="far_left", ypos="head")
sus "" ("clench", "wide", "shocked", "stare", cheeks="blush")
hide screen bld1
with d3
pause.1
call gen_chibi("cum_behind_desk")
call cum_block
gen "{size=+10}AHHH... YESS!!!!{/size}" ("angry", xpos="far_left", ypos="head")
call gen_chibi("cum_behind_desk_done")
pause.5
ast "Woah... I didn't think you'd have that much in you, sir..." ("clench", "base", "base", "mid")
sus "{size=+10}*Hmph*! I hope you Enjoy Azkaban, perverts!{/size}" ("angry", "base", "angry", "mid", cheeks="blush")
ast "" ("annoyed", "narrow", "base", "R")
nar "As you finish shooting your massive load Susan's leg twitches slightly..."
ast "Can't have that can we... Let's delve deeper." ("grin", "narrow", "angry", "L")
# chibi spell animation.
play sound "sounds/magic2.ogg"
call ast_chibi("wand_imperio",530,"base")
with hpunch
pause.8
sus "" ("soft", "happy", "shocked", "stare")
gen "W-what?" ("base", xpos="far_left", ypos="head")
nar "You watch as a colourfull mist spreads from the tip of Astoria's wand and seeps into Susan's Nostrills..."
ast "Suzy, you can still hear me right?" ("open", "base", "base", "L")
sus "Yes..." ("open", "happy", "base", "stare")
call ast_chibi("wand",530,"base")
ast "She's just so easy to put under the spell..." ("base", "narrow", "worried")
ast "Nothing like Tonks, there's something wrong here..." (eyes="base", pupils="R")
gen "W-what do you mean?" ("base", xpos="far_left", ypos="head")
ast "Quiet!" ("clench", "base", "base", "mid")
gen "..." ("angry", xpos="far_left", ypos="head")
ast "Suzy, I want you to speak the truth and nothing but the truth, okay?" ("open", "base", "base", "L")
sus "Okay..." ("soft", "narrow", "base", "stare")
gen "What are you--" ("base", xpos="far_left", ypos="head")
ast "..." ("upset", "base", "base", "mid") # Stares at you
gen "..." ("angry", xpos="far_left", ypos="head")
ast "Suzy, do you like baring your chest to the headmaster?" ("open", "base", "base", "L")
ast "Just like all those other closeted sluts?" ("clench", "narrow")
gen "(Oh shit...)" ("base", xpos="far_left", ypos="head")
sus "I... I..." ("angry", "narrow", "base", "stare", cheeks="blush")
ast "Tell me!" ("scream")
ast "" ("clench")
sus "I...{w=0.8} I do!" ("smile", "wink", "worried", "stare", cheeks="blush")
ast "I knew it!" ("scream", "narrow", "angry") # Angry
sus "" ("base", "narrow", "worried", "stare", cheeks="blush")
ast "Where's the fun if she's enjoying it!" ("clench", pupils="mid")
gen "*Errr-*" ("base", xpos="far_left", ypos="head")
ast "I want to humiliate this cow, but she's just another slut!" ("scream")
gen "A closeted slut..." ("base", xpos="far_left", ypos="head")
ast "Excuse me?" (mouth="open", eyebrows="worried")
ast "" (mouth="upset")
gen "Miss Greengrass... is there any other Hufflepuff students you know of selling favours?" ("base", xpos="far_left", ypos="head")
ast "Why would I know or care what Hufflepuffs are doing?" (mouth="clench")
gen "Just because she enjoys it doesn't mean it's not humiliating for her..." ("base", xpos="far_left", ypos="head")
gen "What would the other Hufflepuffs think of her if she knew what you have her do?" ("base", xpos="far_left", ypos="head")
ast "What do you mean?" ("upset", "base", "base")
gen "Ask her the right questions..." ("base", xpos="far_left", ypos="head")
ast "..." (eyes="closed")
ast "Suzy!" ("open", "narrow", "base", "L")
ast "" ("base")
sus "..." ("normal", "narrow", "raised", "stare", cheeks="blush")
ast "Are you ashamed of what you've done?" ("open", "base")
ast "" ("base")
sus "...{w=0.4} Yes." ("soft", "narrow", "worried", "stare", cheeks="blush")
ast "Would your house think less of you if they knew what you're doing here?" ("grin")
sus "They would..." ("open", "narrow", "worried", "stare", cheeks="blush")
gen "Well, there you go!" ("base", xpos="far_left", ypos="head")
ast "*ha-ha-ha!*" ("smile")
gen "(Nailed it...)" ("base", xpos="far_left", ypos="head")
gen "So, are we continuing with the training?" ("base", xpos="far_left", ypos="head")
ast "Of course we are!" ("smile", "base", "base", "L")
gen "Great!" ("base", xpos="far_left", ypos="head")
ast "Suzy, put your clothes back on." ("grin", "base", "base", "L")
sus "" ("normal", "narrow", "sad", "down")
pause.5
nar "Susan begins dressing herself in silence..."
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.wear("top", "bra")
pause 1
stop music fadeout 1
call hide_characters
call ast_chibi("reset",530,"base")
pause .5
call ast_walk("door","base")
pause.2
call ast_chibi("stand","door","base", flip=False)
with d3
pause.5
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
ast "Come on Suzy, time to give professor Tonks another visit." ("open", "base", "base", "L")
sus "*Hmm*... Another visit..." ("soft", "narrow", "sad", "downL")
call sus_walk(action="leave")
if game.daytime:
ast "See you, [name_genie_astoria]!" ("grin", "closed", "base", "mid")
gen "..." ("base", xpos="far_left", ypos="head")
else:
ast "Smell yah later, [name_genie_astoria]!" ("grin", "closed", "base", "mid")
gen "Good night." ("base", xpos="far_left", ypos="head")
play sound "sounds/door.ogg"
call hide_characters
call ast_chibi("hide")
call gen_chibi("sit_behind_desk")
hide screen bld1
with d3
pause.5
# Increase affection once (this is the second event)
if ag_se_imperio_sb.counter == 2:
$ ast_whoring += 1
jump end_ag_se_imperio_sb
label ag_se_imperio_sb_E3:
ast "" ("smile", "base", "base", "mid",xpos="close",ypos="base",trans=fade)
gen "Ready for another go with the curse?" ("base", xpos="far_left", ypos="head")
ast "You bet [name_genie_astoria]! I can't wait to see the look on Suzy's stupid face!" ("grin", "narrow", "angry", "down")
gen "Shall I bring her up here?" ("base", xpos="far_left", ypos="head")
ast "Do you even need to ask?" ("smile", "narrow", "base", "mid")
gen "I suppose not..." ("base", xpos="far_left", ypos="head")
stop music fadeout 1
call hide_characters
with d3
call sus_walk(action="enter")
pause.2
sus "You wanted to see me sir?" ("base", "base", "base", "mid", xpos="base", ypos="base")
sus "Astoria?" ("angry", "wide", "shocked", "left")
sus "What are you doing here?" ("open", "base", "sad", "left")
gen "Come up here for a moment, Miss Bones..." ("base", xpos="far_left", ypos="head")
sus "Okay..." ("soft", "happy", "low", "mid")
call sus_walk("desk")
pause.2
gen "..." ("base", xpos="far_left", ypos="head")
sus "*Ehm... Can I help you with--" ("soft", "narrow", "base", "downL", xpos="right", ypos="base")
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
call ast_chibi("wand",530,"base")
ast "Blah, blah, blah..." ("open", "base", "base", "R", xpos="base", ypos="base")
call ast_chibi("wand_casting",530,"base")
sus "I'm not in trouble for anything am--" ("angry", "happy", "base", "mid", xpos="right", ypos="base")
# Astoria casts imperio.
stop music fadeout 2.0
hide susan_main
ast "IMPERIO!{w=0.8}{nw}" ("scream", "base", "angry", "mid", trans=hpunch)
call hide_characters
hide screen bld1
with d3
pause.2
# chibi spell animation.
play sound "sounds/magic2.ogg"
call ast_chibi("wand_imperio",530,"base")
with hpunch
pause.8
play music "music/Under-the-Radar by PhobyAk.ogg" fadein 1
sus "Wait, what--" ("soft", "base", "base", "stare")
sus "" ("soft", "narrow", "base", "stare")
gen "Couldn't even wait this time?" ("base", xpos="far_left", ypos="head")
ast "Quiet old man." ("open", "narrow", "angry", "mid")
call ast_chibi("wand",530,"base")
ast "Susan, I want you to keep listening to my commands and act as if nothing out of the ordinary is happening." ("open", "narrow", "base", "L")
ast "Is that clear?" ("smile", "narrow", "angry", "L")
sus "Yes..." ("open", "narrow", "base", "stare")
ast "Great!{w} Now take your top off!" ("grin", "base", "angry", "L")
gen "!!!" ("angry", xpos="far_left", ypos="head")
pause .8
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.strip("top")
sus "" ("base", "base", "base", "mid")
pause.5
nar "Susan's arms now seemingly with a mind of their own, removes her top as she resumes speaking where she left off."
sus "Was this about the l-library books that I returned a day late s-sir?" ("open", "happy", "sad", "mid")
sus "I promise it won't happen again..." ("soft", "closed", "sad", "mid")
gen "Don't you worry about the books, Ms Bones!" ("grin", xpos="far_left", ypos="head")
sus "I--{w=0.4} I'm a bit confused sir, for what reason have you--" ("soft", "base", "low", "mid")
ast "Get those milk bags out Suzy!" ("clench", "narrow", "angry", "L")
sus "Of course..." ("open", "base", "low", "mid")
pause .8
hide susan_main
play sound "sounds/cloth_sound3.ogg"
$ susan.strip("bra")
sus "" ("base", "base", "base", "mid")
pause.5
gen "Miss Bones!" ("angry", xpos="far_left", ypos="head")
sus "Sir?" ("soft", "base", "raised", "mid")
sus "Have I done something wrong?" ("open", "base", "raised", "mid")
ast "Maybe it's because of you showing off your gross boobs?" ("grin", "base", "angry", "L")
sus "Astoria! H-how can you say something so rude! I'd never..." ("soft", "happy", "annoyed", "right")
ast "Oh yeah?{w} Susan, I want you to look down and take in what you've been doing this whole time." ("open", "base", "angry", "L")
sus "" ("soft", "base", "base", "downL")
pause.8
nar "Susan's eyes drift down to her exposed chest."
sus "WHAT?!?!?" ("angry", "wide", "shocked", "down", trans=hpunch)
sus "I'm so sorry, professor Dumbledore!" ("open", "wide", "worried", "stare", cheeks="blush")
sus "I don't know what's come over me!" ("angry", "happyCl", "sad", "mid", cheeks="blush")
ast "Maybe it's just because you're a nasty slut!" ("annoyed", "base", "base", "L")
sus "I am not a {size=+10}slut{/size}, Astoria!" ("angry", "happyCl", "annoyed", "mid", cheeks="blush")
ast "*Pfft*... We both know that's not true... You love showing your headmaster those oversized bean bags of yours." ("annoyed", "base", "base", "R")
sus "I-- don't know why this is happening..." ("open", "happyCl", "annoyed", "down", cheeks="blush")
sus "You must have cursed me!" ("angry", "happy", "shocked", "stare", cheeks="blush")
ast "Bingo!" ("grin", "base", "angry", "L")
sus "Professor! You h-have to stop her!" ("open", "happy", "sad", "left", cheeks="blush")
gen "*Ugh*...{w=0.3} I'm afraid I can't do that Miss Bones..." ("base", xpos="far_left", ypos="head")
ast "" ("grin", "narrow", "angry", "L")
sus "WHAT?!" ("angry", "wide", "low", "mid", cheeks="blush")
sus "W-w-w-well my aunt will just send you--" ("angry", "happyCl", "annoyed", "mid", cheeks="blush")
ast "Quiet!" ("scream", "base", "angry", "L")
nar "Astoria strengthens her grip on her wand and focuses on maintaining the spell, increasing the effect it has on Susan."
sus "To...{w=0.5} Azkaban..." ("soft", "narrow", "annoyed", "stare")
sus "..." ("soft", "narrow", "base", "stare")
ast "Alright... that'll shut her up...{w} what should we make her do this time, [name_genie_astoria]?" ("open", "closed", "base", "mid")
gen "*Hmm*... Are you actually going to let me choose this time or are you just asking to be annoying?" ("base", xpos="far_left", ypos="head")
ast "Hey! I am not annoying!" ("scream", "narrow", "angry", "mid", trans=vpunch)
gen "So, are you going to let me pick then?" ("base", xpos="far_left", ypos="head")
ast "Fine... Just nothing too disgusting!" ("clench", "narrow", "base", "mid")
ast "Or boring... that'd be even worse!" ("upset", "narrow", "angry", "mid")
gen "Alright well, first things first..." ("base", xpos="far_left", ypos="head") #I'll add a menu here with more options once art assets are drawn for them
pause.1
call gen_chibi("jerk_off_behind_desk")
pause.8
nar "Your hands sneak under your desk and around your engorged cock."
gen "That's better..." ("grin", xpos="far_left", ypos="head")
ast "(...)" ("annoyed", "narrow", "angry", "R")
gen "What?" ("base", xpos="far_left", ypos="head")
ast "I told you not to be boring! We already did this last time!" ("open", "closed", "base", "mid")
gen "If this is too boring, why don't you get her to suck me off?" ("grin", xpos="far_left", ypos="head")
ast "Sir! I said it shouldn't be something disgusting..." ("clench", "base", "base", "mid")
ast "I don't wanna have to see your nasty old cock!" ("clench", "narrow", "angry", "R")
gen "*Ugh*... Fine... What do you want to do then?" ("base", xpos="far_left", ypos="head")
ast "Well seeing as how you asked..." ("open", "closed", "base", "mid")
ast "Suzy, are you listening?" ("open", "narrow", "base", "L")
sus "yes..." ("soft", "narrow", "base", "stare")
ast "I want you to crawl under the headmaster's desk." ("grin", "base", "base", "L")
gen "I thought you didn't want her to suck me off?" ("base", xpos="far_left", ypos="head")
ast "Shut it, and stop being so disgusting!" ("scream", "closed", "angry", "mid")
sus "..." ("base", "base", "base", "mid")
ast "Now go, [name_susan_astoria]!" ("grin", "narrow", "angry", "mid")
call hide_characters
call sus_chibi("hide")
show screen blkfade
with d3
nar "Susan slowly makes her way around your desk before obediently crawling under."
pause.5
hide screen blkfade
with d3
ast "" ("smile", "base", "base", "down",xpos="mid",ypos="base",trans=fade)
hide screen bld1
call ctc
ast "And you're not allowed to come out until I say so." ("open", "closed", "base", "mid")
sus "yes..."
ast "And if you actually are just a slut then I want you to let that slut out! Show us that you really love it!" ("clench", "narrow", "base", "down")
sus "...{w=0.4} Love it?"
sus "I love it..."
ast "Good!" ("clench", "base", "angry", "L")
gen "Isn't that a little much?" ("base", xpos="far_left", ypos="head")
ast "*Pfft*! That's rich coming from you sir!" ("annoyed", "narrow", "base", "mid")
ast "If it was up to me she'd be clucking like a chicken right now!" ("annoyed", "narrow", "angry", "R")
ast "Not doing nasties with her mouth!" ("clench", "narrow", "base", "down")
gen "Fair enough..." ("base", xpos="far_left", ypos="head")
gen "Although it sounds to me as if you're enjoying this as--" ("base", xpos="far_left", ypos="head")
ast "But you've helped me so take this as a reward..." ("open", "closed", "base", "mid")
ast "Now, make sure to give Susan a reward for being so obedient as well..." ("smile", "base", "angry", "mid")
gen "You don't have to tell me twice!" ("base", xpos="far_left", ypos="head")
nar "You renew your efforts, encouraged by the image of the well-endowed redhead hidden under your desk."
ast "And Suzy..." ("open", "narrow", "base", "down")
sus "Yes..."
ast "Time for you to wake up..." ("grin", "narrow", "angry", "down")
sus "..."
play music "music/teddy-bear-waltz-by-kevin-macleod.ogg" fadein 1
hide screen blktone
hide screen bld1
with d3
pause.5
show screen bld1
with hpunch
sus "W-w-what's happening?"
play sound "sounds/kick.ogg"
with vpunch
pause.2
sus "Ouch..."
pause.5
sus "Where am I?"
ast "Don't you remember crawling under your headmaster's desk, begging him to jerk his nasty old cock for you?" ("open", "closed", "base", "mid")
with hpunch
sus "WHAT?"
sus "I'd never do something like that!"
ast "Really? Because it sure looks like you did..." ("grin", "base", "base", "R")
sus "I--{w} I don't know why..."
ast "If you don't like it down there, why don't you just hop out then?" ("annoyed", "base", "base", "R")
sus "I can't!"
ast "Really? why's that, Suzy?" ("grin", "narrow", "base", "down")
sus "I don't know... I just can't!"
ast "*Hmm*... it must be because you're such a nasty little slut then..." ("open", "closed", "base", "mid")
with hpunch
sus "I-- I am not!"
ast "Are you sure?" ("grin", "base", "angry", "down")
sus "I... Y-yes..."
ast "because it sure doesn't look like that..." ("open", "narrow", "base", "down")
ast "In fact, it looks like you're the nastiest little slut this school has ever seen!" ("grin", "closed", "base", "mid")
gen "That's it, Astoria..." ("angry", xpos="far_left", ypos="head")
sus "Professor... {b}please...{/b}"
ast "Please what, Susan?" ("open", "closed", "base", "mid")
ast "Please stop?" ("open", "narrow", "base", "down")
ast "Or please coat me in cum?" ("clench", "narrow", "angry", "down")
with hpunch
sus "ASTORIA!"
ast "Answer the question, Suzy..." ("open", "base", "base", "mid")
sus "..."
sus "Please sir..."
sus "{size=-3}Coat{/size} {size=-3}me{/size} {size=-3}in{/size} {size=-3}your{/size} {size=-3}cum...{/size}"
ast "I knew it!" ("scream", "base", "angry", "L")
ast "You're a dirty little slut after all aren't you!" ("clench", "narrow", "angry", "down")
sus "I am not! I don't know why I'm down here!"
ast "Alright then... if you're such a good girl..." ("open", "closed", "base", "mid")
ast "Why don't you tell me what it's like down there?" ("smile", "narrow", "base", "down")
sus "Down here?"
sus "Under professor Dumbledore's desk?"
ast "*Mhmm*... I bet it's nasty down there..." ("clench", "narrow", "angry", "down")
ast "It probably smells gross with all the yucky cum he shoots against that desk of his..." ("open", "base", "base", "R")
ast "Not to mention his big, smelly old cock..." ("annoyed", "narrow", "base", "ahegao")
gen "*Ahem*..." ("base", xpos="far_left", ypos="head")
ast "Quiet, sir!" ("clench", "narrow", "angry", "mid")
ast "So go on, Suzy... tell me what it's like..." ("open", "closed", "base", "mid")
sus "It... It's--"
nar "you hear Susan take a deep breath before she begins to speak."
sus "{size=+10}It's incredible!{/size}"
ast "" ("grin", "narrow", "angry", "mid")
sus "Everything about it is fantastic!"
ast "" ("smile", "base", "base", "mid")
sus "The cum stains on the back of the desk..."
ast "" ("clench", "narrow", "base", "mid")
sus "The thick smell of semen in the air..."
ast "" ("clench", "narrow", "base", "R")
sus "The way Dumbledore's stroking his {b}cock{/b}..."
ast "" ("smile", "narrow", "angry", "R")
sus "That cock... that's the best part..."
sus "I just want to--"
ast "(*Eeeegh*...)" ("scream", "closed", "angry", "mid",trans=hpunch)
sus "..."
nar "You hear Susan's words trail off into nothingness, as she takes another breath..."
sus "I wish I could live down here! Is that what you wanted to hear you evil witch?!"
ast "Almost..." ("grin", "narrow", "base", "down")
ast "I want you to tell me the truth... say you're a slut..." ("grin", "base", "angry", "mid")
ast "Then I'll let you go..." ("open", "closed", "base", "mid")
sus "Really?"
sus "Alright..."
sus "{size=-5}I'm a...{/size} {size=-3}slut...{/size}"
ast "*Hmm*... I'm not sure I heard anything. What about you, sir?" ("annoyed", "base", "base", "R")
gen "*Ah*...{w=0.3} almost..." ("base", xpos="far_left", ypos="head")
ast "Go on Suzy... one more time..." ("smile", "narrow", "base", "down")
with hpunch
sus "I'm a slut, OK!"
gen "*Ah*... YES..." ("angry", xpos="far_left", ypos="head")
sus "I'm a nasty slut who crawled under her headmaster's desk and--"
gen "HERE IT COMES SLUT!" ("angry", xpos="far_left", ypos="head")
hide screen bld1
call gen_chibi("cum_behind_desk")
call cum_block
sus "No wait! Astoria, you said I could go--"
call cum_block
gen "*ARGHHHH*!!!" ("angry", xpos="far_left", ypos="head")
nar "Susan's sudden yelps prove too much for you as your cock begins to fire off an immense load onto Susan's face..."
gen "HERE IT IS SLUT!!!" ("angry", xpos="far_left", ypos="head")
call cum_block
sus "..."
ast "That's it, [name_genie_astoria]! Make sure you get it all out..." ("grin", "narrow", "angry", "mid")
gen "*Ahhh*... don't worry about that..." ("angry", xpos="far_left", ypos="head")
nar "You give your cock a few final pumps, working out the last of your load onto Susan's waiting face..."
call gen_chibi("cum_behind_desk_done")
pause.5
gen "There we go..." ("angry", xpos="far_left", ypos="head")
ast "Nice work, [name_genie_astoria]..." ("open", "closed", "base", "mid")
ast "You can come out now, Suzy..." ("smile", "narrow", "base", "down")
sus "..."
stop music fadeout 1
hide astoria_main
show screen blkfade
with d3
nar "Susan slowly crawls out from under your desk..."
call sus_chibi("stand","desk","base")
$ susan.set_cum(face="heavy")
hide screen blkfade
with d5
sus "..." ("soft", "narrow", "low", "mid", cheeks="blush", xpos="right", ypos="base", trans=fade)
play music "music/KMcL_OpenThoseBrightEyes.ogg" fadein 1
ast "Oh my god! He absolutely covered you!" ("scream", "base", "base", "mid",xpos="base",ypos="base")
sus "..." ("annoyed", "closed", "annoyed", "right", cheeks="blush")
ast "I didn't know you had it in you, sir!" ("clench", "base", "base", "mid")
ast "Nice work!" ("smile", "base", "base", "mid")
gen "Thanks..." ("base", xpos="far_left", ypos="head")
ast "And Suzy... that look suits you." ("grin", "narrow", "angry", "L")
sus "Are you done, Astoria?" ("soft", "narrow", "annoyed", "right", cheeks="blush")
ast "Yes, you can get dressed." ("smile", "narrow", "base", "L")
show screen blkfade
with d3
nar "Susan slowly wipes the cum from her face as she begins getting dressed."
hide susan_main
$ susan.set_cum(None)
sus "I hope you two are happy..." ("soft", "happy", "annoyed", "down", cheeks="blush")
play sound "sounds/cloth_sound3.ogg"
$ susan.wear("top", "bra")
hide screen blkfade
with d5
pause .8
sus "Now, if you'll excuse me, I've got--" ("open", "closed", "annoyed", "right", cheeks="blush")
# chibi spell animation.
play sound "sounds/magic2.ogg"
call ast_chibi("wand_imperio",530,"base")
with hpunch
pause.8
nar "You watch as a colourfull mist spreads from the tip of Astoria's wand and seeps into Susan's Nostrills once again..."
ast "I don't think so..." ("smile", "narrow", "base", "L")
call ast_chibi("reset",530,"base")
sus "..." ("soft", "narrow", "base", "stare")
gen "..." ("base", xpos="far_left", ypos="head")
if game.daytime:
ast "We're going to be late for classes, Suzy!" ("annoyed", "narrow", "base", "R")
ast "Let's head to Tonks' study, shall we." ("smile", "narrow", "base", "R")
sus "Yes..." ("open", "narrow", "base", "stare")
gen "..." ("base", xpos="far_left", ypos="head")
ast "Until next time, [name_genie_astoria]!" ("grin", "closed", "base", "mid")
else:
ast "It's getting a bit late Suzy, let's head to Tonks' study..." ("annoyed", "narrow", "base", "R")
sus "Yes..." ("open", "narrow", "base", "stare")
gen "..." ("base", xpos="far_left", ypos="head")
ast "Good night, [name_genie_astoria]!" ("grin", "closed", "base", "mid")
stop music fadeout 1
call hide_characters
pause .5
call ast_walk("door","base")
pause.2
call ast_chibi("stand","door","base", flip=False)
with d3
pause.5
ast "Come on then..." ("angry", "narrow", "base", "R")
sus "Okay..." ("open", "narrow", "base", "stare")
call sus_walk(action="leave")
call hide_characters
call ast_chibi("leave")
hide screen bld1
with d3
pause.5
call gen_chibi("sit_behind_desk")
call bld
gen "(*Hmm*... Miss Bones still seemed affected even after she lessened her hold of the spell...)" ("base", xpos="far_left", ypos="head")
gen "(...)" ("base", xpos="far_left", ypos="head")
if ast_whoring < 24:
$ ast_whoring = 24
$ sus_whoring = 24
$ susan_wardrobe_unlocked = True
call end_of_content
# Increase affection once (this is the third event)
#if ag_se_imperio_sb.counter == 3:
# $ ast_whoring += 1
jump end_ag_se_imperio_sb