6502 command stream player, part 4
This commit is contained in:
parent
17a14f292f
commit
b1a630f2cd
|
@ -82,9 +82,67 @@ fcsOneByteDispatch:
|
||||||
jsr fcsDispatchCmd
|
jsr fcsDispatchCmd
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
fcsPrePorta:
|
||||||
|
jsr fcsReadNext
|
||||||
|
pha
|
||||||
|
and #$80
|
||||||
|
sta fcsArg0
|
||||||
|
pla
|
||||||
|
and #$40
|
||||||
|
sta fcsArg1
|
||||||
|
ldy #$0c
|
||||||
|
jsr fcsDispatchCmd
|
||||||
|
rts
|
||||||
|
|
||||||
fcsNoOp:
|
fcsNoOp:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
; COMMAND TABLE
|
||||||
|
; $b4 fcsNoArgDispatch,
|
||||||
|
; $b5 fcsNoArgDispatch,
|
||||||
|
; $b6 fcsNoArgDispatch,
|
||||||
|
; $b7 fcsNoArgDispatch,
|
||||||
|
; $b8 fcsOneByteDispatch,
|
||||||
|
; $b9 fcsNoOp,
|
||||||
|
; $ba fcsNoOp,
|
||||||
|
; $bb fcsNoOp,
|
||||||
|
; $bc fcsNoOp,
|
||||||
|
; $bd fcsNoOp,
|
||||||
|
; $be fcsNoOp,
|
||||||
|
; $bf fcsNoOp,
|
||||||
|
; $c0 fcsPrePorta,
|
||||||
|
; $c1 fcsArpTime,
|
||||||
|
; $c2 fcsVibrato,
|
||||||
|
; $c3 fcsVibRange,
|
||||||
|
; $c4 fcsVibShape,
|
||||||
|
; $c5 fcsPitch,
|
||||||
|
; $c6 fcsArpeggio,
|
||||||
|
; $c7 fcsVolume,
|
||||||
|
; $c8 fcsVolSlide,
|
||||||
|
; $c9 fcsPorta,
|
||||||
|
; $ca fcsLegato,
|
||||||
|
; $cb fcsVolSlideTarget,
|
||||||
|
; $cc fcsNoOpOneByte,
|
||||||
|
; $cd fcsNoOpOneByte,
|
||||||
|
; $ce fcsNoOpOneByte,
|
||||||
|
; $cf fcsPan,
|
||||||
|
; $d0 fcsOptPlaceholder,
|
||||||
|
; $d1 fcsNoOp,
|
||||||
|
; $d2 fcsNoOp,
|
||||||
|
; $d3 fcsLoop,
|
||||||
|
; $d4 fcsNoOp,
|
||||||
|
; $d5 fcsCallI,
|
||||||
|
; $d6 fcsOffWait,
|
||||||
|
; $d7 fcsFullCmd,
|
||||||
|
; $d8 fcsCall,
|
||||||
|
; $d9 fcsRet,
|
||||||
|
; $da fcsJump,
|
||||||
|
; $db fcsTickRate,
|
||||||
|
; $dc fcsWaitS,
|
||||||
|
; $dd fcsWaitC,
|
||||||
|
; $de fcsWait1,
|
||||||
|
; $df fcsStop,
|
||||||
|
|
||||||
; x: channel*2
|
; x: channel*2
|
||||||
; y: command
|
; y: command
|
||||||
fcsDispatchCmd:
|
fcsDispatchCmd:
|
||||||
|
|
Loading…
Reference in a new issue