按键检测12864LCD显示汇编代码

nop ldp #0e1h

lacl #03fch

sacl padatdir rpt #5 nop

ldp #0e1h lacl #0302h

sacl padatdir ldp #dp_pf2 lacl #1c0ch

sacl pcdatdir ldp #dp_user rpt #5 nop ret write_ins0: ldp #dp_pf2

lacl #03fch sacl padatdir nop lacl #1c04h

sacl pcdatdir rpt #20 nop

ldp #0e1h lacl #0301h

sacl padatdir nop

ldp #dp_user lacl r16 or #0ff00h ldp #0e1h

sacl pedatdir rpt #50

nop ldp #0e1h

lacl #03fch

sacl padatdir rpt #5 nop

ldp #0e1h lacl #0302h

sacl padatdir ldp #dp_pf2 lacl #1c0ch

sacl pcdatdir ldp #dp_user rpt #5 nop

ret write_data1: ldp #0e1h

lacl #0ff00h sacl padatdir nop

ldp #0e1h lacl #1c18h

sacl pcdatdir rpt #10 nop

ldp #0e1h lacl #0ff01h

sacl padatdir nop

ldp #dp_user lacl r16 or #0ff00h ldp #0e1h

sacl pedatdir rpt #5 nop

ldp #0e1h

lacl #0ff00h

sacl padatdir rpt #5 nop

ldp #0e1h lacl #0ff02h

Saclpadatdir ldp #dp_pf2 lacl #1c0ch

sacl pcdatdir ldp #dp_user rpt #5 nop ret

write_data0:

ldp #0e1h

lacl #0ff00h sacl padatdir nop

ldp #0e1h lacl #1c14h sacl pcdatdir rpt #10 nop

ldp #0e1h lacl #0ff01h

sacl padatdir nop

ldp #dp_user lacl r16 or #0ff00h ldp #0e1h

sacl pedatdir rpt #5 nop

ldp #0e1h

lacl #0ff00h

sacl padatdir rpt #5 nop

ldp #0e1h lacl #0ff02h

sacl padatdir ldp #dp_pf2 lacl #1c0ch

sacl pcdatdir ldp #dp_user rpt #5 nop ret display_cs0: ldp #5h

splk #0c0h,r16 call write_ins0 ldp #5h

splk #0b8h,r17 arrange00: ldp #5h

splk #040h,r18 ldp #5h lacl r17

sacl r16 call write_ins0 ldp #5h

lacl r18 sacl r16

call write_ins0 arrange01: ldp #5h

splk #00h,r16 call write_data0 ldp #5h

lacl r18

Add#1h sacl r18 ldp #5h mar *,ar6

lar ar6,r18 lar ar0,#128 cmpr 01

Bcndarrange01,TC

ldp #5h

lacl r17 add #1h sacl r17 call delay lar ar5,r17 lar ar0,#0c0h mar *,ar5 cmpr 01

bcndarrange00,tc ret

display_cs1: ldp #5h

splk #0c0h,r16 call write_ins1 ldp #5h

splk #0b8h,r17 arrange10: ldp #5h

splk#040h,r18 ldp #5h

lacl r17

Saclr16 call write_ins1 ldp #5h laclr18 sacl r16 call write_ins1 arrange11: ldp #5h splk #00h,r16 call write_data1 ldp #5h lacl r18 add #1h sacl r18

ldp #5h

mar *,ar6

ar ar6,r18 lar ar0,#128 cmpr 01

bcnd arrange11,TC ldp #5h

lacl r17 add #1h sacl r17 call delay ar ar5,r17 lar ar0,#0c0h mar *,ar5 cmpr 01

bcndarrange10,tc ret delay:

mar *,ar3 lar ar3,#0fffh lar ar0,#00h delay1: sbrk #1h nop cmpr 00

bcnd delay1,NTC ret end

;