

### TONKS EVENTS ###

label astoria_tonks_0: #First time astoria sent to tonks.
    call play_music("silly")
    call play_sound("door")
    ast "" ("smile", "base", "base", "mid",xpos="right",ypos="base")
    pause.5
    call nar(">Your door swings open as Astoria enters.")

    gen "Oh, you're back!" ("base", xpos="far_left", ypos="head")
    ast "Are you surprised, [ast_genie_name]?" ("smile", "base", "base", "mid")
    gen "A little... She does seem a bit weird." ("base", xpos="far_left", ypos="head")
    ast "Then why would you send me there?!" ("open", "base", "worried", "R")
    gen "eh..." ("base", xpos="far_left", ypos="head")
    ast "..." ("annoyed", "narrow", "narrow", "mid")
    ast "Well it wasn't too bad..." ("open", "base", "base", "mid")
    ast "She only wanted to ask a few questions." ("upset", "base", "base", "R")
    gen "What sort of questions?" ("base", xpos="far_left", ypos="head")
    ast "My favourite subjects, what I like, how old I am, stuff like that." ("open", "base", "base", "down")
    gen "That's it? She didn't ask you to do anything weird?" ("base", xpos="far_left", ypos="head")
    ast "Not really..." ("annoyed", "base", "base", "R")
    ast "Although she did have this look in her eyes... It was almost like she wanted to eat me..." ("open", "narrow", "worried", "mid")
    ast "She's not a werewolf is she, [ast_genie_name]?" ("open", "base", "worried", "mid")
    gen "Holy shit! Are werewolves real here?" ("base", xpos="far_left", ypos="head")
    ast "What do you mean here? Of course werewolves are real... We all learn that as children." ("open", "closed", "base", "mid")
    gen "Just testing..." ("base", xpos="far_left", ypos="head")
    gen "Oh, and I'm sure she's not a werewolf..." ("base", xpos="far_left", ypos="head")
    gen "(I hope...)" ("base", xpos="far_left", ypos="head")
    ast "She better not be, [ast_genie_name]!" ("upset", "base", "worried", "down")
    gen "I'm sure you'll get used to her." ("base", xpos="far_left", ypos="head")
    ast "Get used to her????" ("open", "base", "worried", "mid")
    ast "I don't have to see her again do I?" ("upset", "base", "worried", "down")
    gen "Well... If you want to keep learning new spells you might have to..." ("base", xpos="far_left", ypos="head")
    ast "*hmph*-- you haven't even taught me any yet!" ("clench", "narrow", "angry", "mid")
    ast "They're probably not even fun..." ("annoyed", "narrow", "angry", "R")

    if not snape_gave_spellbook:
        gen "(Right. I still need that spellbook.)" ("base", xpos="far_left", ypos="head")
        gen "Next time, [astoria_name]." ("base", xpos="far_left", ypos="head")
        gen "I've got... *uhm*... I've got stuff to take care of, yes." ("base", xpos="far_left", ypos="head")
        ast "*I don't believe that one bit..." ("annoyed", "narrow", "angry", "R")
    else:
        gen "Why don't you come over here then and we can start reading over the first one." ("base", xpos="far_left", ypos="head")
        ast "alright..." ("grin", "base", "base", "mid")

    $ astoria_tonks_intro_completed = True

    jump astoria_requests


