; ; シーン1 ; ; 初期化 ;goto a020 ;DEBUG msg 準備中です。お待ちください。 endtext loads SE_BTLST ;btlStart loads SE_DMG ;damage loads SE_INN ;inn loads SE_BEHAVE ;enemy msg OK! endtext fadeout FFFFFF clear fadein FFFFFF ・・・ あなたは眠っている・・・ ・・・ ・・・・・・・・ sound SE_BTLST ;btlStart clear music A16_101 text モンスターが現れた！ （真っ暗で何も見えない！？） endtext sound SE_BEHAVE ;enemy msg モンスターの攻撃！ endtext wait 10 sound SE_DMG ;damage shake msg あなたは6のダメージを受けた！ endtext wait 10 msg あなたは眠っている！ endtext wait 10 sound SE_BEHAVE ;enemy msg モンスターの攻撃！ endtext wait 10 sound SE_DMG ;damage shake msg あなたは7のダメージを受けた！ endtext wait 10 text あなたは目を覚ました！ endtext stopm fadeout FFFFFF sound SE_INN ;inn clear load h_Childroom grp0 0 fit grp0 paint fadein FFFFFF 見覚えの無い部屋にいる flg0 = 0 flg1 = 0 *a005 if flg0 = 0 goto a008 if flg1 = 0 goto a008 goto a020 *a008 clear menu m0 周りを見る 自分を見る endmenu if m0 = 0 then text 少し狭いが、清潔な部屋・・・ 初めて見る部屋だ。 endtext flg0 = 1 else いつものパジャマを着ている。 少し汗をかいている。 flg1 = 1 endif goto a005 *a020 load face_b02 shujinn 100 zoom shujinn 150 150 move shujinn 0 -30 paint shujinn wipe music A16_038 女の人「お目覚めのようですね。」 menu m0 あなたは誰？ ここはどこ？ endmenu if m0 = 1 then 女の人「ここは宿屋です。」 ;else if m0 = 0 goto a020 ;DEBUG endif 女の人「私はこの宿屋の主人です。」 text 主人「昨夜旅人が眠っているあなたを 運んできたのですよ。町外れで 倒れているあなたを見つけたそうです。」 endtext menu m0 モンスターは？ その旅人は？ endmenu if m0 = 0 then text 主人「そんなものはもういませんよ。 以前に勇者様が退治してくれました。 きっと夢でも見たのでしょう。」 endtext menu m0 旅人は？ endmenu endif text 主人「もう出て行かれましたが、 今夜もこの町にとどまるそうですので 後でお会いなさるといいでしょう。」 endtext text 主人「今夜は星祭ですから、 ごゆっくりなさってくださいね。」 endtext clear erase shujinn wipe unload shujinn menu m0 外に出る endmenu ; ; シーン2 ; ; 初期化 cntChatMan = 0 flgChatMan0 = 0 flgChatMan1 = 0 cntChatWoman = 0 flgChatWoman0 = 0 flgChatWoman1 = 0 cntChatJiisan = 0 flgWorkPlace = 0 flgVisitWork = 0 ;goto a020 ;DEBUG *scene2 fadeout erase load town1_1b grp0 1 fit grp0 paint grp0 fadein text ;やはり見たことのない町だ。 数人の人影が見える。 何軒かの店もある。 endtext clear *s2menu clear menu m0 人に話しかける 道具屋へ行く 酒場へ行く 宿屋へ行く 他へ行く endmenu if m0 = 0 then ;話し menu m1 男の人 おばあさん おじいさん やめる endmenu if m1 = 0 goto chatMan ;男の人 if m1 = 1 goto chatWoman ;おばあさん if m1 = 2 goto chatJiisan ;おじいさん else if m0 = 1 then ;道具屋 goto douguya else if m0 = 2 then ;酒場 goto sakaba else if m0 = 3 then ;宿屋 goto yadoya else ;他 if flgWorkPlace = 1 then menu m1 越して来た家へ やめる endmenu if m1 = 0 goto workPlace else 今のところ他に行くあてはない endif endif goto s2menu *chatMan ;話す　男の人 --------------------------------------- load face_a08 hito 101 zoom hito 150 150 move hito 0 -30 paint hito wipe if cntChatMan = 0 then 男の人「こんにちは。旅の人かい？」 else 男の人「やあ。調子はどうだい？」 endif cntChatMan + 1 *chatMan10 if flgChatMan0 = 0 goto chatMan20 if flgChatMan1 = 0 goto chatMan20 text 男の人「君も男なら勇者なんかより ガールフレンドでも探したほうが いいんじゃないか？」 endtext text 男の人「星祭の夜に男1人じゃ つまらないぞ。」 endtext goto chatMan99 *chatMan20 clear menu m1 星祭のことを聞く 勇者のことを聞く やめる endmenu if m1 = 0 then text 男の人「年に1度のお祭りさ。 うまい飯を食べて、酒を飲んで。 まあ、1番の目的は・・・」 endtext 男の人「いや、何でもないよ。」 flgChatMan0 = 1 goto chatMan10 else if m1 = 1 then text 男の人「以前この辺にも モンスターどもがうろついていたのは 君も知ってるよな。」 endtext text 男の人「それを根こそぎ 退治したのがこのオレ、勇者様なのさ！」 endtext text 勇者？「その目は信じてないな？ ・・・・ごめん、うそだよ。」 endtext flgChatMan1 = 1 goto chatMan10 endif *chatMan99 男の人「またな」 clear erase hito wipe unload hito goto s2menu *chatWoman ;話す　おばさん --------------------------------------- load face_b03 hito 101 zoom hito 150 150 move hito 0 -30 paint hito wipe cntChatWoman + 1 if cntChatWoman = 1 then text おばあさん「変わった服装だね。 旅の人だね。」 endtext goto chatWoman20 endif if flgChatWoman0 = 0 goto chatWoman10 if flgChatWoman1 = 0 goto chatWoman10 text おばあさん「星祭の準備をしなくちゃ ならないから、また後にしておくれ。」 endtext goto chatWoman99 *chatWoman10 おばあさん「またあんたかい。」 *chatWoman20 clear menu m1 星祭のことを聞く 勇者のことを聞く やめる endmenu if m1 = 0 then text おばあさん「メインイベントは 男から好きな女への告白タイムだよ。」 endtext text おばあさん「あんたもそれが目的で 来たんじゃないのかい？」 endtext text おばあさん「アタシでよかったら あいてるよ」 endtext flgChatWoman0 = 1 goto chatWoman99 else if m1 = 1 then text おばあさん「どこか遠い国から来て モンスターをやっつけた後、 北の方の町に住みついたと聞いてるよ。」 endtext text おばあさん「何でも記憶を無くして 自分の国に帰る方法が分からないとか。」 endtext text おばあさん「そういえば あんたの服装、似てるような・・・」 endtext flgChatWoman1 = 1 goto chatWoman99 endif *chatWoman99 clear erase hito wipe unload hito goto s2menu *chatJiisan ;話す　おじいさん --------------------------------------- load face_b04 hito 101 zoom hito 150 150 move hito 0 -30 paint hito wipe cntChatJiisan + 1 if cntChatJiisan = 1 then おじいさん「ん？誰じゃ、おまえさん。」 text おじいさん「そうかい、旅の人かい。 この町はいいところだから ゆっくりしていくとよい。」 endtext else if cntChatJiisan = 2 then text おじいさん「この町のいいところは おなごがかわゆいことじゃ。」 endtext text おじいさん「今夜の星祭が 楽しみじゃの。」 endtext else if cntChatJiisan = 3 then text おじいさん「どうじゃ、 かわゆいおなごは見つかったかの」 endtext else おじいさん「どこまで話したかの・・・」 text おじいさん「すまんの。 最近、物忘れがひどくての。」 endtext cntChatJiisan = 0 endif clear erase hito wipe unload hito goto s2menu *yadoya ;宿屋 --------------------------------------- clear fadeout erase load h_Childroom grp0 0 fit grp0 paint grp0 fadein load face_b02 shujinn 100 zoom shujinn 150 150 move shujinn 0 -30 paint shujinn wipe 主人「おかえりなさい」 *yadoya10 clear if flgSumiYado = 1 then menu m1 休む 外へ出る endmenu if m1 = 0 then text 主人「星祭が始まるまで お休みになるのですね？」 endtext menu m2 はい いいえ endmenu if m2 = 0 then 主人「それではお休みなさいませ」 clear erase shujinn wipe fadeout FFFFFF sound SE_INN ;inn erase fadein FFFFFF 夜になり、星祭が始まった。 （つづく） end endif goto yadoya10 endif else flgSumiYado = 1 menu m1 お礼を言う 外へ出る endmenu if m1 = 0 then text 主人「お礼を言いそびれてたですって？ それはアナタをお連れしてくれた 旅人の方におっしゃってくださいな。」 endtext text 主人「同じお部屋にお泊めしたのですから お代も結構ですよ。ごゆっくりなさって ください。」 endtext goto yadoya10 endif endif *yadoya99 主人「いってらっしゃいませ。」 clear erase shujinn wipe goto scene2 *workPlace ;越して来た家 --------------------------------------- clear flgVisitWork = 1 load bg06_640_480 grpOver 9 fit grpOver paint grpOver wipe アルバイト募集のはり紙がある。 ・・・だが今は留守のようだ。 clear erase grpOver wipe unload grpOver goto s2menu *sakaba ;酒場 --------------------------------------- clear load h_syankuson grpOver 9 fit grpOver paint grpOver wipe if flgVisitWork = 1 then ランチタイムのようだ。 menu m1 入る 戻る endmenu if m1 = 0 goto sakabaIn else text まだ準備中らしい。 ランチタイムは11:30からと 書いてある。 また後で来てみよう。 endtext endif *sakaba99 clear erase grpOver wipe unload grpOver goto s2menu *douguya ;道具屋 --------------------------------------- clear fadeout erase load h_Magnificence grp0 0 fit grp0 paint grp0 fadein load face_b07 shujinn 101 zoom shujinn 150 150 move shujinn 0 -30 paint shujinn wipe 主人「いらっしゃい何にする？」 *douguya1 menu m2 骨董品 高価な家具 ハンカチ ぬいぐるみ 花束 店を出る endmenu if m2 = 5 then goto douguya99 else if m2 < 2 then 主人「それは旅人に必要ないだろう。」 goto douguya1 endif if m2 = 3 then text 主人「子どもにあげるとよろこぶよ。 350ゴールドだよ。」 endtext else text 主人「恋人にあげるのかい？ 500ゴールドだよ。」 endtext endif 主人「・・・金を持ってないのかい・・・」 if flgWorkPlace = 1 then text 主人「アルバイトでもして かせいできな。」 endtext goto douguya99 endif menu m2 店を出る 仕事をする endmenu if m2 = 1 then 主人「あいにく間に合ってるよ・・・」 text 主人「そういえば最近越して来た家で アルバイトを募集してたな。 行ってみたらどうだい？」 endtext flgWorkPlace = 1 sound SE_INN 場所を教えてもらった！ text 主人「確か越して来た人というのは 女の人で、かなりのべっぴんさん らしいぞ。」 endtext endif *douguya99 主人「また来てくれよ。」 clear erase shujinn wipe unload shujinn goto scene2 *sakabaIn ;酒場内部 --------------------------------------- clear fadeout erase load h_Salon grp0 15 fit grp0 paint grp0 fadein load face_a02 shujinn 110 zoom shujinn 150 150 move shujinn 0 -30 paint shujinn wipe 女の子「あ・・・いらっしゃいませ」 menu m1 注文する 世間話をする endmenu load face_a06 kyaku1 111 zoom kyaku1 150 150 move kyaku1 0 -30 paint kyaku1 wipe erase shujinn 女の人「まあっ、やっと目が覚めたのね！」 他の女の人が割り込んできた。 さっきの女の子は行ってしまった。 text 女の人「倒れているあなたを見つけたときは びっくりしたわ。」 endtext text どうやらこの人が自分を助けてくれた 旅人らしい。 endtext clear menu m1 お礼を言う 文句を言う endmenu if m1 = 0 then 女の人「いいのよ。」 else text 女の人「あのメイドの女の子が 気に入ったのかな！？ じゃましてごめんね。」 endtext endif text 女の人「それより私の名前はリンス。 あなたは？」 endtext ;text ;リンス「そう、アナタさんっていうの。 ;素敵な名前ね。」 ;endtext load face_a05 kyaku2 112 zoom kyaku2 150 150 move kyaku2 0 -30 paint kyaku2 wipe 男の人「誰と話してるんだ？リンス」 erase kyaku1 ; waitを使ったアニメーション ----------- リンス「ちょっと、割り込まないでよ！」 move kyaku1 -300 0 paint kyaku1 cntAnim = 5 *lblLoop050 move kyaku1 30 0 move kyaku2 30 0 wait 1 cntAnim - 1 if cntAnim > 0 goto lblLoop050 text リンス「彼は私の連れのマゼント。 変な名前でしょ？両親の名前を混ぜた んですって。」 endtext マゼント「お前だって同じじゃないか」 リンス「お前って？」 マゼント「ごめん。君だって・・・」 ; 終わり ------------------------------------- stopm fadeout text （つづく） endtext clear end