reformatting

This commit is contained in:
Nico 2021-06-05 18:28:55 +01:00
parent e73660a042
commit e4234ece00
1 changed files with 17 additions and 17 deletions

View File

@ -170,30 +170,30 @@ RTN
POP POP
RTN RTN
&plus &plus
POP ( pop the key ) POP ( pop the key )
#00 .Edit/selection-x LDZ EQU ;get-selected-addr JSR2 LDA #6c EQU AND ,&end JCN ( if we're on a note and out of bounds, skip moving ) #00 .Edit/selection-x LDZ EQU ;get-selected-addr JSR2 LDA #6c EQU AND ,&end JCN ( if we're on a note and out of bounds, skip moving )
;get-selected-addr JSR2 LDA #00 EQU ,&initial JCN ;get-selected-addr JSR2 LDA #00 EQU ,&initial JCN
;get-selected-addr JSR2 DUP2 STH2 ( stash selection address and keep another copy on the stack ) ;get-selected-addr JSR2 DUP2 STH2 ( stash selection address and keep another copy on the stack )
LDA #01 ADD STH2r STA LDA #01 ADD STH2r STA
RTN RTN
&initial &initial
POP POP
;set-initial-value JSR2 ;set-initial-value JSR2
RTN RTN
&minus &minus
POP POP
#00 .Edit/selection-x LDZ EQU ;get-selected-addr JSR2 LDA #0c EQU AND ,&end JCN ( if we're on a note and out of bounds, skip moving ) #00 .Edit/selection-x LDZ EQU ;get-selected-addr JSR2 LDA #0c EQU AND ,&end JCN ( if we're on a note and out of bounds, skip moving )
;get-selected-addr JSR2 DUP2 STH2 ( stash selection address and keep another copy on the stack ) ;get-selected-addr JSR2 DUP2 STH2 ( stash selection address and keep another copy on the stack )
LDA #01 SUB STH2r STA LDA #01 SUB STH2r STA
RTN RTN
&bksp &bksp
POP POP
#00 ;get-selected-addr JSR2 STA #00 ;get-selected-addr JSR2 STA
RTN RTN
&rest ( insterts a rest/notestop ) &rest ( insterts a rest/notestop )
POP POP
#00 .Edit/selection-x LDZ NEQ ,&end JCN ( if we're not on a note, skip ) #00 .Edit/selection-x LDZ NEQ ,&end JCN ( if we're not on a note, skip )
#ff ;get-selected-addr JSR2 STA #ff ;get-selected-addr JSR2 STA
RTN RTN
&end &end
RTN RTN