label astoria_tonks_1:
    call play_music("silly")
    call play_sound("door")
    ast "" ("clench", "narrow", "angry", "mid",xpos="right",ypos="base")
    pause.5

    call nar(">Astoria enters your office, a sullen look painted over her face.")
    gen "How was your--" ("base", xpos="far_left", ypos="head")
    ast "Awful!" ("open", "closed", "angry", "mid")
    ast "That Tonks is a real creep, [ast_genie_name]!" ("annoyed", "base", "worried", "down")
    gen "Really? What'd she do?" ("base", xpos="far_left", ypos="head")
    ast "She called my uniform conservative!" ("upset", "narrow", "base", "down")
    ast "How can a uniform even have political beliefs?" ("annoyed", "base", "base", "R")
    ast "Let alone conservative!" ("open", "base", "worried", "down")
    ast "She's probably one of those loonies who complains on the--" ("annoyed", "narrow", "angry", "L")
    gen "That's not what conservative means." ("base", xpos="far_left", ypos="head")
    ast "Yes it is! I read it--" ("scream", "closed", "base", "mid")
    gen "It means she thinks your uniform hides too much skin..." ("base", xpos="far_left", ypos="head")
    ast "Oh..." ("clench", "narrow", "narrow", "down")
    ast "Really?" ("upset", "base", "base", "mid")
    ast "I guess that would explain the measuring tape..." ("open", "base", "base", "L")
    gen "Why don't you tell me what happened from the start?" ("base", xpos="far_left", ypos="head")
    ast "Alright..." ("upset", "narrow", "narrow", "mid")
    ast "Well first we got to her office." ("open", "base", "base", "mid")
    ast "We were just chatting a bit." ("open", "base", "base", "R")
    ast "About Candy, pets, school stuff, and if there are any boys I liked..." ("annoyed", "base", "base", "mid")
    ast "She even showed me a secret passage from here to to the kitchens I didn't even know of!" ("grin", "narrow", "angry", "mid")
    ast "Anyways, when we got there, Ginny Weasley suddenly spurted out of her office!" ("upset", "base", "worried", "down")
    gen "(Ginny Weasley? Haven't I heard that name before?)" ("base", xpos="far_left", ypos="head")
    gen "(Is that the Granger girl's Lesbo friend? I can't remember...)" ("base", xpos="far_left", ypos="head")
    ast "Her face was all red and she didn't want to look at me..." ("annoyed", "base", "base", "down")
    ast "I figured that she was probably getting in trouble for something so I didn't say anything..." ("open", "base", "base", "R")
    ast "Once we were inside, she asked what spell I'd cast this time..." ("upset", "base", "base", "down")
    ast "And who I cast it on..." ("open", "base", "base", "R")
    ast "But I don't think she was very interested..." ("smile", "base", "base", "down")
    ast "She was more excited about my uniform." ("upset", "base", "base", "mid")
    ast "She said she'd just found out that as a teacher, she was allowed to choose uniforms for her students." ("annoyed", "narrow", "angry", "R")
    gen "(We can do that?... Did that Granger lie to me?!?)" ("base", xpos="far_left", ypos="head")
    ast "And that she wanted to make some changes to my uniform because it was too conservative!" ("upset", "ahegao", "ahegao", "ahegao")
    ast "I told her I don't associate with any political party and ran out of there!" ("scream", "narrow", "angry", "R")
    ast "But if she just meant my vest was too thick I guess that's not too bad..." ("upset", "narrow", "narrow", "down")
    gen "(I'm sure that's what she meant...)" ("base", xpos="far_left", ypos="head")
    ast "Do I have to go back there sir?" ("upset", "base", "worried", "mid")
    gen "Only if you want to keep casting new spells..." ("base", xpos="far_left", ypos="head")
    ast "Ugh..." ("upset", "ahegao", "ahegao", "ahegao")
    ast "Fine..." ("annoyed", "narrow", "angry", "L")
    ast "Just make sure she keeps politics out of it!" ("annoyed", "narrow", "angry", "mid")
    gen "Will do..." ("base", xpos="far_left", ypos="head")
    ast "Good! Now about those new spells..." ("annoyed", "base", "base", "R")
    gen "We can start reading one now if you want." ("base", xpos="far_left", ypos="head")
    ast "Yay!" ("grin", "happyCl", "base", "mid")

    $ astoria_tonks_1_completed = True

    jump astoria_requests


