Add a global auto-save preference/Implement auto-recovery system

- Song auto-save and auto-save time were not removed; rather, they're saved as the current preference set in the program (this way, opening songs in an older version will behave as the preference was set when the file was saved)
- Auto-recovery works by saving a 'backup.nbs' file every minute, that gets deleted when a new song is created/loaded, and when the program is closed. If this file is present on startup (i.e. the program quit unexpectedly and the file wasn't deleted), a prompt asks the user if they want to recover the song.

Author: Bentroen

Minecraft Note Block Studio.yyp

@@ -0,0 +1,6 @@
+// backup_clear()
+// Deletes the backup file stored temporarily for auto-recovery
+
+if (file_exists_lib(backup_file)) {
+	files_delete_lib(backup_file)
+}

scripts/backup_clear/backup_clear.gml

@@ -38,14 +38,16 @@ icons_init()
 refreshrate = 0 //0 = 30fps, 1 = 60fps
 fade = 0
 rhval = 270
+autosave = 0
+autosavemins = 10
+tonextsave = 0
+backupmins = 1
+tonextbackup = 0
 
 // File
 filename = ""
 changed = 0
 midifile = ""
-autosave = 0
-autosavemins = 10
-tonextsave = 0
 for (a = 0; a < 11; a += 1) {
     mididevice_instrument[a] = -1
     recent_song[a] = ""
@@ -342,6 +344,13 @@ if (file_exists_lib(data_directory + "settings.onbs") && vers != version) {
 }
 log("Startup OK")
 
+// Auto-recovery
+if (file_exists_lib(backup_file)) {
+	if (question("Minecraft Note Block Studio quit unexpectedly while you were working on a song. Do you want to recover your work?", "Auto-recovery")) {
+		load_song(backup_file, true)
+	}
+}
+
 // Open song
 if (parameter_count() > 0) {
 	filename = parameter_string(1)

scripts/backup_clear/backup_clear.yy

@@ -49,11 +49,21 @@ if (key_edit > -1) {
     }
 }
 
+// Autosave
 if (autosave && filename_ext(filename) = ".nbs") {
     tonextsave -= 1 / room_speed / 60
     if (tonextsave <= 0) save_song(filename)
 }
 
+// Auto-recovery
+if (totalblocks > 0) {
+	tonextbackup -= 1 / room_speed / 60
+	if (tonextbackup <= 0) {
+		save_song(backup_file, true)
+		tonextbackup = backupmins
+	}
+}
+
 if (theme = 0) window_background = 15790320
 if (theme = 1) window_background = 13160660
 if (theme = 2) window_background = c_dark

scripts/control_create/control_create.gml

@@ -3,3 +3,4 @@
 
 confirm(1)
 save_settings()
+backup_clear()

scripts/control_draw/control_draw.gml

@@ -13,6 +13,8 @@ for (a = 0; a < 11; a += 1) {
 vers =               ini_read_string("preferences", "last_version",       version)
 check_update =       ini_read_real(  "preferences", "check_update",       check_update)
 show_welcome =       ini_read_real(  "preferences", "show_welcome",       show_welcome)
+autosave =           ini_read_real(  "preferences", "autosave",           autosave)
+autosavemins =       ini_read_real(  "preferences", "autosavemins",       autosavemins)
 theme =              ini_read_real(  "preferences", "theme",              theme)
 refreshrate =        ini_read_real(  "preferences", "refresh_rate",       refreshrate)
 songfolder =         ini_read_string("preferences", "song_folder",        songfolder)

scripts/control_end/control_end.gml

@@ -1,12 +1,21 @@
-// load_song(fn)
-var fn, file_ext, f, str, stats, tstr, ca, cb, bstr, a, b, c, d, w, hei, byte1, byte2, song_first_custom_index, custom_index_diff
-fn = argument0
+// load_song(fn [, backup])
+var fn, backup, file_ext, f, str, stats, tstr, ca, cb, bstr, a, b, c, d, w, hei, byte1, byte2, song_first_custom_index, custom_index_diff
+fn = argument[0]
+backup = false
+if (argument_count > 1) {
+	backup = argument[1]
+}
 if (confirm() < 0) return 0
-if (fn = "") {
+if (!backup && fn = "") {
     if (!directory_exists(songfolder)) songfolder = songs_directory
     fn = string(get_open_filename_ext("Note Block Songs (*.nbs)|*.nbs|MIDI Sequences (*.mid)|*.mid;*.midi|Minecraft Schematics (*.schematic)|*.schematic", "", songfolder, "Load song"))
 }
 if (fn = "" || !file_exists_lib(fn)) return 0
+
+// When not opening from auto-recovery, delete the backup file
+if (!backup) {
+	backup_clear()
+}
 reset()
 file_ext = filename_ext(fn)
 if (file_ext = ".mid" || file_ext = ".midi") {
@@ -58,13 +67,10 @@ if (file_ext = ".nbs") {
     song_desc = buffer_read_string_int()
     // TEMPO
     tempo = median(0.25, floor((buffer_read_short() / 100) * 4) / 4, 30)
-    // AUTOSAVE
-    a = buffer_read_byte()
-    autosave = median(0, a, 1)
-    // AUTOSAVE MINUTES
-    a = buffer_read_byte()
-    autosavemins = median(0, a, 60)
-    tonextsave = autosavemins
+    // AUTOSAVE (deprecated)
+    buffer_read_byte()
+    // AUTOSAVE MINUTES (deprecated)
+    buffer_read_byte()
     // TIME SIGNATURE
     a = buffer_read_byte()
     timesignature = median(2, a, 8)
@@ -178,9 +184,15 @@ if (file_ext = ".nbs") {
         if (question("This song uses custom instruments. However, some sounds could not be loaded:\n\n" + str+"\nMake sure that you have put the sounds in the \"Sounds\" folder. Open Instrument settings?", "Error")) window = w_instruments
     buffer_delete(buffer)
 }
-add_to_recent(fn)
-if (window != w_instruments) window = w_songinfo
-filename = fn
-changed = 0
+if (!backup) {
+	add_to_recent(fn)
+	if (window != w_instruments) window = w_songinfo
+	filename = fn
+	changed = 0
+}
+else {
+	changed = 1
+}
+backup_clear()
 blocks_set_instruments()
 io_clear()

scripts/load_settings/load_settings.gml

@@ -14,6 +14,7 @@
 #macro pattern_directory	data_directory + "Patterns\\"
 #macro log_file				file_directory + "log.txt"
 #macro temp_file			file_directory + "tmp.file"
+#macro backup_file			file_directory + "backup.nbs"
 
 #macro h_stereoize 12
 #macro h_swaplayer 11

scripts/load_song/load_song.gml

@@ -1,3 +1,6 @@
 // new_song()
 song_midi = ""
-if (confirm() > -1) reset()
+if (confirm() > -1) {
+	reset()
+	backup_clear()
+}