新作をつくりました
screen 0,440,250
keka=0
mes"英語力テスト"
mes"私の名はミスターX\n次のといに答えてくれ"
objsize 200,20,
button goto"答えたる",*kuso
stop
*kuso
cls
mes "Mr.X「Are the feces delicious?」\n\nMrs. A「I think that the feces are not delicious…」"
objsize 200,20,
button goto"yes",*y
button goto"no",*n
stop
*y
keka=keka+1
cls
mes "Mr.X「The fool that you are a fool!\n A fool! A fool! \nI laugh」
objsize 200,20,
button goto"go next",*baka
stop
*n
keka=keka+2
cls
mes "Mr.X「You are common」
objsize 200,20,
button goto"go next",*baka
stop
*baka
cls
mes "Mr.X「Do you have been to the restroom?」
objsize 200,20,
button goto"yes",*yy
button goto"no",*nn
stop
*yy
keka=keka+4
cls
mes "Mr.X「It is so!」"
button goto"結果発表",*keika
stop
*nn
keka=keka+8
cls
mes "Mr.X「Are you stupid?」"
button goto"結果発表",*keika
stop
*keika
if keka=3:goto *a;50点
if keka=9:goto *b;0点
if keka=6:goto *c;100点
if keka=10:goto *d;50点
stop
*a
cls
mes "結果"
mes "第一問"
mes "{うんこはおいしいですか?}"
mes "あなたのこたえ{はい}"
mes "第二問"
mes "{あなたは、トイレに行ったことがありますか?}"
mes "あなたのこたえ{はい}"
mes "結果"
mes "50点 うんこ食うなよ"
button goto"終わる",*_end
stop
*b
cls
mes "結果"
mes "第一問"
mes "{うんこはおいしいですか?}"
mes "あなたのこたえ{はい}"
mes "第二問"
mes "{あなたは、トイレに行ったことがありますか?}"
mes "あなたのこたえ{いいえ}"
mes "結果"
mes "0点 貴様、英語をしらんのか!"
button goto"終わる",*_end
stop
*c
cls
mes "結果"
mes "第一問"
mes "{うんこはおいしいですか?}"
mes "あなたのこたえ{いいえ}"
mes "第二問"
mes "{あなたは、トイレに行ったことがありますか?}"
mes "あなたのこたえ{はい}"
mes "結果"
mes "100点 英語の達人(?)"
button goto"終わる",*_end
stop
*d
cls
mes "結果"
mes "第一問"
mes "{うんこはおいしいですか?}"
mes "あなたのこたえ{いいえ}"
mes "第二問"
mes "{あなたは、トイレに行ったことがありますか?}"
mes "あなたのこたえ{いいえ}"
mes "結果"
mes "50点 我慢するなよ、もらすなよ。"
button goto"終わる",*_end
stop
*_end
end
についてコメント
感想を聞きたいです