mirror of
https://github.com/aseprite/aseprite.git
synced 2024-12-28 15:20:15 +00:00
78 lines
2.3 KiB
Lua
78 lines
2.3 KiB
Lua
|
-- ase -- allegro-sprite-editor: the ultimate sprites factory
|
||
|
-- Copyright (C) 2001-2005 by David A. Capello
|
||
|
|
||
|
function GUI_FrameProperties()
|
||
|
-- get current sprite
|
||
|
local sprite = current_sprite
|
||
|
if not sprite then return end
|
||
|
|
||
|
-- get selected layer
|
||
|
local layer = sprite.layer
|
||
|
if not layer then return end
|
||
|
|
||
|
-- get current frame
|
||
|
local frame = layer_get_frame(layer, sprite.frpos)
|
||
|
if not frame then return end
|
||
|
|
||
|
local window = ji_load_widget("frmprop.jid", "frame_properties")
|
||
|
if not window then return end
|
||
|
|
||
|
local entry_frpos = jwidget_find_name(window, "frpos")
|
||
|
local entry_xpos = jwidget_find_name(window, "xpos")
|
||
|
local entry_ypos = jwidget_find_name(window, "ypos")
|
||
|
local slider_opacity = jwidget_find_name(window, "opacity")
|
||
|
local button_ok = jwidget_find_name(window, "ok")
|
||
|
|
||
|
jwidget_set_text(entry_frpos, tostring(frame.frpos))
|
||
|
jwidget_set_text(entry_xpos, tostring(frame.x))
|
||
|
jwidget_set_text(entry_ypos, tostring(frame.y))
|
||
|
jslider_set_value(slider_opacity, frame.opacity)
|
||
|
|
||
|
repeat
|
||
|
jwindow_open_fg(window)
|
||
|
|
||
|
if jwindow_get_killer(window) == button_ok then
|
||
|
local new_frpos = MID(0, tonumber(jwidget_get_text (entry_frpos)),
|
||
|
sprite.frames-1)
|
||
|
local existent_frame = layer_get_frame(layer, new_frpos)
|
||
|
|
||
|
if new_frpos != frame.frpos and existent_frame then
|
||
|
jalert("Error<<You can't change frpos to " .. new_frpos ..
|
||
|
"<<Already there is a frame in that pos.||&OK")
|
||
|
else
|
||
|
-- WE MUST REMOVE THE FRAME BEFORE CALL frame_set_frpos()
|
||
|
if undo_is_enabled(sprite.undo) then
|
||
|
undo_open(sprite.undo)
|
||
|
undo_remove_frame(sprite.undo, layer, frame)
|
||
|
end
|
||
|
|
||
|
layer_remove_frame(layer, frame)
|
||
|
|
||
|
-- change frame properties
|
||
|
frame_set_frpos(frame, new_frpos)
|
||
|
frame_set_position(frame,
|
||
|
MID(-9999, tonumber(jwidget_get_text(entry_xpos)), 9999),
|
||
|
MID(-9999, tonumber(jwidget_get_text(entry_ypos)), 9999))
|
||
|
frame_set_opacity(frame, jslider_get_value(slider_opacity))
|
||
|
|
||
|
-- add again the same frame
|
||
|
if undo_is_enabled(sprite.undo) then
|
||
|
undo_add_frame(sprite.undo, layer, frame)
|
||
|
undo_close(sprite.undo)
|
||
|
end
|
||
|
|
||
|
layer_add_frame(layer, frame)
|
||
|
|
||
|
-- set the sprite position, refresh and break the loop
|
||
|
sprite_set_frpos(sprite, new_frpos)
|
||
|
GUI_Refresh(sprite)
|
||
|
break
|
||
|
end
|
||
|
else
|
||
|
break
|
||
|
end
|
||
|
until false
|
||
|
|
||
|
jwidget_free(window)
|
||
|
end
|