HSPTV!掲示板

昔のBASICの様な
mes Asc("1")
結果　49
mes Chr$(49)
結果　1
というようなモジュールを作りたいのですがどうしたら良いのでしょうか？

peekとpokeで出来ますが、
『$』はHSPでは16進数を意味するので関数名には使えません。

やるとしたらこんな感じになるでしょうか。

#module
	#defcfunc Asc str s1
		s2 = s1;
		return peek(s2, 0);

	#defcfunc Chr int i1
		rs = "";
		poke rs, 0, i1;
		return rs

#global

	mes Asc("1")
	mes Chr(49)

上に関しては '' で(恐らく)同じことが出来ます。(BASICが分からないので違ってたらすみません)

mes '1' //49と表示される

下はあらやさんの方法が一番簡単かな?

これでどうですか。

mes strf( "%d", '1' )
mes strf( "%c", 49 )

ありがとうございます。
色々、悩んだのですが簡単にできたのですね。
助かりました。