色見本帳
ドリトルの GUI部品 button! で作った色見本帳。
再読込でタイル数が変化します。色タイルは自身がボタンになっているのでタップすると色が変わります。
これは意外と便利かも。何に使うかはあなた次第。
ドリトル色見本帳
http://bitarrow.eplang.jp/bitarrow/fs/pub/f4e9c680/Button_2.html
ドリトル色見本帳（日本の伝統色版）
http://bitarrow.eplang.jp/bitarrow/fs/pub/f4e9c680/Button_3.html
// 色ボタン
map=[|v s1 e1 s2 e2| s2+(e2-s2)*((v-s1)/(e1-s1))].
col=[c=color! (random(256))(random(256))(random(256)) create].
w=screen!width?. h=screen!height?.
xn=random(4)+1. yn=random(4)+1. ws=ceil(w/xn). hs=ceil(h/yn).
i=0. j=0.
[i=i+1.
[j=j+1.
x=!(j)(1)(xn+1)(w/-2)(w/2) map. y=!(i)(1)(yn+1)(h/2)(h/-2) map.
button! (!col) create
(white) fontcolor (12) fontsize (ws)(hs) size (x)(y) position (c) paint
[self! (!col）set (c) paint] 動作設定.
]! (xn) repeat.
j=0.
]! (yn) repeat.
