ChatGPT 4 helped me get this slider appearing on screen, but it crashes when I slide it:
-- Define an objc block for handling slider events
SliderValueHandler = objc.class("SliderValueHandler")
function SliderValueHandler:sliderValueChanged(objcArgs)
-- Handle slider value changes here
local value = slider:value_()
print("Slider value:", objcArgs)
end
handler = SliderValueHandler()
-- Create a UISlider instance
local UIScreen = objc.UIScreen
local UIScreen_mainScreen = UIScreen:mainScreen()
local UIScreen_mainScreen_bounds = objc.viewer.view.bounds
local sliderWidth = 200
local sliderHeight = 50
local UISlider = objc.UISlider
local slider = objc.UISlider()
slider.frame = objc.rect(sliderWidth, sliderHeight, UIScreen_mainScreen_bounds.size.width / 2 - sliderWidth / 2, objc.viewer.view.bounds.size.height - sliderHeight - 20)
-- Set slider properties
slider:setMinimumValue_(0)
slider:setMaximumValue_(100)
slider:setValue_(50)
-- Add target for slider value changes
slider:addTarget_action_forControlEvents_(objc.viewer.view, objc.selector("sliderValueChanged"), objc.enum.UIControlEvents.valueChanged)
-- Add the slider to the main view
objc.viewer.view:addSubview_(slider)