diff --git a/lib/make/天房系統擴展/mb_autoexec.mk b/lib/make/天房系統擴展/mb_autoexec.mk index a87cdba..bd07863 100644 --- a/lib/make/天房系統擴展/mb_autoexec.mk +++ b/lib/make/天房系統擴展/mb_autoexec.mk @@ -122,6 +122,7 @@ $(call mb-make-call,mb-doc-function,mb-autoexec-append-save-screenshot,Appends s define mb-autoexec-append-save-video +$(MB_ᕽᕽᕽ   )$(call mb-make-call,mb-autoexec-append-cmd,$(1),omsxctl night_flight_init_video) $(MB_ᕽᕽᕽ   )$(call mb-make-call,mb-autoexec-append-cmd,$(1),omsxctl night_flight_save_video $(2)) endef $(call mb-make-call,mb-doc-function,mb-autoexec-append-save-video,Appends save video command., [prefix]) diff --git a/lib/openmsx/share/scripts/night_flight.tcl b/lib/openmsx/share/scripts/night_flight.tcl index 80c101d..cb79d37 100644 --- a/lib/openmsx/share/scripts/night_flight.tcl +++ b/lib/openmsx/share/scripts/night_flight.tcl @@ -44,6 +44,14 @@ proc night_flight_save_screenshot {{prefix_id 0}} { return "mb::save flight screenshot" } +# TODO: rm, this is ugly workaround of left over boot logo blue flash +# at the moment the video starts recording, this moves it before recording +proc night_flight_init_video {} { + after time 1 "set pause on" + after realtime 1 "set pause off" + return "mb::zero flight flash" +} + proc night_flight_save_video {{prefix_id 0}} { global night_flight_prefix global night_flight_seperator