main.src

《Proteus在MCS-51&ARM7系统中的应用百例》逆向之 Chapter 4 《Proteus在MCS-51&ARM7系统中的应用百例》MCS-51例子的C语言版本。

; .\main.SRC generated from: main.c
; COMPILER INVOKED BY:
;        D:\Program Files\Keil 8.08\C51\BIN\C51.EXE main.c BROWSE DEBUG OBJECTEXTEND SRC(.\main.SRC)

$NOMOD51

NAME	MAIN

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
RD	BIT	0B0H.7
ES	BIT	0A8H.4
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
CLK	BIT	0B0H.1
DIN	BIT	0B0H.0
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?DELAY?MAIN       SEGMENT CODE 
?DT?DELAY?MAIN       SEGMENT DATA OVERLAYABLE 
?PR?_DISP?MAIN       SEGMENT CODE 
?PR?KEY?MAIN         SEGMENT CODE 
?PR?main?MAIN        SEGMENT CODE 
?CO?MAIN             SEGMENT CODE 
?DT?MAIN             SEGMENT DATA 
	EXTRN	CODE (?C_STARTUP)
	PUBLIC	TEMP
	PUBLIC	DBUF
	PUBLIC	SEGTAB
	PUBLIC	K0TAB
	PUBLIC	main
	PUBLIC	KEY
	PUBLIC	_DISP
	PUBLIC	DELAY

	RSEG  ?DT?DELAY?MAIN
?DELAY?BYTE:
          j?040:   DS   1

	RSEG  ?DT?MAIN
           DBUF:   DS   1
           TEMP:   DS   1

	RSEG  ?CO?MAIN
K0TAB:
	DB	0FEH
	DB	0FDH
	DB	0FBH
	DB	0F7H
	DB	0EFH
	DB	0DFH
	DB	0BFH
	DB	07FH

SEGTAB:
	DB	03FH
	DB	006H
	DB	05BH
	DB	04FH
	DB	066H
	DB	06DH
	DB	07DH
	DB	007H
	DB	07FH
	DB	06FH

; #include <reg51.h>
; typedef unsigned char BYTE;
; 
; sbit DIN=P3^0;
; sbit CLK=P3^1;
; 
; BYTE DBUF;
; BYTE TEMP;
; 
; BYTE code K0TAB[]={ 0xFE,0xFD,0xFB,0xF7,       
; 					0xEF,0xDF,0xBF,0x7F};
; 
; BYTE code SEGTAB[]={0x3F,0x06,0x5B,0x4F,0x66,         
; 					0x6D,0x7D,0x07,0x7F,0x6F};
; 
; 
; void DELAY()

	RSEG  ?PR?DELAY?MAIN
DELAY:
	USING	0
			; SOURCE LINE # 17
; {
			; SOURCE LINE # 18
; 	BYTE i=0x02;
			; SOURCE LINE # 19
;---- Variable 'i?041' assigned to Register 'R7' ----
	MOV  	R7,#02H
?C0003:
; 	 
; 	do
; 	{
			; SOURCE LINE # 22
; 		BYTE j=0xF8;
			; SOURCE LINE # 23
	MOV  	j?040,#0F8H
; 		do
; 		{}while(--j);
			; SOURCE LINE # 25
?C0004:
	DJNZ 	j?040,?C0004
; 	}while(--i);
			; SOURCE LINE # 26
	DJNZ 	R7,?C0003
; }
			; SOURCE LINE # 27
	RET  	
; END OF DELAY

; 
; 
; void DISP(BYTE in)

	RSEG  ?PR?_DISP?MAIN
_DISP:
	USING	0
			; SOURCE LINE # 30
