⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 wanjtest.lst

📁 一个用嵌入c写的万年历程序
💻 LST
📖 第 1 页 / 共 5 页
字号:
 265  0067  2800     R  JMP L108
 265  0068  0F00     R  MOV A,BANK _picnb
 265  0069  0084        MOV [04H],A
 265  006A  0F00     R  MOV A,OFFSET _picnb
 265  006B  0083        MOV [03H],A
文件:WANJTEST.c   盛群编译器版本 2.86 页次20 

 265  006C  0702        MOV A,[02H]
 265  006D  0C05        XOR A,05h
 265  006E  390A        SNZ [0AH].2
文件:WANJTEST.C   盛群编译器版本 2.86 页次19

 265  006F  2800     R  JMP L108

; 267:                   	  switch(focnb)
 267  0070  0F00     R  MOV A,BANK _focnb
 267  0071  0084        MOV [04H],A
 267  0072  0F00     R  MOV A,OFFSET _focnb
 267  0073  0083        MOV [03H],A
 267  0074  0702        MOV A,[02H]
 267  0075  0080     R  MOV b0_16,A
 267  0076  1080     R  SZ b0_16
 267  0077  2800     R  JMP L133
 267  0078  2800     R  JMP L112
 267  0079              L133:
 267  0079  0700     R  MOV A,b0_16
 267  007A  0C01        XOR A,01h
 267  007B  3D0A        SZ [0ah].2
 267  007C  2800     R  JMP L113
 267  007D  0700     R  MOV A,b0_16
 267  007E  0C02        XOR A,02h
 267  007F  3D0A        SZ [0ah].2
 267  0080  2800     R  JMP L114
 267  0081  2800     R  JMP L111
 267  0082              L112:

; 269:                   	  	   pflag2=0;
 269  0082  0F00     R  MOV A,BANK _pflag2
 269  0083  0084        MOV [04H],A
 269  0084  0F00     R  MOV A,OFFSET _pflag2
 269  0085  0083        MOV [03H],A
 269  0086  1F02        CLR [02H]

; 270:                            break;
 270  0087  2800     R  JMP L111
 270  0088              L113:

; 272:                   	       pflag2=1;
 272  0088  0F00     R  MOV A,BANK _pflag2
 272  0089  0084        MOV [04H],A
 272  008A  0F00     R  MOV A,OFFSET _pflag2
 272  008B  0083        MOV [03H],A
 272  008C  0F01        MOV A,01h
 272  008D  0082        MOV [02H],A

; 273:                            break;
 273  008E  2800     R  JMP L111
 273  008F              L114:

; 275:                   	       pflag2=2;
 275  008F  0F00     R  MOV A,BANK _pflag2
 275  0090  0084        MOV [04H],A
 275  0091  0F00     R  MOV A,OFFSET _pflag2
 275  0092  0083        MOV [03H],A
 275  0093  0F02        MOV A,02h
 275  0094  0082        MOV [02H],A
 275  0095              L111:
文件:WANJTEST.c   盛群编译器版本 2.86 页次21 

 275  0095              L108:

; 282:                   if(pflag1==0&&picnb==2)
 282  0095  0F00     R  MOV A,BANK _pflag1
 282  0096  0084        MOV [04H],A
 282  0097  0F00     R  MOV A,OFFSET _pflag1
 282  0098  0083        MOV [03H],A
 282  0099  1082        SZ [02H]
文件:WANJTEST.C   盛群编译器版本 2.86 页次20

 282  009A  2800     R  JMP L115
 282  009B  0F00     R  MOV A,BANK _picnb
 282  009C  0084        MOV [04H],A
 282  009D  0F00     R  MOV A,OFFSET _picnb
 282  009E  0083        MOV [03H],A
 282  009F  0702        MOV A,[02H]
 282  00A0  0C02        XOR A,02h
 282  00A1  390A        SNZ [0AH].2
 282  00A2  2800     R  JMP L115

; 284:               	      picnb++;
 284  00A3  0F00     R  MOV A,BANK _picnb
 284  00A4  0084        MOV [04H],A
 284  00A5  0F00     R  MOV A,OFFSET _picnb
 284  00A6  0083        MOV [03H],A
 284  00A7  1482        INC [02H]

