📄 calculator.src
字号:
; .\calculator.SRC generated from: .\calculator.c
$NOMOD51
NAME CALCULATOR
P0 DATA 080H
P1 DATA 090H
P2 DATA 0A0H
P3 DATA 0B0H
T0 BIT 0B0H.4
AC BIT 0D0H.6
T1 BIT 0B0H.5
EA BIT 0A8H.7
IE DATA 0A8H
P0_0 BIT 080H.0
P1_0 BIT 090H.0
P0_1 BIT 080H.1
P2_0 BIT 0A0H.0
P1_1 BIT 090H.1
P0_2 BIT 080H.2
P2_1 BIT 0A0H.1
P1_2 BIT 090H.2
P0_3 BIT 080H.3
P2_2 BIT 0A0H.2
P1_3 BIT 090H.3
P0_4 BIT 080H.4
P2_3 BIT 0A0H.3
P1_4 BIT 090H.4
P0_5 BIT 080H.5
P2_4 BIT 0A0H.4
P1_5 BIT 090H.5
P0_6 BIT 080H.6
RD BIT 0B0H.7
P2_5 BIT 0A0H.5
P1_6 BIT 090H.6
P0_7 BIT 080H.7
P2_6 BIT 0A0H.6
P1_7 BIT 090H.7
ES BIT 0A8H.4
P2_7 BIT 0A0H.7
IP DATA 0B8H
RI BIT 098H.0
INT0 BIT 0B0H.2
CY BIT 0D0H.7
TI BIT 098H.1
INT1 BIT 0B0H.3
PS BIT 0B8H.4
SP DATA 081H
OV BIT 0D0H.2
WR BIT 0B0H.6
SBUF DATA 099H
PCON DATA 087H
SCON DATA 098H
TMOD DATA 089H
TCON DATA 088H
IE0 BIT 088H.1
IE1 BIT 088H.3
B DATA 0F0H
ACC DATA 0E0H
ET0 BIT 0A8H.1
ET1 BIT 0A8H.3
TF0 BIT 088H.5
TF1 BIT 088H.7
RB8 BIT 098H.2
TH0 DATA 08CH
EX0 BIT 0A8H.0
IT0 BIT 088H.0
TH1 DATA 08DH
TB8 BIT 098H.3
EX1 BIT 0A8H.2
IT1 BIT 088H.2
P BIT 0D0H.0
SM0 BIT 098H.7
TL0 DATA 08AH
SM1 BIT 098H.6
TL1 DATA 08BH
SM2 BIT 098H.5
PT0 BIT 0B8H.1
PT1 BIT 0B8H.3
RS0 BIT 0D0H.3
TR0 BIT 088H.4
RS1 BIT 0D0H.4
TR1 BIT 088H.6
PX0 BIT 0B8H.0
PX1 BIT 0B8H.2
DPH DATA 083H
DPL DATA 082H
REN BIT 098H.4
RXD BIT 0B0H.0
TXD BIT 0B0H.1
F0 BIT 0D0H.5
PSW DATA 0D0H
?PR?main?CALCULATOR SEGMENT CODE
?DT?main?CALCULATOR SEGMENT DATA OVERLAYABLE
?PR?initial?CALCULATOR SEGMENT CODE
?PR?keyscan?CALCULATOR SEGMENT CODE
?PR?_display?CALCULATOR SEGMENT CODE
?PR?_delay?CALCULATOR SEGMENT CODE
?DT?_delay?CALCULATOR SEGMENT DATA OVERLAYABLE
EXTRN CODE (?C_STARTUP)
EXTRN CODE (?C?LMUL)
EXTRN CODE (?C?SLDIV)
EXTRN CODE (?C?SLCMP)
EXTRN CODE (?C?IMUL)
PUBLIC _delay
PUBLIC _display
PUBLIC keyscan
PUBLIC initial
PUBLIC main
RSEG ?DT?main?CALCULATOR
?main?BYTE:
Li?040: DS 1
Ln?041: DS 1
dt1?042: DS 4
dt2?043: DS 4
temp?044: DS 4
op?045: DS 1
keyword?046: DS 1
; #pragma SRC
; #include <math.h>
; #include <stdio.h>
; #include <reg51.h>
;
; #define TRUE 1
; #define FALSE 0
;
; #define DELAY_VALUE 3
;
; #define PinDrvKey1 P0_0
; #define PinDrvKey2 P0_1
; #define PinDrvKey3 P0_2
; #define PinDrvKey4 P0_3 //键盘扫描的驱动线
;
;
; #define PinScanKey1 P0_4
; #define PinScanKey2 P0_5
; #define PinScanKey3 P0_6
; #define PinScanKey4 P0_7 //键盘扫描的信号获取线
;
; #define LedSelect0 0x80
; #define LedSelect1 0x90
; #define LedSelect2 0xa0
; #define LedSelect3 0xb0
; #define LedSelect4 0xc0
; #define LedSelect5 0xd0
; #define LedSelect6 0xe0
; #define LedSelect7 0xf0
;
;
;
; sbit P0_0=P0^0;
; sbit P0_1=P0^1;
; sbit P0_2=P0^2;
; sbit P0_3=P0^3;
; sbit P0_4=P0^4;
; sbit P0_5=P0^5;
; sbit P0_6=P0^6;
; sbit P0_7=P0^7;
;
; sbit P1_0=P1^0;
; sbit P1_1=P1^1;
; sbit P1_2=P1^2;
; sbit P1_3=P1^3;
; sbit P1_4=P1^4;
; sbit P1_5=P1^5;
; sbit P1_6=P1^6;
; sbit P1_7=P1^7;
;
; sbit P2_0=P2^0;
; sbit P2_1=P2^1;
; sbit P2_2=P2^2;
; sbit P2_3=P2^3;
; sbit P2_4=P2^4;
; sbit P2_5=P2^5;
; sbit P2_6=P2^6;
; sbit P2_7=P2^7;
;
;
; void initial(void); //初始化子程序
; void delay(short i);
; void display(unsigned char i,unsigned char num);
; unsigned char keyscan(void);
;
; void main(void)
RSEG ?PR?main?CALCULATOR
main:
USING 0
; SOURCE LINE # 66
; { char Li,Ln; //第Li个le显示数字ln；
; SOURCE LINE # 67
; long dt1,dt2,temp;
; char op,keyword;
; dt1=0; //dt1为第一操作数
; SOURCE LINE # 70
CLR A
MOV dt1?042+03H,A
MOV dt1?042+02H,A
MOV dt1?042+01H,A
MOV dt1?042,A
; dt2=0; //dt2为第二操作数
; SOURCE LINE # 71
MOV dt2?043+03H,A
MOV dt2?043+02H,A
MOV dt2?043+01H,A
MOV dt2?043,A
;
; initial(); //键盘驱动信号都设为低
; SOURCE LINE # 73
LCALL initial
?C0001:
; while(1){
; SOURCE LINE # 74
; keyword=0;
; SOURCE LINE # 75
CLR A
MOV keyword?046,A
?C0005:
; do
; {
; SOURCE LINE # 77
; keyword=keyscan();
; SOURCE LINE # 78
LCALL keyscan
MOV keyword?046,R7
; if(keyword<=9)
; SOURCE LINE # 79
SETB C
MOV A,keyword?046
XRL A,#080H
SUBB A,#089H
JC $ + 5H
LJMP ?C0006
; {
; SOURCE LINE # 80
; dt2=dt2*10+keyword;
; SOURCE LINE # 81
CLR A
MOV R7,#0AH
MOV R6,A
MOV R5,A
MOV R4,A
MOV R3,dt2?043+03H
MOV R2,dt2?043+02H
MOV R1,dt2?043+01H
MOV R0,dt2?043
LCALL ?C?LMUL
MOV R0,AR4
MOV R1,AR5
MOV R2,AR6
MOV R3,AR7
MOV R7,keyword?046
MOV A,R7
RLC A
SUBB A,ACC
MOV R6,A
MOV R5,A
MOV R4,A
MOV A,R3
ADD A,R7
MOV dt2?043+03H,A
MOV A,R2
ADDC A,R6
MOV dt2?043+02H,A
MOV A,R1
ADDC A,R5
MOV dt2?043+01H,A
MOV A,R0
ADDC A,R4
MOV dt2?043,A
; temp=dt2;
; SOURCE LINE # 82
MOV temp?044+03H,dt2?043+03H
MOV temp?044+02H,dt2?043+02H
MOV temp?044+01H,dt2?043+01H
MOV temp?044,A
; for(Li=1;Li<=8;Li++)
; SOURCE LINE # 83
MOV Li?040,#01H
?C0007:
; {
; SOURCE LINE # 84
; Ln=temp%10;
; SOURCE LINE # 85
CLR A
MOV R3,#0AH
MOV R2,A
MOV R1,A
MOV R0,A
MOV R7,temp?044+03H
MOV R6,temp?044+02H
MOV R5,temp?044+01H
MOV R4,temp?044
LCALL ?C?SLDIV
MOV R7,AR3
MOV Ln?041,R7
; temp=temp/10;
; SOURCE LINE # 86
MOV R7,temp?044+03H
MOV R6,temp?044+02H
MOV R5,temp?044+01H
MOV R4,temp?044
CLR A
MOV R3,#0AH
MOV R2,A
MOV R1,A
MOV R0,A
LCALL ?C?SLDIV
MOV temp?044+03H,R7
MOV temp?044+02H,R6
MOV temp?044+01H,R5
MOV temp?044,R4
; display(Li,Ln); //显示输入的数字
; SOURCE LINE # 87
MOV R5,Ln?041
MOV R7,Li?040
LCALL _display
; if(temp==0)break;
; SOURCE LINE # 88
CLR A
MOV R7,A
MOV R6,A
MOV R5,A
MOV R4,A
MOV R3,temp?044+03H
MOV R2,temp?044+02H
MOV R1,temp?044+01H
MOV R0,temp?044
CLR C
LCALL ?C?SLCMP
JZ ?C0003
; }
; SOURCE LINE # 89
?C0009:
INC Li?040
SETB C
MOV A,Li?040
XRL A,#080H
SUBB A,#088H
JC ?C0007
SJMP ?C0003
; }
; SOURCE LINE # 90
?C0006:
; else if(keyword<=13)
; SOURCE LINE # 91
SETB C
MOV A,keyword?046
XRL A,#080H
SUBB A,#08DH
JNC ?C0003
; { op=keyword-10;
; SOURCE LINE # 92
MOV A,keyword?046
ADD A,#0F6H
MOV op?045,A
; dt1=dt2;
; SOURCE LINE # 93
MOV dt1?042+03H,dt2?043+03H
MOV dt1?042+02H,dt2?043+02H
MOV dt1?042+01H,dt2?043+01H
MOV dt1?042,dt2?043
; dt2=0;
; SOURCE LINE # 94
CLR A
MOV dt2?043+03H,A
MOV dt2?043+02H,A
MOV dt2?043+01H,A
MOV dt2?043,A
; switch(op)
; SOURCE LINE # 95
MOV A,op?045
DEC A
JZ ?C0015
DEC A
JZ ?C0016
DEC A
JZ ?C0017
ADD A,#03H
JNZ ?C0003
; {case 0:display(7,0);
; SOURCE LINE # 96
?C0014:
CLR A
MOV R5,A
MOV R7,#07H
LCALL _display
; break;
; SOURCE LINE # 97
SJMP ?C0003
; case 1:display(7,1);
; SOURCE LINE # 98
?C0015:
MOV R5,#01H
MOV R7,#07H
LCALL _display
; break;
; SOURCE LINE # 99
SJMP ?C0003
; case 2:display(7,2);
; SOURCE LINE # 100
?C0016:
MOV R5,#02H
MOV R7,#07H
LCALL _display
; break;
; SOURCE LINE # 101
SJMP ?C0003
; case 3:display(7,3);
; SOURCE LINE # 102
?C0017:
MOV R5,#03H
MOV R7,#07H
LCALL _display
; break;
; SOURCE LINE # 103
; }
; SOURCE LINE # 104
; }
; SOURCE LINE # 105
; }while(keyword!=14);
; SOURCE LINE # 106
?C0003:
MOV A,keyword?046
XRL A,#0EH
JZ $ + 5H
LJMP ?C0005
; switch(op)
; SOURCE LINE # 107
MOV A,op?045
ADD A,#0F5H
JZ ?C0020
DEC A
JZ ?C0021
DEC A
JZ ?C0022
ADD A,#03H
JNZ ?C0018
; {case 10:dt1=dt1+dt2;
; SOURCE LINE # 108
?C0019:
MOV A,dt1?042+03H
ADD A,dt2?043+03H
MOV dt1?042+03H,A
MOV A,dt1?042+02H
ADDC A,dt2?043+02H
MOV dt1?042+02H,A
MOV A,dt1?042+01H
ADDC A,dt2?043+01H
MOV dt1?042+01H,A
MOV A,dt1?042
ADDC A,dt2?043
MOV dt1?042,A
; break;
; SOURCE LINE # 109
SJMP ?C0018
; case 11:dt1=dt1-dt2;
; SOURCE LINE # 110
?C0020:
CLR C
MOV A,dt1?042+03H
SUBB A,dt2?043+03H
MOV dt1?042+03H,A
MOV A,dt1?042+02H
SUBB A,dt2?043+02H
MOV dt1?042+02H,A
MOV A,dt1?042+01H
SUBB A,dt2?043+01H
MOV dt1?042+01H,A
MOV A,dt1?042
SUBB A,dt2?043
MOV dt1?042,A
; break;
; SOURCE LINE # 111
SJMP ?C0018
; case 12:dt1=dt1*dt2;
; SOURCE LINE # 112
?C0021:
MOV R7,dt1?042+03H
MOV R6,dt1?042+02H
MOV R5,dt1?042+01H
MOV R4,dt1?042
MOV R3,dt2?043+03H
MOV R2,dt2?043+02H
MOV R1,dt2?043+01H
MOV R0,dt2?043
LCALL ?C?LMUL
MOV dt1?042+03H,R7
MOV dt1?042+02H,R6
MOV dt1?042+01H,R5
MOV dt1?042,R4
; break;
; SOURCE LINE # 113
SJMP ?C0018
; case 13:dt1=dt1/dt2;
; SOURCE LINE # 114
?C0022:
MOV R7,dt1?042+03H
MOV R6,dt1?042+02H
MOV R5,dt1?042+01H
MOV R4,dt1?042
MOV R3,dt2?043+03H
MOV R2,dt2?043+02H
MOV R1,dt2?043+01H
MOV R0,dt2?043
LCALL ?C?SLDIV
MOV dt1?042+03H,R7
MOV dt1?042+02H,R6
MOV dt1?042+01H,R5
MOV dt1?042,R4
; break;
; SOURCE LINE # 115
; default:break;
; SOURCE LINE # 116
; }
; SOURCE LINE # 117
?C0018:
; for(Li=1;Li<=8;Li++)
; SOURCE LINE # 118
MOV Li?040,#01H
?C0024:
SETB C
MOV A,Li?040
XRL A,#080H
SUBB A,#088H
JC $ + 5H
LJMP ?C0001
; {
; SOURCE LINE # 119
; Ln=dt1%10;
; SOURCE LINE # 120
CLR A
MOV R3,#0AH
MOV R2,A
MOV R1,A
MOV R0,A
MOV R7,dt1?042+03H
MOV R6,dt1?042+02H
MOV R5,dt1?042+01H
MOV R4,dt1?042
LCALL ?C?SLDIV
MOV R7,AR3
MOV Ln?041,R7
; dt1=dt1/10;
; SOURCE LINE # 121
MOV R7,dt1?042+03H
MOV R6,dt1?042+02H
MOV R5,dt1?042+01H
MOV R4,dt1?042
CLR A
MOV R3,#0AH
MOV R2,A
MOV R1,A
MOV R0,A
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -