HSPTV!掲示板

質問です。
コンボボックスで選択した色のRGBをそのまま画面に乗せたいのですがうまくいきません。

コンボボックスで色を選ぶ（赤、緑、青などが書いてある）
↓
その隣にその色に対応したRGBの値を表示させる

わかりづらいかもしれませんがどうかよろしくお願いします

すみません。「わかりづらい」が「わかりずらい」になっていたのでもう一度投稿させてもらいました

うまくいかないというか方法がわからないんです。調べてみてもどこにも書いておらず、自分で考えようと
しても全く思いつかないのです。

書いてみましたが解読できるか気になるところです。

sdim rgb_table
rgb_table(0) = "0,0,0"
rgb_table(1) = "255,0,0"
rgb_table(2) = "255,255,0"
rgb_table(3) = "0,0,255"
rgb_state = 0
combox rgb_state, , "黒\n赤\n黄\n青"
pos , 25
repeat
	if rgb_state != rgb_state_old {
		rgb_str = rgb_table(rgb_state)
		split rgb_str, ",", rgb_array
		color int(rgb_array(0)), int(rgb_array(1)), int(rgb_array(2))
		mes rgb_str
	}
	rgb_state_old = rgb_state
	wait 4
loop

rgb_table(x)の中に入っている（R,G,B）の数値をsplit命令を使って","ごとに区切ってrgb_array
にいれていく、ということでしょうか？

私がやりたかったことと少しだけ違いますがとても参考になりました！これを自分なりに改良すれば
私がほしいものができると思います。本当にありがとうございました！

解決したようですが、ループを使いたくなければ

	sdim com_tex				;内容が返る変数を確保
	oncmd gosub *command, $111	;コンボボックス監視
	combox a, 60, "赤\n緑\n青\n黄\n紫"
	hCom = objinfo (stat, 2)	;オブジェクトハンドル取得
stop
*command
	if lparam = hCom {
		wNotifyCode = wparam >> 16 & $FFFF	;wparamの上位ワードには通知コードが返る
		if wNotifyCode = 1 {				;通知コード1の場合は選択状態変化
			sendmsg hCom, $D, 64, varptr(com_tex)	;選択中のテキスト取得
			switch com_tex
			case "赤":color 255		:boxf 50,50,100,100:swbreak
			case "緑":color ,255	:boxf 50,50,100,100:swbreak
			case "青":color ,,255	:boxf 50,50,100,100:swbreak
			case "黄":color 255,255 :boxf 50,50,100,100:swbreak
			case "紫":color 255,,255:boxf 50,50,100,100:swbreak
			swend
		}
	}
return