• 追加された行はこの色です。
  • 削除された行はこの色です。
  • ADD BRs は削除されています。
  • ADD BRs の差分を削除
#author("2020-04-15T13:59:49+09:00","","")
[[Ys TOOLs A]]
~
ADD BRs 0.1.0~
~
・始めに~
このTOOLは入力したテキストの各行の行末に<BR>を付け加えるTOOLです~
~
・作成の動機~
僕がサイトを運営していて~
サイトに載っけるテキストを書いて~
いちいち手作業で行末に<BR>をコピペしていたのですが~
TOOLSを作成しようとした時に~
この処理も加えようと思い作成しました~
~
・使い方~
~
・「＜BR> 追加の前」mesbox~
＜BR>を各行の行末につけ加えたいテキストを書くかコピペするためのmesboxです~
~
・実行~
＜BR> 追加の前」mesboxに<BR>を各行の行末につけ加えたいテキストを書くかコピペして~
このbuttonを押すと各行の行末に＜BR>を付け加えて~
「＜BR> 追加の後」mesboxにそのテキストを表示します~
~
・「＜BR> 追加の後」mesbox~
テキストの各行の行末に<BR>を付け加えたテキストを表示します~
~
作成：高畑ラボ(Y_repeat)
バグなどありましたらご報告ください~
また改造後再配布時配布URLを教えていただけると嬉しいです~
y.tack2010@gmail.com~
#author("2020-04-15T14:16:02+09:00","","")

#code(C,nooutline){{
 //	操作前文字列用mesbox用
 sdim s,60000
 //	操作後文字列用mesbox用
 sdim t,60000
 //	ノートパッド用
 sdim u,60000
 title "add <BR>"
 //	画面初期化
	screen 0,480,600
	mes "<BR> 追加の前"
 //	sが中身の操作前文字列用mesbox
	mesbox s,480,200,5
 //	このbuttonを押すと<BR>を行末に追加する
	button "実行",*do_hoge
	mes "<BR> 追加の後"
 //	tが中身の操作後文字列用mesbox
	mesbox t,480,340,5
	stop
 //	<BR>を行末に追加するサブルーチン
 *do_hoge
	sdim tmp,2000
 //	操作前mesboxの中身の入ったsをuにコピーして
		u=s
 //	uをノートパッド命令の対象にする
	notesel u
 //	文字列の行数繰り返すのでnotemax回繰り返す
	repeat notemax
 //	ノートパッドのcnt番目の行の文字列を取り出して
		noteget tmp,cnt
 //	文字列の後に<BR>をくっつけて
		tmp+="<BR>"
 //	ノートパッドの取り出した行に上書き（格納）
		noteadd tmp,cnt,1
		loop
 //	出来上がった文字列を操作前meboxに反映
	objprm 2,u
	stop
}}