ex3-1.asm

《单片机原理实用教程——基于Proteus虚拟仿真》一书的配套光盘

    ORG 0000H            ;程序的复位入口
START: LJMP MAIN
    ORG 0030H            ;主程序入口
MAIN:  MOV 30H,#03	 ;a=3
       MOV 31H,#04       ;b=4	
       MOV A,30H         ;取得a值
       LCALL SQR         ;调查表子程序
       MOV R1,A          ;a2暂存于R1中
       MOV A,31H         ;取得b值
       LCALL SQR         ;调查表子程序
       ADD A,R1          ;计算a2+b2
       MOV 32H,A         ;存结果
       SJMP $            ;循环，等待            
;查表子程序如下：                               
    ORG 0F00H
SQR:   MOV DPTR,#TAB     
       MOVC A,@A+DPTR    ;查表求得平方值
       RET               ;子程序返回
TAB:   DB 0,1,4,9,16     ;平方表
       DB 25,36,49,64,81
    END                  ;程序结束