; 285:                       showpn();//调用lcd接口输入为以上数组 将显next
 285  00A8  2000     R  CALL _showpn

; 286:                       savetesk();//tobe finished
 286  00A9  2000     R  CALL _savetesk

; 287:                       goto lable2;
 287  00AA  2800     R  JMP L97
 287  00AB              L115:

; 289:                   if(pflag1==1&&pflag2==1&&picnb==4)
 289  00AB  0F00     R  MOV A,BANK _pflag1
 289  00AC  0084        MOV [04H],A
 289  00AD  0F00     R  MOV A,OFFSET _pflag1
 289  00AE  0083        MOV [03H],A
 289  00AF  0702        MOV A,[02H]
 289  00B0  0C01        XOR A,01h
 289  00B1  390A        SNZ [0AH].2
 289  00B2  2800     R  JMP L118
 289  00B3  0F00     R  MOV A,BANK _pflag2
 289  00B4  0084        MOV [04H],A
 289  00B5  0F00     R  MOV A,OFFSET _pflag2
 289  00B6  0083        MOV [03H],A
 289  00B7  0702        MOV A,[02H]
 289  00B8  0C01        XOR A,01h
 289  00B9  390A        SNZ [0AH].2
 289  00BA  2800     R  JMP L118
 289  00BB  0F00     R  MOV A,BANK _picnb
 289  00BC  0084        MOV [04H],A
 289  00BD  0F00     R  MOV A,OFFSET _picnb
 289  00BE  0083        MOV [03H],A
 289  00BF  0702        MOV A,[02H]
 289  00C0  0C04        XOR A,04h
文件:WANJTEST.c   盛群编译器版本 2.86 页次22 

 289  00C1  390A        SNZ [0AH].2
 289  00C2  2800     R  JMP L118

; 291:                       picnb++;
 291  00C3  0F00     R  MOV A,BANK _picnb
 291  00C4  0084        MOV [04H],A
 291  00C5  0F00     R  MOV A,OFFSET _picnb
 291  00C6  0083        MOV [03H],A
 291  00C7  1482        INC [02H]

; 292:                       showpn();//调用lcd接口输入为以上数组 将显next
 292  00C8  2000     R  CALL _showpn

; 293:                       savetesk();
 293  00C9  2000     R  CALL _savetesk
文件:WANJTEST.C   盛群编译器版本 2.86 页次21


; 294:                       goto lable2;
 294  00CA  2800     R  JMP L97
 294  00CB              L118:

; 296:                   if(pflag1==1&&(pflag2==0||pflag2==2)&&picnb==5)
 296  00CB  0F00     R  MOV A,BANK _pflag1
 296  00CC  0084        MOV [04H],A
 296  00CD  0F00     R  MOV A,OFFSET _pflag1
 296  00CE  0083        MOV [03H],A
 296  00CF  0702        MOV A,[02H]
 296  00D0  0C01        XOR A,01h
 296  00D1  390A        SNZ [0AH].2
 296  00D2  2800     R  JMP L120
 296  00D3  0F00     R  MOV A,BANK _pflag2
 296  00D4  0084        MOV [04H],A
 296  00D5  0F00     R  MOV A,OFFSET _pflag2
 296  00D6  0083        MOV [03H],A
 296  00D7  0702        MOV A,[02H]
 296  00D8  0080     R  MOV b0_16,A
 296  00D9  1080     R  SZ b0_16
 296  00DA  2800     R  JMP L134
 296  00DB  2800     R  JMP L122
 296  00DC              L134:
 296  00DC  0700     R  MOV A,b0_16
 296  00DD  0C02        XOR A,02h
 296  00DE  390A        SNZ [0ah].2
 296  00DF  2800     R  JMP L120
 296  00E0              L122:
 296  00E0  0F00     R  MOV A,BANK _picnb
 296  00E1  0084        MOV [04H],A
 296  00E2  0F00     R  MOV A,OFFSET _picnb
 296  00E3  0083        MOV [03H],A
 296  00E4  0702        MOV A,[02H]
 296  00E5  0C05        XOR A,05h
 296  00E6  390A        SNZ [0AH].2
 296  00E7  2800     R  JMP L120

