Add custom FPS option

Author: adazem009

src/app/qml/dialogs/ProjectSettingsDialog.qml

@@ -3,6 +3,7 @@
 import QtQuick
 import QtQuick.Controls
 import QtQuick.Layouts
+import ScratchCPP
 import ScratchCPP.UiComponents
 import ScratchCPP.Render
 
@@ -12,6 +13,32 @@ CustomDialog {
     standardButtons: Dialog.Close
 
     contentItem: ColumnLayout {
+        // General
+        Label {
+            text: qsTr("General")
+            font.pointSize: 14
+            font.bold: true
+        }
+
+        RowLayout {
+            Label {
+                text: qsTr("FPS (frames per second)")
+            }
+
+            SpinBox {
+                editable: true
+                from: 1
+                to: 250
+                stepSize: 10
+                value: projectPlayer.fps
+                onValueChanged: {
+                    projectPlayer.fps = value;
+                    AppMenuBar.fps60Mode = (value === 60);
+                }
+            }
+        }
+
+        // Remove limits
         Label {
             text: qsTr("Remove limits")
             font.pointSize: 14

src/app/qml/main.qml

@@ -14,7 +14,7 @@ ApplicationWindow {
     id: root
     minimumWidth: layout.implicitWidth + layout.anchors.margins * 2
     minimumHeight: menuBar.height + layout.implicitHeight + layout.anchors.margins * 2
-	visible: true
+    visible: true
     title: Qt.application.displayName
     color: Material.background
     Material.accent: "orange"
@@ -33,6 +33,13 @@ ApplicationWindow {
                 player.fileName = fileName;
             }
 
+            function onFps60ModeChanged() {
+                if(AppMenuBar.fps60Mode)
+                    player.fps = 60;
+                else if(player.fps === 60)
+                    player.fps = 30;
+            }
+
             function onProjectSettingsTriggered() {
                 projectSettingsDialog.open();
             }
@@ -134,7 +141,6 @@ ApplicationWindow {
             activeFocusOnTab: true
             focus: true
             turboMode: AppMenuBar.turboMode
-            fps: AppMenuBar.fps60Mode ? 60 : 30
         }
     }
 }