Pixel-Composer/scripts/node_mk_sparkle/node_mk_sparkle.gml
Tanasart 782e6d8e1a p4
2024-08-20 15:15:53 +07:00

442 lines
12 KiB
Plaintext

enum MKSPARK_DIRR { main, diag }
enum MKSPARK { dir, y, x, speed, length, lendel, time }
function Node_MK_Sparkle(_x, _y, _group = noone) : Node_Processor(_x, _y, _group) constructor {
name = "MK Sparkle";
dimension_index = -1;
update_on_frame = true;
newInput(0, nodeValue_Int("Size", self, 5));
newInput(1, nodeValueSeed(self, VALUE_TYPE.float));
newInput(2, nodeValue_Float("Speed", self, 1))
.setDisplay(VALUE_DISPLAY.slider)
newInput(3, nodeValue_Bool("Shade", self, false));
newInput(4, nodeValue_Float("Amount", self, 0.5))
.setDisplay(VALUE_DISPLAY.slider)
newInput(5, nodeValue_Float("Scatter", self, 0.5))
.setDisplay(VALUE_DISPLAY.slider)
newInput(6, nodeValue_Palette("Colors", self, [ cola(c_black), cola(c_white) ]))
newInput(7, nodeValue_Bool("Additive", self, false))
newInput(8, nodeValue_Float("Diagonal", self, 0.2))
.setDisplay(VALUE_DISPLAY.slider)
outputs[0] = nodeValue_Output("Surface out", self, VALUE_TYPE.surface, noone);
input_display_list = [ new Inspector_Sprite(s_MKFX), 1,
["Surfaces", false], 0,
["Sparkle", false], 2, 4, 5, 8,
["Render", false, 3], 6, 7,
]
temp_surface = array_create(3);
static processData = function(_outSurf, _data, _output_index, _array_index) {
var _seed = _data[1];
var _size = _data[0];
var _sped = _data[2];
var _amou = _data[4];
var _scat = _data[5];
var _diag = _data[8];
var _shad = _data[3];
var _palt = _data[6];
var _badd = _data[7];
_outSurf = surface_verify(_outSurf, _size, _size);
random_set_seed(_seed);
var st_sz = ceil( _size / 2);
var st_ps = floor(_size / 2);
temp_surface[0] = surface_verify(temp_surface[0], st_sz, st_sz);
temp_surface[1] = surface_verify(temp_surface[1], _size, _size);
temp_surface[2] = surface_verify(temp_surface[2], _size, _size);
var f = CURRENT_FRAME * _sped;
surface_set_target(temp_surface[0]);
DRAW_CLEAR
var _amo = 3 + irandom(st_ps * _amou);
var _ind = 0;
var _sct = lerp(25, 1, power(_scat, 0.1));
var _pal_sz = array_length(_palt);
draw_set_color(c_white);
if(_badd) BLEND_ADD
repeat(_amo) {
if(_shad) {
var _in = _ind / (_amo - 1);
draw_set_color(_palt[(_pal_sz - 1) * _in]);
}
_ind++;
var dy = power(random(1), _sct) * (st_ps / 2);
var dx = power(random(1), _sct) * (st_ps / 2);
var sx = irandom_range(1, st_ps / 4);
var sl = irandom_range(1, st_ps / 4) * -1;
var ll = irandom_range(1, st_ps / 2);
var len = max(0, ll + f * sl);
var diam = random(1) < _diag * 0.2;
var diag = random(1) < _diag;
if(len <= 0) continue;
if(diam) {
var lx = -1 + dx - f * sx;
var ly = st_sz - 1 - dy - f * sx;
draw_line(lx, ly, lx - len, ly - len);
} else if(diag) {
var lx = -1 + dx + f * sx;
var ly = st_sz - 1 - dy - f * sx;
draw_line(lx, ly, lx + len, ly - len);
} else {
var ly = st_sz - 1 - dy;
var lx0 = -1 + f * sx + dx;
var lx1 = lx0 + len;
draw_line(lx0, ly, lx1, ly);
}
}
surface_reset_target();
BLEND_NORMAL
surface_set_target(temp_surface[1]);
DRAW_CLEAR
draw_surface_ext(temp_surface[0], st_ps, 0, 1, 1, 0, c_white, 1);
draw_surface_ext(temp_surface[0], st_sz, 0, -1, 1, 0, c_white, 1);
surface_reset_target();
surface_set_target(temp_surface[2]);
DRAW_CLEAR
draw_surface_ext(temp_surface[1], 0, 0, 1, 1, 0, c_white, 1);
draw_surface_ext(temp_surface[1], 0, _size, 1, -1, 0, c_white, 1);
surface_reset_target();
surface_set_target(_outSurf);
DRAW_CLEAR
draw_surface_ext(temp_surface[2], 0, 0, 1, 1, 0, c_white, 1);
draw_surface_ext(temp_surface[2], 0, _size, 1, 1, 90, c_white, 1);
surface_reset_target();
return _outSurf;
}
}
/* Old sparkle, dunno why but I don't want to remove it yet
function __Node_MK_Sparkle(_x, _y, _group = noone) : Node_Processor(_x, _y, _group) constructor {
name = "MK Sparkle";
dimension_index = -1;
update_on_frame = true;
newInput(0, nodeValue_Int("Size", self, 5));
newInput(1, nodeValue_Float("Sparkle", self, [
[ MKSPARK_DIRR.main, 0, 0, 2, 1, 0, 0 ],
[ MKSPARK_DIRR.main, 0, -1, 1, 1, 0, 0 ],
]))
.setArrayDepth(2)
.setArrayDynamic();
newInput(2, nodeValue_Int("Start frame", self, 0));
newInput(3, nodeValue_Float("Speed", self, 1));
newInput(4, nodeValue_Int("Loop", self, []))
.setArrayDepth(1)
.setArrayDynamic();
editor_rect = [ 0, 0 ];
editor_rect_to = [ 0, 0 ];
editor_rect_hover = 0;
editor_hold_ind = -1;
editor_hold_sx = -1;
editor_timer = -1;
editor_timer_mx = 0;
editor_timer_sx = 0;
sparkleEditor = new Inspector_Custom_Renderer(function(_x, _y, _w, _m, _hover, _focus) {
var _size = inputs[0].getValue();
var _sprk = inputs[1].getValue();
var _c = ceil(_size / 2);
var rows = array_create(_c);
for( var i = 0; i < _c; i++ ) rows[i] = [];
for( var i = 0, n = array_length(_sprk); i < n; i++ ) {
var _sp = _sprk[i];
var _rw = _sp[MKSPARK.y];
array_push(rows[_rw], i);
}
_y += ui(8);
var cell_s = ui(32);
var cell_w = (4 + _c) * cell_s;
var cx0 = _x + _w / 2 - cell_w / 2;
var cx1 = cx0 + cell_s;
var cx2 = cx1 + cell_s * 3;
var cx3 = cx2 + cell_s * _c;
var cy = _y + ui(24);
var _amo = 0;
for( var i = 0, n = array_length(rows); i < n; i++ )
_amo += 1 + array_length(rows[i]);
var _h = ui(8) + _amo * cell_s + ui(48);
//draw_sprite_stretched(s_mk_sparkle_bg, 0, _x, _y, _w, _h);
draw_set_circle_precision(32);
var _rect_hover = 0;
var _cont_hover = -1;
var _arr_ind = 0;
var _arr_ins = -1;
var _arr_del = -1;
var _arr_insrw = -1;
var _arr_insx = -1;
for( var i = 0, n = array_length(rows); i < n; i++ ) {
var row = rows[i];
for( var j = 0, m = array_length(row); j <= m; j++ ) {
var _cy = cy + cell_s / 2;
var _chov = 0;
var _tx = cx0 + cell_s / 2 - 4;
var _ty = _cy;
if(j < m) {
draw_set_color(#272736);
draw_circle(_tx, _ty, cell_s / 2 - 4, false);
}
if(_hover && point_in_rectangle(_m[0], _m[1], _tx - cell_s / 2, _ty - cell_s / 2, _tx + cell_s / 2, _ty + cell_s / 2)) {
editor_rect_to = [ _tx + ui(1), _ty ];
_rect_hover = 1;
_chov = 2;
}
var _cx = cx1;
var _chox = 0;
for( var k = -3; k < _c; k++ ) {
var cc = abs(i + (k >= 0? k : k - 1)) % 2? #272736 : #313143;
draw_set_color(k >= 0? cc : merge_color(cc, #171723, 0.5));
draw_rectangle(_cx, cy, _cx + cell_s, cy + cell_s, false);
if(_hover && point_in_rectangle(_m[0], _m[1], _cx, cy, _cx + cell_s - 1, cy + cell_s - 1)) {
editor_rect_to = [_cx + cell_s / 2, cy + cell_s / 2];
_rect_hover = 1;
_cont_hover = _arr_ind;
_chov = 1;
_chox = k;
_arr_insx = k;
}
_cx += cell_s;
}
if(mouse_press(mb_left, _chov == 1 && _focus)) {
editor_hold_sx = _chox;
editor_hold_ind = _cont_hover;
}
if(j == m) {
if(mouse_press(mb_left, _chov == 1 && _focus)) {
_arr_ins = _cont_hover;
_arr_insrw = i;
}
cy += cell_s;
break;
}
var _dx = cx3 + cell_s / 2 + 4;
draw_set_color(merge_color(#1e1e2c, c_red, 0.2));
draw_circle(_dx, _ty, ui(6), false);
if(_hover && point_in_circle(_m[0], _m[1], _dx, _ty, ui(12))) {
draw_set_color(merge_color(#1e1e2c, c_red, 0.5));
draw_circle(_dx, _ty, ui(6), false);
if(mouse_press(mb_left, _focus))
_arr_del = _arr_ind;
}
_arr_ind++;
var _id = row[j];
var _sp = _sprk[_id];
var _dr = _sp[MKSPARK.dir];
var _xs = _sp[MKSPARK.x];
var _spd = _sp[MKSPARK.speed];
var _dr = _sp[MKSPARK.length];
var _bl = _sp[MKSPARK.lendel];
var _tm = _sp[MKSPARK.time];
if(mouse_press(mb_left, _focus)) {
if(_chov == 2) {
editor_timer = _id;
editor_timer_mx = _m[0];
editor_timer_sx = _tm;
}
}
var _lx0 = cx1 + cell_s * (3 + _xs) + ui(6);
var _lx1 = _lx0 + _spd * cell_s;
draw_set_color(c_white);
draw_line_width(_lx0, _cy, _lx1, _cy, 4);
if(_tm < 0) draw_set_color(COLORS._main_value_negative);
else if(_tm > 0) draw_set_color(COLORS._main_value_positive);
else draw_set_color(c_white);
draw_line_width(_tx, _ty, _tx + lengthdir_x(cell_s / 2 - 6, 90 - _tm * 90),
_ty + lengthdir_y(cell_s / 2 - 6, 90 - _tm * 90), 4);
cy += cell_s;
}
}
if(_arr_ins > -1)
array_insert(_sprk, _arr_ins, [ MKSPARK_DIRR.main, _arr_insrw, _arr_insx, 1, 1, 0, 0 ]);
if(_arr_del > -1)
array_delete(_sprk, _arr_del, 1);
if(editor_hold_ind > -1) {
_sprk[editor_hold_ind][2] = editor_hold_sx;
_sprk[editor_hold_ind][3] = _arr_insx - editor_hold_sx + 1;
if(mouse_release(mb_left))
editor_hold_ind = -1;
}
if(editor_timer > -1) {
var _tim = editor_timer_sx + (_m[0] - editor_timer_mx) / 32;
_sprk[editor_timer][6] = clamp(round(_tim), -3, 3);
if(mouse_release(mb_left))
editor_timer = -1;
}
editor_rect_hover = lerp_float(editor_rect_hover, _rect_hover, 4);
if(editor_rect_hover > 0) {
editor_rect[0] = lerp_float(editor_rect[0], editor_rect_to[0], 5);
editor_rect[1] = lerp_float(editor_rect[1], editor_rect_to[1], 5);
var _sels = editor_rect_hover * (cell_s / 2 - 4);
draw_sprite_stretched_ext(s_mk_sparkle_select, 0, editor_rect[0] - _sels, editor_rect[1] - _sels, _sels * 2, _sels * 2, #6d6d84, 1);
}
return _h;
});
input_display_list = [ new Inspector_Sprite(s_MKFX),
["Sparkle", false], 0, 2, 3,
sparkleEditor
];
outputs[0] = nodeValue_Output("Surface out", self, VALUE_TYPE.surface, noone);
temp_surface = [ noone, noone ];
static processData = function(_outSurf, _data, _output_index, _array_index) { #region
var _size = _data[0];
var _sprk = _data[1];
var _frme = _data[2];
var _spd = _data[3];
var _loop = _data[4];
if(array_empty(_sprk)) return _outSurf;
var _c = floor(_size / 2);
_outSurf = surface_verify(_outSurf, _size, _size);
temp_surface[0] = surface_verify(temp_surface[0], _size, _size);
temp_surface[1] = surface_verify(temp_surface[1], _size, _size);
var _s0 = temp_surface[0];
var _s1 = temp_surface[1];
var _fr = round((CURRENT_FRAME - _frme + 1) * _spd);
if(!array_empty(_loop)) {
var _ind = CURRENT_FRAME % array_length(_loop);
_fr = _loop[_ind];
}
surface_set_target(_s0);
DRAW_CLEAR
draw_set_color(c_white);
for( var i = 0, n = array_length(_sprk); i < n; i++ ) {
var _sk = _sprk[i];
var dr = _sk[MKSPARK.dir];
var sy = _sk[MKSPARK.y];
var sx = _sk[MKSPARK.x];
var sp = _sk[MKSPARK.speed];
var ff = _sk[MKSPARK.time] + _fr;
var lng = _sk[MKSPARK.length] + _sk[MKSPARK.lendel] - ff;
if(ff < 0 || lng < 0) continue;
if(dr == MKSPARK_DIRR.main) {
var _lx = _c + sx - 1 + sp * ff;
var _ly = _c + sy;
if(lng == 0) draw_point(_lx, _ly);
else draw_line(_lx, _ly, _lx + lng, _ly);
} else if(dr == MKSPARK_DIRR.diag) {
var _l0 = _c - 1 + sp * ff;
var _l1 = _l0 + lng;
if(lng == 0) draw_point(_l0, _l0);
else draw_line(_l0, _l0, _l1, _l1);
}
}
BLEND_NORMAL
surface_reset_target();
surface_set_target(_s1);
DRAW_CLEAR
draw_surface_ext(_s0, 0, 0, 1, 1, 0, c_white, 1);
draw_surface_ext(_s0, 0, _size, 1, -1, 0, c_white, 1);
surface_reset_target();
surface_set_target(_outSurf);
DRAW_CLEAR
draw_surface_ext(_s1, 0, 0, 1, 1, 0, c_white, 1);
draw_surface_ext(_s1, 0, _size, 1, 1, 90, c_white, 1);
draw_surface_ext(_s1, _size, _size, 1, 1, 180, c_white, 1);
draw_surface_ext(_s1, _size, 0, 1, 1, 270, c_white, 1);
surface_reset_target();
return _outSurf;
} #endregion
}