;------------------------------------------------- ; eraTW4.571用 エレン口上セット Ver0.67 ;時止めとか少しは考慮し出した純愛口上 ;------------------------------------------------- ; ;エレン先生ときゃっきゃうふふしたい人用の口上です、ラブラブからマブダチまで幅広く…対応していません ;あなたがエレン先生を攻略する感じ、あなたに魅力があろうが魅惑的だろうが一目惚れはありません、あしからず。一目惚れ実装したらゲームバランスが崩壊するし ;※※※※※※他者による修正、加筆、改変についての但し書き※※※※※※ ;前提としてオリジナル作者以外が手を入れる場合は、オリジナル作者の許可を求めること ;オリジナル作者とコンタクトが取れない場合には以下の但し書きに従ってUPできるかどうか判断してください。 ;**** Copyright **************************************************************** ;本口上の修正について（許可する行為のみ残してください） ;【誤字・脱字修正】【分岐条件・erb構文に関する修正】【本体Ver・Rev変更対応】【フラグの管理・修正】 ;本口上の加筆・改変について（許可する行為のみ残してください） ;【未記入部位加筆】【ランダム分岐加筆】【記入済部位加筆】 ;本口上に対するメンテナンス禁止時限について（設定しない場合、未設定のみ残してください） ;【未設定】 ;本口上に対するその他但し書き ; ;-------------------------------------------------- ;エレンの初期能力、素質、経験など ;-------------------------------------------------- ;体力 1800　気力 1300 ;□ 能力 ;欲望１、清掃技能３、戦闘能力１、料理技能２ ;□ 素質 ;処女、気丈、素直、好奇心、陽気、貞操観念、恥薄い、習得遅い、針さばき、調合知識、汚臭敏感、献身的 ;快感に素直、魅力、小柄体系、絶壁、鼓舞 ;□ 経験 ;なし ;□ 相性 ;対　なし ;被　ナズーリン:50（実際はエレンじゃなくてソクラテスだけどね） ;□ 仕事情報 ;職種　魔法屋の出張 ;日時　毎月五、十五、二十五日　14時～19時（十五日かつ天気が晴れか快晴の場合14時～21時） ;場所　里の広場 ;-------------------------------------------------- ;いろいろとめもー（ネタバレややあり） ;-------------------------------------------------- ;デート帰りキスで思慕をつけるか、思慕が付いた後に遭遇すると恥薄いが恥じらいに変化 ;恋人をつけると恥じらいor恥薄いが消滅 ;会話の分岐確率は、親密に応じた会話と季節、天候時間に応じた会話が25%、汎用会話が50%(色々と変更済み) ;汎用会話選択時、あなたの体力か気力どちらかが500以下だと20%で回復薬イベントが発生 ;あなたの教養が３以上かつエレンに恋人or恋慕or思慕が付いてる際に会話するとたまに弟子入りイベントが発生、 ;コマンド「勉強」、「戦闘訓練」でそれぞれ「魔法学習経験」、「魔法実技経験」が上がる様になる(CFLAG利用のため見えません) ;魔法を成功させると「魔法成功経験」が上昇する。上昇量は使った魔法による ;魔法学習経験が100以上、魔法実技経験が80以上、魔法成功経験が50以上になるとあなたが「調合知識」を獲得 ;初めて会った日から１年後、初めて会った場所でエレンと会話するとイベント（エレンに恋人と恋慕必須） ;２周年以降も同条件で発生、ただし初回のを起こしてないと発生しない ;新妻エレン可愛い（TWに婚姻はまだ実装されていません） ;PRINTFORMW まだ暫定メッセージなり（・∀・） まだ暫定メッセージなり（・∀・） ;%UNICODE(0x2665)% ハートマーク ;****************************************************************************** ;**** FlagManagement ********************************************************** ;本口上にて使用しているCFLAG・TCVAR等 ;□ 関数 ;M_KOJO_MESSAGE_EVENT_K44_RICE おにぎり用関数 ;M_KOJO_MESSAGE_EVENT_K44_EX_TALK 特別な日の挨拶 ;M_KOJO_MESSAGE_COM_K44_300_1_HANYO 汎用会話用関数 ;M_KOJO_MESSAGE_COM_K44_300_1_MOON_WATCH 月見会話用関数 ;M_KOJO_MESSAGE_EVENT_K44_MAGIC 弟子イベント用関数 ;M_KOJO_MESSAGE_COM_K44_414_1_SYOKU 食事会話用関数 ;M_KOJO_MESSAGE_EVENT_K44_NINSIN 妊娠後会話用関数 ;M_KOJO_MESSAGE_EVENT_K44_OPTION 口上オプションの設定 ;□ FIRSTTIME ;FIRSTTIME(1001) 名古屋のあれ ;FIRSTTIME(1002) マミドバーガー ;FIRSTTIME(1003) ボロ小屋会話 ;FIRSTTIME(1021) 初エッチ ;FIRSTTIME(1022) 初めてイった際の終了時セリフ ;FIRSTTIME(1029) 初めて御香を使った ;FIRSTTIME(1030) 初めて巨乳魔法を使った ;FIRSTTIME(1031) 初めて御香を使った（終了時） ;FIRSTTIME(1032) 初めて巨乳魔法を使った（終了時） ;FIRSTTIME(1033) 御香関連 ;FIRSTTIME(1051) 初めて噴乳した際の特殊処理 ;□ CFLAG ;CFLAG:1001 初めて会った月 ;CFLAG:1002 初めて会った日 ;CFLAG:1003 初めて会った場所 ;CFLAG:1004 ふられフラグ ;CFLAG:1007 弟子入りフラグ ;CFLAG:1008 魔法学習経験 ;CFLAG:1009 魔法実技経験 ;CFLAG:1010 魔法成功経験 ;CFLAG:1011 魔法の披露が可能かどうか ;CFLAG:1012 魔法用 ;CFLAG:1013 月に願いを ;CFLAG:1014 準恋慕 ;CFLAG:1015 妊娠後会話 ;CFLAG:1016 開店フラグ ;CFLAG:1666 嫌悪フラグ（未実装） ;CFLAG:1891 特殊エンドフラグ１ ;CFLAG:1892 特殊エンドフラグ２ ;CFLAG:1901 空白（旧　子供の性別（１で女の子、２で男の子）） ;CFLAG:1951 UPDATE用１ ;□ TCVAR ;TCVAR:350 ビデオ用 ;TCVAR:351 今日出会った回数 ;TCVAR:352 今日何回か出会ったフラグ兼仕事出立口上確認用 ;TCVAR:353 おにぎりフラグ ;TCVAR:354 現在の客数 ;TCVAR:355 本日の合計客数兼デート後フラグ ;TCVAR:356 仕事終了フラグ ;TCVAR:357 仕事用 ;TCVAR:358 特別な日の挨拶 ;TCVAR:359 記念会話用 ;TCVAR:360 料理用 ;TCVAR:361 何を作ったか ;TCVAR:362 連打防止用 ;TCVAR:363 添い寝フラグ ;TCVAR:364 仕事手伝ったよ！ ;TCVAR:365 子供の各種行事イベント ;TCVAR:371 犯されフラグ ;TCVAR:372 犯され後処理フラグ ;TCVAR:373 魔法の御香フラグ ;TCVAR:374 巨乳魔法フラグ ;TCVAR:375 押し倒され時前コマンド確認用 ;TCVAR:376 巨乳魔法時サイズ記憶用 ;TCVAR:381 二重絶頂以上回数 ;TCVAR:382 C絶頂回数 ;TCVAR:383 V絶頂回数 ;TCVAR:384 A絶頂回数 ;TCVAR:385 B絶頂回数 ;TCVAR:386 あなたの射精回数 ;TCVAR:387 イったフラグ ;TCVAR:388 M絶頂回数 ;****************************************************************************** ;PS 寅の人 ;オリジナル作者と連絡が取れない場合、上記Copyrightに従い加筆改変を行って下さい ;また本体処理・他口上処理等に干渉する異常処理がある場合でオリジナル作者による修正が ;行われない・もしくは困難な場合、Copyrightに関わらず有志による修正を許可します ;その際は元処理を削除せずコメントアウトし修正処理を挿入して下さい ;### 口上存在判定 ################################### @M_KOJO_K44(ARG) ;別人版を作成する際はこのテンプレではなく別人版用口上テンプレをご利用ください ;口上存在判定です、けしてコメントアウトしないでください ;他の処理は一切行わないように RETURN 1 ;### 口上基本フラグ設定 ############################# @M_KOJO_FLAGSETTING_K44 ;基本フラグ設定はここで行ってください ;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください ;口上専用フラグはご自由に ;Xにはキャラ番号を入れてください ;眠姦口上有、時間停止口上有、なりきりに1を入れると、それぞれ時間停止時、眠姦時、なりきり時にコマンド口上が読み込まれるように ;入れないと時間停止時、眠姦時、なりきり時は一切喋りません ;CFLAG:X:眠姦口上有 = 0 ;Custom code, enables time-stop text CFLAG:44:時間停止口上有 = 1 ;CFLAG:X:なりきり口上有 = 0 ;破瓜キャンセル口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPでキャンセルの成否を操作できます ;CFLAG:X:破瓜キャンセル口上有 = 0 ;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで押し倒しの成否を操作できます ;CFLAG:X:口上内抱き寄せ判定_初回 = 0 ;CFLAG:X:口上内抱き寄せ判定_通常 = 0 ;押し倒し禁止に1を入れると、自分から押し倒してこなくなります ;以下は恋慕かセフレがつくまで押し倒してこなくなる使用例 ;IF !TALENT:X:恋慕 && !TALENT:X:セフレ ; CFLAG:X:押し倒し禁止 = 1 ;ELSE ; CFLAG:X:押し倒し禁止 = 0 ;ENDIF ;来訪不能に1を入れると、来訪してこなくなります ;以下は面識があるまで来訪してこなくなる使用例 ;IF !CFLAG:X:面識 ; CFLAG:X:来訪不能 = 1 ;ELSE ; CFLAG:X:来訪不能 = 0 ;ENDIF ;### 口上色判定 ################################### @M_KOJO_COLOR_K44 ;custom code, profile translation @CHARA_INFO_KOJO_K44() CALL M_KOJO_COLOR_K44 PRINTFORML %nameArray:44:na_Title% RESETCOLOR PRINTL PRINTFORML This young girl may appear immature, but she comes from a family of witches that has been practicing magic for generations, PRINTFORML and she herself is an accomplished witch who is over 1000 years old. PRINTFORML For someone who's lived so long, she has a hard time remembering things, forgetting one thing after another, piece by piece as she goes. PRINTFORML She dreams of falling in love with a handsome man, but due to her constitution, PRINTFORML which causes her hair to become electrically charged when she uses magic, and her young appearance, her hopes have yet to come true. PRINTFORML Originally, she lived in a different dimension from the one where Gensokyo exists, but a mysterious force sent her here. PRINTFORML Nowadays, she is residing in Gensokyo... So it would seem, however she sometimes returns to her original world nonetheless. PRINTFORML Incidentally, her store used to be located within the Hakurei Shrine grounds, but has now been moved to a different location. RETURN 1 ;ここでSETCOLORすることで口上に色を付けられます ;例：SETCOLOR 0xC07070 SETCOLOR 0xFFF10F ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;"UPDATE判定" ;※※※※※※※※※※※※※※※※※※※※※※※※※※ @M_KOJO_UPDATE_K44 ;口上独自のUPDATE用 ;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ IF CFLAG:44:1951 < 2 CFLAG:44:1951 = 2 IF CFLAG:44:1007 == 1 PRINTFORML Fixing event progression after the apprenticeship to ensure it is correct... SIF CFLAG:44:1008 > 30 CFLAG:44:1012 = 1 SIF CFLAG:44:1008 > 40 CFLAG:44:1012 = 2 SIF CFLAG:44:1008 > 60 && CFLAG:44:1009 > 20 && CFLAG:44:1010 > 10 CFLAG:44:1012 = 3 SIF CFLAG:44:1008 > 100 && CFLAG:44:1009 > 50 && CFLAG:44:1010 > 40 CFLAG:44:1012 = 4 SIF CFLAG:44:1008 > 150 && CFLAG:44:1009 > 80 && CFLAG:44:1010 > 60 CFLAG:44:1012 = 5 SIF CFLAG:44:1008 > 200 && CFLAG:44:1009 > 120 && CFLAG:44:1010 > 100 CFLAG:44:1012 = 6 SIF CFLAG:44:1008 > 300 && CFLAG:44:1009 > 200 && CFLAG:44:1010 > 250 CFLAG:44:1012 = 7 ENDIF ENDIF ;出産経験、子供の誕生日で判定します IF EXP:44:出産経験 FOR LOCAL, 1, MAXCHILD + 1 ;UPDATE時にCHILD_SEXをリセットしています IF CHILD_BIRTHDAY:44:LOCAL && !CHILD_SEX:44:LOCAL ;ここで設定しなおします PRINTFORML What is %CHILDNAME:44:LOCAL%'s sex? CALL ASK_M("Random", 1, "Girl", 1, "Boy", 1) IF RESULT CHILD_SEX:44:LOCAL = RESULT ELSE CHILD_SEX:44:LOCAL = RAND:2 + 1 ENDIF PRINTFORM %CHILDNAME:44:LOCAL, 15, LEFT% has been set to a \@ CHILD_SEX:44:LOCAL == 1 ? girl # boy \@ born on CALL PRINT_DATE(CHILD_BIRTHDAY:44:LOCAL) PRINTFORML . ENDIF NEXT WAIT ENDIF RETURN 1 @KOJO_OPTION_K44 CALL KOJO_OPTION_ITEM(@"[Wholesome Mode] Status: \@ CFLAG:44:1891 ? Disabled # Enabled\@", 1, "onetime", CFLAG:44:1951 >= 3) ;process the input portion @KOJO_OPTION_K44_RESULT_1 CFLAG:44:1951 = 3 CFLAG:44:1891 = 1 PRINTFORML [Wholesome Mode] expects sexual harassment commands to never be used. PRINTFORML Ellen will never initiate anything unless her sexual frustration reaches extreme levels. PRINTFORML It is recommended for those who want a wholesome, normal relationship with her. PRINTFORML Note however that it is impossible to toggle this once set. PRINTFORML As soon as you initiate any naughty action with her, this mode will be disabled and Ellen will be as horny as any other girl. ;PRINTFORML 'Child's Gender' will appear in the parenting dialogue when the 'Child's Appearance' option is enabled. ;PRINTFORML It is used to specify the gender of a child you have with Ellen. ;PRINTFORMW You can change the gender by making a wish with Ellen. PRINTFORML Turn on the [Wholesome Mode]? CALL ASK_YN("Yes","No") IF !RESULT CALL M_KOJO_MESSAGE_EVENT_K44_OPTION ELSE PRINTFORMW [Wholesome Mode] will not be turned on. ENDIF ;口上オプションの設定 @M_KOJO_MESSAGE_EVENT_K44_OPTION ;CFLAG:1901 = 1 $OPTION PRINTFORML Select a setting. IF SELECTCOM != 421 CALL PRINTBUTTON_EX("{Wholesome Mode}",0,!CFLAG:1891) SIF !CFLAG:44:1891 PRINT [Enabled] PRINTL ENDIF ;CALL PRINTBUTTON_EX("{子供の性別}",1,1) ;IF CFLAG:44:1901 == 1 ; PRINT [女の子] ;ELSEIF CFLAG:44:1901 == 2 ; PRINT [男の子] ;ENDIF ;PRINTL ;CALL PRINTBUTTON_EX("やり直し",2,) PRINTL PRINTL PRINTBUTTON "[Accept]", 999 INPUT IF RESULT == 999 PRINTFORMW Settings saved RETURN 1 ELSEIF RESULT == 0 IF SELECTCOM != 421 && CFLAG:44:1891 == 1 CFLAG:44:1891 = 0 ELSEIF CFLAG:44:1891 == 0 CFLAG:44:1891 = 1 ENDIF ELSEIF RESULT == 1 IF CFLAG:44:1901 == 1 CFLAG:44:1901 = 2 ELSEIF CFLAG:44:1901 == 2 CFLAG:44:1901 = 1 ENDIF ;ELSEIF RESULT == 2 ; SIF SELECTCOM != 421 ; CFLAG:44:1891 = 1 ; CFLAG:44:1901 = 0 ENDIF GOTO OPTION ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;"ENCOUNTER"系イベント（エクストラ構文） ;※※※※※※※※※※※※※※※※※※※※※※※※※※ @M_KOJO_ENCOUNTER_K44 ;初対面、挨拶のタイミング ;TALENTの変更はここでどうぞ。 RESETCOLOR ;遭遇した回数を＋１する TCVAR:351 += 1 ;オプション CFLAG:1891 = 1 ;エレンが大家の場合 IF 拠点_大家 == 44 PRINTFORML Do you come from the outside world? CALL ASK_YN("Yes","No") IF !RESULT PRINTFORMW 「Oh, he finally woke up!」 PRINTFORMDL After taking a few steps, you see a fluffy-headed blonde with a big red bow looking at something on the ground. PRINTFORMDW The girl, accompanied by a wide-eyed cat, calls out to you. PRINTFORML 「He somehow collapsed, do you think he's okay now? Is there no pain, or anything?」 PRINTFORMDW Apparently, she had picked up the current object of her attention, another cat, when he was lying down. PRINTFORMDL You tell her that it wasn't a problem about his body and thank her for taking care of him… PRINTFORMW 「You're welcome. %UNICODE(0x2665)% I'm glad he's gotten better! %UNICODE(0x2665)%」 PRINTFORMW 「……Oh, I haven't introduced myself yet.」 PRINTFORML 「I'm Ellen — Ellen, Fuwafuwaatama, Aureus. This is Sokrates!」 PRINTFORMW 「I have a magic shop in the Forest of Magic, so please feel free to ask me if you have any concerns about that.%UNICODE(0x2665)%」 PRINTFORMDW Forest of Magic…? There certainly wasn't anything like that in the outside world…… PRINTFORMW 「Huh? What happened?」 PRINTFORMW 「……Ah, I see! Maybe you've just wandered into Gensokyo from another world…」 PRINTFORMDL You think to yourself that it's such a stupid proposition, but you can't deny it. PRINTFORMDL Rather, it's the unrealistic name, 'Magic Shop of the Forest of Magic.' PRINTFORMDW You have no choice but to affirm yourself that this 'Gensokyo' is completely different from the world you were in. PRINTFORMDL As you were thinking about that, Ellen starts talking again. PRINTFORML 「Oh, and by the way, if you want to go back to your original world, I'll take you to the Hakurei Shrine.」 PRINTFORMW 「Well, it's not necessarily possible to go back…」 PRINTFORMW 「…And another thing, if you do settle in Gensokyo.」 PRINTFORML 「In any case, you'll have to find somewhere to live.」 PRINTFORMW 「You could stay in my house for the time being.」 PRINTFORMW 「It'll have to be the storeroom, but it's better than sleeping outside at night.」 PRINTFORMDL It seems there really is a possibility you could return to the outside world. PRINTFORMDL Nonetheless, it is ultimately feasible, and you want to live in this eccentric Gensokyo which differs from that world. PRINTFORMDW From those two, you tell her you would settle down in Gensokyo. PRINTFORMW 「I'll arrange that, then. Please look forward to it!%UNICODE(0x2665)%」 PRINTFORMW 「Oh, I haven't heard your name yet, could you tell me?」 PRINTFORMW 「……%CALLNAME:MASTER% is a nice name. I'll see you later, %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSE GOTO ENCOUNTER ENDIF ELSE $ENCOUNTER PRINTFORMW 「Who are you?…Oh, is this the first time we've met?」 PRINTFORMDW You are greeted by a girl with fluffy blonde hair and a large red bow, who has a cat on her shoulder. PRINTFORMW 「I'm Ellen Fuwafuwaatama Aureus, and this cat is Sokrates!」 $LOOP2 PRINTFORMDL [0] My name is %CALLNAME:MASTER%. Nice to meet you. PRINTDL [1] …Fluffyheaded? PRINTDL [2] Wow, what an embarassing name! SIF ITEM:399 PRINTDL [9] Haven't we met somewhere? INPUT IF RESULT == 0 PRINTFORMW 「Nice to meet you, too!%UNICODE(0x2665)% See you later!%UNICODE(0x2665)%」 ELSEIF RESULT == 1 PRINTFORMW 「Huh? Oh, my gramppa gave the bow to me. Well, I'm sure we'll meet again soon!%UNICODE(0x2665)%」 ELSEIF RESULT == 2 PRINTFORMW 「Huh, is that really so? But anyway, I think we'll see each other soon!%UNICODE(0x2665)%」 ELSEIF RESULT == 9 && ITEM:399 PRINTFORMW 「I don't think so…… Well, regardless, I'll see you around!%UNICODE(0x2665)%」 PRINTFORMW （……This is surely the first time, right?） ELSE GOTO LOOP2 ENDIF ENDIF ;場所と日時の記憶 CFLAG:1001 = DAY:2 CFLAG:1002 = DAY:3 CFLAG:1003 = CFLAG:MASTER:現在位置 ;初対面時は特殊会話無し TCVAR:358 = 1 ;changed to a prompt for the special mode only PRINTFORML PRINTFORML Ellen's special setting: CALL KOJO_OPTION_K44_RESULT_1 RETURN 1 ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;"SP_EVENT"系イベント ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;================================================== ;デート帰りにファーストKISS（合意も付く） ;================================================== ;================================================== ;Optional: Determines if the standard description should be skipped. ;Return 0 if description and KOJO should be shown, 1 if description should be hidden and KOJO shown, 2 if description should be shown and KOJO hidden, and 3 if both description and KOJO should be hidden. ;================================================== @M_KOJO_SPEVENT_MESSAGECHECK_K44_1 RETURN 1 @M_KOJO_SPEVENT_K44_1(ARG,ARG:1) ;口上主はTARGET ;地の文表示 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL TCVAR:355 = -1 IF TALENT:恋慕 IF TCVAR:356 == 1 PRINTFORMW 「Thank you for taking me on this date!%UNICODE(0x2665)% It was so much fun!%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Today was so wonderful!%UNICODE(0x2665)% Thank you for inviting me!%UNICODE(0x2665)%」 ENDIF PRINTFORMDW On the way home from the date, you and Ellen walk around, talking about the day… PRINTL PRINTFORMDW ……Close to %GET_MAPNAME(MAIN_MAP)%… PRINTFORMW 「Ahh, the date is over now…」 PRINTFORM 「…Hey, just close your eyes for a moment… SIF TALENT:MASTER:体型 >= 0 PRINTFORM Bend over… PRINTFORMW I'll give you…%UNICODE(0x2665)%」 PRINTFORMDW Why? Although you were confused, you did as you were told… PRINTFORMW 「Thank you.%UNICODE(0x2665)% And now…」 PRINTL PRINTFORMDL 　　Chuu! PRINTW PRINTFORMDW … PRINTFORMDW After the delicate touch on your lips faded, you open your eyes and see a blushing Ellen. PRINTFORMW 「…Ahahahaa!%UNICODE(0x2665)% That's about it, see you later! %UNICODE(0x2665)%」 PRINTFORMDW Maybe it's the shock, but Ellen is already ahead of you on the way to %GET_MAPNAME(MAIN_MAP)%. PRINTFORMDW Ellen turned your face completely red, and you follow her while enjoying the afterglow… ;非恋慕だとこっちがキスする ELSE PRINTFORMDW On the way home from the date, you and Ellen walk around, talking about the day… PRINTL PRINTFORMDW ……Close to %GET_MAPNAME(MAIN_MAP)%… PRINTFORMW 「Wow, there's %GET_MAPNAME(MAIN_MAP)% over there!」 PRINTFORMW 「It was really fun today!%UNICODE(0x2665)% We should do this again tomorrow!%UNICODE(0x2665)%」 $LOOP PRINTFORMDL …… PRINTDL [0] Kiss PRINTDL [1] Do Nothing INPUT IF RESULT == 0 PRINTFORMDW %CALLNAME:MASTER% suddenly stopped and called out to Ellen. PRINTFORMW 「Oh?%UNICODE(0x2665)% What is it this time?」 PRINTFORMDW Ellen stops in place after she hears you. You move closer to her, and lean in… PRINTFORMW 「A little bit more…? You're so close…」 PRINTL PRINTFORMDL 　　Chuu! PRINTW PRINTFORMW 「Oh……What? Huh? Eh?」 PRINTFORMDW Ellen's face suddenly turns red in the blink of an eye… PRINTFORMW 「……Ahahahaa!%UNICODE(0x2665)%」 PRINTFORMDW You run to %GET_MAPNAME(MAIN_MAP)% as if to escape… You feel you might have done something wrong… PRINTFORMDW … PRINTFORMW （Oooh!? I think %CALLNAME:MASTER% has a crush on me?!） PRINTFORMW （%CALLNAME:MASTER% kissed me, so does that mean %HE_SHE(MASTER)% really likes me!?） PRINTFORMW （I like %HIM_HER(MASTER)%, but as more of a friend than anything…） PRINTFORMW （Does %CALLNAME:MASTER% really think the same…?） PRINTFORMW （Ooh…） ; PRINTFORMDW %HE_SHE(MASTER)% had suddenly kissed her, and it confused her so much… PRINTFORMDL …… PRINTFORMDL … PRINTFORMDW %CALLNAME:44% lost 【Shameless】 and gained 【Shy】! CFLAG:1014 = 1 TALENT:羞恥心 = 1 ELSEIF RESULT == 1 TCVAR:キスキャンセル = 1 PRINTFORMDW …Let's stop for now. ELSE GOTO LOOP ENDIF ENDIF TCVAR:356 = 0 ENDIF RETURN 1 ;================================================== ;デート帰りに告白（恋人が付く） ;================================================== ;================================================== ;Optional: Determines if the standard description should be skipped. ;Return 0 if description and KOJO should be shown, 1 if description should be hidden and KOJO shown, 2 if description should be shown and KOJO hidden, and 3 if both description and KOJO should be hidden. ;================================================== @M_KOJO_SPEVENT_MESSAGECHECK_K44_2 RETURN 1 @M_KOJO_SPEVENT_K44_2(ARG,ARG:1) ;口上主はTARGET ;地の文表示 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL TCVAR:355 = -1 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;告白内容 ;この告白内容表示後に受けるかどうかの選択分が表示されます ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 0 IF TCVAR:356 == 1 PRINTFORMW 「Thanks so much for staying with me!%UNICODE(0x2665)% It was so much fun!%UNICODE(0x2665)%%UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Today was so wonderful!%UNICODE(0x2665)% Thanks for inviting me!%UNICODE(0x2665)%//」 ENDIF PRINTFORMDW On the way home, %CALLNAME:MASTER% and Ellen walked around, talking about the day… PRINTDW … PRINTFORMDW They were nearly at %GET_MAPNAME(MAIN_MAP)%, when Ellen asked %CALLNAME:MASTER% to stop. PRINTFORMW 「%CALLNAME:MASTER%, There's something I want to tell you…」 PRINTFORMW 「I like you a lot, %CALLNAME:MASTER%, so…」 PRINTFORMW 「Will you be my lover?」 RETURN 1 ENDIF ;------------------------------------------------- ;告白オッケー（恋人が付く） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORMW 「You do!? I'm so happy!%UNICODE(0x2665)% …Yaaay!%UNICODE(0x2665)%」 PRINTFORMDL Ellen, whose quest for love has finally ended, is unable to hold back her joy, hugging %CALLNAME:MASTER%. PRINTFORMDW In response to seeing the huge smile on her face, %CALLNAME:MASTER% returned Ellen's hug gently… PRINTFORMW 「Ehehee!%UNICODE(0x2665)% There'll be good luck to us from now on! %UNICODE(0x2665)% %CALLNAME:MASTER%…!%UNICODE(0x2665)%%UNICODE(0x2665)%」 PRINTFORMDL ……… PRINTFORMDL …… PRINTFORMDW … CFLAG:1014 = 0 ;恋人獲得とともに恥じらいが消える TALENT:羞恥心 = 0 TALENT:機嫌 = 1 RETURN 1 ENDIF ;------------------------------------------------- ;告白失敗 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW 「Yeah… It's a shame……」 PRINTFORMW 「……But, %CALLNAME:MASTER% doesn't have anyone at heart yet.」 PRINTFORMW 「So that means I still have a chance!%UNICODE(0x2665)%」 PRINTFORMW 「Oh, %CALLNAME:MASTER%, I'm really going to show you my own heart!%UNICODE(0x2665)%」 PRINTFORMDL …… PRINTFORMDW … CFLAG:1004 = 1 RETURN 1 ENDIF TCVAR:356 = 0 ENDIF RETURN 1 ;================================================== ;デート帰り ;================================================== @M_KOJO_SPEVENT_K44_3(ARG,ARG:1) ;口上主はTARGET ;地の文表示 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;デートしたか記憶 TCVAR:355 = -1 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;通常帰宅 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 0 ;ムードで分岐 IF BASE:ムード >= 1000 ;仕事終了からデート IF TCVAR:356 == 1 IF TALENT:恋人 PRINTFORMW 「It was so fun today.%UNICODE(0x2665)% %CALLNAME:MASTER%, invite me again next time!%UNICODE(0x2665)%%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Thanks for staying!%UNICODE(0x2665)% Oh, You're so much fun.%UNICODE(0x2665)%%UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Thank you for the date.%UNICODE(0x2665)% If I do this again, I'll be sure to invite you!%UNICODE(0x2665)%」 ENDIF ;恋人時専用 ELSEIF TALENT:恋人 SELECTCASE RAND:2 CASE 1 PRINTFORMW 「I had fun today!%UNICODE(0x2665)% Let's go on another date soon!%UNICODE(0x2665)%%UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「Today was such a wonderful day!%UNICODE(0x2665)% Thank you for inviting me!%UNICODE(0x2665)%%UNICODE(0x2665)%」 ENDSELECT ;恋慕時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Today was so lovely!%UNICODE(0x2665)% Thank you for bringing me along!%UNICODE(0x2665)%//」 ;その他 ELSE PRINTFORMW 「This was so much fun.%UNICODE(0x2665)% Oh, we should do this some other time, too!%UNICODE(0x2665)%」 ENDIF ELSE ;恋人時専用 IF TALENT:恋人 PRINTFORMW 「Let's go on another date, when you want to!%UNICODE(0x2665)%%UNICODE(0x2665)%」 ;恋慕時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Well, then.%UNICODE(0x2665)%」 ;その他 ELSE PRINTFORMW 「Let's go out again another time.%UNICODE(0x2665)%」 ENDIF ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;反発刻印消去イベント ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;反発刻印2>1レベルダウンイベント ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;反発刻印3>2レベルダウンイベント ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 PRINTFORML RETURN 1 ENDIF PRINTFORML TCVAR:356 = 0 ENDIF RETURN 1 ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;"EVENT"系イベント ;※※※※※※※※※※※※※※※※※※※※※※※※※※ ;================================================== ;部屋で遭遇 ;================================================== @M_KOJO_EVENT_K44_1(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && TCVAR:362 == 0 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;MASTERが入ってきた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;遭遇した回数を＋１する TCVAR:351 += 1 $SOUGUU ;オナバレ IF CFLAG:オナバレ == 2 && TALENT:恋慕 PRINTFORMW 「……%CALLNAME:MASTER%'s so cute…%UNICODE(0x2665)%」 ELSEIF CFLAG:オナバレ IF TALENT:恋人 && TALENT:恋慕 IF CFLAG:オナバレ == 3 PRINTFORMW 「Ah…%UNICODE(0x2665)% I was so embarrased the other day…%UNICODE(0x2665)%」 SIF FIRSTTIME(1021,1) PRINTFORMW 「Even though we haven't done it yet, I can't believe I see you like that……//」 SIF ABL:欲望 >= 10 && ABL:露出癖 >= 3 PRINTFORMW （But, I guess it feels good that way.%UNICODE(0x2665)%） ELSE PRINTFORMW 「%CALLNAME:MASTER%, then? Don't just enter because the door's unlocked!//」 ENDIF ELSEIF TALENT:恋慕 || TALENT:恋人 PRINTFORMW 「Oh, ahahahaaa!//」 ELSEIF TALENT:思慕 PRINTFORMW 「Uhmm……//」 ELSE PRINTFORMW （What kind of face am I supposed to make when I look at %HIM_HER(MASTER)% like this?!//） ENDIF ;新年、明けまして ELSEIF DAY:2 == 1 && DAY:3 == 1 && TCVAR:358 == 0 && DAY:0 != 1 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;神社住み込み時限定 ELSEIF FLAG:住み込みキャラ == 44 && CFLAG:現在位置 == 16 && CFLAG:1016 == 0 && !FIRSTTIME(1003,1) && RAND:3 == 2 && TCVAR:358 == 0 PRINTFORMW 「Oh, Reimu's allowed me to do this.」 PRINTFORMW 「I've finished cleaning and putting things on display… I'm ready, but it seems %CALLNAME:MASTER% isn't! %UNICODE(0x2665)%」 PRINTFORMW 「So what are you doing? Helping set up shop?%UNICODE(0x2665)%」 PRINTFORMW 「It's exhausting going back and forth every day, so I have a stall here again. %UNICODE(0x2665)%」 PRINTFORMW 「So, what do you want? %UNICODE(0x2665)%」 TCVAR:358 = 1 CFLAG:1016 = 1 RETURN 1 ;２回目以降 ELSEIF TCVAR:351 >= 2 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Ah, it's %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSEIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「We meet again!%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, we meet again.\@ TALENT:思慕 ? %UNICODE(0x2665)% # \@」 ENDIF ;朝 ELSEIF TIME:2 == 1 || TIME:2 == 2 IF TALENT:恋人 PRINTFORMW 「Good morning, %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, good morning, %CALLNAME:MASTER%!\@ TALENT:思慕 || TALENT:恋慕 ? %UNICODE(0x2665)% # \@」 ENDIF ;昼 ELSEIF TIME:2 == 3 || TIME:2 == 4 IF TALENT:恋人 PRINTFORMW 「Hiii, %CALLNAME:MASTER%%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, %CALLNAME:MASTER%! Hi!\@ TALENT:思慕 || TALENT:恋慕 ? %UNICODE(0x2665)% # \@」 ENDIF ;夜 ELSEIF TIME:2 >= 5 && TIME:2 <= 7 IF TALENT:恋人 PRINTFORMW 「Good evening %UNICODE(0x2665)% %CALLNAME:MASTER%%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, %CALLNAME:MASTER%! Good evening.\@ TALENT:思慕 || TALENT:恋慕 ? %UNICODE(0x2665)% # \@」 ENDIF ENDIF SIF TALENT:機嫌 != -1 && TALENT:恋人 && TALENT:恋慕 && CFLAG:350 != 43 && CFLAG:350 != 41 PRINTFORMDW Ellen found %CALLNAME:MASTER% and approached %HIM_HER(MASTER)%. SIF TCVAR:351 == 1 && !TALENT:MASTER:恋人 && TALENT:恋慕 PRINTFORMW （Wow! %UNICODE(0x2665)% It's %CALLNAME:MASTER%! %UNICODE(0x2665)%） ;特別な日なら追加 IF TCVAR:358 == 0 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;同じ日に何回か出会ってれば追加 ELSEIF TCVAR:351 >= 5 && TCVAR:352 == 0 && (TALENT:思慕 || TALENT:恋慕) PRINTFORMW 「I was wondering to myself, I've been seeing %CALLNAME:MASTER% around a lot today…!」 IF TALENT:恋人 PRINTFORMW 「Well, we are a lovely couple, so it makes sense we see each other so much, right?%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「I'm pretty happy.%UNICODE(0x2665)%」 ENDIF TCVAR:352 = 1 ENDIF ;問題回避用 SIF TCVAR:358 == 2 TCVAR:358 = 1 ;おにぎり用 SIF TCVAR:353 == 1 CALL M_KOJO_MESSAGE_EVENT_K44_RICE ;妊娠用 SIF TALENT:妊娠 && CFLAG:無自覚妊娠 == 0 && CFLAG:1015 == 0 && GET_TARGETNUM() == 1 && TALENT:恋人 && TALENT:恋慕 CALL M_KOJO_MESSAGE_EVENT_K44_NINSIN RETURN 1 ENDIF ;------------------------------------------------- ;TARGETが入ってきた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;遭遇した回数を＋１する TCVAR:351 += 1 ;新年、明けまして IF DAY:2 == 1 && DAY:3 == 1 && TCVAR:358 == 0 && DAY:0 != 1 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;２回目以降 ELSEIF TCVAR:351 >= 2 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Ah, there you are!%UNICODE(0x2665)% I've been looking all over for you.」 ELSEIF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「We meet again!%UNICODE(0x2665)%」 ELSEIF TALENT:思慕 PRINTFORMW 「Ah, there you are.」 ELSE PRINTFORM 「Oh, we meet again.」 ENDIF ;朝 ELSEIF TIME:2 == 1 || TIME:2 == 2 IF TALENT:恋人 PRINTFORMW 「Good morning, %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSE PRINTFORM 「Oh, good morning, %UNICODE(0x2665)% %CALLNAME:MASTER%! SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ;昼 ELSEIF TIME:2 == 3 || TIME:2 == 4 IF TALENT:恋人 PRINTFORMW 「Oh, hi, %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSE PRINTFORM 「Ooh, hello, %UNICODE(0x2665)% %CALLNAME:MASTER%! SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ;夜 ELSEIF TIME:2 >= 5 && TIME:2 <= 7 IF TALENT:恋人 PRINTFORMW 「Good evening, %UNICODE(0x2665)% %CALLNAME:MASTER%!%UNICODE(0x2665)%」 ELSE PRINTFORM 「Oh, good evening, %UNICODE(0x2665)% %CALLNAME:MASTER% SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ENDIF SIF TALENT:機嫌 != -1 && TALENT:恋人 && TALENT:恋慕 && CFLAG:350 != 43 && CFLAG:350 != 41 PRINTFORMDW Ellen found %CALLNAME:MASTER%, and approached %HIM_HER(MASTER)% happily. SIF TCVAR:351 == 1 && !TALENT:MASTER:恋人 && TALENT:恋慕 PRINTFORMW （Wooow! %UNICODE(0x2665)% I'm meeting %CALLNAME:MASTER% again!%UNICODE(0x2665)%） ;特別な日なら追加 SIF TCVAR:358 == 0 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;問題回避用 SIF TCVAR:358 == 2 TCVAR:358 = 1 ;おにぎり用 SIF TCVAR:353 == 1 CALL M_KOJO_MESSAGE_EVENT_K44_RICE RETURN 1 ENDIF ;------------------------------------------------- ;TARGETが風呂に入ってきて一緒に入る ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 ;遭遇した回数を＋１する TCVAR:351 += 1 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Ah, %CALLNAME:MASTER% came for a bath too…%UNICODE(0x2665)%」 PRINTFORMW 「We should take this opportunity to go in together! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「Wow…// %CALLNAME:MASTER% also came to the baths?//」 PRINTFORMW 「……Can I come in with you?//」 ELSEIF TALENT:思慕 PRINTFORMW 「Oh, isn't that %CALLNAME:MASTER%?」 PRINTFORMW 「Ah, I'm just coming in for a moment. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, there was someone before me.」 PRINTFORMW 「Well, nevermind that. Excuse me, please! %UNICODE(0x2665)%」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;TARGETが風呂に入ってきて出て行った ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 ;遭遇した回数を＋１する TCVAR:351 += 1 IF TALENT:恋慕 || TALENT:恋人 PRINTFORMW 「Ehee…… Please, take your time.//」 ELSEIF TALENT:思慕 PRINTFORMW 「Well, do make yourself comfortable.%UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, there's someone already in…」 PRINTFORMW 「I can't do anything about them, so I'm heading back out.」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;TARGETが風呂に入ってきて追い出された ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;外出先で遭遇した ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 6 ;遭遇した回数を＋１する TCVAR:351 += 1 GOTO SOUGUU RETURN 1 ENDIF ;------------------------------------------------- ;他キャラとデート中に遭遇した ;ARG:1にデート相手 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 7 ;遭遇した回数を＋１する TCVAR:351 += 1 IF TALENT:恋人 && TALENT:恋慕 PRINTFORML 「Oh, are you two going out together?」 IF CFLAG:MASTER:初期位置 == CFLAG:初期位置 PRINTFORMW 「Hey, make sure you get home before it's too dark, okaaay?」 PRINTFORMW 「……And anyway, cheating isn't going to get you anywhere, remember that.」 ELSE PRINTFORMW 「……I do hope you don't have any other affairs, though.」 ENDIF ELSEIF TALENT:恋慕 PRINTFORMW 「Oh, a date for the two of you? I feel really jealous…」 PRINTFORMW （Wait, I should ask %CALLNAME:MASTER% out on a date myself next time…//） ELSEIF TALENT:恋人 PRINTFORML 「Now, preeetty obviously, you shouldn't be having any affairs.」 PRINTFORMDW Ellen stares at you with unusually stern eyes. ELSEIF TALENT:思慕 PRINTFORMW 「Have lots of fun, you two! %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, are you two out on a date, by any chance?」 PRINTFORMW 「That's great! You know, I'd love to go out on one with a cute little boyfriend someday…」 ENDIF RETURN 1 ENDIF ELSE TCVAR:362 = 0 ENDIF RETURN 1 ;おにぎり用関数、わざわざ関数にしなくてもいいかも… @M_KOJO_MESSAGE_EVENT_K44_RICE PRINTFORMW 「Oh, you look really worn out today.」 PRINTFORMW 「This should cheer you up! %UNICODE(0x2665)% It's an onigiri I made myself. %UNICODE(0x2665)%」 PRINTFORMW 「Eat it, and you'll get better soon. %UNICODE(0x2665)%」 PRINTFORMDW %CALLNAME:MASTER% slowly ate the onigiri %HE_SHE(MASTER)% had recieved from Ellen. PRINTFORMDL …… PRINTFORMDW … IF ABL:料理技能 < 4 PRINTFORMDW It's only a salted one with nothing too special about it, but it tastes very good. Maybe Ellen imbued it with her love…? ELSE PRINTFORMDW ！！ PRINTFORMDW Ellen must have put her all into making %CALLNAME:MASTER% better. The onigiri tastes utterly delicious! ENDIF PRINTL PRINTFORMDW %CALLNAME:MASTER% gobbled up the onigiri quickly. PRINTFORMW 「Oh, you ate it already?! That was fast!」 PRINTFORMW 「Sooo, it was really nice, right?//」 PRINTFORMW 「…Eheheh!// I'm glad that %CALLNAME:MASTER% is happy again! %UNICODE(0x2665)%」 PRINTFORMDW ……Just where did she get the salt from, though? ;Ａ 外から持ってきた、という事で TCVAR:353 = 0 TIME += 5 EXP:料理経験 += 2 EXP:愛情経験 += 3 BASE:MASTER:体力 = MIN(BASE:MASTER:体力 + 100 + (ABL:料理技能 * 80) , MAXBASE:MASTER:体力) BASE:MASTER:気力 = MIN(BASE:MASTER:気力 + 100 + (ABL:料理技能 * 60) , MAXBASE:MASTER:気力) TCVAR:PLAYER:312 = 1440 * DAY + TIME + 180 RETURN 1 ;特別な日の挨拶 @M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;新年、明けまして IF FESTIVAL() == "元日" && DAY:0 != 1 PRINTFORMW 「Happy New Year, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 IF TALENT:恋人 PRINTFORMW 「Let's get to spend a lot of time together this year, too! %UNICODE(0x2665)%」 ;ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 ; PRINTFORMW 「I want to do so many things with %CALLNAME:MASTER% this year, too! %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Good luck this year, too. %UNICODE(0x2665)%」 ENDIF TCVAR:358 = 2 ;セットヴァルエンチン ELSEIF FESTIVAL() == "バレンタインデー" IF TALENT:恋人 || TALENT:恋慕 PRINTFORMW 「It's Valentine's Day todaaay! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「It's Valentine's Day today!//」 ELSEIF CFLAG:好感度 > 5000 PRINTFORMW 「You know it's Valentine's Day today, riight?」 ENDIF SELECTCASE CFLAG:好感度 CASE 1000 TO 3000 PRINTFORMW 「Since you're here, I'll give you this.」 CASE 3001 TO 5000 PRINTFORMW 「%CALLNAME:MASTER%, since you've been so, so, kind to me; please have these chocolates as my thanks. %UNICODE(0x2665)%」 CASE IS > 5000 IF TALENT:恋人 && TALENT:恋慕 PRINTFORM 「So, for my beloved %CALLNAME:MASTER%… IF EXP:愛情経験 < 100 PRINT I splashed out a bit… ELSE PRINT …And made some really, really, absolutely delicious chocolate… ENDIF PRINTFORMW …Just for you! %UNICODE(0x2665)% It'll be good, I promise! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「So then, %CALLNAME:MASTER%, I made some chocolates for you!// Please, take them. %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「That's why I've made these chocolates just for %CALLNAME:MASTER%, who's been so kind to me. %UNICODE(0x2665)%」 ENDIF ENDSELECT TCVAR:今日会ったか = 1 RESETCOLOR CALL SEASONAL(44) TCVAR:358 = 2 ;クリスマス ELSEIF FESTIVAL() == "クリスマス" && (TALENT:思慕 || TALENT:恋慕) PRINTFORMW 「Today is Christmas! It's the day where the whole world is filled with magic! %UNICODE(0x2665)%」 PRINTFORMW 「…So, let's have the best time we can! %UNICODE(0x2665)%」 TCVAR:358 = 2 ELSE TCVAR:358 = 1 ENDIF ;イベントがある日は不機嫌にならない SIF TCVAR:358 == 2 && TALENT:機嫌 == -1 TALENT:機嫌 = 0 ;記念用 IF TALENT:恋人 && TALENT:恋慕 && DAY:2 == CFLAG:1001 && DAY:3 == CFLAG:1002 && DAY:0 > 124 && DAY:0 < 249 ;必ず上機嫌になる TALENT:機嫌 = 1 PRINTFORMDW It might just be the occasion, but Ellen seems in higher spirits than normal today. TCVAR:今日会ったか = 1 ENDIF RETURN 1 ;妊娠後会話用、ふたなりは考慮外 @M_KOJO_MESSAGE_EVENT_K44_NINSIN PRINTFORMW 「Hey, %CALLNAME:MASTER% are you happy we're having a kid?」 PRINTFORMW 「……Of, of course! %UNICODE(0x2665)% I'm just as excited! %UNICODE(0x2665)%//」 ;婚姻とか実装されれば分岐 ;IF ; ;ELSE PRINTFORMW 「And also, I've told you before to 'take responsibility,' remember?」 PRINTFORMW 「I'll be in big trouble if you don't follow up that promise, since you got me pregnant to begin with.」 PRINTFORMW 「Sooo… Let's get married! %UNICODE(0x2665)%%UNICODE(0x2665)%//」 PRINTFORMW 「…Okay, we don't need to do it now, but we must do it at some point. %UNICODE(0x2665)%」 ;ENDIF CFLAG:1015 = 1 RETURN 1 ;================================================== ;朝起きたとき（おはよう口上） ;================================================== @M_KOJO_EVENT_K44_2(ARG,ARG:1) CALL MESSAGE_GOODMONING(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- ;遭遇した回数を＋１する TCVAR:351 += 1 IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;非同棲かつ相手が先に起きてる ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;------------------------------------------------- ;TARGET私室にMASTERが入っている（恋慕時添い寝中就寝時のみ？ ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && !ARG:1 PRINTFORMW RETURN 1 ENDIF ;------------------------------------------------- ;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORMW RETURN 1 ENDIF PRINTFORMW RETURN 1 ENDIF ;------------------------------------------------- ;同棲かつ相手が起きている ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;両方 IF CFLAG:添い寝中 ;恋人時専用 IF TALENT:恋人 SELECTCASE TIME:3 ;6時以降7時前 CASE 360 TO 419 SELECTCASE RAND:2 CASE 1 PRINTFORMW 「Mhmm… Oh! %UNICODE(0x2665)% Is %CALLNAME:MASTER% already up, too? %UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「Mhmm…… Ah, good morning. %UNICODE(0x2665)%」 ENDSELECT ;子供も起きる IF FLAG:子供描写 && CFLAG:出産経過日 >= CHILD_語彙 ;幼少期 IF CFLAG:出産経過日 < CHILD_自立前 PRINTFORMDW 『Daddy! Mommy! Good morning!♪』 ;自立手前 ELSE PRINTFORMDW 『Good morning, Mom and Dad!』 ENDIF ENDIF ;それ以外 CASEELSE PRINTFORMW 「Good morning, %CALLNAME:MASTER%! %UNICODE(0x2665)% Let's have a lovely day today, too! %UNICODE(0x2665)%」 ENDSELECT ;恋慕時専用 ELSEIF TALENT:恋慕 PRINTFORMW 「Oh, good morning.//」 ;その他 ENDIF ELSE ;恋人時専用 IF TALENT:恋人 SELECTCASE TIME:3 ;6時以降7時前 CASE 360 TO 419 PRINTFORMW 「Ah… %UNICODE(0x2665)% %CALLNAME:MASTER% is also awake… %UNICODE(0x2665)%」 ;子供も起きる IF FLAG:子供描写 && CFLAG:出産経過日 >= CHILD_語彙 ;幼少期 IF CFLAG:出産経過日 < CHILD_自立前 PRINTFORMDW 『Daddy! Mommy! Good morning!♪』 ;自立手前 ELSE PRINTFORMDW 『Good morning, Mom and Dad!』 ENDIF ENDIF ;7時以降9時以前 CASE 420 TO 540 SELECTCASE RAND:2 CASE 1 PRINTFORMW 「Good morning! %UNICODE(0x2665)% Did you get a good night's sleep?」 CASEELSE PRINTFORMW 「Good morning, %CALLNAME:MASTER%! %UNICODE(0x2665)% Let's have a great day today! %UNICODE(0x2665)%」 ENDSELECT ;それ以外 CASEELSE PRINTFORMW 「I can't belive I slept in this long!」 ENDSELECT ;恋慕時専用 ELSEIF TALENT:恋慕 PRINTFORMW 「Good morning, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 ENDIF PRINTL ;連打しないように TCVAR:362 = 1 ;特別な日なら追加 SIF TCVAR:358 == 0 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;妊娠用 SIF TALENT:妊娠 && CFLAG:無自覚妊娠 == 0 && CFLAG:1015 == 0 && GET_TARGETNUM() == 1 && TALENT:恋人 && TALENT:恋慕 CALL M_KOJO_MESSAGE_EVENT_K44_NINSIN ;問題回避用 SIF TCVAR:358 == 2 TCVAR:358 = 1 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;同棲かつ相手が寝ている ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 PRINTFORMDW エレンはすやすやと眠っている… RETURN 1 ENDIF ;------------------------------------------------- ;MASTERが起きていて、相手が起きてきた ;添い寝時TARGET起床はこちら（TARGET衰弱or添い寝中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 ;------------------------------------------------- ;非同棲 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && !ARG:1 PRINTFORMW RETURN 1 ENDIF ;------------------------------------------------- ;同棲中 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 ;両方 IF CFLAG:添い寝中 IF TALENT:恋人 && TALENT:恋慕 SELECTCASE RAND:2 CASE 1 PRINTFORMW 「Mhmm… Ah! %UNICODE(0x2665)% You were already awake?」 CASEELSE PRINTFORMW 「Mhmmm…… Ah, good morning. %UNICODE(0x2665)%」 ENDSELECT ELSE PRINTFORMW 「Oh, good morning.//」 ENDIF ELSE IF TALENT:恋人 && TALENT:恋慕 SELECTCASE RAND:2 CASE 1 PRINTFORMW 「Mhmm… Ah! %UNICODE(0x2665)% You're already up?」 CASEELSE PRINTFORMW Ah, good morning. %UNICODE(0x2665)%」 ENDSELECT ELSE PRINTFORMW 「Woah…… Good morning!」 ENDIF ;子供も起きる IF FLAG:子供描写 && CFLAG:出産経過日 >= CHILD_語彙 ;幼少期 IF CFLAG:出産経過日 < CHILD_自立前 PRINTFORMDW 『Daddy! Mommy! Good morning!♪』 ;自立手前 ELSE PRINTFORMDW 『Good morning, Mom and Dad!』 ENDIF ENDIF ;連打しないように TCVAR:362 = 1 ;特別な日なら追加 SIF TCVAR:358 == 0 CALL M_KOJO_MESSAGE_EVENT_K44_EX_TALK ;妊娠用 SIF TALENT:妊娠 && CFLAG:無自覚妊娠 == 0 && CFLAG:1015 == 0 && GET_TARGETNUM() == 1 && TALENT:恋人 && TALENT:恋慕 CALL M_KOJO_MESSAGE_EVENT_K44_NINSIN ;問題回避用 SIF TCVAR:358 == 2 TCVAR:358 = 1 ENDIF RETURN 1 ENDIF ENDIF ;その他 ENDIF RETURN 1 ;================================================== ;夜寝るとき（おやすみ口上） ;================================================== @M_KOJO_EVENT_K44_3(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;自室に帰る（定時になって寝る） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;恋人時専用 IF TALENT:恋人 PRINTFORMW 「It's really late so I'm going to bed, but you can come with me if you want… %UNICODE(0x2665)%%UNICODE(0x2665)%」 PRINTFORMW 「Good night, %CALLNAME:MASTER%! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ;恋慕時専用 ELSEIF TALENT:恋慕 PRINTFORMW 「I've been up for how long?! I really need to go to sleep now…%UNICODE(0x2665)%」 PRINTFORMW 「Good night, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;眠そうにしている ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW RETURN 1 ENDIF ;------------------------------------------------- ;睡眠中（起きていないので会話というよりは寝言？） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 SELECTCASE RAND:4 CASE 1 PRINTFORMW 「Mhhmm……I love you, %CALLNAME:MASTER%…… ZZzz…」 CASE 2 PRINTFORMW 「Hmmh… Be wary of the loofah……」 CASE 3 PRINTFORMW 「Waah…… It's the Equator Festival again… Augh…」 CASEELSE PRINTFORMW 「ZZZzz……」 ENDSELECT RETURN 1 ENDIF ;------------------------------------------------- ;イタズラ中 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 SELECTCASE RAND:5 CASE 1 PRINTFORMW 「Mhhmm……I love you, %CALLNAME:MASTER%…… ZZzz…」 CASE 2 PRINTFORMW 「Hmmh… Be wary of the loofah……」 CASE 3 PRINTFORMW 「Waah…… It's the Equator Festival again… Augh…」 CASE 4 PRINTFORMW 「Oh… %CALLNAME:MASTER%, that's…… Zzzz…」 CASEELSE PRINTFORMW 「ZZZzz……」 ENDSELECT RETURN 1 ENDIF ;------------------------------------------------- ;衰弱中 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 PRINTFORMW RETURN 1 ENDIF ;------------------------------------------------- ;MASTERがダウン（部屋まで運ばれる） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 6 IF TCVAR:371 == 1 || TCVAR:372 == 1 PRINTFORMW 「……I think I went a bit too far with it.」 ELSE PRINTFORMW 「Eiieaaaah! Are you okay!?」 ENDIF PRINTFORMDL ……… PRINTFORMDL …… PRINTFORMDW … SIF TCVAR:374 == 1 TALENT:バストサイズ = TCVAR:376 RETURN 1 ENDIF ;------------------------------------------------- ;TARGETが自室まで戻ってきた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 7 ;------------------------------------------------- ;そのまま着替えて寝た ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 0 IF TALENT:恋人 || TALENT:恋慕 PRINTFORMW 「Good night!%UNICODE(0x2665)%」 ELSEIF TALENT:恋人 || TALENT:恋慕 PRINTFORMW 「Ah, see you tomorrow.」 ELSE ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;部屋から追い出された ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 RETURN 1 ENDIF ENDIF ;------------------------------------------------- ;非在住TARGETがMAIN_MAPで休憩 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 8 PRINTFORMW RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;移動時すれちがい ;================================================== @M_KOJO_EVENT_K44_4(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- ;遭遇した回数を＋１する TCVAR:351 += 1 IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;立ち止まった ;この後遭遇口上に接続 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 SIF FLAG:時間停止 ;fix RETURN 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;軽く会釈して通り過ぎた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;朝 IF TIME:2 == 1 || TIME:2 == 2 IF TALENT:恋人 PRINTFORMW 「Good morning, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 ELSE PRINTFORM 「Oh, my dear %CALLNAME:MASTER%, good morning… SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ;昼 ELSEIF TIME:2 == 3 || TIME:2 == 4 IF TALENT:恋人 PRINTFORMW 「こんにちは、%CALLNAME:MASTER%%UNICODE(0x2665)%」 ELSE PRINTFORM 「Oh, %CALLNAME:MASTER%. Hello there… SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ;夜 ELSEIF TIME:2 >= 5 && TIME:2 <= 7 IF TALENT:恋人 PRINTFORMW 「Aaawn, good evening… %UNICODE(0x2665)% …%CALLNAME:MASTER%… %UNICODE(0x2665)%」 ELSE PRINTFORM 「Oh, %CALLNAME:MASTER%, Good evening! SIF TALENT:思慕 || TALENT:恋慕 PRINTFORM %UNICODE(0x2665)% PRINTW 」 ENDIF ENDIF IF TALENT:恋人 PRINTFORMW 「You look really busy, so come have some time to yourself with me when you can. %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「You must be busy, %CALLNAME:MASTER%. I don't know what you're doing, but please know you're doing well!%UNICODE(0x2665)%」 ELSEIF TALENT:思慕 PRINTFORMW 「You look pretty busy, so let's do something together when you're able to. %UNICODE(0x2665)%」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;無視して通り過ぎた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 SIF FLAG:時間停止 ;fix RETURN 1 PRINTFORMW 「Oh, %CALLNAME:MASTER%… Wait, where are you going?」 IF TALENT:恋人 && TALENT:恋慕 ;おにぎり IF BASE:MASTER:体力 <= 800 || BASE:MASTER:気力 <= 800 PRINTFORMW 「…%CALLNAME:MASTER% looks way too tired…!」 PRINTFORMW 「Wait, that's right! I'll make some onigiri for you! %UNICODE(0x2665)%」 TCVAR:353 = 1 ELSE PRINTFORMW 「…I don't know what you're up to, but please do your best for it! %UNICODE(0x2665)%」 ENDIF ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「I don't know what you're up to, but please do your best for it! %UNICODE(0x2665)%」 ELSEIF TALENT:思慕 PRINTFORMW 「…You look like you're in a hurry, so I'll talk to you later.」 ENDIF RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;他者介入でムード変化 ;================================================== @M_KOJO_EVENT_K44_5(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;霊夢が入ってきた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;る～ことが入ってきた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORML RETURN 1 ENDIF ;その他 ;エレンのお店の場合 IF CFLAG:現在位置 == 534 || (CFLAG:現在位置 == 16 && FLAG:住み込みキャラ == 44 && CFLAG:1016 == 1) IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「See you later! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 || TALENT:恋人 PRINTFORMDL As more people approached the stall, Ellen reluctantly left ELSE PRINTFORMDL As more people walked near the stall, quickly moved away. ENDIF PRINTFORMW 「Welcome! %UNICODE(0x2665)%」 ELSE ENDIF ENDIF RETURN 1 ;================================================== ;情事を目撃した ;================================================== @M_KOJO_EVENT_K44_6(ARG,ARG:1) ;口上主はTARGET ;ARGに情事相手 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL CFLAG:1800 = 1 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;情事を目撃した（馴れ合い度:低） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORMW 「あなた達こんなところで何してるの！//」 RETURN 1 ENDIF ;------------------------------------------------- ;負けじと参加（馴れ合い度:高） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;気まずそうに立ち去る ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 3 PRINTFORMW 「That… Uhm…// Ahahahaah…// …Well then!//」 RETURN 1 ENDIF ;------------------------------------------------- ;MASTERに誘われて参加 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 4 PRINTFORML RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;情事を見られた ;================================================== @M_KOJO_EVENT_K44_7(ARG,ARG:1) ;口上主はTARGET ;ARGに目撃者 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;情事を見られた（目撃者の馴れ合い度:低） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORMW 「That's…Um…// Ehehehe…//」 RETURN 1 ENDIF ;------------------------------------------------- ;目撃者が負けじと参加（目撃者の馴れ合い度:高） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORMW 「Hey, you! What are you trying to do, butting in like that?!」 RETURN 1 ENDIF ;------------------------------------------------- ;目撃者が立ち去る ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 3 PRINTFORMW 「That… Errm…// Ahehehe…//」 RETURN 1 ENDIF ;------------------------------------------------- ;MASTERに誘われて目撃者も参加 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 4 PRINTFORMW 「If that's what %CALLNAME:MASTER% wants, then it can't be helped……」 PRINTFORMW （Actually, it was better with just the two of us…） CFLAG:好感度 -= 50 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;目撃した情事を問い詰める ;================================================== @M_KOJO_EVENT_K44_8(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;MASTERだけ問い詰め ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;二人とも説教 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORML RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;弱みを握った ;================================================== @M_KOJO_EVENT_K44_9(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;同じ場所に居てパンツを回収された ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;遠距離移動中にパンツを回収された ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORML RETURN 1 ENDIF PRINTFORML ENDIF RETURN 1 ;================================================== ;押し倒した ;================================================== @M_KOJO_EVENT_K44_10(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;MASTERを押し倒した（開始時） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 CFLAG:1891 = 1 TCVAR:371 = 1 ;恋慕も恋人もない状態で押し倒され IF !TALENT:恋慕 && !TALENT:恋人 && !TALENT:ヤリマン IF FIRSTTIME(1021) PRINTFORMDW Having pushed %CALLNAME:MASTER% down, Ellen looked at %HIM_HER(MASTER)% with a serious look and spoke. PRINTFORML 「……It's weird to say in this situation, but I really like you, %CALLNAME:MASTER%.」 PRINTFORMW 「I love you so much… I can't stop myself from doing it.」 PRINTFORMW 「I'm sorry for being so selfish, you can say no if you don't like it……」 PRINTFORMDL … PRINTFORMDW Ellen's [Yearning] became [Love]! CFLAG:1892 = 1 TALENT:恋慕 = 1 TALENT:思慕 = 0 RETURN 1 ENDIF ENDIF ;初エッチor妊娠時押し倒され SIF (FIRSTTIME(1021) || TALENT:妊娠) && (TALENT:恋慕 || TALENT:恋人) PRINTFORML 「It might be pretty rude, but……」 IF ABL:欲望 >= 10 PRINTFORMW 「Sorry. I can't stand to be left alone…//」 ELSEIF TALENT:恋慕 || TALENT:恋人 PRINTFORMW 「Hey. Hey, %CALLNAME:MASTER%…// Ehe…// Let's… Have sex…//」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;なだめられた（終了時） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 IF ABL:欲望 >= 10 PRINTFORMW 「Yes…… Yes, I understand…」 ELSEIF ABL:親密 < 10 PRINTFORMW 「Sorry for being weird like this…//」 ELSEIF TALENT:恋慕 || TALENT:恋人 PRINTFORMW 「Please, listen to me, right…?// …Sorry for pushing you down because I wanted to…//」 ENDIF ;絶頂とかリセ SIF TCVAR:374 == 1 TALENT:バストサイズ = TCVAR:376 TCVAR:372 = 0 TCVAR:373 = 0 TCVAR:374 = 0 TCVAR:381 = 0 TCVAR:382 = 0 TCVAR:383 = 0 TCVAR:384 = 0 TCVAR:385 = 0 TCVAR:386 = 0 TCVAR:388 = 0 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;浴場で遭遇 ;================================================== @M_KOJO_EVENT_K44_11(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;追い出された ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORMW 「ええと…、帰ってくれない？」 RETURN 1 ENDIF ;------------------------------------------------- ;目が合った（追い出されない） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 IF TALENT:恋人 PRINTFORMW 「Oh? %UNICODE(0x2665)% It's nice to have a bath with someone else, %CALLNAME:MASTER%. %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Ah!// If you really, really, really want to come in, please do so…//」 ELSE PRINTFORMW 「Oh, is %CALLNAME:MASTER% coming to take a bath too? Let's do it together, then! %UNICODE(0x2665)%」 ENDIF ;連打しないように TCVAR:362 = 1 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;寝床に忍び込み ;================================================== @M_KOJO_EVENT_K44_12(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;寝床に侵入 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;寝床に侵入（相手が恋慕） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 IF TALENT:恋人 PRINTFORMW 「Mmmhrrmm… Who could be up at this hour… Isn't that you, %CALLNAME:MASTER%? %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Mmmhrrmm… Who would want me at this time of night… Isn't that you, %CALLNAME:MASTER%?// What do you want?//」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;寝床に侵入（相手が恋慕・衰弱） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 3 IF TALENT:恋人 PRINTFORMW 「Hrnn…… Oh, it's %CALLNAME:MASTER% again. Well, please come in! %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Mrrhnn…… Ah, that must be %CALLNAME:MASTER%. // What do you want me for…?//」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;追い出される ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 4 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;追い出される（衰弱） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 5 PRINTFORML RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;お仕事中 ;================================================== @M_KOJO_EVENT_K44_13(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && TIME:0 != TCVAR:357 && CFLAG:350 != 49 && CFLAG:350 != 51 ;連打防止 TCVAR:357 = TIME:0 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;仕事開始（職場へ移動する） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 && CFLAG:MASTER:現在位置 != 210 IF TALENT:恋人 PRINTFORMW 「Okay, I'm going to work now, %CALLNAME:MASTER%! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「I'll be late… Thank you for your time, but I need to get working now!」 ELSEIF TALENT:思慕 PRINTFORMW 「It's just about time, I'm going out now. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「It's nearly time to work the store, so I'll be seeing you later.」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;業務中 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;魔法屋 IF DAY:3 == 15 || DAY:3 == 30 ;PRINTFORMDW 現客数 {TCVAR:354}　計客数 {TCVAR:355} ;現在の客数に応じて分岐 IF TCVAR:354 > 30 PRINTFORMDL Ellen's Magic Shop of the Forest of Magic seems to be very popular… ELSEIF TCVAR:354 > 15 PRINTFORMDL Ellen is handling the queue well… ELSEIF TCVAR:354 > 5 PRINTFORMDL People are slowly lining up… ELSE PRINTFORMDL There doesn't seem to be many customers… ENDIF ;接客時 IF TCVAR:354 > 15 SELECTCASE RAND:5 CASE 1 PRINTFORMW 「A talisman for you! And a good-luck charm for you, there!」 CASE 2 PRINTFORMW 「Here's the medicine, here's the charm, here's this, that, and the other one…」 CASE 3 PRINTFORMW 「Tomorrow, the south will spell bad omens, but the north will bring good luck in response.」 CASE 4 PRINTFORMW 「Go east tomorrow, I am sure you'll meet new people! %UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「Hey, you! Why do you smell so magical!? You don't even look like a magician!」 ENDSELECT ;呼び込み時 ELSE SELECTCASE RAND:3 CASE 1 PRINTFORMW 「Fluffyheaded Ellen's Magic Shop, offering special on-site services today! %UNICODE(0x2665)%」 CASE 2 PRINTFORMW 「Eheh, don't you look like someone who needs a magician? %UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「Excuse me; you, over there. You smell like magic. Did something happen?」 ENDSELECT ENDIF ;採集 ELSE ;PRINTFORMDW {TCVAR:354} ;残りの仕事量に応じて確率で分岐 IF (BASE:仕事量 <= (MAXBASE:仕事量 / 2)) && !RAND:3 ;残り四分の一以下 IF BASE:仕事量 <= (MAXBASE:仕事量 / 4) ;採取量で分岐 SELECTCASE TCVAR:354 - BASE:仕事量 CASE IS > 200 PRINTFORMW 「I wonder if this will be enough…?」 CASE 200 TO -300 PRINTFORMW 「I'd like to get a few more.」 CASEELSE PRINTFORMW 「Hm…… Must have been bad timing.」 ENDSELECT ;残り半分以下 ELSE ;採取量で分岐 SELECTCASE TCVAR:354 - BASE:仕事量 CASE IS > 750 PRINTFORMW 「This should be enough! %UNICODE(0x2665)%」 CASE 750 TO 200 PRINTFORMW 「It's really coming together nicely. %UNICODE(0x2665)%」 CASE 200 TO -200 PRINTFORMW 「It's all going well! %UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「Not really a lot of people today, isn't there?」 ENDSELECT ENDIF ;仕事量が半分を切る前に採集量が2000を超える ELSEIF TCVAR:354 > 2000 && BASE:仕事量 >= (MAXBASE:仕事量 / 2) && !RAND:2 ;あなたが500以上集めているなら IF TCVAR:355 >= 500 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「I can't thank you enough for getting so many people here, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || TALENT:恋人 || TALENT:思慕 PRINTFORMW 「Thanks to your help,%CALLNAME:MASTER%, I think I can finish things here up now. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Thank you for bringing so many! %UNICODE(0x2665)%」 ENDIF ELSE PRINTFORMW 「Good harvest today, ehehehee. %UNICODE(0x2665)%」 ENDIF ;基本 ELSE SELECTCASE RAND:3 CASE 1 PRINTFORMW 「Sokrates! Have you found anything?」 CASE 2 PRINTFORMW 「I'm sure it was here… I think… %UNICODE(0x2665)%」 CASEELSE PRINTFORMW 「These things are really hard to find…」 ENDSELECT ENDIF ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;仕事終了 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 ;魔法屋 IF DAY:3 == 15 || DAY:3 == 30 ;手伝ってないのなら IF TCVAR:364 == 0 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Sorry for the wait! %UNICODE(0x2665)%」 ; PRINTFORMW 「Sorry for the wait! %UNICODE(0x2665)% Now that my work's done, we can go out together! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「Pheeew, that's everything cleaned up.」 ; PRINTFORMW 「Hey, I'm done with work. We should go on a date, honest!//」 ELSEIF TALENT:思慕 PRINTFORMW 「Okay, we're done cleaning up here.」 ; PRINTFORMW 「Oh, if you don't mind, would you take me around the village? I've made a lot today, so I can get you something nice. %UNICODE(0x2665)%」 ENDIF ;今日の客数に応じて変化 ELSEIF TCVAR:355 >= 45 PRINTFORMW 「We had a lot of customers today! %UNICODE(0x2665)%」 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「This is thanks to you, %CALLNAME:MASTER%. %UNICODE(0x2665)% Thank you! %UNICODE(0x2665)%」 ; PRINTFORMW 「Well, I'm done in the store, let's go on a date! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「Thanks for your help. %UNICODE(0x2665)%// I'd be very happy if you can help again sometime. %UNICODE(0x2665)%//」 ; PRINTFORMW 「Since my work is finished, how about we go on a little trip?//」 ELSEIF TALENT:思慕 PRINTFORMW 「Thank you, %CALLNAME:MASTER%. %UNICODE(0x2665)% I'd be very happy if you can help again sometime. %UNICODE(0x2665)%」 ; PRINTFORMW 「By the way, would you like to go around the village together?」 ELSE ;お礼は仕事手伝い報酬に含まれてるんでー PRINTFORMW 「Thank you for your assistance, %CALLNAME:MASTER%! %UNICODE(0x2665)% Take this gift as thanks. %UNICODE(0x2665)%」 ENDIF ELSEIF TCVAR:355 >= 30 PRINTFORMW 「There were plenty of customers today. %UNICODE(0x2665)%」 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「All thanks to you, %CALLNAME:MASTER%! %UNICODE(0x2665)% Thank you! %UNICODE(0x2665)%」 ; PRINTFORMW 「I have time to spare, so let's go on a date!%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「Thanks for helping! %UNICODE(0x2665)%// It'd be good if you could help again. %UNICODE(0x2665)%//」 ; PRINTFORMW 「Also… I'm done cleaning the place, so why don't we go out somewhere?//」 ELSEIF TALENT:思慕 PRINTFORMW 「You did great, %CALLNAME:MASTER%. %UNICODE(0x2665)% Please come back sometime! %UNICODE(0x2665)%」 ; PRINTFORMW 「Also, if it isn't going to trouble you, why don't we go into the village for a bit?」 ELSE ;お礼は仕事手伝い報酬に含まれてるんでー PRINTFORMW 「Thank you, %CALLNAME:MASTER%%UNICODE(0x2665)% Please take my thanks. %UNICODE(0x2665)%」 ENDIF ELSEIF TCVAR:355 >= 15 PRINTFORMW 「We had quite a few customers today!」 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「%CALLNAME:MASTER%もお疲れ様%UNICODE(0x2665)%」 ; PRINTFORMW 「Well, we're finished working. Can we go on a date now? %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「Thank you for helping. %UNICODE(0x2665)%// Would you be able to come back tomorrow? %UNICODE(0x2665)%//」 ; PRINTFORMW 「Also… I'm done tidying up, so why don't we go on a date?//」 ELSEIF TALENT:思慕 PRINTFORMW 「%CALLNAME:MASTER%, you did good. %UNICODE(0x2665)% I would be happy if you helped out more. %UNICODE(0x2665)%」 ; PRINTFORMW 「And if you have nothing else to do, why don't we go around the village?」 ELSE ;お礼は仕事手伝い報酬に含まれてるんでー PRINTFORMW 「Thank you for your help, %CALLNAME:MASTER%. %UNICODE(0x2665)% I'll give something back later. %UNICODE(0x2665)%」 ENDIF ELSE PRINTFORMW 「There weren't a lot of people in today.」 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Well, there will always be days like that. Thank you for your help, anyway! %UNICODE(0x2665)%」 ; PRINTFORMW 「Why don't we go out somewhere quiet in town, just the two of us? %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「But there are always days like this. Thanks for helping, anyway. %UNICODE(0x2665)%//」 ; PRINTFORMW 「But you can't win them all, of course… Hey, why don't you go look around the village with me?//」 ELSE ;お礼は仕事手伝い報酬に含まれてるんでー PRINTFORMW 「Well, sometimes that happens. %UNICODE(0x2665)% Please take this thank-you gift with you. %UNICODE(0x2665)%」 ; SIF TALENT:思慕 ; PRINTFORMW 「If you're in the mood, why don't you take me into the village?」 ENDIF ENDIF TCVAR:356 = 1 ;恋人or恋慕or思慕であなたがデートしてなければこのままデートに移行 ;仕事後デートが実装されるとの事なのでコメントアウト ; IF TALENT:恋人 || TALENT:恋慕 || TALENT:思慕 ; FOR LOCAL, 1, CHARANUM ; IF CFLAG:LOCAL:同行 >= 1 ; PRINTFORMW 「…Wait, hold on. Was someone here before me?」 ; PRINTFORMW 「If so, I'll ask you out next time. %UNICODE(0x2665)%」 ; ;エレンが住み込んでいるなら帰宅 ; IF FLAG:住み込みキャラ == 44 ; PRINTFORMDW Ellen decided to go to %GET_MAPNAME(MAIN_MAP)% on %HIS_HER(0)% own… ; CFLAG:現在位置 = 16 ; ENDIF ; RETURN 1 ; ENDIF ; NEXT ; $LOOP ; PRINTFORMDL %CALLNAME:MASTER%は… ; IF TALENT:恋人 || TALENT:恋慕 || CFLAG:1014 == 1 ; PRINTDL [0] Go on a date! ; ELSE ; PRINTDL [0] Explore the village together ; ENDIF ; PRINTDL [1] Decline ; INPUT ; IF RESULT == 0 ; PRINTFORMDW %CALLNAME:MASTER% accepted Ellen's request… ; IF TALENT:恋人 && TALENT:恋慕 ; PRINTFORMW 「Thank you so much! %UNICODE(0x2665)% Well, let's go! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ; ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 ; PRINTFORMW 「Yaaay! %UNICODE(0x2665)%//」 ; ELSE ; PRINTFORMW 「Well, let's set off right away! %UNICODE(0x2665)%」 ; ENDIF ; CFLAG:同行 = 60 ; CFLAG:デート中 = 2 ; CFLAG:MASTER:デート中 = 2 ; FLAG:デート相手 = 44 ; ELSEIF RESULT == 1 ; PRINTFORMDW %CALLNAME:MASTER% declined Ellen's request… ; IF TALENT:恋人 ; PRINTFORMW 「Okay, we can go on a date another day, then. %UNICODE(0x2665)%」 ; ELSE ; PRINTFORMW 「Ah. Well, %CALLNAME:MASTER%, if you aren't interested, then that's fine…」 ; ENDIF ; ;エレンが住み込んでいるなら帰宅 ; IF FLAG:住み込みキャラ == 44 ; PRINTFORMDW It seems that Ellen returned to %GET_MAPNAME(MAIN_MAP)% after you declined… ; CFLAG:現在位置 = 16 ; ENDIF ; ELSE ; GOTO LOOP ; ENDIF ; ENDIF ;採集 ELSE PRINTFORMW 「Okay, this should be enough!」 IF TCVAR:364 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「It's all thanks to you, %CALLNAME:MASTER%! %UNICODE(0x2665)% Thank you so much! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「I'd be very happy if you could help me more, too. %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Thank you for your help, %CALLNAME:MASTER%. %UNICODE(0x2665)%」 ENDIF ENDIF ENDIF RETURN 1 ENDIF ;その他 ENDIF RETURN 1 ;================================================== ;食事系 ;================================================== @M_KOJO_EVENT_K44_14(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL ;------------------------------------------------- ;持っていた食物を食べられた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORML RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;MASTERが押し倒した ;================================================== @M_KOJO_EVENT_K44_15(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;MASTERが押し倒した（ウフフ開始時） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;逢瀬終了（ウフフ終了時） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 SIF FLAG:時間停止 || CFLAG:睡眠 ;fix RETURN 0 ;御香使った IF TCVAR:373 == 1 IF FIRSTTIME(1031) PRINTFORMW 「Uhmm…//Ehehehee…// This is weird…// I should make it less potent next time…」 PRINTFORMW 「…Eh? You want the next to be the same as today? …I don't think you'd like it more than once…」 SIF CFLAG:1007 == 1 && FIRSTTIME(1033) PRINTFORMW 「No matter what? Well, if %CALLNAME:MASTER% gets as strong as a magician, then…//」 PRINTFORMW 「Anyway, I'll burn some incense to relieve your body and soul instead. %UNICODE(0x2665)%」 BASE:MASTER:精力 = 0 DOWNBASE:MASTER:気力 += 1000 DOWNBASE:気力 += 200 ABL:欲望 -= 3 ABL:MASTER:欲望 -= 4 ELSE PRINTFORMW 「Pheewha, hah…// That was intense…//」 PRINTFORMW 「…I wonder if that satisfied your urges?// I'll be happy if it worked out that way…//」 PRINTFORMW Now, let's burn some incense to recover from the fatigue, and soothe ourselves. %UNICODE(0x2665)%」 BASE:MASTER:精力 = 200 DOWNBASE:MASTER:気力 += 600 DOWNBASE:気力 += 150 ABL:欲望 -= 2 ABL:MASTER:欲望 -= 3 ENDIF PRINTFORMDW After %CALLNAME:MASTER% and Ellen cleaned up the mess they had made, they relaxed and enjoyed some insence… BASE:MASTER:勃起 = 0 PALAM:欲情 = 0 PALAM:潤滑 = 0 TIME += 30 TFLAG:押し倒せない ++ CFLAG:ディレイ = 600 ;おっぱいぱい！ ELSEIF TCVAR:374 == 1 PRINTFORMDW As soon as she was done, the magic cast upon herself wore off, and Ellen's bust returned to its normal size…… IF FIRSTTIME(1032) PRINTFORMW 「Eheehee, how did you like it with bigger breasts?//」 PRINTFORMW 「…It was good? %UNICODE(0x2665)% I'll make it again when I get the stuff together, so look forward to it! %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「I'll treat you again with my fluffy, puffy boobs next time. %UNICODE(0x2665)%//」 ENDIF ;押し倒されてた ELSEIF TCVAR:372 == 1 PRINTFORMW 「I'm sorry for trying to force it today…」 ;Ｃ絶頂回数が他の部位の絶頂回数の合計＋２以上 ELSEIF TCVAR:382 >= (TCVAR:383 + TCVAR:384 + TCVAR:385 + TCVAR:388 + 2) PRINTFORMW 「I never knew how good it would feel down there…//」 ;Ｖ絶頂回数が他の部位の絶頂回数の合計＋２以上 ELSEIF TCVAR:383 >= (TCVAR:382 + TCVAR:384 + TCVAR:385 + TCVAR:388 + 2) PRINTFORMW 「We should do it again soon…//」 PRINTFORMW 「Oh, where? Wherever you want to, %CALLNAME:MASTER%…//」 ;Ａ絶頂回数が他の部位の絶頂回数の合計＋２以上 ELSEIF TCVAR:384 >= (TCVAR:382 + TCVAR:383 + TCVAR:385 + TCVAR:388 + 2) PRINTFORMW 「Aiie…// Always going for the butthole, too?//」 ;Ｂ絶頂回数が他の部位の絶頂回数の合計＋２以上 ELSEIF TCVAR:385 >= (TCVAR:382 + TCVAR:383 + TCVAR:384 + TCVAR:388 + 2) PRINTFORMW 「I wonder if they'll grow a little bigger if I touch them enough times?」 PRINTFORMW 「……It's okay to dream a little bit, right?」 ;Ｍ絶頂回数が他の部位の絶頂回数の合計＋２以上 ELSEIF TCVAR:388 >= (TCVAR:382 + TCVAR:383 + TCVAR:384 + TCVAR:385 + 2) PRINTFORMW 「One last time, ehee! %UNICODE(0x2665)%//」 ;三重絶頂以上した ELSEIF TCVAR:381 >= 1 PRINTFORMW 「…Today was just really amazing…//」 PRINTFORMW 「I want it just like this next time, too!//」 PRINTFORMDW Ellen seems she'll be unable to forget the pleasures she had today…… ;あなたが３回以上射精した ELSEIF TCVAR:386 >= 3 PRINTFORMW 「I'm so happy you enjoyed yourself today. %UNICODE(0x2665)%//」 ;エレン絶頂していない IF TCVAR:387 == 0 && !TALENT:妊娠 PRINTFORMW 「Next time, you should return the favour. //」 ELSE PRINTFORMW 「I'll make sure the next time's even better! %UNICODE(0x2665)%//」 ENDIF ;エレンが妊娠中かつあなたが１回以上射精した ELSEIF TALENT:妊娠 && TCVAR:386 >= 1 PRINTFORMW 「I wonder if that was satisfying…//」 ;エレンが妊娠中 ELSEIF TALENT:妊娠 PRINTFORMW 「Eh? Is that all?」 ;１回以上絶頂した ELSEIF TCVAR:387 >= 1 IF FIRSTTIME(1022) PRINTFORMW 「Eheheehee! // So this is what cumming feels like… //」 PRINTFORMW 「Oh, won't you incite some even stronger ones from now on…? //」 PRINTFORMDW Ellen seems to be indulging in the new-found pleasures she has accquired… ELSE PRINTFORMW 「I felt so good today, too.//」 PRINTFORMW 「Well, we can do it again, right?//」 ENDIF ;エレンが妊娠中かつあなたが１回以上射精した ELSEIF TALENT:妊娠 && TCVAR:386 >= 1 PRINTFORMW 「Did that make you smile?//」 ;両者とも絶頂していない ELSEIF (TCVAR:387 + TCVAR:386) == 0 PRINTFORMW 「When we do this, we should make both of ourselves warm inside.//」 ELSE PRINTFORMW 「……And next time, you should make me feel good, too.//」 ENDIF ;絶頂とかリセ SIF TCVAR:374 == 1 TALENT:バストサイズ = TCVAR:376 TCVAR:372 = 0 TCVAR:373 = 0 TCVAR:374 = 0 TCVAR:381 = 0 TCVAR:382 = 0 TCVAR:383 = 0 TCVAR:384 = 0 TCVAR:385 = 0 TCVAR:386 = 0 TCVAR:388 = 0 ;念のため CFLAG:ディレイ += 60 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;添い寝する ;================================================== @M_KOJO_EVENT_K44_16(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;添い寝を始めた（開始時）(存在せず ;記入チェック ;LOCAL:1 = 0 ;------------------------------------------------- ;IF LOCAL:1 && ARG == 1 ;PRINTFORML ;RETURN 1 ;ENDIF ;------------------------------------------------- ;添い寝を終了した（終了時） ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 SIF !CFLAG:睡眠 || !CFLAG:衰弱 ;unfinished or bugged? playtest when translating PRINTFORMW 「Oh, you're wake? I should get out of bed too, then.」 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;時止め終了時 ;================================================== @M_KOJO_EVENT_K44_17(ARG,ARG:1) ;口上主はTARGET ;排他と明記されていないモノは状況によっては連続で表示されるので注意 ;ARGに射精状況 ;ARG:1に射精状態 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;ARG=1～3は排他 ;謎の快感 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 RETURN 1 ENDIF ;------------------------------------------------- ;絶頂 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 RETURN 1 ENDIF ;------------------------------------------------- ;パンツ紛失 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚口内射精】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 ;精液中毒低精飲 IF ARG:1 == 1 ;精液中毒低吐き出し ELSEIF ARG:1 == 2 ;精液中毒低手で覆う ELSEIF ARG:1 == 3 ;精液中毒高精飲 ELSEIF ARG:1 == 4 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚顔面射精】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 ;精液経験ありぬぐい取り IF ARG:1 == 1 ;精液経験なしぬぐい取り ELSEIF ARG:1 == 2 ;顔射精液舐めとり ELSEIF ARG:1 == 3 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚手淫射精】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 6 ;ぬぐい取り IF ARG:1 == 1 ;舐めとり ELSEIF ARG:1 == 2 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚アナル射精】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 7 ;Ａ感覚0 IF ARG:1 == 1 ;ソレ以外 ELSEIF ARG:1 == 2 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚処女喪失】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 8 RETURN 1 ENDIF ;------------------------------------------------- ;【無自覚膣内射精】 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 9 ;非処女膣内射精ピルなし IF ARG:1 == 1 ;非処女膣内射精ピルあり ELSEIF ARG:1 == 2 ;処女膣内射精 ELSEIF ARG:1 == 3 ENDIF RETURN 1 ENDIF ENDIF RETURN 1 ;================================================== ;ナマでやらせろ時 ;================================================== @M_KOJO_EVENT_K44_18(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;避妊要求台詞 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORM 「Hey, %CALLNAME:MASTER%, IF ESTRUS_CYCLE(44) == 150 PRINT today might be risking it, ELSEIF ESTRUS_CYCLE(44) != 15 PRINT today might be dangerous, ENDIF PRINTW so… Would you happen to have a condom on hand?//」 RETURN 1 ENDIF ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;断った ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW 「N-No way! What if I got pregnant?!//」 SIF TALENT:恋人 && TALENT:恋慕 && CFLAG:2 >= 15000 PRINTFORMW 「I want a child with you, %CALLNAME:MASTER%, but I'm not ready for one right now…//」 RETURN 1 ENDIF ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;断ったのに粘られて切れた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 PRINTFORMW 「まったくわからず屋ね！」 RETURN 1 ENDIF ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;危険日以外許可 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 PRINTFORMW 「If you say so, %CALLNAME:MASTER%!// …You shouldn't run off is something happens.//」 RETURN 1 ENDIF ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;危険日許可 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 PRINTFORMW 「Y-Yes, that's… Right… // …I also want a kid with you, %CALLNAME:MASTER%…//」 PRINTFORMW 「Sooo… Please don't hold back! %UNICODE(0x2665)%// Oh… And be responsible too, okay?//」 RETURN 1 ENDIF ENDIF ;================================================== ;神社暮らしを承認して貰う ;================================================== @M_KOJO_EVENT_K44_19(ARG,ARG:1) ;口上主はLOCALS or RESULT ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;認められる ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORMW 「Thank you so much, %CALLNAME:MASTER% and Reimu! %UNICODE(0x2665)% I'll be good! %UNICODE(0x2665)%%UNICODE(0x2665)%」 RETURN 1 ENDIF ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;認められない ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW 「Right… I see……」 RETURN 1 ENDIF ENDIF RETURN 1 ;================================================== ;帰宅時 ;================================================== @M_KOJO_EVENT_K44_20(ARG,ARG:1) ;口上主はLOCALS or RESULT ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 IF LOCAL && !CFLAG:ブチギレ ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;通常帰宅 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;採取終了後の帰宅 IF TIME < 1260 ;恋人かつ恋慕時専用 IF TALENT:恋人 && TALENT:恋慕 ;仕事手伝ったなら SIF TCVAR:364 PRINTFORMW 「Thank you! %UNICODE(0x2665)% We've had a great haul. %UNICODE(0x2665)%」 PRINTFORMW 「I'm going home, %CALLNAME:MASTER%, but do come over if you have time. %UNICODE(0x2665)%」 ;恋慕or準恋慕or恋人時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 IF TCVAR:364 PRINTFORMW 「Thanks for your help! %UNICODE(0x2665)%// I'll see you later! %UNICODE(0x2665)%//」 ELSE PRINTFORMW （I'm so glad to see %CALLNAME:MASTER% every morning… %UNICODE(0x2665)%//） ENDIF ;思慕 ELSEIF TALENT:思慕 IF TCVAR:364 PRINTFORMW 「Thank you for your help. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「I'll sweep up what I've gotten.」 ENDIF ;特になし ELSE PRINTFORMW 「\@ TCVAR:364 ? That helped. %UNICODE(0x2665)% # \@See you, then.」 ENDIF ELSE ;恋人かつ恋慕時専用 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「It's getting late, so I'll be going now. %UNICODE(0x2665)% Good night! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ;恋慕or準恋慕or恋人時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「It's already this late?! It's a shame, but I'll be going now.」 PRINTFORMW 「See you next time. %UNICODE(0x2665)%」 ;その他 ELSE PRINT 「Oh, it's this late already? I should go now, IF TALENT:思慕 PRINTFORMW bye-byeeeee! %UNICODE(0x2665)%」 ELSE PRINTW see you later!」 ENDIF ENDIF ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;デート中帰宅 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;仕事帰りからのデート IF TCVAR:356 == 1 IF TALENT:恋人 || TALENT:恋慕 PRINTFORMW 「It's already this late… It's a shame, but I'll go home and come back tomorrow.」 PRINTFORMW 「I-I'm sorry for inviting you without planning first, I'll make it up to you later.」 ELSE PRINTFORMW 「I think I can see the moon! I'd love to stay here longer, but I must go now.」 PRINTFORMW 「…Sorry for asking you out…」 ENDIF ;恋人かつ恋慕時専用 ELSEIF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「It's so late already… Sadly, I need to sleep at home, so I'll see you tomorrow. %UNICODE(0x2665)%」 ;恋慕or準恋慕or恋人時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「It's almost nighttime?! I still want a date, but that'll have to wait.」 PRINTFORMW 「I'm sorry, even if you were kind enough to invite me…」 ;その他 ELSE PRINTFORML 「Already this late!? I must head home soon!」 IF TALENT:思慕 PRINTFORMW 「Byeee! %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Well then… %UNICODE(0x2665)%」 ENDIF ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;玄関先でお見送り ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 ;恋人かつ恋慕時専用 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「It's getting late, so I'll be going now. %UNICODE(0x2665)% see you later! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ;恋慕or準恋慕or恋人時専用 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「It's already this late! A shame, but I must be heading home now.」 PRINTFORMW 「See you next time! %UNICODE(0x2665)%」 ;その他 ELSE PRINT 「Oh, my, it's already this late! I should get going, IF TALENT:思慕 PRINTFORMW Byeee! %UNICODE(0x2665)%」 ELSE PRINTW See you later!」 ENDIF ENDIF RETURN 1 ENDIF ENDIF RETURN 1 ;================================================== ;陥落素質取得時 ;================================================== @M_KOJO_EVENT_K44_21(ARG,ARG:1) ;口上主はARG ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;恋慕取得 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;恋慕ないのに恋人な人用 IF TALENT:恋人 PRINTFORMW （Ever since me and %CALLNAME:MASTER% have been together, every day has been so fun! %UNICODE(0x2665)%） PRINTFORMW （I want to be with %CALLNAME:MASTER% for-eeever! %UNICODE(0x2665)%） ELSEIF CFLAG:1014 == 1 PRINTFORMW （I've been thinking about it for a while, but I really must like %CALLNAME:MASTER% after all.//） IF !TALENT:MASTER:恋人 PRINTFORMW （But, I wonder %CALLNAME:MASTER% thinks of me…） PRINTFORMW （……I know! I'll show how I feel on the way back on our next date!） ENDIF ELSE PRINTFORMW （%CALLNAME:MASTER%, my heart races whenever I'm with you.//） PRINTFORMW （……Oh, I think I might have fallen in love with %CALLNAME:MASTER%!//） SIF !TALENT:MASTER:恋人 PRINTFORMW （But, what does %CALLNAME:MASTER% think of me……?） ENDIF ;あなたがエレン以外と恋人になっていると追加 IF TALENT:MASTER:恋人 && !TALENT:恋人 ;custom code, lover check patch PRINTFORMW （But, %CALLNAME:MASTER% already has a lover…） PRINTFORMW （Would things be different if I had told %CALLNAME:MASTER% about my feelings sooner……?） ENDIF IF !TALENT:恋人 PRINTFORMDW %CALLNAME:44% lost 【Shameless】 and gained 【Shy】! TALENT:羞恥心 = 1 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;思慕取得 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW （It's really kind of fun with %CALLNAME:MASTER%. %UNICODE(0x2665)%） PRINTFORMW （I wonder if we'll be even closer friends? %UNICODE(0x2665)%） RETURN 1 ENDIF ;------------------------------------------------- ;愛欲取得 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;愛人取得 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;セフレ取得 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 PRINTFORML RETURN 1 ENDIF ENDIF RETURN 1 ;================================================== ;調教終了時に自慰 ;================================================== @M_KOJO_EVENT_K44_22(ARG,ARG:1) ;口上主はARG ;ARG:0に自慰状況 ;ARG:1に自慰種類 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;通常自慰 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 IF LOCAL IF TALENT:恋慕 IF MARK:快楽刻印 == 3 PRINTFORML 「Hrmm…… Ah! %UNICODE(0x2665)%//」 PRINTFORMW （It feels good, but…… Would it be better if I imagined %CALLNAME:MASTER% was here?//） ELSEIF MARK:快楽刻印 > 0 PRINTFORML 「Oouuhh…… Aie! %UNICODE(0x2665)%//」 PRINTFORMW 「…It's lonely doing it on my own.//」 ELSE PRINTFORML 「I love you… %CALLNAME:MASTER%, I love you!//」 PRINTFORMW （Oh, how so much better it would be if it was %CALLNAME:MASTER% doing the penetrating…//） ENDIF ELSE PRINTFORMW 「Ooh……//」 ENDIF ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;同室時自慰 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 PRINTFORMW 「Pheeeew……// Hrhhmmm……//」 RETURN 1 ENDIF ;------------------------------------------------- ;中だし精液自慰 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験 ;無知消去イベントあり（表示は一度だけ IF LOCAL:1 >= 25 ;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください [SKIPSTART] ELSEIF LOCAL:1 >= 20 ELSEIF LOCAL:1 >= 15 ELSEIF LOCAL:1 >= 10 ELSEIF LOCAL:1 >= 5 [SKIPEND] ELSE ENDIF PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;陥落素質あり自慰中毒高め ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 5 ;------------------------------------------------- ;Ｃ敏感orＣ感覚10以上 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;Ｖ敏感orＶ感覚10以上 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;Ａ敏感orＡ感覚10以上 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 3 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;Ｂ敏感orＢ感覚10以上 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 4 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;部位指定無し ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 5 PRINTFORML RETURN 1 ENDIF ;その他 ;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;自慰中毒高め ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 6 ;------------------------------------------------- ;尻穴膣腔同時 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 1 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;膣腔のみ ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG:1 == 2 PRINTFORML RETURN 1 ENDIF ;その他 ;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;我慢 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 7 PRINTFORMW 「今日は我慢、我慢するのよ」 RETURN 1 ENDIF ;その他 ;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます PRINTFORML RETURN 1 ENDIF RETURN 1 ;================================================== ;浴場連れだし ;================================================== @M_KOJO_EVENT_K44_23(ARG,ARG:1) ;口上主はLOCAL ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;断られた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 IF CFLAG:1014 == 1 PRINTFORMW 「Well…// I guess it was too much to ask for, right?//」 ELSE PRINTFORMW 「It's no big deal…」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;一緒に入ってくれた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 IF TALENT:恋人 PRINTFORMW 「Oooh! %UNICODE(0x2665)% It's so good to be in here with you, %CALLNAME:MASTER%! %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Y-You can be in the same bath as me, you know.//」 ELSE PRINTFORMW 「We'll be fine, %CALLNAME:MASTER%. %UNICODE(0x2665)%」 ENDIF RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;懐妊 ;================================================== @M_KOJO_EVENT_K44_24(ARG,ARG:1) ;口上主はLOCAL ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;恋慕 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 IF TALENT:恋人 && TALENT:恋慕 && CFLAG:生解禁 == 2 PRINTFORMW 「Heheheeeh! %UNICODE(0x2665)% It's just like a dream. %UNICODE(0x2665)%」 ELSEIF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「There's a kid with your name in here, %CALLNAME:MASTER%, you know that? %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Er…… I can manage it.//」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- ;思慕 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 RETURN 1 ENDIF ;------------------------------------------------- ;陥落素質無し ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 RETURN 1 ENDIF ;------------------------------------------------- ;無自覚 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;出産 ;================================================== @M_KOJO_EVENT_K44_25(ARG,ARG:1) ;口上主はLOCAL ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL ;性別を設定する　ましな文になるのは少しお待ちを PRINTFORML What's the gender of Ellen's child? RESETCOLOR CALL ASK_M("Random", 1, "Female", 1, "Male", 1) IF RESULT CHILD_SEX:44:(ARG:1) = RESULT ELSE CHILD_SEX:44:(ARG:1) = RAND:2 + 1 ENDIF TRYCALLFORM M_KOJO_COLOR_K44 ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;恋慕 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 PRINTFORMW 「You'll do our best to raise the kid, right? %UNICODE(0x2665)%」 RETURN 1 ENDIF ;------------------------------------------------- ;思慕 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 RETURN 1 ENDIF ;------------------------------------------------- ;陥落素質無し ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 RETURN 1 ENDIF ;------------------------------------------------- ;無自覚 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 RETURN 1 ENDIF ;その他 PRINTFORML ENDIF RETURN 1 ;================================================== ;オナバレ ;================================================== @M_KOJO_EVENT_K44_26(ARG,ARG:1) ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL SELECTCASE ARG ;------------------------------------------------- CASE 0 ;見られた瞬間 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 1 ;何もしない ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 2 ;そのまま続行 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 3 ;追い出し ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 4 ;やっちゃう ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 5 ;事後 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ENDSELECT ENDIF ;================================================== ;相手からデートのお誘い ;================================================== @M_KOJO_EVENT_K44_27(ARG,ARG:1) ;口上主はLOCAL ;ARG:1は目的地 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 1 ;------------- IF LOCAL SELECTCASE ARG ;------------------------------------------------- CASE 0 ;誘い文句 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 SELECTCASE ARG:1 CASE 0 LOCALS = 博麗神社 CASE 1 LOCALS = 命蓮寺 CASE 2 LOCALS = 人里 CASE 3 LOCALS = 霧の湖 CASE 4 LOCALS = 迷いの竹林 ;選ばれる事は無いんだけど一応 CASE 5 LOCALS = 魔法の森 ;デートで三途の川に誘われたら唖然とするよね、という事で CASE 6 LOCALS = マヨヒガ CASE 7 LOCALS = 妖怪の山のふもと CASE 8 LOCALS = 妖怪の山 CASE 9 LOCALS = 地底 CASE 10 LOCALS = 月 CASEELSE LOCALS = "これが出たらスレで報告してね" ENDSELECT IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Let's go to %LOCALS% today, hm? %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Hey, we should go on a date. %UNICODE(0x2665)%//」 ;恋慕縛りが解除されたときのために ELSE PRINTFORMW 「%CALLNAME:MASTER%, if you're free, would like to visit %LOCALS% with me?」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- CASE 1 ;受けた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Yaaay! %UNICODE(0x2665)% Let's go! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Let's do it! %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Let's go right away! %UNICODE(0x2665)%」 ENDIF ;デートに誘われたフラグを立てる TCVAR:356 = 1 RETURN 1 ENDIF ;------------------------------------------------- CASE 2 ;断った ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 IF TALENT:恋人 PRINTFORMW 「Well, we can do it another day. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Ohh, if you aren't feeling up to it, %CALLNAME:MASTER%, that's fine.」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- CASE 3 ;部屋に誘われた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「We can stay at my house, then. %UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 || TALENT:恋人 PRINTFORMW 「If you wouldn't mind, do you want to come to my home?//」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- CASE 4 ;部屋に誘われたのを受けた ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 IF TALENT:恋人 && TALENT:恋慕 PRINTFORMW 「Yippee! %UNICODE(0x2665)% Let's go! %UNICODE(0x2665)%%UNICODE(0x2665)%」 ELSEIF TALENT:恋慕 || CFLAG:1014 == 1 PRINTFORMW 「Let's do it! %UNICODE(0x2665)%//」 ELSE PRINTFORMW 「Well, let's get going! %UNICODE(0x2665)%」 ENDIF RETURN 1 ENDIF ;------------------------------------------------- CASE 5 ;部屋に誘われたのを断った ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 1 ;------------------------------------------------- IF LOCAL:1 IF TALENT:恋人 PRINTFORMW 「Okay, I'll invite you over some other time. %UNICODE(0x2665)%」 ELSE PRINTFORMW 「Oh, %CALLNAME:MASTER%, it's fine if you're not willing to do it…」 ENDIF RETURN 1 ENDIF ENDSELECT ENDIF ;================================================== ;脱衣口上 ;================================================== @M_KOJO_EVENT_K44_28(ARG,ARG:1) ;口上主はTARGET ;ARGに脱がし方選択 ;ARG:1（ARG=3の場合のみあり）地の文の反応 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL && !FLAG:70 SELECTCASE ARG ;------------------------------------------------- CASE 0 ;全裸にする ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 1 ;下着姿にする ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 2 ;半脱ぎ ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 3 ;パンツちょうだい ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 SELECTCASE ARG:1 ;------------------------------------------------- CASE 0 ;交換です ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 1 ;OK（嬉々 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 2 ;OK（渋々 ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF ;------------------------------------------------- CASE 3 ;嫌です ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 RETURN 1 ENDIF RETURN 1 ENDSELECT ENDIF ENDSELECT ENDIF RETURN 1 ;================================================== ;怒り口上 ;================================================== @M_KOJO_EVENT_K44_29(ARG,ARG:1) ;口上主はTARGET ;ARGはTARGETの度胸で分岐 ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL ;------------------------------------------------- ;小分岐 ;------------------------------------------------- ;怒らせてしまった ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 RETURN 1 ENDIF ;------------------------------------------------- ;泣かせてしまった　[臆病]持ち ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 RETURN 1 ENDIF ENDIF RETURN 1 ;================================================== ;相手が押し倒しを解除 ;================================================== @M_KOJO_EVENT_K44_30(ARG,ARG:1) ;口上主はTARGET ;-------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL = 0 ;------------- IF LOCAL ;------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 1 ;疲れた PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 2 ;満足して解放 PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 3 ;満足したところを押し倒された PRINTFORML RETURN 1 ENDIF ;------------------------------------------------- ;記入チェック（=0, 非表示、1, 表示） LOCAL:1 = 0 ;------------------------------------------------- IF LOCAL:1 && ARG == 4 ;壊れるまでしてあげる PRINTFORML RETURN 1 ENDIF ENDIF RETURN 1