HSPTV!掲示板

別のスレッドで正規表現の.に\rが含まれる影響で
正規表現を用いた置換がうまくできない問題について、
vbscriptではなくjavascriptなら\rを含まないので
問題なく置換できるのではないかと考えて、
mod_regexp.asを実装しようとしているのですが、
改行が消える問題は同じく発生しました。
\rは含まないのにです。
オンラインのjavascriptで文字列置換を試せるサイトでは改行は消えません。
原因は何だと思いますか？
また、scriptcontrolで配列を受け取るにはどうすればいいですか？
(matchesの実装に使います)
以下に減少が確認できるプログラムを載せておきます。

#module
#defcfunc jsrun str code,str func
newcom objjs, "ScriptControl"
objjs("Language")="javascript"
objjs->"AddCode" code
comres re
objjs->"Run" func
return re
#defcfunc jsrun2 str code,str func,str p
newcom objjs, "ScriptControl"
objjs("Language")="javascript"
objjs->"AddCode" code
comres re
objjs->"Run" func,p
return re
#defcfunc replace str target,str Pattern,str repstr,int IgnoreCase,int Global,int Multiline
opt=""
if(IgnoreCase=0):opt+="i"
if(Global=0):opt+="g"
if(Multiline=0):opt+="m"
code={"
function replace(str){
	var pat=/"}+Pattern+{"/"}+opt+{";
	var rstr=\""}+repstr+{"\";
	return str.replace(pat,rstr)
}
"}
return jsrun2(code,"replace",target)
#global
code = {"
	mes "1"
	mes "2" ; t
	mes "3" ; t
	mes "4" // t
	mes "5" // t
	"}
; コメント文を消去
	code = replace(code,";.*", "")	// セミコロン
	code = replace(code,"\\/\\/.*", "")	// スラッシュx2

	mesbox code,ginfo_winx,ginfo_winy,5

JavascriptとJScriptの非互換な部分ではないでしょうか。
リファレンスを見る限り、VBScriptにしてもJScriptにしても'.'パターンはCRを含むのではないかと思います。
https://docs.microsoft.com/ja-jp/previous-versions/windows/scripting/cc392020(v=msdn.10)

Active Scriptingは詳しくないのですが、VBScriptとJScriptでRegExpは同じ実装なのでは…

JScipt…。せめてもう少し本家と互換持ってくれ。
いい発想だと思ったけど、結局ダメか。
・一行ごとに処理してつなげる
・IEコンポーネントでjavascript呼ぶ
・自力でパーサを書く
どれがいいと思いますか？

試してませんがBREGEXP.DLLではダメなのでしょうか？
確かいくつかモジュールを公開されている方がいらっしゃったように思います。
またモジュール内での呼び出しDLLをbregonig.dllに変えればそのまま互換で使えたように記憶しています。

BREGEXP.DLLを試してみようとしたのですが、
なんかプログラムが強制終了するんですが。
なぜ？サンプルは動くのに。
一応実行したプログラムは以下です。

#include "gm_bregexp_dll.hsp"
code = {"
	mes "1"
	mes "2" ; t
	mes "3" ; t
	mes "4" // t
	mes "5" // t
	"}

	mes	"[brex_subst]"
	brex_subst	"/;.*/", code, text
	ret	= stat
	switch	ret
	case	BREGEXP_ERROR@bregexp_dll
		mes	"p1,p2いずれかの内容が不正です。"
		swbreak
	case	0
		mes	"置換できる文字列はありませんでした。"
		swbreak
	default
		mes	"cnt: " + ret
		mes	"result: \"" + substtext + "\""
	swend
	//mesbox text,ginfo_winx,ginfo_winy,5

http://lldev.jp/hsp/module/bregexp_dll.html
のモジュールを使わせてもらいました。
強制終了する原因はわかりますか？

ネットで調べたら標準命令のみで実装されている正規表現モジュールが
公開されていたので、
そのモジュールをラップして
mod_regexp.asと同じように動作するようにして見たいと思います。
そのモジュールは引数が多くて使いづらいと思うので。
（matchesとsubmatchを一つの命令に押し込んだような命令なので）
この方法ならhsp3dishでも使えます。
さすがに自力でパースは大変だと思っていたので助かりました。

ドット一つにそこまでこだわる必要ありますか。
ドットの代わりに[^\r\n]をつかうとか、前処理で一度CRLFをLFにしてから置換するとかで十分では。

わかっている人ならそれでいいかもしれませんが、
わかってない人が困るんじゃないかと思います。
まあマニュアルに書いてあるようですが、
果たしてマニュアルをきちんと読む人がどれだけいるのやら
実際これが原因で悩んでる人がいましたし。
ちなみに僕はマニュアルよりサンプル見ることが多いです。
後、前処理で一度CRLFをLFにしてから置換するのは試したけど
うまくいきませんでした。

まああなたのこだわりを否定したいわけではないので。
>後、前処理で一度CRLFをLFにしてから置換するのは試したけどうまくいきませんでした。
こんな感じでしょうか。

#include "mod_regexp.as"

	code = {"
	mes "1"
	mes "2" ; t
	mes "3" ; t
	mes "4" // t
	mes "5" // t
	"}
	
	lf="":wpoke lf,0,10
; コメント文を消去
	code= replace(replace(replace(code,"\n",lf),";.*", ""),"\\n","\n")
	code= replace(replace(replace(code,"\n",lf),"//.*", ""),"\\n","\n")

	mesbox code,ginfo_winx,ginfo_winy,5

こんばんは。
BREGEXPなのですがまずこちらから
http://k-takata.o.oo7.jp/mysoft/bregonig.html#SCT-4.1
最新版をダウンロードされてください。
またつーさ様のHPにてBREGEXP.hspというモジュールをダウンロードされてください。
https://tu3.jp/0360

#uselib "BREGEXP.DLL"

を

#uselib "bregonig.dll"

と変更した後

#include "BREGEXP.hsp"
code = {"
	mes "1"
	mes "2" ; t
	mes "3" ; t
	mes "4" // t
	mes "5" // t
	"}

	mes	"[BSubst]"
	BSubst	code, "s#(;|//).*# #[m][g][R]"
	ret	= stat
	switch	ret
	case	BREGEXP_ERROR@bregexp_dll
		mes	"p1,p2いずれかの内容が不正です。"
		swbreak
	case	0
		mes	"置換できる文字列はありませんでした。"
		swbreak
	default
		mes	"cnt: " + ret
	swend
	mesbox code,ginfo_winx,ginfo_winy,5

こんな感じでどうでしょうか。
BREGEXP.DLL本家HPにパターン文字に"/"を含む場合は〜、と説明があり"#"を使用しております。

ありがとうございます。
実行確認出来ました。
分割もできることを考えると
むしろこっちの方が便利かもしれません。
ということでこのDLLって再配布ってできるやつですか？
hspに付属してほしい。
DLLだからたぶん処理速いし。
hsp3dishで使えないのは本家と同じだし。

上記HPに

9. ライセンス
再配布などの際には、BSD ライセンスに従い、bsd_license.txt も同梱してください。
（ドキュメントに bsd_license.txt の内容を転記でも可）
とあるので、そこさえ注意すればkanamaru様が同梱して配布することは問題はないかと思います。

おにたま様がHSPに同梱、もしくは標準命令として取り込むのは
作者様同士でのやり取りになるため何とも言えませんがそうなれば夢のある話ですね。

bregonig.dllは便利だとは思うのですが、
僕としては、そもそもこのスレッドの話が出てきた理由を考えると、
hspに付属できたら望ましいですが、付属できるかわかりません。
そこで、（なんか暴走している気がしますが）
じゃあhspに付属させることを前提としたdll作っちゃえと考えました。
なのでこのスレッドは終わらせます。
早速作った中で問題が発生しているので別スレッドを作ります。