NScripter Ver.19.00

1 ：名前は開発中のものです。：2014/01/30(木) 22:41:08.23 ID:BRbRh5DC.net

商業流通でなければフリーで利用可能な
ゲームエンジンNScripterについて語るスレです。

・本家
ttp://www.nscripter.com/

・うｐろだ
ttp://nscuploader.wkeya.com/

171 ：名前は開発中のものです。：2014/05/25(日) 22:29:41.56 ID:L8XimEmS.net

検証できる環境がないので分からないけど、バッファオーバーフローぽいね。
１つの命令文が長すぎるのが原因だと思う。
命令文を８０〜１２０文字以内くらいに収めた方がいいと思うよ。

フラグ用の変数を用意してif分を分割するか、for-next使うといいと思う。

172 ：名前は開発中のものです。：2014/05/26(月) 12:50:59.42 ID:ArU/je5h.net

すみません、NS2の質問です。
NS2はサンプルのテキストがウィンドウ表示なんですが
これを全画面表示になるようサンプルスクリプトを自分で考えて改造しました。

通常の表示は問題なく行えるようになったのですが、バックログ機能を使うと
表示がおかしくなります。

多分ですが、そもそものやり方が悪いと思うのですが
今のやり方以外思いつかず、しかもこのバックログ表示バグの修正案も
思いつかずで詰まっています。

どなたか解決策か、もしくは根本的におかしい場合別のやり方を
教えて頂けないでしょうか

↓改造した00.txtの一部（問題と思われる箇所）

173 ：名前は開発中のものです。：2014/05/26(月) 12:53:45.95 ID:ArU/je5h.net

@text
param %tag,%text

〜voiceとか、この辺はデフォルトから変えていませんので省略〜

; 改ページ記号がある場合、改ページ実施
if line == 16 or %text == "改ページ_" then
spfill "window:text1",0,#00000000 ; テキストを消す
spfill "window:text2",0,#00000000 ; テキストを消す
spfill "window:text3",0,#00000000 ; テキストを消す
spfill "window:text4",0,#00000000 ; テキストを消す
spfill "window:text5",0,#00000000 ; テキストを消す
spfill "window:text6",0,#00000000 ; テキストを消す
spfill "window:text7",0,#00000000 ; テキストを消す
spfill "window:text8",0,#00000000 ; テキストを消す
spfill "window:text9",0,#00000000 ; テキストを消す
spfill "window:text10",0,#00000000 ; テキストを消す
spfill "window:text11",0,#00000000 ; テキストを消す
spfill "window:text12",0,#00000000 ; テキストを消す
spfill "window:text13",0,#00000000 ; テキストを消す
spfill "window:text14",0,#00000000 ; テキストを消す
spfill "window:text15",0,#00000000 ; テキストを消す
; 何行目かの情報をクリア
line = 0
%kaipage = 1
endif

174 ：名前は開発中のものです。：2014/05/26(月) 12:54:56.78 ID:ArU/je5h.net

endif
; フォントがMSゴシックの場合
if _font == 0 then
if line == 1 then
if %text <> "改ページ_" then
; 1行目表示
spputtext "window:text1",0,%text,{font="text",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
endif
else if line == 2 then
if %text == "改ページ_" then
; 改ページ判定の場合は2行目を1行目に表示
spputtext "window:text1",0,%text,{font="text",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
endif
; 2行目表示
spputtext "window:text2",0,%text,{font="text",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
else if line == 3 then
; 3行目表示
spputtext "window:text3",0,%text,{font="text",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
※以下15行目まで同じ処理です。長すぎるので省略
endif
endif
endif
; フォントがMS明朝の場合
else

175 ：名前は開発中のものです。：2014/05/26(月) 12:55:33.61 ID:ArU/je5h.net

if line == 1 then
if %text <> "改ページ_" then
; 1行目表示
spputtext "window:text1",0,%text,{font="text2",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
endif
else if line == 2 then
if %text == "改ページ_" then
; 改ページ判定の場合は2行目を1行目に表示
spputtext "window:text1",0,%text,{font="text2",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
endif
; 2行目表示
spputtext "window:text2",0,%text,{font="text2",wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
※以下15行目まで同じ処理です。長すぎるので省略

176 ：名前は開発中のものです。：2014/05/26(月) 12:57:25.93 ID:ArU/je5h.net

endif

; 何行目かの情報を＋1して次の行へ移行
line = line+1

return

;スクリプト改造箇所終わり

これをバックログで実行すると
http://iup.2ch-library.com/i/i1203511-1401076566.png
こうなってしまいます（当然といえば当然ですが・・・）

何かいい方法があれば教えて頂けないでしょうか・・・

177 ：名前は開発中のものです。：2014/05/26(月) 22:47:15.90 ID:eYuz/ba5.net

変数_fontを、_font="text"とか_font="text2"としてあげると
spputtext "window:text",0,%text,{font=_font,wait=(9-_textspeed)*10,w=28,h=20},{font="rubytext"}
が効くので、if文がいらなくなって便利ですよ。

ノベル形式にするには色々やり方があると思いますが、一例として、
まずsystem.luaのfunction basic.text(stag,stext)を少しいじります。

--特殊：basic.textは表示文に対応しています。登録の必要はありません。
t_text = ""
function basic.text(stag,stext)
if stag==nil and stext==nil then return end
if stext ~= "p" then
t_text = t_text..stext.."\\n"
return
end
local logtbl={tag=stag,text=t_text}
basic.backlog[basic.backlogheader]=logtbl
basic.backlogheader=basic.backlogheader+1
if basic.backlogheader>BACKLOGSIZE then basic.backlogheader=1 end
basic.exec_call("@text",stag,t_text)
t_text = ""
end

178 ：178：2014/05/26(月) 22:49:05.47 ID:eYuz/ba5.net

次に、02.txtの@title_startの辺りのスプライトの設定を適当な大きさと位置に変えます。
sp "window:window", {name="*800,600,#88333333",x=0,y=0,z=1000}
sp "window:text", {name="*672,504,#00000000",x=128,y=64,z=10}

使い方：
行頭の半角文字の「>p」で改ページするようになります。
例：
ああああ
いいいい
>p
うううう
>p

179 ：名前は開発中のものです。：2014/05/26(月) 23:45:59.03 ID:ArU/je5h.net

>>177
レスありがとうございます。

ただやってみたのですが、バックログの話ではなく、通常表示において
>pがある場所に来ると、それ以降文章が全く表示されず、かつ最後までクリックを全く待たず
シナリオが進んでしまうようです。

肝心のlua層の記述（>>177の部分）について、私がluaの事を全く理解できてないので
その記述のどこが問題なのか分かりませんが、returnやendを削除したり、>pの記述を
変えてみたりなど、その程度の事はやってみましたが、どうも上手く行きません。

>p以降全く文章が表示されないのは
if stext ~= "p" then
t_text = t_text..stext.."\\n"
return
end

あたりのendが関係している？のでしょうか？

180 ：名前は開発中のものです。：2014/05/26(月) 23:48:10.42 ID:ArU/je5h.net

ああああああ
ええええええ

てすと

次で改行

>p


bg 背景1

ららららららら


てすとその２

bg 背景2

quit ;終了

などとすると、「次で改行」までは普通で、それ以降の「らららら」や「てすとその２」が表示されず
背景だけが背景1→背景2と自動で切り替わって、最後のquitにたどり着くようで、そのまま終了されてしまいました。