sy2-2.txt

来自「微机原理课程 所有讲义PPT 课程全实验（包括代码程序设计实验报告） 习」· 文本 代码 · 共 20 行

     ORG 0100H
     MOV R1,#42H;
     MOV 40H,#DATA;
MAIN:MOV A,40H;
     PUSH ACC;
     SWAP A;
     ACALL HEASC;
     MOV @R1,A;
     INC R1;
     POP ACC;
     ACALL HEASC;
     MOV @R1,A;
     SJMP $;

HEASC:ANL A,#0FH;
      ADD A,#90H;
      DA A;
      ADDC A,#40H;
      DA A;
      RET;