📄 gce.lst
字号:
0266 0072 1D26 ALP_CHK BTFSS CMDFLAG,N
0267 0073 2883 GOTO CHECK_END
0268 0074 20A3 CALL CHK_KEY
0269 0075 1DA6 ALPA BTFSS CMDFLAG,SW_A
0270 0076 2882 GOTO ALPB
0271 0077 0A90 INCF CHP_CNT
0272 0078 0810 MOVF CHP_CNT,0
0273 0079 0214 SUBWF BYT_CNT,0 ;LOCK MENU HAS 2 SELECTION O
NLY
0274 007A 1803 BTFSC STATUS,C
0275 007B 287E GOTO CNVTALP
0276 007C 3001 RESET1 MOVLW 1
0277 007D 0090 MOVWF CHP_CNT
0278 007E 0810 CNVTALP MOVF CHP_CNT,0
0279 007F 2085 CALL ALP_MENU
0280 0080 0097 MOVWF BUFFER
0281 0081 1226 BCF CMDFLAG,SW_B
0282 0082 1E26 ALPB BTFSS CMDFLAG,SW_B
0283 0083 283D CHECK_END GOTO MAIN
0284 0084 28B5 GOTO JOB_FND
0285
0286 0085 0782 ALP_MENU ADDWF PCL,1 ;PCL = FW
0287 0086 343F retlw 03FH ;0C0H ;0
0288 0087 3406 retlw 006H ;0F9H ;1
0289 0088 345B retlw 05BH ;0A4H ;2
0290 0089 344F retlw 04FH ;0B0H ;3
0291 008A 3466 retlw 066H ;099H ;4
0292 008B 346D retlw 06DH ;092H ;5
0293 008C 347D retlw 07DH ;082H ;6
0294 008D 3407 retlw 007H ;0F8H ;7
0295 008E 347F retlw 07FH ;080H ;8
0296 008F 346F retlw 06FH ;090H ;9
0297
0298 0090 0782 MAIN_MENU ADDWF PCL,1
0299 0091 3400 retlw 000H
0300 0092 3473 retlw 073H ;08CH ;P
0301 0093 3439 retlw 039H ;0C6H ;C
0302 0094 3479 retlw 079H ;E
0303
0304 0095 0782 LOCK_MENU ADDWF PCL,1
0305 0096 3400 retlw 000H
0306 0097 3438 retlw 038H ;L
16c5x/7x Cross-Assembler V4.11 Released Sat Mar 04 12:18:21 1995 Page 7
Line PC Opcode
0307 0098 343E retlw 03EH ;U
0308 0099 345C RETLW 05CH ;o
0309
0310 009A 0782 AG_MENU ADDWF PCL,1 ;PCL = FW
0311 009B 343F retlw 03FH ;0C0H ;0
0312 009C 3477 retlw 077H ;A
0313 009D 347C retlw 07CH ;B
0314 009E 3439 retlw 039H ;C
0315 009F 345E retlw 05EH ;D
0316 00A0 3479 retlw 079H ;E
0317 00A1 3471 retlw 071H ;F
0318 00A2 347D retlw 07DH ;G
0319
0320 00A3 11A6 CHK_KEY BCF CMDFLAG,SW_A
0321 00A4 1985 BTFSC PORT_A,SW_A
0322 00A5 28AC GOTO CHK_B
0323 00A6 2355 CALL DELAY
0324 00A7 1D85 WAIT_A BTFSS PORT_A,SW_A
0325 00A8 28A7 GOTO WAIT_A
0326 00A9 15A6 BSF CMDFLAG,SW_A
0327 00AA 3020 MOVLW 20H
0328 00AB 00A2 MOVWF PWR_SAV2 ;RESET POWER SAVE FLAG
0329 00AC 1A05 CHK_B BTFSC PORT_A,SW_B
0330 00AD 28B4 GOTO NO_KEY
0331 00AE 2355 CALL DELAY
0332 00AF 1E05 WAIT_B BTFSS PORT_A,SW_B
0333 00B0 28AF GOTO WAIT_B
0334 00B1 0890 MOVF CHP_CNT,1
0335 00B2 1D03 BTFSS STATUS,Z
0336 00B3 1626 BSF CMDFLAG,SW_B
0337 00B4 0008 NO_KEY RETURN
0338
0339 00B5 138B JOB_FND BCF INTCON,7 ;DISABLE ALL INTERRUP
T
0340 00B6 0186 CLRF LED
0341 ;CONVERT CHIP_COUNT TO MATCH HARDWARE CONNECTION
0342 00B7 0810 MOVF CHP_CNT,0
0343 00B8 009B MOVWF TEMP
0344 00B9 019A CLRF SLAVE
0345 00BA 1403 BSF STATUS,C
0346 00BB 0D9A CHK_CHP RLF SLAVE,1
0347 00BC 1003 BCF STATUS,C
0348 00BD 0B9B DECFSZ TEMP ;DECODE CHIP SELECT
0349 00BE 28BB GOTO CHK_CHP
0350 00BF 1F26 BTFSS CMDFLAG,MS
0351 00C0 28D7 GOTO CFG_FND
0352
0353 00C1 0825 MOVF EE_SEL,0
0354 00C2 009B MOVWF TEMP
0355 00C3 0B9B DECFSZ TEMP,1
0356 00C4 28C6 GOTO NEXT_E1
0357 00C5 28F8 GOTO C66_P
16c5x/7x Cross-Assembler V4.11 Released Sat Mar 04 12:18:21 1995 Page 8
Line PC Opcode
0358 00C6 0B9B NEXT_E1 DECFSZ TEMP,1
0359 00C7 28C9 GOTO NEXT_E2
0360 00C8 2901 GOTO C46_P
0361 00C9 0B9B NEXT_E2 DECFSZ TEMP,1
0362 00CA 28CC GOTO EE_CHGE
0363 00CB 290A GOTO C01_P
0364
0365 EE_CHGE
0366 00CC 138B BCF INTCON,7
0367 00CD 0810 MOVF CHP_CNT,0
0368 00CE 0088 MOVWF EEDATA
0369 00CF 3002 MOVLW 2
0370 00D0 2378 CALL WRITE_EE
0371 00D1 3002 MOVLW 2
0372 00D2 2372 CALL READ_EE
0373 00D3 00A5 MOVWF EE_SEL
0374 00D4 209A CALL AG_MENU
0375 00D5 0097 MOVWF BUFFER
0376 00D6 2828 GOTO WERM
0377
0378 00D7 0B91 CFG_FND DECFSZ CMD_CNT
0379 00D8 28E3 GOTO CHG_2
0380 00D9 081A LOCK MOVF SLAVE,0
0381 00DA 0424 IORWF LOCK_BYT,0
0382 00DB 0088 MOVWF EEDATA
0383 00DC 3001 MOVLW 1
0384 00DD 2378 CALL WRITE_EE
0385 00DE 3001 MOVLW 1
0386 00DF 2372 CALL READ_EE
0387 00E0 00A4 MOVWF LOCK_BYT
0388 00E1 0097 MOVWF BUFFER
0389 00E2 2828 GOTO WERM
0390 00E3 0B91 CHG_2 DECFSZ CMD_CNT
0391 00E4 2821 GOTO COLD
0392 00E5 091A UNLOCK COMF SLAVE,0
0393 00E6 0524 ANDWF LOCK_BYT,0
0394 00E7 0088 MOVWF EEDATA
0395 00E8 3001 MOVLW 1
0396 00E9 2378 CALL WRITE_EE
0397 00EA 3001 MOVLW 1
0398 00EB 2372 CALL READ_EE
0399 00EC 00A4 MOVWF LOCK_BYT
0400 00ED 0097 MOVWF BUFFER
0401 00EE 2828 GOTO WERM
0402
0403 CHK_LOCK
0404 00EF 0824 MOVF LOCK_BYT,0
0405 00F0 009B MOVWF TEMP
0406 00F1 081A MOVF SLAVE,0
0407 00F2 059B ANDWF TEMP,1
0408 00F3 1903 BTFSC STATUS,2
16c5x/7x Cross-Assembler V4.11 Released Sat Mar 04 12:18:21 1995 Page 9
Line PC Opcode
0409 00F4 0008 RETURN ;NO LOCK RETURN
0410 00F5 3038 LOCKED MOVLW 038H ;PRINT L MESSAGE
0411 00F6 0097 MOVWF BUFFER
0412 00F7 2828 GOTO WERM
0413
0414 ;DECODE COMMAND NUMBER
0415 00F8 0B91 C66_P DECFSZ CMD_CNT ;DECODE CHIP SELECT
0416 00F9 28FB GOTO C66_L
0417 00FA 293B GOTO PROGC66 ;FIRST JOB
0418 00FB 0B91 C66_L DECFSZ CMD_CNT
0419 00FC 28FE GOTO C66_V
0420 00FD 294E GOTO LOADC66 ;SECOND JOB
0421 00FE 0B91 C66_V DECFSZ CMD_CNT
0422 00FF 2821 GOTO COLD
0423 0100 28CC GOTO EE_CHGE
0424
0425 0101 0B91 C46_P DECFSZ CMD_CNT ;DECODE CHIP SELECT
0426 0102 2904 GOTO C46_L
0427 0103 29E1 GOTO PROGC46 ;FIRST JOB
0428 0104 0B91 C46_L DECFSZ CMD_CNT
0429 0105 2907 GOTO C46_V
0430 0106 29F4 GOTO LOADC46 ;SECOND JOB
0431 0107 0B91 C46_V DECFSZ CMD_CNT
0432 0108 2821 GOTO COLD
0433 0109 28CC GOTO EE_CHGE
0434
0435 010A 0B91 C01_P DECFSZ CMD_CNT ;DECODE CHIP SELECT
0436 010B 290D GOTO C01_L
0437 010C 2A4B GOTO PROGC01 ;FIRST JOB
0438 010D 0B91 C01_L DECFSZ CMD_CNT
0439 010E 2910 GOTO C01_V
0440 010F 2A57 GOTO LOADC01 ;SECOND JOB
0441 0110 0B91 C01_V DECFSZ CMD_CNT
0442 0111 2821 GOTO COLD
0443 0112 28CC GOTO EE_CHGE
0444
0445 VERIC66
0446 0113 3080 MOVLW MASTER
0447 0114 0090 MOVWF CHP_CNT
0448 0115 2164 CALL EWEN
0449 0116 081A MOVF SLAVE,0
0450 0117 0090 MOVWF CHP_CNT
0451 0118 2164 CALL EWEN
0452 0119 3000 MOVLW 0 ;COPY START FROM 0 BYTE
0453 011A 0099 MOVWF EE_ADR
0454 011B 3080 C66V_LP MOVLW MASTER ;READ MASTER
0455 011C 0090 MOVWF CHP_CNT
0456 011D 21A7 CALL RDABC66
0457 011E 081C MOVF DATA_H,0 ;SAVE IN DATA_VH
0458 011F 009E MOVWF DATA_VH
0459 0120 081D MOVF DATA_L,0 ;SAVE IN DATA_VL
16c5x/7x Cross-Assembler V4.11 Released Sat Mar 04 12:18:21 1995 Page 10
Line PC Opcode
0460 0121 009F MOVWF DATA_VL
0461 0122 081A MOVF SLAVE,0 ;READ SLAVE
0462 0123 0090 MOVWF CHP_CNT
0463 0124 21A7 CALL RDABC66
0464 0125 081E MOVF DATA_VH,0
0465 0126 029C SUBWF DATA_H
0466 0127 1D03 BTFSS STATUS,2
0467 0128 2932 GOTO ERROR
0468 0129 081F MOVF DATA_VL,0
0469 012A 029D SUBWF DATA_L
0470 012B 1D03 BTFSS STATUS,2
0471 012C 2932 GOTO ERROR
0472 012D 0F99 INCFSZ EE_ADR ;NEXT BYTE UNTIL 512 BYTE
0473 012E 291B GOTO C66V_LP
0474 012F 306E MOVLW B'01101110' ;YES , OKAY
0475 0130 0097 MOVWF BUFFER
0476 0131 2934 GOTO DISABLE
0477 0132 3079 ERROR MOVLW B'01111001' ;E , ERROR
0478 0133 0097 MOVWF BUFFER
0479 0134 3080 DISABLE MOVLW MASTER
0480 0135 0090 MOVWF CHP_CNT
0481 0136 218C CALL EWDS
0482 0137 081A MOVF SLAVE,0
0483 0138 0090 MOVWF CHP_CNT
0484 0139 218C CALL EWDS
0485 013A 2828 GOTO WERM
0486
0487 PROGC66
0488 013B 3080 MOVLW MASTER
0489 013C 0090 MOVWF CHP_CNT
0490 013D 2164 CALL EWEN
0491 013E 2178 CALL ERAL
0492 013F 2355 CALL DELAY
0493 0140 081A MOVF SLAVE,0
0494 0141 0090 MOVWF CHP_CNT
0495 0142 2164 CALL EWEN
0496 0143 3000 MOVLW 0
0497 0144 0099 MOVWF EE_ADR
0498 0145 081A C66P_LP MOVF SLAVE,0
0499 0146 0090 MOVWF CHP_CNT
0500 0147 21A7 CALL RDABC66
0501 0148 3080 MOVLW MASTER
0502 0149 0090 MOVWF CHP_CNT
0503 014A 219E CALL WRABC66
0504 014B 0F99 INCFSZ EE_ADR
0505 014C 2945 GOTO C66P_LP
0506 014D 2913 GOTO VERIC66
0507
0508 LOADC66
0509 014E 20EF CALL CHK_LOCK
0510 014F 3080 MOVLW MASTER
16c5x/7x Cross-Assembler V4.11 Released Sat Mar 04 12:18:21 1995 Page 11
Line PC Opcode
0511 0150 0090 MOVWF CHP_CNT
0512 0151 2164 CALL EWEN
0513 0152 081A MOVF SLAVE,0
0514 0153 0090 MOVWF CHP_CNT
0515 0154 2164 CALL EWEN
0516 0155 3000 MOVLW 0 ;COPY START FROM 0 BYTE
0517 0156 0099 MOVWF EE_ADR
0518 0157 3080 C66L_LP MOVLW MASTER ;READ MASTER
0519 0158 0090 MOVWF CHP_CNT
0520 0159 21A7 CALL RDABC66
0521 015A 081A MOVF SLAVE,0 ;WRITE SLAVE
0522 015B 0090 MOVWF CHP_CNT
0523 015C 219E CALL WRABC66
0524 015D 0F99 INCFSZ EE_ADR ;NEXT BYTE UNTIL 512 BYTE
0525 015E 2957 GOTO C66L_LP
0526 015F 2913 GOTO VERIC66
0527
0528 CLOCK
0529 0160 1505 BSF EEROM,SK
0530 0161 0000 NOP
0531 0162 1105 BCF EEROM,SK
0532 0163 0008 RETURN
0533
0534 EWEN
0535 0164 0810 MOVF CHP_CNT,0
0536 0165 0086 MOVWF LED
0537 0166 2160 CALL CLOCK
0538 0167 1485 BSF EEROM,DI
0539 0168 2160 CALL CLOCK
0540 0169 1085 BCF EEROM,DI
0541 016A 2160 CALL CLOCK
0542 016B 2160 CALL CLOCK
0543 016C 1485 BSF EEROM,DI
0544 016D 2160 CALL CLOCK
0545 016E 2160 CALL CLOCK
0546 016F 1085 BCF EEROM,DI
0547 0170 2160 CALL CLOCK
0548 0171 2160 CALL CLOCK
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -