Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс. e-mail:jobsmp@pochta.ru |
***************************************************************************;
; Note ON Call: AL[6:0] = key number ;
;===========================================================================;
; ;
note_on: ;
pushw Z ; Push Register on Stack
; ;
mov ZL, AL ; Move Between Registers
lsl ZL ; Logical Shift Left
clr ZH ;
addiw Z, tbl_pitch*2 ;
lpmw A, Z+ ;
; ;
lds YL, NoteIdx ; Load Direct from SRAM
addi YL, 9 ;
cpi YL, 9*N_NOTE ;
brcs PC+2 ;
clr YL ;
sts NoteIdx, YL ; Store Indirect with Displacement
clr YH ;
addiw Y, Notes ;
; ;
ldiw B, wt_attack*2 ;
cli ;
stdw Y+ns_freq, A ;
stdw Y+ns_rptr+1, B ;
sei ;
stdi Y+ns_lvl, 255 ;
std Y+ns_wrap, AL ;
std Y+ns_loop, _0 ;
std Y+ns_lp, _0 ;
; ;
popw Z ;
ret ;
; ;