start of sample loop handling
This commit is contained in:
parent
52f1e551d2
commit
214bc6191c
|
@ -86,10 +86,10 @@ RTN
|
|||
@k-play-line ( *l channel -- )
|
||||
&chan $1
|
||||
&run
|
||||
#10 MUL ,&chan STR
|
||||
,&chan STR
|
||||
LDA DUP
|
||||
#00 EQU ,&rest JCN
|
||||
.Audio0/pitch ,&chan LDR ADD DEO ( TODO use correct channel, effects, use loop bit )
|
||||
.Audio0/pitch ,&chan LDR #10 MUL ADD DEO ( TODO effects, use loop bit )
|
||||
RTN
|
||||
&rest
|
||||
POP
|
||||
|
|
13
player.tal
13
player.tal
File diff suppressed because one or more lines are too long
Reference in New Issue