label astoria_tonks_2:
    call play_music("silly")
    call play_sound("door")
    ast "" ("smile", "base", "base", "mid",xpos="right",ypos="base")
    pause.5

    call nar(">Astoria happily walks into your office, humming a tune as she closes the door.")
    ast "Hey, [ast_genie_name]!" ("grin", "happyCl", "base", "mid")
    gen "Hello, [astoria_name]... You seem chipper today." ("base", xpos="far_left", ypos="head")
    ast "Guess what?" ("grin", "narrow", "angry", "mid")
    gen "What's that?" ("base", xpos="far_left", ypos="head")
    ast "Tonks wants me to be a model!" ("smile", "narrow", "angry", "down",cheeks="blush")
    gen "A model?" ("base", xpos="far_left", ypos="head")
    ast "Uh huh! Did you know she's actually a costume designer in her spare time?" ("open", "base", "base", "mid")
    gen "I did not..." ("base", xpos="far_left", ypos="head")
    ast "Well she is! And she thinks I've got what it takes to be a model!" ("grin", "narrow", "angry", "mid")
    gen "Really..." ("base", xpos="far_left", ypos="head")
    ast "Yep! She even spent all day taking my measurements so she could start working on some special outfits for me!" ("grin", "happyCl", "base", "mid")
    ast "Plus she even said she'd start working on a new, cooler version of my uniform!" ("smile", "base", "base", "mid")
    gen "Huh..." ("base", xpos="far_left", ypos="head")
    ast "Isn't that great sir?" ("grin", "happyCl", "base", "mid")
    gen "Sure is." ("base", xpos="far_left", ypos="head")
    ast "And to think I thought she'd do something nasty..." ("open", "base", "base", "R")
    gen "I wouldn't put that past her just yet..." ("base", xpos="far_left", ypos="head")
    ast "Pfft, you're one to talk old man!" ("annoyed", "narrow", "angry", "mid")
    ast "I bet you spent all day thinking about what we're going to do to Susan next didn't you?" ("grin", "narrow", "angry", "mid")
    gen "The thought might have crossed my mind..." ("base", xpos="far_left", ypos="head")
    ast "Well if you wanna get to that we have to learn the new spell first, [ast_genie_name]!" ("open", "base", "base", "L")
    ast "Speaking of which..." ("annoyed", "base", "base", "R")

    $ astoria_tonks_2_completed = True

    jump astoria_requests


label astoria_tonks_3:
    #call play_music("silly")
    call play_sound("door")
    ast "" ("upset", "closed", "base", "mid",xpos="right",ypos="base")
    pause.5

    call nar(">Astoria walks into your office, snobbishly wrinkling her nose.")

    gen "Welcome back, [astoria_name]. How was--" ("base", xpos="far_left", ypos="head")
    ast "Cut the chit-chat, [ast_genie_name]! I don't have time for it!" ("clench", "closed", "base", "mid")
    ast "Tonks said you could help me with my model job!" ("open", "base", "base", "mid")
    gen "She did? How am I supposed to help?" ("base", xpos="far_left", ypos="head")
    ast "She made me some cool, new outfits she wants me to wear." ("open", "base", "base", "down")
    ast "I haven't tried them on yet so I don't know if they'll even fit.... They look really small..." ("upset", "closed", "worried", "down")
    ast "It's simple, I'll try them on and see how they suit me..." ("open", "base", "base", "down")
    ast "All you need to do is sit on your bum and tell me how great I look!" ("open", "closed", "base", "mid")
    ast "Do you think you can manage that, [ast_genie_name]?" ("upset", "narrow", "narrow", "mid")
    gen "I will try..." ("base", xpos="far_left", ypos="head")
    ast "Great! Now let's get started!" ("grin", "narrow", "angry", "mid")

    call popup("You can now access Susan & Astoria's wardrobe and change their appearance!", "Congratulations!", "interface/icons/head/astoria.webp")

    "Developer note:" ">We have made both Susan's and Astoria's wardrobe available.\nAll available clothing has also been unlocked."
    "Developer note:" ">Susan's wardrobe as well as Astoria's clothings will unlock with future events instead in later patches."

    "Developer note:" ">This marks the end of the current Astoria and Susan content! We hope you liked it!"

    $ astoria_tonks_3_completed = True

    $ astoria_wardrobe_unlocked = True
    $ susan_wardrobe_unlocked = True

    $ active_girl = "astoria"

    #call load_astoria_clothing_saves

    call reset_wardrobe_vars
    call update_wr_color_list

    $ hide_transitions = True
    ast "" (xpos="wardrobe",ypos="base")
    call screen wardrobe_old

