Send audio track

gui/m291/src/m291.tal

@@ -38,12 +38,7 @@
 	;dict/mpg .Console/addr DEO2
 	#03 .Console/mode DEO
 	#01 .Console/exec DEO
-	;cmd1 print ;cmd2 print BRK
-
-@print ( s* -> )
-	LDAk ?{ POP2 JMP2r }
-	LDAk .Console/write DEO
-	INC2 !print
+	BRK
 
 @meta $1
 	( name ) "m291 0a
@@ -172,7 +167,7 @@
 
 @<send-path> ( file* -- )
 	.selection/mod LDZ ?&special
-	[ LIT2 ff -Console/type ] DEO
+	;dict/load-cmd <pstr>
 	;path <pstr>
 	<pstr>/
 	#0a18 DEO
@@ -458,15 +453,14 @@
 (
 @|assets )
 
-@cmd1 "loadpaused 20 "always_wrong.mp3 0a $1
-
-@cmd2 "pause 0a $1
+@cmd1 "load 20 "always_wrong.mp3 0a $1
 
 @dict
 	&home-path "./ $1
 	&mp3-ext "mp3 $1
 	&empty "(empty) $1
 	&mpg "mpg123 20 "-R $1
+	&load-cmd "load 20 $1
 
 @touch-chr [
 	0000 0000 0814 1417 0000 0000 0008 0808