This commit is contained in:
Jáchym Toušek
2017-05-15 18:41:17 +02:00
parent 66989e5a79
commit 0d0b874378
41 changed files with 20768 additions and 11716 deletions

View File

@@ -1,5 +1,14 @@
void main()
void main()
{
int AdvMode;
AdvMode = 1;
int Line_ModeSpecific;
if (AdvMode) {
Line_ModeSpecific = Line_Normal;
OutputLineAll(NULL, "", Line_ContinueAfterTyping);
} else {
Line_ModeSpecific = Line_WaitForInput;
}
//■二重人格???
@@ -18,27 +27,30 @@
//「よく映画などに登場しますが、簡単にいうとどのようなものでしょうか。@
PlaySE(3, "s20/00/repoa44001", 256, 64);
OutputLine(NULL, "「よく映画などに登場しますが、簡単にいうとどのようなものでしょうか。」",
NULL, "\"I see it in movies quite often, but what is it, exactly?\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, "\"I see it in movies quite often, but what is it, exactly?\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「複数の人格を持つことによる逃避と考えられています。@
PlaySE(3, "s20/00/profa44001", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「複数の人格を持つことによる逃避と考えられています。」",
NULL, "\"Multiple personalities are thought to be escapism.\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, "\"Multiple personalities are thought to be escapism.\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「多重人格は逃避のひとつなのですか?¥
PlaySE(3, "s20/00/repoa44002", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「多重人格は逃避のひとつなのですか?」",
NULL, "\"Multiple personality disorder is a form of escape?\"", Line_Normal);
ClearMessage();
//「左様です@そのメカニズムは完全には解明されていませんが、精神を守るために脳が行なう防御行動のひとつではないかと考えられています。¥
PlaySE(3, "s20/00/profa44002", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「左様です。",
NULL, "\"Correct.", Line_ContinueAfterTyping);
Wait (1000);
@@ -48,17 +60,19 @@
//「例えば、貧乏な人がお金持ちになった自分を想像するという現実逃避ってありますよね@ これも多重人格なわけですか?@
PlaySE(3, "s20/00/repoa44003", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「例えば、貧乏な人がお金持ちになった自分を想像するという現実逃避ってありますよね?",
NULL, "\"Hypothetically, poor people imagining themselves as wealthy is a form of escapism, is it not?", Line_ContinueAfterTyping);
Wait (3800);
OutputLine(NULL, " これも多重人格なわけですか?」",
NULL, " Is this also a form of multiple personality disorder?\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, " Is this also a form of multiple personality disorder?\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「極論はできませんが、広義的にはそう解釈できます@つまり誰にでもありえる現象なのです。¥
PlaySE(3, "s20/00/profa44003", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「極論はできませんが、広義的にはそう解釈できます。",
NULL, "\"I wouldn't go that far, but broadly speaking, one could infer that.", Line_ContinueAfterTyping);
Wait (3000);
@@ -68,14 +82,16 @@
//「その現実逃避の見境がなくなると二重人格になるのですか?@
PlaySE(3, "s20/00/repoa44004", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「その現実逃避の見境がなくなると二重人格になるのですか?」",
NULL, "\"Does a split personality occur when one cannot tell which is reality and which is the escape?\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, "\"Does a split personality occur when one cannot tell which is reality and which is the escape?\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「...ちょっと難しいですね@...そう提唱する説もありますし、否定する説もあります@諸説紛々です。¥
PlaySE(3, "s20/00/profa44004", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「…ちょっと難しいですね。",
NULL, "\"...That's difficult to say.", Line_ContinueAfterTyping);
Wait (2200);
@@ -88,14 +104,16 @@
//「では精神医学の世界ではまだ、多重人格というのは未知の解明されていない現象なんですか?@
PlaySE(3, "s20/00/repoa44005", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「では精神医学の世界ではまだ、多重人格というのは未知の解明されていない現象なんですか?」",
NULL, "\"Then is the occurrence of multiple personalities still an unknown phenomenon... something not fully comprehended in the psychiatric field?\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, "\"Then is the occurrence of multiple personalities still an unknown phenomenon... something not fully comprehended in the psychiatric field?\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「残念ながらそうなります@今後の研究が期待されます。¥
PlaySE(3, "s20/00/profa44006", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「残念ながらそうなります。",
NULL, "\"Unfortunately, that is the current state of things.", Line_ContinueAfterTyping);
Wait (1600);
@@ -105,6 +123,7 @@
//「でもでも~、二重人格なんて何だかカッコイイですよね~@ どういう人が二重人格になれるんですかぁ?¥
PlaySE(3, "s20/00/repoa44006", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「でもでも〜、二重人格なんて何だかカッコイイですよね〜!",
NULL, "\"But, but~ It's sorta cool having a split personality~!", Line_ContinueAfterTyping);
Wait (3000);
@@ -114,6 +133,7 @@
//「なれるといいますか...、なりやすいといいますか...@最近の研究では、遺伝と心因が複雑に絡み合い...@中でも幼少期の虐待が大きく作用するのではないかと言われています。@
PlaySE(3, "s20/00/profa44007", 256, 64);
if (AdvMode) { OutputLine("教授", NULL, "Professor", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「なれるといいますか…、なりやすいといいますか…。",
NULL, "\"Recent studies find that those who develop it... or rather, those who are more susceptible to developing it,", Line_ContinueAfterTyping);
Wait (1800);
@@ -121,20 +141,22 @@
NULL, " may be genetically predisposed or may have had abnormal mental development...", Line_WaitForInput);
PlaySE(3, "s20/00/profa44008", 256, 64);
OutputLine(NULL, "中でも幼少期の虐待が大きく作用するのではないかと言われています。」",
NULL, " Some say that childhood abuse increases the chances.\"", Line_WaitForInput);
OutputLineAll(NULL, "\n", Line_ContinueAfterTyping);
NULL, " Some say that childhood abuse increases the chances.\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n", Line_ContinueAfterTyping); }
//「そう言えば、このA君も幼児虐待を受けてるんですよね~。カワイソ~...。@
PlaySE(3, "s20/00/repoa44007", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「そう言えば、このA君も幼児虐待を受けてるんですよね〜。カワイソ〜…。」",
NULL, "\"Speaking of which, Person A here experienced abuse as a child, didn't he~ How sad~...\"", Line_WaitForInput);
OutputLineAll(NULL, "\n\n", Line_ContinueAfterTyping);
NULL, "\"Speaking of which, Person A here experienced abuse as a child, didn't he~ How sad~...\"", Line_ModeSpecific);
if (AdvMode) { ClearMessage(); } else { OutputLineAll(NULL, "\n\n", Line_ContinueAfterTyping); }
//「7つの人格を持つ青年A@ではVTRの続きをどうぞ@/
PlaySE(3, "s20/00/repoa44008", 256, 64);
if (AdvMode) { OutputLine("リポーター", NULL, "Reporter", NULL, Line_ContinueAfterTyping); }
OutputLine(NULL, "「7つの人格を持つ青年A。",
NULL, "\"Person A has seven different personalities.", Line_WaitForInput);
PlaySE(3, "s20/00/repoa44009", 256, 64);