# Luna Gift Responses

label give_lun_gift(gift_item):
    hide luna_main
    with d5
    lun "" (xpos="mid",ypos="base",trans=d5)

    $ states.lun.gifted = True

    if gift_item == lollipop_ITEM:
        lun "A lollipop?" ("open", "base", "base", "down")
        call give_gift("You give the lollipop to Luna...", gift_item)
        lun "My father says that you should always have something sugary around in case a baby unicorn comes to visit." ("grin", "base", "base", "mid")
        lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == chocolate_ITEM:
        lun "Chocolate?" ("grin", "base", "base", "down")
        call give_gift("You give the chocolate to Luna...", gift_item)
        lun "I heard that eating chocolate helps with dementia...{w=0.4} Or was it dementors?" ("soft", "narrow", "base", "mid")

    elif gift_item == plush_owl_ITEM:
        lun "A plush owl?" ("open", "base", "base", "down")
        call give_gift("You give the stuffed owl to Luna...", gift_item)
        lun "I love owls... Growing up, there were always a few of them around, delivering my father's newspaper." ("grin", "base", "base", "mid")

    elif gift_item == butterbeer_ITEM:
        lun "Butterbeer?" ("open", "base", "base", "mid")
        lun "I could use the cork for another necklace!" ("grin", "base", "base", "mid")
        call give_gift("You give the bottle to Luna...", gift_item)
        lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == science_mag_ITEM:
        lun "Magical creatures weekly?" ("open", "narrow", "base", "down")
        lun "My daddy says that this publication refuses to recognize the existence of the Crumple-horned Snorkack..." ("annoyed", "narrow", "annoyed", "mid")
        lun "Sorry [name_genie_luna], but I'll have to refuse." ("open", "closed", "base", "mid")

    elif gift_item == girls_mag_ITEM:
        lun "Girlz weekly?" ("soft", "base", "raised", "down")
        lun "This must be one of those magazines my daddy warned me about!" ("angry", "base", "base", "down")
        lun "[name_genie_luna]!" ("angry", "base", "base", "mid")
        lun "They're corporate shills who prioritize selling their own products over advocating for the use of essential oils!" ("angry", "base", "base", "mid")
        lun "That's what my daddy told me, anyway." ("grin", "closed", "base", "mid")

    elif gift_item == adult_mag_ITEM:
        lun "This isn't \"The Quibbler\"..." ("open", "base", "worried", "down")
        lun "[name_genie_luna], you shouldn't be helping my daddy's competition!" ("angry", "base", "worried", "mid")
        lun "Please, issue a refund!" ("open", "base", "worried", "mid")

    elif gift_item == porn_mag_ITEM:
        lun "This isn't \"The Quibbler\"..." ("annoyed", "base", "base", "down")
        lun "[name_genie_luna], you shouldn't be helping my daddy's competition!" ("angry", "base", "annoyed", "mid")
        lun "Please, issue a refund!" ("angry", "base", "base", "mid")

    elif gift_item == krum_poster_ITEM:
        lun "Viktor Krum..." ("soft", "base", "raised", "down")
        lun "Who is that, again?" ("open", "base", "raised", "mid")
        lun "I'm uncertain if it's such a good idea to put this up on my wall, just in case the other girls ask me about it." ("upset", "base", "base", "down")
        lun "I appreciate the thought though, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == sexy_lingerie_ITEM:
        lun "I've seen a couple of the other girls wearing these!" ("soft", "base", "base", "down")
        call give_gift("You give the lingerie to Luna...",gift_item)
        lun "Thank you, [name_genie_luna]!" ("base", "base", "base", "mid")

    elif gift_item == sexy_stockings_ITEM :
        lun "Very unique! I like it!" ("grin", "base", "base", "down")
        call give_gift("You give the stockings to Luna...",gift_item)
        lun "Thank you, [name_genie_luna]!" ("base", "base", "base", "mid")

    elif gift_item == pink_condoms_ITEM:
        lun "Condoms?!" ("mad", "wide", "base", "mid")
        lun "... I never knew they sold those rubbery creatures." ("angry", "base", "base", "stare")
        lun "Yes, we shall study them thoroughly!" ("base", "base", "base", "mid")
        call give_gift("You give the condoms to Luna...",gift_item)
        lun "Thank you [name_genie_luna]." ("grin", "base", "base", "mid")

    elif gift_item == vibrator_ITEM:
        lun "A back-massager!" ("grin", "base", "base", "down")
        call give_gift("You give the vibrator to Luna...",gift_item)
        lun "Thank you, [name_genie_luna]!" ("grin", "base", "base", "mid")

    elif gift_item == anal_lube_ITEM:
        lun "Lube?" ("soft", "base", "raised", "down")
        lun "Will this help me get rid of the wrackspurts?" ("open", "base", "raised", "mid")
        call give_gift("You give the anal lube to Luna...",gift_item)
        lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == ballgag_and_cuffs_ITEM:
        lun "What is this?" ("soft", "base", "raised", "down")
        lun "Does this go in your mouth?" ("open", "base", "raised", "down")
        lun "But, [name_genie_luna]... How am I supposed to talk if I wear this?" ("annoyed", "narrow", "base", "mid")
        call give_gift("You give the handcuffs to Luna...",gift_item)
        lun "Thank you, I suppose..." ("soft", "base", "base", "downR")

    elif gift_item == anal_plugs_ITEM:
        if states.lun.tier <= 1:
            lun "Anal... plugs?" ("soft", "narrow", "raised", "down")
            lun "I don't understand..." ("annoyed", "base", "base", "mid")
        elif states.lun.tier == 2:
            lun "Anal plugs..." ("soft", "base", "base", "down")
            lun "Are these supposed to help with the wrackspurts?" ("open", "base", "annoyed", "mid")
            call give_gift("You give the anal plugs to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        elif states.lun.tier == 3:
            lun "Anal plugs..." ("open", "base", "base", "down")
            lun "Yes, I should probably use one of these to assist with redirecting the wrackspurts to a single area..." ("grin", "base", "base", "down")
            call give_gift("You give the anal plugs to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        else:
            lun "*Mmm*... Anal plugs... I bet these will feel good..." ("grin", "narrow", "base", "down")
            lun "I mean, I bet these will help me deal with the wrackspurts!" ("angry", "base", "base", "mid")
            call give_gift("You give the anal plugs to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == testral_strapon_ITEM:
        if states.lun.tier <= 1:
            lun "A unicorn horn!" ("smile", "wide", "base", "down")
            call give_gift("You give the strap-on to Luna...",gift_item)
            lun "I love it!" ("grin", "wide", "base", "mid")
        elif states.lun.tier == 2:
            lun "This is some sort of phallus, isn't it?" ("soft", "base", "base", "down")
            lun "Very peculiar..." ("soft", "base", "base", "down")
            lun "I shall study it for our research." ("open", "closed", "base", "mid")
            call give_gift("You give the strap-on to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        elif states.lun.tier == 3:
            lun "A penis!" ("grin", "base", "base", "down")
            lun "But, what are the straps for?" ("open", "base", "base", "down")
            lun "*Hmm*... I'll have to study it..." ("soft", "base", "base", "down")
            call give_gift("You give the strap-on to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        elif states.lun.tier == 4:
            lun "So, if I wore this... I'll have my own penis?" ("open", "base", "base", "down")
            lun "But, [name_genie_luna], I don't think I'll be able to funnel the wrackspurts through this..." ("angry", "base", "base", "mid")
            lun "There's no hole!" ("angry", "narrow", "base", "mid")
        else:
            lun "*Hmm*... You're supposed to put your legs through these holes, right?" ("open", "base", "base", "down")
            lun "But [name_genie_luna], this would cover up my lady parts!" ("angry", "base", "base", "mid")
            lun "Wait...{w=0.4} You're testing me! Did I pass?" ("angry", "narrow", "base", "mid")

    elif gift_item == broom_2000_ITEM:
        if states.lun.tier <= 1:
            lun "A broom?" ("open", "base", "raised", "down")
            lun "Hold on, there's an attachment on this seat..." ("angry", "base", "low", "down")
            lun "Oh, it's an art piece!" ("grin", "base", "base", "down")
            call give_gift("You give the broom to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]!" ("base", "base", "base", "mid")
        elif states.lun.tier == 2:
            lun "A broom, with an attached penis?" ("open", "base", "raised", "down")
            lun "Oh! You want me to study it, even when I'm flying?" ("grin", "base", "base", "mid")
            lun "Wait... That can't be it..." ("angry", "base", "base", "mid")
            call give_gift("You give the broom to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        elif states.lun.tier == 3:
            lun "A broom with a penis attached to it?" ("soft", "base", "base", "down")
            lun "I never knew brooms could grow penises..." ("soft", "base", "raised", "mid")
            lun "You learn something new every day..." ("grin", "base", "base", "mid")
            call give_gift("You give the broom to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")
        elif states.lun.tier == 4:
            lun "A broom with a penis on it... Or is that two penises?" ("soft", "base", "raised", "down")
            lun "How very strange..." ("open", "narrow", "base", "down")
            lun "I shall study it." ("base", "base", "base", "mid")
            call give_gift("You give the broom to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("grin", "base", "base", "mid")
        else:
            lun "A penis broom?" ("soft", "base", "raised", "down")
            lun "Or is it a broom penis, perhaps?" ("open", "narrow", "base", "down")
            lun "Very interesting..." ("base", "base", "base", "mid")
            call give_gift("You give the broom to Luna...",gift_item)
            lun "Thank you, [name_genie_luna]." ("grin", "base", "base", "mid")

    elif gift_item == sexdoll_ITEM:
        lun "A doll?" ("open", "base", "base", "down")
        lun "It says Joanne on it." ("soft", "narrow", "raised", "down")
        lun "Well, hello there Joanne." ("grin", "base", "base", "down")
        call give_gift("You give the doll to Luna...",gift_item)
        lun "I'm sure we're going to be great friends..." ("smile", "base", "base", "down")

    elif gift_item == anal_beads_ITEM:
        lun "Such a lovely necklace!" ("grin", "narrow", "base", "down")
        call give_gift("You give the anal beads to Luna...",gift_item)
        lun "Thank you, [name_genie_luna]." ("grin", "base", "base", "mid")

    elif gift_item == wine_ITEM:
        lun "Wine... How lovely!" ("grin", "base", "base", "down")
        call give_gift("You give the wine to Luna...", gift_item)
        lun "Thank you, [name_genie_luna]." ("base", "base", "base", "mid")

    elif gift_item == firewhisky_ITEM:
        lun "Firewhisky... How lovely!" ("grin", "base", "base", "down")
        call give_gift("You give the firewhisky to Luna...", gift_item)
        lun "Thank you, [name_genie_luna]" ("base", "base", "base", "mid")

    lun "" (xpos="base",ypos="base")
    hide luna_main
    with d5

    return

label lun_mood(value=0):
    show screen blktone
    with d3

    if value > 0:
        if value == 1:
            "Luna's mood worsened slightly."
        else:
            "Luna's mood just got a whole lot worse!"
    elif value < 0:
        if value == -1:
            "Luna's mood has improved slightly."
        else:
            "Luna's mood has improved significantly."
    else:
        "Luna's mood hasn't changed."

    $ was_negative = states.lun.mood > 0
    $ states.lun.mood = max(min(states.lun.mood+value, 100), 0)

    call describe_mood_after_gift(was_negative, states.lun.mood, value)

    hide screen blktone
    return