; 298:               	      picnb++;
 298  00E8  0F00     R  MOV A,BANK _picnb
 298  00E9  0084        MOV [04H],A
 298  00EA  0F00     R  MOV A,OFFSET _picnb
 298  00EB  0083        MOV [03H],A
文件:WANJTEST.c   盛群编译器版本 2.86 页次23 

 298  00EC  1482        INC [02H]

; 299:                       showpn();//调用lcd接口输入为以上数组 将显next
 299  00ED  2000     R  CALL _showpn

; 300:                       savetesk();
 300  00EE  2000     R  CALL _savetesk

; 301:                       goto lable2;
 301  00EF  2800     R  JMP L97
 301  00F0              L120:

; 303:                   picnb++;
 303  00F0  0F00     R  MOV A,BANK _picnb
 303  00F1  0084        MOV [04H],A
 303  00F2  0F00     R  MOV A,OFFSET _picnb
 303  00F3  0083        MOV [03H],A
 303  00F4  1482        INC [02H]

; 304:                   showpn();//调用lcd接口输入为以上数组 将显next    
 304  00F5  2000     R  CALL _showpn

; 305:                   break;
文件:WANJTEST.C   盛群编译器版本 2.86 页次22

 305  00F6  2800     R  JMP L97
 305  00F7              L123:

; 308:                   picnb--;
 308  00F7  0F00     R  MOV A,BANK _picnb
 308  00F8  0084        MOV [04H],A
 308  00F9  0F00     R  MOV A,OFFSET _picnb
 308  00FA  0083        MOV [03H],A
 308  00FB  1582        DEC [02H]

; 309:                   showpn();//调用lcd接口输入为以上数组 将显示对应的画面
 309  00FC  2000     R  CALL _showpn

; 310:                   break;
 310  00FD  2800     R  JMP L97
 310  00FE              L124:

; 313:                   focnb++;
 313  00FE  0F00     R  MOV A,BANK _focnb
 313  00FF  0084        MOV [04H],A
 313  0100  0F00     R  MOV A,OFFSET _focnb
 313  0101  0083        MOV [03H],A
 313  0102  1482        INC [02H]

; 314:                   focnb=focnb%focnbmax;
 314  0103  0F00     R  MOV A,BANK _focnb
 314  0104  0084        MOV [04H],A
 314  0105  0F00     R  MOV A,OFFSET _focnb
 314  0106  0083        MOV [03H],A
 314  0107  0702        MOV A,[02H]
 314  0108  0080     R  MOV b0_16,A
 314  0109  0F00     R  MOV A,BANK _focnbmax
 314  010A  0084        MOV [04H],A
 314  010B  0F00     R  MOV A,OFFSET _focnbmax
 314  010C  0083        MOV [03H],A
文件:WANJTEST.c   盛群编译器版本 2.86 页次24 

 314  010D  0702        MOV A,[02H]
 314  010E  0080     R  MOV b1_16,A
 314  010F  0700     R  MOV A,b1_16
 314  0110  0080     E  MOV RH,A
 314  0111  0700     R  MOV A,b0_16
 314  0112  2000     E  CALL DIVUI
 314  0113  0700     E  MOV A,T3
 314  0114  0080     R  MOV b0_16,A
 314  0115  0F00     R  MOV A,BANK _focnb
 314  0116  0084        MOV [04H],A
 314  0117  0F00     R  MOV A,OFFSET _focnb
 314  0118  0083        MOV [03H],A
 314  0119  0700     R  MOV A,b0_16
 314  011A  0082        MOV [02H],A

; 315:                   showp();//调用lcd接口输入为以上数组 将显示对应的画面
 315  011B  2000     R  CALL _showp

; 316:                   break;
 316  011C  2800     R  JMP L97
 316  011D              L125:

; 319:                   focnb=(--focnb==0)?(focnb+focnbmax):focnb;
 319  011D  0F00     R  MOV A,BANK _focnb
 319  011E  0084        MOV [04H],A
 319  011F  0F00     R  MOV A,OFFSET _focnb
 319  0120  0083        MOV [03H],A
 319  0121  1502        DECA [02H]
 319  0122  0080     R  MOV b0_16,A
 319  0123  0F00     R  MOV A,BANK _focnb
 319  0124  0084        MOV [04H],A
 319  0125  0F00     R  MOV A,OFFSET _focnb
 319  0126  0083        MOV [03H],A
