- 832 名前：デフォルトの名無しさん mailto:sage [2007/09/07(金) 21:36:31 ]
- allrgb = (ginfo_r + ginfo_g + ginfo_b)/3
質問とは関係ないが、なぜこうしなかったのか気になるな
picload "適当な画像ファイルパス"
SZx = double(ginfo_winx)
SZy = double(ginfo_winy)
y = 0
repeat SZy
x = 0
repeat SZx
pget x,y
allrgb = ginfo_r + ginfo_g + ginfo_b
color allrgb / 3, allrgb / 3, allrgb / 3
await 0
pset x,y
x++
loop
y++
loop
こんな感じ？物凄く遅いけど