;---- Variable 'in?142' assigned to Register 'R7' ----
; {
			; SOURCE LINE # 31
; 	BYTE num=8;
			; SOURCE LINE # 32
;---- Variable 'num?143' assigned to Register 'R6' ----
	MOV  	R6,#08H
; 
; 	DBUF=in;
			; SOURCE LINE # 34
	MOV  	DBUF,R7
; 
; 	TEMP=SEGTAB[DBUF];
			; SOURCE LINE # 36
	MOV  	A,R7
	MOV  	DPTR,#SEGTAB
	MOVC 	A,@A+DPTR
	MOV  	TEMP,A
; 	ACC=TEMP;
			; SOURCE LINE # 37
?C0010:
; 
; 	do
; 	{
			; SOURCE LINE # 40
; 		#pragma asm
; 			RLC A
	  RLC A
; 		#pragma endasm
; 
; 		DIN=CY;
			; SOURCE LINE # 45
	MOV  	DIN,C
; 		CLK=0;
			; SOURCE LINE # 46
	CLR  	CLK
; 		CLK=1;
			; SOURCE LINE # 47
	SETB 	CLK
; 	}while(--num);	
			; SOURCE LINE # 48
	DJNZ 	R6,?C0010
; }
			; SOURCE LINE # 49
	RET  	
; END OF _DISP

; 
; 
; BYTE KEY()

	RSEG  ?PR?KEY?MAIN
KEY:
	USING	0
			; SOURCE LINE # 52
; {
			; SOURCE LINE # 53
; 	BYTE key_i;
; 	BYTE key_j;
; 	BYTE temp;
; 
; 	while(1)
			; SOURCE LINE # 58
; 	{
			; SOURCE LINE # 59
; 		do
; 		{
			; SOURCE LINE # 61
?C0019:
; 			do
; 			{
			; SOURCE LINE # 63
; 				P1=0xFF;
			; SOURCE LINE # 64
	MOV  	P1,#0FFH
; 			}while(P1==0xFF);
			; SOURCE LINE # 65
	MOV  	A,P1
	CPL  	A
	JZ   	?C0019
; 			DELAY();
			; SOURCE LINE # 66
	LCALL	DELAY
; 
; 			temp=P1;
			; SOURCE LINE # 68
;---- Variable 'temp?246' assigned to Register 'R7' ----
	MOV  	R7,P1
; 		}while(temp==0xFF);
			; SOURCE LINE # 69
	MOV  	A,R7
	CPL  	A
	JZ   	?C0019
; 				 		
; 		key_i=8;
			; SOURCE LINE # 71
;---- Variable 'key_i?244' assigned to Register 'R6' ----
	MOV  	R6,#08H
; 		key_j=0;
			; SOURCE LINE # 72
;---- Variable 'key_j?245' assigned to Register 'R5' ----
	CLR  	A
	MOV  	R5,A
?C0022:
; 	
; 		do
; 		{
			; SOURCE LINE # 75
; 			if(temp==K0TAB[key_j])
			; SOURCE LINE # 76
	MOV  	A,R5
	MOV  	DPTR,#K0TAB
	MOVC 	A,@A+DPTR
	CJNE 	A,AR7,?C0023
; 			{
			; SOURCE LINE # 77
; 				do
; 				{}while(P1!=0xFF);
			; SOURCE LINE # 79
?C0024:
	MOV  	A,P1
	CJNE 	A,#0FFH,?C0024
; 				DELAY();
			; SOURCE LINE # 80
	LCALL	DELAY
; 				return key_j;
			; SOURCE LINE # 81
	MOV  	R7,AR5
	RET  	
; 			}
			; SOURCE LINE # 82
?C0023:
; 		
; 			key_j++;
			; SOURCE LINE # 84
	INC  	R5
; 		}while(--key_i);
			; SOURCE LINE # 85
	DJNZ 	R6,?C0022
; 	}
			; SOURCE LINE # 86
	SJMP 	?C0019
; END OF KEY

; }
; 
; 
; main()

	RSEG  ?PR?main?MAIN
main:
	USING	0
			; SOURCE LINE # 90
; {
			; SOURCE LINE # 91
; 	DBUF=16;
			; SOURCE LINE # 92
	MOV  	DBUF,#010H
?C0028:
; 
; 	while(1)
			; SOURCE LINE # 94
; 	{
			; SOURCE LINE # 95
; 		DISP(KEY());
			; SOURCE LINE # 96
	LCALL	KEY
	LCALL	_DISP
; 	}
			; SOURCE LINE # 97
	SJMP 	?C0028
; END OF main

	END