文件:WANJTEST.C   盛群编译器版本 2.86 页次23

 319  0127  0700     R  MOV A,b0_16
 319  0128  0082        MOV [02H],A
 319  0129  1080     R  SZ b0_16
 319  012A  2800     R  JMP L127
 319  012B  0F00     R  MOV A,BANK _focnbmax
 319  012C  0084        MOV [04H],A
 319  012D  0F00     R  MOV A,OFFSET _focnbmax
 319  012E  0083        MOV [03H],A
 319  012F  0702        MOV A,[02H]
 319  0130  0080     R  MOV b0_16,A
 319  0131  0F00     R  MOV A,BANK _focnb
 319  0132  0084        MOV [04H],A
 319  0133  0F00     R  MOV A,OFFSET _focnb
 319  0134  0083        MOV [03H],A
 319  0135  0702        MOV A,[02H]
 319  0136  0300     R  ADD A,b0_16
 319  0137  0080     R  MOV CR26,A
 319  0138  2800     R  JMP L128
 319  0139              L127:
 319  0139  0F00     R  MOV A,BANK _focnb
 319  013A  0084        MOV [04H],A
 319  013B  0F00     R  MOV A,OFFSET _focnb
 319  013C  0083        MOV [03H],A
 319  013D  0702        MOV A,[02H]
 319  013E  0080     R  MOV CR26,A
文件:WANJTEST.c   盛群编译器版本 2.86 页次25 

 319  013F              L128:
 319  013F  0F00     R  MOV A,BANK _focnb
 319  0140  0084        MOV [04H],A
 319  0141  0F00     R  MOV A,OFFSET _focnb
 319  0142  0083        MOV [03H],A
 319  0143  0700     R  MOV A,CR26
 319  0144  0082        MOV [02H],A

; 320:                   showp();//调用lcd接口输入为以上数组 将显示对应的画面
 320  0145  2000     R  CALL _showp

; 321:                   break;
 321  0146  2800     R  JMP L97
 321  0147              L129:

; 324:                   upflag=1;
 324  0147  0F00     R  MOV A,BANK _upflag
 324  0148  0084        MOV [04H],A
 324  0149  0F00     R  MOV A,OFFSET _upflag
 324  014A  0083        MOV [03H],A
 324  014B  0F01        MOV A,01h
 324  014C  0082        MOV [02H],A

; 325:               	  key_adjust();
 325  014D  2000     R  CALL _key_adjust

; 326:                   showp();//调用lcd接口输入为以上数组 将显示对应的画面
 326  014E  2000     R  CALL _showp

; 327:                   break;
 327  014F  2800     R  JMP L97
 327  0150              L130:

; 330:                   upflag=0;
 330  0150  0F00     R  MOV A,BANK _upflag
 330  0151  0084        MOV [04H],A
 330  0152  0F00     R  MOV A,OFFSET _upflag
 330  0153  0083        MOV [03H],A
 330  0154  1F02        CLR [02H]

; 331:               	  key_adjust();
 331  0155  2000     R  CALL _key_adjust

; 332:               	  showp();//调用lcd接口输入为以上数组 将显示对应的画面
文件:WANJTEST.C   盛群编译器版本 2.86 页次24

 332  0156  2000     R  CALL _showp
 332  0157              L97:
 332  0157              L94:
 332  0157              L93:
 332  0157  0003        RET
 332  0000  00          LOCAL b0_16 DB ?
 332  0001  00          LOCAL b1_16 DB ?
 332  0002  00          LOCAL CR26 DB ? ; 126
 332  0158              _wan_testkb ENDP

; 342:  {
 342  0000              @getkey .SECTION 'CODE'
 342  0000              PUBLIC _getkey
 342  0000              _getkey PROC
文件:WANJTEST.c   盛群编译器版本 2.86 页次26 


; 343:     unsigned int j=0;
 343  0000  1F00     R  CLR CR28

; 346:     if (~_pa)
 346  0001  0112        CPLA __pa
 346  0002  0080     R  MOV b0_17,A
 346  0003  1080     R  SZ b0_17
 346  0004  2800     R  JMP L154
 346  0005  2800     R  JMP L136
 346  0006              L154:

; 349:          _delay(2000); //debounce

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -