d6
/
uxn-utils
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Send audio track

This commit is contained in:
Devine Lu Linvega 2024-08-25 18:40:33 -07:00
parent 1b1ee22c24
commit 82f4624614
1 changed files with 4 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gui/m291/src/m291.tal
View File

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