#Tonks gives Astoria a shorter skirt
label astoria_tonks_4:
    #call play_music("silly")
    call play_sound("door")
    ast "" ("upset", "closed", "base", "mid",xpos="right",ypos="base")
    pause.5

    call nar(">Astoria walks into your office in a new skirt, her eyes nervously looking to the side.")

    gen "Welcome back, [astoria_name]. I like--" ("base", xpos="far_left", ypos="head")
    ast "Shut up!"
    gen "..." ("base", xpos="far_left", ypos="head")
    ast "I don't want to talk about it, OK?"
    gen "Talk about what?" ("angry", xpos="far_left", ypos="head")
    ast "..."
    gen "Have a fun time with Tonks?" ("base", xpos="far_left", ypos="head")
    ast "Do I look like I'm having fun?"
    gen "Mmmm, you look like a lot of fun from where I'm sitting..." ("base", xpos="far_left", ypos="head")
    ast "That's gross, [ast_genie_name]!"
    gen "So, will you going to be wearing that skirt from now on?" ("base", xpos="far_left", ypos="head")
    ast "I have to, don't I?"
    gen "Or else what?" ("base", xpos="far_left", ypos="head")
    ast "Or else Tonks will dob us in to the ministry! At least try to keep up, [ast_genie_name]."
    gen "Mmmm, well things certainly have gotten interesting..." ("base", xpos="far_left", ypos="head")
    ast "Stop looking at me like that! You've got the same look in your eye as she did!"
    gen "Ready for your next lesson then?" ("base", xpos="far_left", ypos="head")
    ast "..."
    ast "Do I have to sit on your lap again?"
    gen "I don't know how else you expect to read the book..." ("base", xpos="far_left", ypos="head")
    ast "..."
    ast "You're almost as sick as she is..."



#Tonks spanks Astoria for sending Susan home covered in cum
label astoria_tonks_5:
    call play_sound("door")
    ast "" ("upset", "closed", "base", "mid",xpos="right",ypos="base")
    pause.5

    call nar(">Astoria walks into your office in a new skirt, her face a mess from crying...")

    ast "I want you to fire Tonks!"
    gen "What--" ("base", xpos="far_left", ypos="head")
    ast "FIRE HER!!!"
    gen "I'm not sure I can do that... don't forget about Azkaban." ("base", xpos="far_left", ypos="head")
    ast "She's the one that deserves to be locked away! She's an evil, old witch!"
    gen "At least tell me what's going on." ("base", xpos="far_left", ypos="head")
    ast "She spanked me! Like I'm some sort of child!"
    gen "..." ("base", xpos="far_left", ypos="head")
    ast "It's not fair! She's crazy!"
    gen "She spanked you?" ("base", xpos="far_left", ypos="head")
    ast "Really hard!"
    ast "I was even crying and telling her to stop but she kept going!"
    ast "It was horrible! No one can do that to me!"
    gen "Why did she spank you?" ("base", xpos="far_left", ypos="head")
    ast "For nothing! She just said that I deserved it! AS IF!"
    gen "It didn't have anything to do with Susan?" ("base", xpos="far_left", ypos="head")
    ast "..."
    gen "Astoria..." ("base", xpos="far_left", ypos="head")
    ast "She might have mentioned it... But that still doesn't make it OK!"
    ast "All I did was tell Susan to walk home!"
    ast "Why is it my fault if she walked through the great hall covered in {b}your{/b} cum?"
    ast "I never told her to do that!"
    gen "..." ("base", xpos="far_left", ypos="head")
    ast "Besides, it's not like there was anyone who didn't think she was a slut anyways..."
    gen "..." ("base", xpos="far_left", ypos="head")
    ast "Well... Say something! When are you going to fire that old hag?"
    gen "Unless you think Azkaban is better than a spanking, I think we should keep miss Tonks around." ("base", xpos="far_left", ypos="head")
    ast "*Pffft* I knew you'd be useless!"
    gen "We could slow down with the spells until she cools off, if you think that would help." ("base", xpos="far_left", ypos="head")
    ast "And just let her get away with this?"
    ast "No... I'm just going to have to get back at her through Susan!"
    gen "Susan?" ("base", xpos="far_left", ypos="head")
    ast "Of course! If she wasn't such a cow none of this would have happened."
    ">With that, Astoria hops up onto your lap in her tiny skirt, giving you a dangerous look at the witches' thighs."
    ast "Now, hurry up, [ast_genie_name]! I'll never get my revenge at your reading pace!"

#Tonks spends the whole time rubbing Astoria's butt
label astoria_tonks_6:





### REPEATABLE RANDOM EVENTS ###
label astoria_tonks_random:
    $ random_number = renpy.random.randint(1, 3)

    #Tonks is into beast stuff?!
    if random_number == 1:
        #call play_music("silly")
        call play_sound("door")
        ast "" ("annoyed", "base", "base", "R",xpos="right",ypos="base")
        pause.5

        call nar(">Astoria casually walks into your office, mindlessly looking around.")
        gen "Well, how was it?" ("base", xpos="far_left", ypos="head")
        ast "Nothing special, [ast_genie_name]." ("annoyed", "base", "base", "L")
        ast "We were mostly just drinking tea and talking..." ("annoyed", "base", "base", "R")
        ast "There was a book on her shelf that caught my eye and I wanted to ready it..." ("open", "base", "base", "mid")
        ast "I think it was named Bestiary or Bestiality or something..." ("open", "narrow", "narrow", "R")
        ast "She wouldn't let me read it though... I wonder why..." ("annoyed", "base", "base", "down")
        gen "(...)" ("base", xpos="far_left", ypos="head")
        gen "Want to cast some spells, [astoria_name]?" ("base", xpos="far_left", ypos="head")
        ast "Of course, [ast_genie_name]!" ("grin", "base", "base", "down")

    #Tonks is the best!
    if random_number == 2:
        call play_music("silly")
        call play_sound("door")
        ast "" ("grin", "base", "base", "mid",xpos="right",ypos="base")
        pause.5

        call nar(">Astoria merrily walks into your office, humming a tune as she closes the door.")
        gen "So... how was your day?" ("base", xpos="far_left", ypos="head")
        ast "It was amazing, [ast_genie_name]!!!" ("scream", "wide", "wide", "wide")
        ast "Tonks showed me her creature book! All the magical creatures she's encountered over her years as an Auror!" ("open", "base", "base", "mid")
        ast "A giant, a werewolf, even a vampire!" ("grin", "narrow", "angry", "mid")
        ast "She's sooooo cool, [ast_genie_name]! The best teacher we've ever had here at this lame school!" ("grin", "happyCl", "base", "mid")
        gen "I'm glad to hear that." ("base", xpos="far_left", ypos="head")
        gen "Want to cast some spells?" ("base", xpos="far_left", ypos="head")
        ast "Hihihi-- of course!" ("grin", "base", "base", "mid")

    #Tonks sucks!
    if random_number == 3:
        #call play_music("silly")
        call play_sound("door")
        ast "" ("annoyed", "narrow", "angry", "R",xpos="right",ypos="base")
        pause.8

        ast "I hate her, [ast_genie_name]!" ("scream", "closed", "angry", "mid")
        gen "Tonks? Last time you said you liked her..." ("base", xpos="far_left", ypos="head")
        ast "That was before she wanted me to clean up her whole staffroom!" ("scream", "narrow", "angry", "mid")
        ast "Not to mention the horrible outfit she made me wear." ("clench", "narrow", "angry", "R")
        gen "Wait, what outfit?" ("base", xpos="far_left", ypos="head")
        ast "I think she called it a maiden outfit, or something." ("annoyed", "narrow", "angry", "L")
        ast "I looked so stupid in it..." ("annoyed", "narrow", "angry", "down")
        if astoria_tonks_3_completed:
            ast "She said if I really wanted to be a model, I'll need to wear whatever I'm told to wear." ("open", "closed", "base", "mid")
            ast "Even if it meant wearing nothing at all, [ast_genie_name]! Can you believe that?!" ("scream", "wide", "wide", "wide")
        gen "Hmm..." ("base", xpos="far_left", ypos="head")
        gen "I would love to see you in that outfit too!" ("grin", xpos="far_left", ypos="head")
        ast "Not a chance!" ("clench", "narrow", "angry", "mid")
        ast "Good night, [ast_genie_name]!" ("open", "closed", "base", "mid")
        gen "Wait, don't you want to--" ("base", xpos="far_left", ypos="head")
        hide astoria_main
        with d3
        pause.5

        call nar(">Astoria quickly stomps out of your room.")

        $ astoria_busy = True

        jump main_room_menu

    #ADD more random Tonks events.

    jump astoria_requests
