📄 adtrans.lst
字号:
C51 COMPILER V8.01 ADTRANS 05/02/2008 14:03:27 PAGE 1
C51 COMPILER V8.01, COMPILATION OF MODULE ADTRANS
OBJECT MODULE PLACED IN ADtrans.OBJ
COMPILER INVOKED BY: C:\Keil\C51\BIN\C51.EXE ADtrans.c BROWSE DEBUG OBJECTEXTEND TABS(6)
line level source
1 #include<reg52.h>
2 #define uchar unsigned char
3 #define uint unsigned int
4 sbit wr=P3^6;
5 sbit rd=P3^7;
6 sbit dula=P2^6;
7 sbit wela=P2^7;
8 uchar code tabwe[]={
9 0x7e,0x7d,0x7b,0x77};
10 uchar code table[]={
11 0x3f,0x06,0x5b,0x4f,
12 0x66,0x6d,0x7d,0x07,
13 0x7f,0x6f};
14 uchar code table1[]={
15 0xbf,0x86,0xdb,0xcf,
16 0xe6,0xed,0xfd,0x87,
17 0xff,0xef};
18 uchar a,we,num,num0,num1,num2,num3;
19 uint temp;
20 void start();
21 void display();
22 void delay(uchar z);
23 void main()
24 {
25 1 dula=0;
26 1 P0=0xff;
27 1 wela=1;
28 1 P0=0x7f;
29 1 wela=0;
30 1 while(1)
31 1 {
32 2 start();
33 2 delay(10);
34 2 rd=0;
35 2 delay(4);
36 2 a=P1;
37 2 rd=1;
38 2 display();
39 2 delay(4);
40 2 }
41 1 }
42
43 void delay(uchar z)
44 {
45 1 uchar i,j;
46 1 for(i=z;i>0;i--)
47 1 for(j=110;j>0;j--);
48 1 }
49
50 void start()
51 {
52 1 wr=1;
53 1 wr=0;
54 1 wr=1;
55 1 }
C51 COMPILER V8.01 ADTRANS 05/02/2008 14:03:27 PAGE 2
56
57 void display()
58 {
59 1 a=~a;
60 1 temp=a*20;
61 1 num0=temp/1000;
62 1 num1=temp%1000/100;
63 1 num2=temp%100/10;
64 1 num3=temp%10;
65 1 if(we==4)
66 1 {we=0;}
67 1 else
68 1 {we++;}
69 1 switch (we)
70 1 {
71 2 case 0:num=num0;break;
72 2 case 1:num=num1;break;
73 2 case 2:num=num2;break;
74 2 case 3:num=num3;break;
75 2 }
76 1 dula=1;
77 1 if(we==0)
78 1 {P0=table1[num];}
79 1 else
80 1 {P0=table[num];}
81 1 dula=0;
82 1 P0=0xff;
83 1 wela=1;
84 1 P0=tabwe[we];
85 1 wela=0;
86 1 }
MODULE INFORMATION: STATIC OVERLAYABLE
CODE SIZE = 238 ----
CONSTANT SIZE = 24 ----
XDATA SIZE = ---- ----
PDATA SIZE = ---- ----
DATA SIZE = 9 ----
IDATA SIZE = ---- ----
BIT SIZE = ---- ----
END OF MODULE INFORMATION.
C51 COMPILATION COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -