- 追加された行はこの色です。
- 削除された行はこの色です。
#author("2020-05-08T10:38:27+09:00","","")
#freeze
#author("2020-05-08T10:39:51+09:00","","")
[[Ys TOOLs C]]
chg color 0.1.0~
~
・始めに~
このTOOLは読み込んだりした画像の~
指定(一つめ)のcolorの部分を指定(二つめ)のcolorに~
colorを変更するTOOLです~
~
例えば最初の背景色128,128,128(灰色)を~
0,0,0(黒)に変えたりします~
~
・作成の動機~
透過カラーTOOLを作成後~
転用すれば簡単に書けそうなので書いてみました~
指定色を変更の処理はずっとなんとなく書いてみたかったので~
今回やってみました~
~
・使い方~
記述予定~
~
作成:高畑ラボ(Y_repeat)~
~
・連絡先~
バグなどありましたらご報告ください~
また改造後再配布時配布URLを教えていただけると嬉しいです~
y.tack2010@gmail.com~
#code(C,nooutline){{
screen 0,260,250
cls 1
mes "LOAD FILE NAME"
var4load_pic_name=""
input var4load_pic_name,120,20
ID4load_pic_name=stat
button "読み込み",*l_pic_load
mes "SAVE FILE NAME"
var4save_pic_name=""
input var4save_pic_name,120,20
ID4save_pic_name=stat
button "保存",*l_pic_save
mes "win_size"
var4win_size=""
input var4win_size,120,20
ID4win_size=stat
button "変換",*l_do_chg
screen 1,160,100
cls 2
screen 2,160,100
cls 3
gsel 0
pos 150,0
mes "変換前color"
pos 150,20
mes "R"
pos 170,20
var4before_color_R=128
input var4before_color_R,50,20
ID4var4before_color_R=stat
pos 150,45
mes "G"
pos 170,45
var4before_color_G=128
input var4before_color_G,50,20
ID4var4before_color_G=stat
pos 150,70
mes "B"
pos 170,70
var4before_color_B=128
input var4before_color_B,50,20
ID4var4before_color_B=stat
pos 150,95
mes "変換後color"
pos 150,120
mes "R"
pos 170,120
var4after_color_R=0
input var4after_color_R,50,20
ID4var4after_color_R=stat
pos 150,145
mes "G"
pos 170,145
var4after_color_G=0
input var4after_color_G,50,20
ID4var4after_color_G=stat
pos 150,170
mes "B"
pos 170,170
var4after_color_B=0
input var4after_color_B,50,20
ID4var4after_color_B=stat
stop
*l_pic_save
gsel 2
bmpsave var4save_pic_name
stop
*l_pic_load
gsel 1
picload var4load_pic_name
pic_x=ginfo_winx
pic_y=ginfo_winy
gsel 0
var4win_size=""+pic_x+","+pic_y
objprm ID4win_size,var4win_size
stop
*l_do_chg
gsel 1
pic_x=ginfo_winx
pic_y=ginfo_winy
repeat pic_y
this_y=cnt
repeat pic_x
this_x=cnt
pget this_x,this_y
if ginfo_r==var4before_color_R{
if ginfo_g==var4before_color_G{
if ginfo_b==var4before_color_B{
gsel 2
color var4after_color_R,var4after_color_G,var4after_color_B
pset this_x,this_y
gsel 1
}
}
}
loop
loop
stop
}}