#author("2020-05-07T14:22:11+09:00","","") #author("2020-05-07T14:23:43+09:00","","") [[Ys TOOLs C]] pic copy 0.1.0~ ~ ・始めに~ 記述予定~ ~ ・作成の動機~ 2DRPGとかで使うキャラチップとかマップチップとかの~ 画像の編集がめんどくさいので作成しました~ ~ ・使い方~ 記述予定~ ~ 作成:高畑ラボ(Y_repeat)~ ~ ・連絡先~ バグなどありましたらご報告ください~ また改造後再配布時配布URLを教えていただけると嬉しいです~ y.tack2010@gmail.com~ #code(C,nooutline){{ #include "hspda.as" screen 1,150,100 cls 2 screen 2,150,100 cls 2 screen 3,150,100 cls 4 screen 0,570,380 gsel 0 gosub *def_A gosub *def_B gosub *def_C gosub *def_D goto *@f *def_A var4input4moto="" var4input4saki="" return *@ *draw_begin cls 1 objsize 110,20 mes "copy元file" input var4input4moto,210,20 ID4input4moto=stat button "copy元読み込み",*l_load_moto button "dialog",*l_dialog_moto mes "copy先file input var4input4saki,210,20 ID4input4saki=stat button "copy先読み込み",*l_load_saki button "dialog",*l_dialog_saki button "copy先保存",*l_save_saki button "vsave",*l_vsave button "vload",*l_vload button "sample vload",*l_sample_vload goto *@f *def_B var4input_copy_moto_X=0 var4input_copy_moto_Y=0 return *@ pos 220,0 mes "copy元X座標" input var4input_copy_moto_X,150,20 ID4input_copy_moto_X=stat mes "copy元Y座標" input var4input_copy_moto_Y,150,20 ID4input_copy_moto_Y=stat goto *@f *def_C var4input_copy_saki_X=0 var4input_copy_saki_Y=0 var4input_copy_saki_size_X=0 var4input_copy_saki_size_Y=0 return *@ pos 220,100 mes "copy先X座標" input var4input_copy_saki_X,150,20 ID4input_copy_saki_X=stat mes "copy先Y座標" input var4input_copy_saki_Y,150,20 ID4input_copy_saki_Y=stat mes "copy先 size X" input var4input_copy_saki_size_X,150,20 ID4input_copy_saki_size_X=stat mes "copy先 size Y" input var4input_copy_saki_size_Y,150,20 ID4input_copy_saki_size_Y=stat button "直接座標コピー",*l_chokusetu_copy goto *@f *def_D var4input_tanni_size_x=0 var4input_tanni_size_y=0 var4input_tanni_pos_x_index=0 var4input_tanni_pos_Y_index=0 var4input_tanni_kosuu_x=1 var4input_tanni_kosuu_y=1 return *@ pos 380,100 mes "単位copy 単位(size)X" input var4input_tanni_size_x,150,20 ID4input_tanni_size_x=stat mes "単位copy 単位(size)Y" input var4input_tanni_size_y,150,20 ID4input_tanni_size_y=stat mes "単位copy先 pos X(index)" input var4input_tanni_pos_x_index,150,20 ID4input_tanni_pos_x_index=stat mes "単位copy先 pos Y(index)" input var4input_tanni_pos_Y_index,150,20 ID4input_tanni_pos_Y_index=stat mes "単位copy copy個数(X)" input var4input_tanni_kosuu_x,150,20 ID4input_tanni_kosuu_x=stat mes "単位copy copy個数(Y)" input var4input_tanni_kosuu_y,150,20 ID4input_tanni_kosuu_y=stat button "単位copy",*l_tanni_copy stop *l_load_moto exist var4input4moto if strsize==-1:dialog "FILEが存在しません",1:stop gsel 1 picload var4input4moto gsel 0 stop *l_load_saki exist var4input4saki if strsize==-1:dialog "FILEが存在しません",1:stop gsel 2 picload var4input4saki gsel 0 stop *l_save_saki gsel 2 bmpsave var4input4saki gsel 0 stop *l_chokusetu_copy gsel 2 gmode 0,var4input_copy_saki_size_X,var4input_copy_saki_size_Y pos var4input_copy_saki_X,var4input_copy_saki_Y gcopy 1,var4input_copy_moto_X,var4input_copy_moto_Y,var4input_copy_saki_size_X,var4input_copy_saki_size_Y logmes "pos"+var4input_copy_saki_X+" "+var4input_copy_saki_Y logmes "copy"+var4input_copy_moto_X+" "+var4input_copy_moto_Y+" "+var4input_copy_saki_size_X+" "+var4input_copy_saki_size_Y gsel 3 cls 4 pos 0,0 gcopy 1,var4input_copy_moto_X,var4input_copy_moto_Y,var4input_copy_saki_size_X,var4input_copy_saki_size_Y ; gsel 2 ; pos 10,10 ; gcopy 1,20,20,15,15 stop *l_tanni_copy gsel 2 _4gmode_x=var4input_tanni_size_x*var4input_tanni_kosuu_x _4gmode_y=var4input_tanni_size_y*var4input_tanni_kosuu_y gmode 0,_4gmode_x,_4gmode_y _4copy_pos_x=var4input_tanni_size_x*var4input_tanni_pos_x_index _4copy_pos_y=var4input_tanni_size_y*var4input_tanni_pos_y_index pos _4copy_pos_x,_4copy_pos_y _4gcopy_x=var4input_tanni_size_x*var4input_tanni_kosuu_x _4gcopy_y=var4input_tanni_size_y*var4input_tanni_kosuu_y gcopy 1,var4input_copy_moto_X,var4input_copy_moto_Y,_4gcopy_x,_4gcopy_y logmes "gmode size "+_4gmode_x+" "+_4gmode_y logmes "copy pos "+_4copy_pos_x+" "+_4copy_pos_y logmes "gcopy "+var4input_copy_moto_X+" "+var4input_copy_moto_Y+" "+_4gcopy_x+" "+_4gcopy_y gsel 3 cls 4 pos 0,0 gcopy 1,var4input_copy_moto_X,var4input_copy_moto_Y,_4gcopy_x,_4gcopy_y stop *l_dialog_moto dialog "*",16 if stat==1:objprm ID4input4moto,refstr stop *l_dialog_saki dialog "*",16 if stat==1:objprm ID4input4saki,refstr stop *l_vsave vsave "tmp_p_c.dat" stop *l_vload vload "tmp_p_c.dat" goto *draw_begin *l_sample_vload vload "sample_p_c.dat" goto *draw_begin }}