renoise.tool():add_menu_entry { name = "Main Menu:Tools:StoryTool", invoke = function() available_controls() end } function available_controls() local control_example_dialog = nil local vb = renoise.ViewBuilder() local DIALOG_MARGIN = renoise.ViewBuilder.DEFAULT_DIALOG_MARGIN local CONTENT_SPACING = renoise.ViewBuilder.DEFAULT_CONTROL_SPACING local CONTENT_MARGIN = renoise.ViewBuilder.DEFAULT_CONTROL_MARGIN local DEFAULT_CONTROL_HEIGHT = renoise.ViewBuilder.DEFAULT_CONTROL_HEIGHT local DEFAULT_DIALOG_BUTTON_HEIGHT = renoise.ViewBuilder.DEFAULT_DIALOG_BUTTON_HEIGHT local DEFAULT_MINI_CONTROL_HEIGHT = renoise.ViewBuilder.DEFAULT_MINI_CONTROL_HEIGHT local TEXT_ROW_WIDTH = 80 ---- CONTROL ROWS -- bitmapview local bitmapview_row = vb:row { vb:text { width = TEXT_ROW_WIDTH, text = "Lua:bitmap" }, vb:bitmap { -- recolor to match the GUI theme: mode = "transparent", -- bitmaps names should be specified with a relative path using -- your tool script bundle path as base: bitmap = "Bitmaps/RenoiseLua.bmp", notifier = function() renoise.app():show_status("Luabitmap was pressed") end }, } -- close button local close_button_row = vb:horizontal_aligner { mode = "right", vb:button { text = "Close", width = 60, height = DEFAULT_DIALOG_BUTTON_HEIGHT, notifier = function() control_example_dialog:close() end, } } ---- MAIN CONTENT & LAYOUT local dialog_content = vb:column { margin = DIALOG_MARGIN, spacing = CONTENT_SPACING, vb:row{ spacing = 4*CONTENT_SPACING, vb:column { spacing = CONTENT_SPACING, bitmapview_row }, vb:column { spacing = CONTENT_SPACING, vb:space {height = DEFAULT_CONTROL_HEIGHT}, vb:space {height = DEFAULT_CONTROL_HEIGHT}, }, vb:column { spacing = CONTENT_SPACING, } }, } -- DIALOG control_example_dialog = renoise.app():show_custom_dialog( "Hei Maailma", dialog_content ) end