08/03/10 00:33:20 h5bYNrkz0
>>595
特定しますた!
933 名無しさん@お腹いっぱい。 sage 2007/07/27(金) 22:53:25 ID:pg+8x/Sf0
HVS2RGB (ただし V=1 S=1 0<H<240、むしろH2RGBというべきかw)
$puts(h,%playlist_number%)
$puts(hi,$mod($div($get(h),60),6)) //hi = h/60 mod 6
$puts(f,$sub($muldiv($get(h),256,60),$get(hi))) // f = 256( h/60 - hi)
$puts(q,$sub(256,$get(f))) //q = 256 - f
$select($add($get(hi),1), // case hi
$puts(r,255 )$puts(g,$get(f))$puts(b,0 ),// 0 = hi = h/60 mod 6
$puts(r,$get(q))$puts(g,256 )$puts(b,0 ),// 1
$puts(r,0 )$puts(g,256 )$puts(b,$get(f)),// 2
$puts(r,0 )$puts(g,$get(q))$puts(b,255 ),// 3
$puts(r,255 )$puts(g,0 )$puts(b,255 ),// 4
$puts(r,255 )$puts(g,0 )$puts(b,$get(q)) // 5
)
$rgb($get(r),$get(g),$get(b))
HVS2RGBを作ってみたんですけど
これ以上簡単になりませんかね?(最適化?)
誰か添削求む
935 933 sage 2007/07/27(金) 23:49:52 ID:pg+8x/Sf0
$hsl(H,1,1)
たったこれだけでよかった orz