Ｈｔｍｌカラーコードとは、ＲＧＢの各輝度を２５６段階、１６進数００〜ＦＦの範囲で表し、
３つを連結させたもので、Ｈｔｍｌで採用しているＲＲＧＧＢＢ形式のことです。
サンプルモジュール内部の「１６進数から１０進数へ変換する方法について」はコチラを参照してください。
	

to_htm 赤輝度, 緑輝度, 青輝度
	赤輝度		変換元の赤輝度を指定する。
	緑輝度		変換元の緑輝度を指定する。
	青輝度		変換元の青輝度を指定する。

from_htm 格納先配列変数, 読込元変数
	格納先配列変数		各輝度をセットする３要素以上を持つ配列変数を指定する。
	読込元変数		ＲＧＢが1つにまとまった変数を指定する。

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

#module
#deffunc to_htm int, int, int
	mref rstr, 65
	rstr = ""
	repeat 3
		mref tmp, cnt
		str tmp, 18
		rstr += tmp
	loop
	return
#deffunc from_htm val, val
	mref ary, 48
	mref s, 25
	repeat 3
		strmid tmp, s, cnt * 2, 2
		tmp = "$" + tmp
		int tmp
		ary.cnt = tmp
	loop
	return
#global

	dialog "", 33
	to_htm rval, gval, bval // RGB -> Html
	code = refstr
	mes "Htmlカラーコード:#" + code
	from_htm col, code // 各輝度取り出し
	mes "R:" + col.0
	mes "G:" + col.1
	mes "B:" + col.2
	stop

受取先 = to_htm(赤輝度, 緑輝度, 青輝度)
	受取先		１つにまとめたカラーコードの受取先を指定する。
	赤輝度		０〜２５５の格納する赤輝度を指定する。
	緑輝度		０〜２５５の格納する緑輝度を指定する。
	青輝度		０〜２５５の格納する青輝度を指定する。

受取先 = from_htm(読込元変数, 取り出す輝度番号)
	受取先		指定輝度の取り出し先を指定する。
	読込元変数		ＲＧＢが1つにまとまった変数を指定する。
	取り出す輝度番号		１つにまとめた変数から取り出す輝度(0:赤 1:緑 2:青)番号のいずれかを指定する。

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13

#module
#defcfunc to_htm int r, int g, int b
	return strf("%02x%02x%02x", r, g, b)
#defcfunc from_htm var s, int no
	return int("$" + strmid(s, no * 2, 2))
#global

	dialog "", 33
	code = to_htm(ginfo_r, ginfo_g, ginfo_b) // RGB -> Html
	mes "Htmlカラーコード:#" + code
	mes "R:" + from_htm(code, 0) // 赤輝度取り出し
	mes "G:" + from_htm(code, 1) // 緑輝度取り出し
	mes "B:" + from_htm(code, 2) // 青輝度取り出し