Split openMSX layout from artifacts and added video recorder.

lib/openmsx/share/scripts/boot_env.tcl

@@ -21,6 +21,9 @@
 # JOYPORTB=mouse
 # Inserts mouse in joyportb.
 #
+# RECORD_SESSION=bin/output.avi
+# Enables the session video recorder.
+#
 
 if {[info exists ::env(RENDERER)] && ([string trim $::env(RENDERER)] != "")} {
 	if {[catch {set renderer [string trim $::env(RENDERER)]} err_msg]} {
@@ -63,3 +66,10 @@ if {[info exists ::env(JOYPORTB)] && ([string trim $::env(JOYPORTB)] != "")} {
 		exit 1
 	}
 }
+
+if {[info exists ::env(RECORD_SESSION)] && ([string trim $::env(RECORD_SESSION)] != "")} {
+	if {[catch {after time 1 "record start [string trim $::env(RECORD_SESSION)]"} err_msg]} {
+		puts stderr "error: env.RECORD_SESSION value $err_msg"
+		exit 1
+	}
+}