forked from SilverStudioGames/WTS
LoafyLemon
cd485b2bac
* Added checkpoints to forbid the editor from rolling back to menu context * Added forced checkpoint for when the editor is being opened to avoid rolling back to before it was opened (by opening a console for example) * Alleviated the issue for when the game tries to recover from the place it cannot stop rolling back, but version var is unavailable because of it being not initialized in that moment
216 lines
11 KiB
Plaintext
216 lines
11 KiB
Plaintext
|
|
label summon_susan:
|
|
|
|
$ active_girl = "susan"
|
|
$ last_character = "susan"
|
|
|
|
$ susan_busy = True
|
|
|
|
call update_susan
|
|
|
|
$ renpy.checkpoint(hard=True)
|
|
|
|
call play_music("susan")
|
|
call play_sound("door")
|
|
|
|
call sus_chibi("stand","mid","base")
|
|
with d3
|
|
|
|
sus "You wanted to see me, [sus_genie_name]?" ("open", "base", "base", "mid", xpos="base", ypos="base")
|
|
|
|
label susan_requests:
|
|
|
|
sus "" (xpos="base", ypos="base")
|
|
|
|
menu:
|
|
|
|
# Talk
|
|
"-Talk-" (icon="interface/icons/small/talk.webp"):
|
|
if sus_mood > 0:
|
|
sus "I'm sorry, [sus_genie_name], but I don't want to talk right now." ("base", "base", "base", "mid")
|
|
jump susan_requests
|
|
|
|
call susan_chitchat
|
|
jump susan_talk
|
|
|
|
"-Sexual favours-" (icon="interface/icons/small/condom.webp", style="disabled") if False:
|
|
$ TBA_message()
|
|
jump susan_requests
|
|
|
|
# Wardrobe
|
|
"-Wardrobe-" (icon="interface/icons/small/wardrobe.webp") if susan_wardrobe_unlocked:
|
|
hide susan_main with d1
|
|
call wardrobe
|
|
jump susan_requests
|
|
|
|
"-Hidden-" (style="disabled") if not susan_wardrobe_unlocked:
|
|
call nar(">You haven't unlocked this feature yet.")
|
|
jump susan_requests
|
|
|
|
"-Give Item-" (icon="interface/icons/small/gift.webp"):
|
|
$ TBA_message()
|
|
jump susan_requests
|
|
|
|
# hide susan_main with d1
|
|
# call gift_menu
|
|
# jump susan_requests
|
|
|
|
|
|
# Dismiss
|
|
"-Dismiss her-":
|
|
if game.daytime:
|
|
sus "I will go back to classes then, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
else:
|
|
sus "*Ehm*... good night then, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
|
|
call play_sound("door")
|
|
|
|
jump end_susan_event
|
|
|
|
|
|
|
|
label susan_talk:
|
|
menu:
|
|
#"--":
|
|
"-Address me only as-":
|
|
menu:
|
|
"-Sir-":
|
|
$ sus_genie_name = "Sir"
|
|
sus "Very well, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Dumbledore-":
|
|
$ sus_genie_name = "Dumbledore"
|
|
sus "Okay, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Professor-":
|
|
$ sus_genie_name = "Professor"
|
|
sus "Of course, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Old man-":
|
|
$ sus_genie_name = "Old man"
|
|
sus "That wouldn't be very polite, Professor." ("base", "base", "base", "mid")
|
|
gen "Don't worry, [susan_name]. I always tell my students to call me silly names." ("base", xpos="far_left", ypos="head")
|
|
gen "It helps bonding with them!" ("grin", xpos="far_left", ypos="head")
|
|
sus "If you say so... *Ehm*, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
gen "And soon I'm going to bond with your tits!" ("angry", xpos="far_left", ypos="head")
|
|
jump susan_talk
|
|
"-Genie-":
|
|
$ sus_genie_name = "Genie"
|
|
sus "I... *Ehm*--" ("base", "base", "base", "mid")
|
|
sus "Is that something people call you?" ("base", "base", "base", "mid")
|
|
gen "Yes-yes--, everybody!" ("base", xpos="far_left", ypos="head")
|
|
gen "It's perfectly normal!" ("base", xpos="far_left", ypos="head")
|
|
sus "(...)" ("base", "base", "base", "mid")
|
|
sus "O-- Okay then... [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Lord Voldemort-":
|
|
$ sus_genie_name = "Lord Voldemort"
|
|
sus "Why would you want me to call you that?" ("base", "base", "base", "mid")
|
|
sus "We aren't supposed to mention his name!" ("base", "base", "base", "mid")
|
|
gen "It's only a name, girl..." ("base", xpos="far_left", ypos="head")
|
|
sus "It's the name of, you-know-who!" ("base", "base", "base", "mid")
|
|
sus "That name really creeps me out, Professor!" ("base", "base", "base", "mid")
|
|
gen "I don't want my students to be scared of a name, Susan! It's practice." ("base", xpos="far_left", ypos="head")
|
|
gen "Come on... say it." ("base", xpos="far_left", ypos="head")
|
|
sus "Okay..." ("base", "base", "base", "mid")
|
|
sus "V-Voldemort..." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Daddy-":
|
|
$ sus_genie_name = "Daddy"
|
|
sus "Sir, no!" ("base", "base", "base", "mid")
|
|
sus "I can't possibly call you that!" ("base", "base", "base", "mid")
|
|
gen "But I want you to." ("base", xpos="far_left", ypos="head")
|
|
gen "There's no harm in calling me Daddy." ("grin", xpos="far_left", ypos="head")
|
|
sus "But that's!--" ("base", "base", "base", "mid")
|
|
sus "(This is wrong, Susan!)" ("base", "base", "base", "mid")
|
|
sus "Alright... Professor-- *Eeeeh*... D-Daddy." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Master-":
|
|
$ sus_genie_name = "Master"
|
|
sus "M--{w=0.2} Master?" ("base", "base", "base", "mid")
|
|
sus "I don't think I should call my teachers that." ("base", "base", "base", "mid")
|
|
gen "No-no--, that's what you call your teachers nowadays!" ("base", xpos="far_left", ypos="head")
|
|
gen "But only call me that!" ("base", xpos="far_left", ypos="head")
|
|
sus "*Ehm*... Very well, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Custom Input-":
|
|
$ temp_name = renpy.input("(Please enter the name.)", sus_genie_name, ALLOWED_CHARACTERS, length=14)
|
|
$ temp_name = temp_name.strip()
|
|
if temp_name == "":
|
|
jump susan_talk
|
|
else:
|
|
$ sus_genie_name = temp_name
|
|
sus "*Ehm*... Okay. I will call you [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Never mind-":
|
|
jump susan_requests
|
|
|
|
|
|
"-From now on I will refer to you as-":
|
|
menu:
|
|
"-Miss Bones-":
|
|
$ susan_name = "Miss Bones"
|
|
sus "Of course, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Susan-":
|
|
$ susan_name = "Susan"
|
|
sus "Of course, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Girl-":
|
|
$ susan_name = "Girl"
|
|
sus "I'm okay with that, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Cow-":
|
|
$ susan_name = "Cow"
|
|
sus "Why would you want to call me that, [sus_genie_name]?" ("base", "base", "base", "mid")
|
|
sus "The other girls already call me that and I hate it..." ("base", "base", "base", "mid")
|
|
gen "You poor thing!" ("base", xpos="far_left", ypos="head")
|
|
gen "You see, if someone like me would call you that, maybe it wouldn't affect you as much." ("base", xpos="far_left", ypos="head")
|
|
sus "I--... You might be right." ("base", "base", "base", "mid")
|
|
sus "You can call me a Cow, [sus_genie_name]." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Betsy-":
|
|
$ susan_name = "Betsy"
|
|
sus "But, sir... Isn't that... You know..." ("base", "base", "base", "mid")
|
|
gen "You know... What?" ("base", xpos="far_left", ypos="head")
|
|
sus "Isn't that a name you'd give to a-- A cow?" ("base", "base", "base", "mid")
|
|
gen "Oh, is it?" ("base", xpos="far_left", ypos="head")
|
|
sus "*Ehm*... Yes, I think so at least..." ("base", "base", "base", "mid")
|
|
sus "Some of the other girls shouted it at me before..." ("base", "base", "base", "mid")
|
|
gen "That's a shame... I thought you'd like it..." ("base", xpos="far_left", ypos="head")
|
|
sus "Oh, Well... I suppose as long as it's not ill meaning..." ("base", "base", "base", "mid")
|
|
gen "Of course not!" ("base", xpos="far_left", ypos="head")
|
|
sus "Alright then, you can call me that if you like..." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Slut-":
|
|
$ susan_name = "Slut"
|
|
sus "[sus_genie_name]!" ("base", "base", "base", "mid")
|
|
sus "You can't be serious!" ("base", "base", "base", "mid")
|
|
gen "Why not. Nobody has to know..." ("base", xpos="far_left", ypos="head")
|
|
sus "How could you even think of me like that!" ("base", "base", "base", "mid")
|
|
sus "I'm not a... slut." ("base", "base", "base", "mid")
|
|
gen "Of course not. This is just to strengthen your self-esteem." ("base", xpos="far_left", ypos="head")
|
|
gen "Trust me, I know what I'm doing." ("base", xpos="far_left", ypos="head")
|
|
gen "Being called a slut always boosts a girls confidence!" ("base", xpos="far_left", ypos="head")
|
|
sus "R-- Really?" ("base", "base", "base", "mid")
|
|
gen "Yes. Now... shall we try it?" ("base", xpos="far_left", ypos="head")
|
|
sus "... alright, [sus_genie_name]..." ("base", "base", "base", "mid")
|
|
jump susan_talk
|
|
"-Custom Input-":
|
|
$ temp_name = renpy.input("(Please enter the name.)", susan_name, ALLOWED_CHARACTERS, length=14)
|
|
$ temp_name = temp_name.strip()
|
|
if temp_name == "":
|
|
jump susan_talk
|
|
else:
|
|
$ susan_name = temp_name
|
|
sus "I don't like it, but--" ("base", "base", "base", "mid")
|
|
sus "Promise you'll only call me that when we are alone." ("base", "base", "base", "mid")
|
|
gen "Promised!" ("grin", xpos="far_left", ypos="head")
|
|
jump susan_talk
|
|
"-Never mind-":
|
|
jump susan_talk
|
|
|
|
|
|
"-Never mind-":
|
|
jump susan_requests
|