📄 victory3.lst
字号:
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
AVOID_WHITE_BOLK:
02C7 C28E CLR TR1
02C9 C2A7 CLR P2.7
02CB D2A6 SETB P2.6
02CD D2B1 SETB P3.1
02CF 120461 LCALL DELAY
02D2 D28E SETB TR1
02D4 7D05 MOV R5,#05H
AVOID_R5:
02D6 7EFF MOV R6,#0FFH
AVOID_R6:
02D8 120461 LCALL DELAY
02DB DEFB DJNZ R6,AVOID_R6
02DD DDF7 DJNZ R5,AVOID_R5
02DF C28E CLR TR1
02E1 C2A6 CLR P2.6
02E3 C2B1 CLR P3.1
02E5 120461 LCALL DELAY
02E8 D28E SETB TR1
02EA 7D06 MOV R5,#06H
AVOID_R52:
02EC 7EFF MOV R6,#0FFH
AVOID_R62:
02EE 120461 LCALL DELAY
02F1 DEFB DJNZ R6,AVOID_R62
02F3 DDF7 DJNZ R5,AVOID_R52
02F5 755A1E MOV 5AH,#30
02F8 7E3F MOV R6,#3FH
AVOID_LOOP:
02FA 120461 LCALL DELAY
02FD DEFB DJNZ R6,AVOID_LOOP
02FF A286 MOV C,P0.6
0301 50C4 JNC AVOID_WHITE_BOLK
0303 755A14 MOV 5AH,#20
0306 C2A6 CLR P2.6
0308 22 RET
;******************************************************
D:\YC\SONY_CUP\FINALLY\VICTORY3.ASM
页 13
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
HOME:
0309 75A800 MOV IE,#0H
030C 75A800 MOV IE,#0H
030F C2A6 CLR P2.6
0311 C2B0 CLR P3.0
HOME_WAIT:
0313 C2A6 CLR P2.6
0315 C2B0 CLR P3.0
0317 D2B4 SETB P3.4
0319 12032B LCALL KEY_QUERY ; 查询键盘
031C 12033F LCALL TIP_SET_CODE ; 设置显示值
031F 7944 MOV R1,#44H
0321 120393 LCALL SET_CODE
0324 120367 LCALL OUT ; LED 输出
0327 020313 LJMP HOME_WAIT
032A 22 RET
;******************************************************
KEY_QUERY:
032B 1203BF LCALL KEY
032E 500D JNC KEY_QUERY_END
0330 1203BF LCALL KEY
0333 5008 JNC KEY_QUERY_END
0335 1203D9 LCALL DEAL_KEY
KEY_WA:
0338 1203BF LCALL KEY
033B 40FB JC KEY_WA
KEY_QUERY_END:
033D 22 RET
033E 22 RET
;******************************************************
TIP_SET_CODE:
033F E559 MOV A,59H
0341 601E JZ SET_TIME
0343 7846 MOV R0,#46H
0345 75F002 MOV B,#02H
0348 A4 MUL AB
0349 28 ADD A,R0
D:\YC\SONY_CUP\FINALLY\VICTORY3.ASM
页 14
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
034A F8 MOV R0,A
SET_NUM:
034B E6 MOV A,@R0
034C 75F00A MOV B,#0AH
034F 84 DIV AB
0350 F544 MOV 44H,A
0352 85F045 MOV 45H,B
0355 08 INC R0
0356 75F00A MOV B,#0AH
0359 E6 MOV A,@R0
035A 84 DIV AB
035B F546 MOV 46H,A
035D 85F047 MOV 47H,B
0360 22 RET
SET_TIME:
0361 7842 MOV R0,#42H
0363 02034B LJMP SET_NUM
0366 22 RET
;*****************************************************
OUT:
0367 7830 MOV R0,#30H
0369 7A06 MOV R2,#6H
036B 7C00 MOV R4,#0H
LOOP:
036D E6 MOV A,@R0
036E 120376 LCALL OUTPUT
0371 08 INC R0
0372 0C INC R4
0373 DAF8 DJNZ R2,LOOP
0375 22 RET
;*******************************************************
OUTPUT: ;在A中是要显示的数据，R4中是要显示的位
0376 7B08 MOV R3,#8H
0378 C293 CLR P1.3
OUT_LOOP:
037A 33 RLC A
037B 9292 MOV P1.2,C
037D C294 CLR P1.4
037F 00 NOP
0380 00 NOP
D:\YC\SONY_CUP\FINALLY\VICTORY3.ASM
页 15
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
0381 00 NOP
0382 D294 SETB P1.4
0384 00 NOP
0385 00 NOP
0386 00 NOP
0387 DBF1 DJNZ R3,OUT_LOOP
OUT_LOOP_END:
0389 8C90 MOV P1,R4
038B D293 SETB P1.3
038D 120461 LCALL DELAY
0390 C293 CLR P1.3
0392 22 RET
;******************************************************
SET_CODE:
0393 7844 MOV R0,#44H
0395 7930 MOV R1,#30H
0397 7A04 MOV R2,#4H
SET_CODE_LOOP:
0399 E6 MOV A,@R0
039A 9003AF MOV DPTR,#TAB
039D 93 MOVC A,@A+DPTR
039E F7 MOV @R1,A
039F 08 INC R0
03A0 09 INC R1
03A1 DAF6 DJNZ R2,SET_CODE_LOOP
;以下是显示是第几个雷
03A3 E53A MOV A,3AH
03A5 9003AF MOV DPTR,#TAB
03A8 93 MOVC A,@A+DPTR
03A9 F535 MOV 35H,A
;以下是使一个LED为暗
03AB 753400 MOV 34H,#0H
03AE 22 RET
;******************************************************
03AF 3F065B
03B2 4F666D
03B5 7D077F
03B8 6F777C
03BB 395E79
03BE 71 TAB: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H,5EH,79H,71H
;*****************************************************
KEY:
D:\YC\SONY_CUP\FINALLY\VICTORY3.ASM
页 16
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
03BF 7558FE MOV 58H,#0FEH;
03C2 7904 MOV R1,#4H
KEY_LOOP:
03C4 855890 MOV P1,58H
03C7 E590 MOV A,P1
03C9 B5580B CJNE A,58H,KEY_NEXT1
03CC E558 MOV A,58H ;NO KEY FIND
03CE 23 RL A
03CF F558 MOV 58H,A
03D1 D9F1 DJNZ R1,KEY_LOOP
03D3 C3 CLR C
03D4 0203D8 LJMP KEY_END
KEY_NEXT1:
03D7 D3 SETB C
KEY_END:
03D8 22 RET
DEAL_KEY:
03D9 E558 MOV A,58H
03DB 7590F0 MOV P1,#0F0H
03DE B4FE1F CJNE A,#0FEH,TWO
03E1 D291 ONE_1: SETB P1.1
03E3 00 NOP
03E4 A291 MOV C,P1.1
03E6 4006 JC ONE_2
03E8 75590E MOV 59H,#0EH
03EB 020460 LJMP DEAL_END
03EE D292 ONE_2: SETB P1.2
03F0 A292 MOV C,P1.2
03F2 4006 JC ONE_3
03F4 755907 MOV 59H,#07H
03F7 020460 LJMP DEAL_END
03FA 75590F ONE_3: MOV 59H,#0FH
03FD 020460 LJMP DEAL_END
0400 B4FD1E TWO: CJNE A,#0FDH,THREE
0403 D290 TWO_1: SETB P1.0
0405 A290 MOV C,P1.0
0407 4006 JC TWO_2
0409 755902 MOV 59H,#2H
040C 020460 LJMP DEAL_END
040F D292 TWO_2: SETB P1.2
D:\YC\SONY_CUP\FINALLY\VICTORY3.ASM
页 17
09-21-03
17:28:33
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
0411 A292 MOV C,P1.2
0413 4006 JC TWO_3
0415 755906 MOV 59H,#6H
0418 020460 LJMP DEAL_END
041B 755909 TWO_3: MOV 59H,#9H
041E 020460 LJMP DEAL_END
0421 B4FB1E THREE: CJNE A,#0FBH,FOUR
0424 D290 THREE_1: SETB P1.0
0426 A290 MOV C,P1.0
0428 4006 JC THREE_2
042A 755901 MOV 59H,#1H
042D 020460 LJMP DEAL_END
0430 D291 THREE_2: SETB P1.1
0432 A291 MOV C,P1.1
0434 4006 JC THREE_3
0436 755904 MOV 59H,#4H
0439 020460 LJMP DEAL_END
043C 755908 THREE_3: MOV 59H,#8H
043F 020460 LJMP DEAL_END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -