千家论坛_弱电智能化技术与工程讨论(建筑智能,家居智能,人工智能)

路由交换
收藏本版 (7) |订阅

路由交换 今日: 3703 |主题: 18312|排名: 28 

发新帖
打印 上一主题 下一主题

请求高手帮忙!!急急,SOS!SOS!...

[复制链接]
lsd1980 发布于: 2004-5-24 16:25 257 次浏览 3 位用户参与讨论
跳转到指定楼层
请求高手帮忙!重酬!! 谁能把这编汇编语言的流程图划出来! ORG 000H STAT: LJMP A ORG 001BH LJMP M ORG 0030H A: MOV A,#0FFH MOV P1,A MOV P3,A MOV A,#0FH MOV SP,A CLR RS0 CLR RS1 X0 BIT 00H ;20 DAN YUAN X1 BIT 01H X2 BIT 02H X3 BIT 03H X4 BIT 04H X5 BIT 05H X6 BIT 06H X7 BIT 07H Y0 BIT 78H ;2F DAN YUAN Y1 BIT 79H Y2 BIT 7AH Y3 BIT 7BH Y4 BIT 7CH Y5 BIT 7DH Y6 BIT 7EH Y7 BIT 7FH A1: LCALL READ MOV R0,#6AH MOV R1,#0AH A3: MOV A,@R0 CLR C ADD A,#0F6H JNC A2 MOV @R0,#00H A2: INC R0 DJNZ R1,A3 NOP LCALL MOV1 MOV 20H,#3FH MOV 30H,#04H NOP MOV P1,#00H MOV A,P3 ANL A,#3FH MOV 20H,A NOP CLR Y1 NOP E: MOV TH1,#0FAH ;4.943MS 3.579545MHZ MOV TL1,#3EH MOV TMOD,#10H MOV IP,#08H MOV IE,#88H SETB TR1 NOP G: MOV A,#0FFH MOV P3,A LCALL KEY MOV A,#0FFH MOV P3,A LCALL CLR LCALL MOV1 CLR P3.7 LCALL WOR LCALL CLR LCALL MOV2 SETB P3.7 LCALL WOR NOP GG: NOP AJMP G NOP M: SETB RS0 CLR RS1 MOV R0,#23H MOV @R0,A MOV A,PSW INC R0 MOV @R0,A NOP MOV TH1,#0FAH MOV TL1,#3EH MOV TMOD,#10H MOV IP,#08H MOV IE,#88H SETB TR1 M1: CLR C MOV A,7CH ADD A,#39H ;199(D) JC M2 INC 7CH LJMP M0 M2: MOV 7CH,#00H INC 25H SETB X7 CLR C MOV A,7BH ADD A,#0F7H JC M3 INC 7BH LJMP M0 NOP M3: MOV 7BH,#00H CLR C MOV A,7AH ADD A,#0FBH JC M6 INC 7AH LJMP M0 NOP M6: MOV 7AH,#00H CLR C MOV A,79H ADD A,#0F7H JC M7 INC 79H LJMP M0 NOP M7: MOV 79H,#00H CLR C MOV A,78H ADD A,#0FBH JC M9 INC 78H LJMP M0 NOP M9: MOV 78H,#00H CLR C MOV A,77H ADD A,#0F7H JC M10 INC 77H LJMP M0 NOP M10: MOV 77H,#00H CLR C MOV A,76H ADD A,#0F7H JC M11 INC 76H LJMP M0 NOP M11: MOV 76H,#00H NOP M0: LCALL XS NOP LJMP M14 NOP NOP MOV C,P3.0 JC MM0 CLR X0 MM1: MOV C,P3.1 JC MM2 CLR X1 MM3: MOV C,P3.2 JC MM4 CLR X2 MM5: MOV C,P3.3 JC MM6 CLR X3 MM7: MOV C,P3.4 JC MM8 CLR X4 MM9: MOV C,P3.4 JC MM10 CLR X5 LJMP M13 MM0: SETB X0 LJMP MM1 MM2: SETB X1 LJMP MM3 MM4: SETB X2 LJMP MM5 MM6: SETB X3 LJMP MM7 MM8: SETB X4 LJMP MM9 MM10: SETB X5 NOP M13: MOV C,P3.2 JC M14 MOV 22H,#0FEH INC 22H NOP M14: MOV R0,#24H MOV A,@R0 MOV PSW,A DEC R0 MOV A,@R0 CLR RS0 CLR RS1 RETI NOP XS: DEC 30H MOV A,30H MOV DPTR,#XSXS MOVC A,@A+DPTR MOV DPTR,#XS1 JMP @A+DPTR XS1: MOV A,64H ORL A,#0F0H MOV P1,A NOP CLR P1.7 NOP LJMP XSS XS2: MOV A,65H ORL A,#0F0H MOV P1,A NOP CLR P1.6 NOP LJMP XSS XS3: MOV A,66H ORL A,#0F0H MOV P1,A NOP CLR P1.5 NOP LJMP XSS XS4: MOV A,67H ORL A,#0F0H MOV P1,A NOP CLR P1.4 NOP LJMP XSS XS5: MOV A,68H ORL A,#0F0H MOV P1,A NOP CLR P3.7 NOP XSS: MOV A,30H JZ XSS1 RET XSS1: MOV 30H,#04H RET XSXS: DB 00H,0DH,1AH,27H,34H NOP XYXS: MOV P1,#0FFH RET NOP READ: MOV R0,#69H MOV R1,#13H PR0: LCALL QS PR1: CLR C MOV A,#0A0H LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC READ CLR P3.4 SETB P3.3 SETB P3.3 PR2: CLR C MOV A,R0 LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC READ CLR P3.4 SETB P3.3 SETB P3.3 PR3: LCALL QS PR4: MOV A,#0A1H LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC READ CLR P3.4 SETB P3.3 SETB P3.3 PR5: CLR C CLR A LCALL PRD MOV @R0,A INC R0 SETB P3.4 CLR P3.3 CLR P3.3 CLR P3.3 CLR P3.3 CLR P3.3 CLR P3.4 LCALL ENDRD DJNZ R1,PR0 SETB P3.3 SETB P3.4 SETB P3.3 SETB P3.4 RET PRD: MOV R2,#08H LORD: SETB P3.4 MOV C,P3.3 MOV C,P3.3 MOV C,P3.3 MOV C,P3.3 MOV C,P3.3 RLC A CLR P3.4 NOP NOP DJNZ R2,LORD RET NOP NOP WRR0: LCALL WRITE INC R0 LCALL WRITE RET NOP NOP WTIME:NOP MOV R1,#0CH MOV R0,#69H WTI: LCALL WRITE INC R0 DJNZ R1,WTI SETB P3.3 SETB P3.4 SETB P3.3 SETB P3.4 RET NOP NOP WRITE:LCALL QS PW1:CLR C MOV A,#0A0H LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC WRITE CLR P3.4 SETB P3.3 SETB P3.3 PW2: CLR C MOV A,R0 LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC WRITE CLR P3.4 SETB P3.3 SETB P3.3 PW3: CLR C MOV A,@R0 LCALL PWR SETB P3.4 LCALL DED MOV C,X7 JNC WRITE CLR P3.4 SETB P3.3 SETB P3.3 LCALL ENDRD RET PWR: MOV R2,#08H LOWR: CLR P3.4 RLC A MOV P3.3,C MOV P3.3,C SETB P3.4 NOP NOP NOP NOP NOP NOP NOP NOP CLR P3.4 NOP NOP DJNZ R2,LOWR SETB P3.3 RET QS: SETB P3.3 SETB P3.4 NOP NOP NOP CLR P3.3 NOP NOP NOP NOP NOP CLR P3.4 RET ENDRD:CLR P3.3 NOP SETB P3.4 NOP NOP NOP SETB P3.3 NOP NOP CLR P3.4 RET NOP DED: MOV R7,#2CH ;3.579545MHZ,15MS DD2: MOV R6,#0AH DEE: NOP NOP NOP NOP MOV C,P3.3 JNC DD1 DJNZ R6,DEE DJNZ R7,DD2 CLR X7 RET DD1: SETB X7 RET NOP WOR: MOV C,X7 JC WO1 AJMP WOR WO1: MOV A,64H JZ WO2 DEC 64H LJMP WO5 WO2: MOV A,65H JZ WO3 DEC 65H MOV 64H,#09H LJMP WO5 WO3: MOV A,66H JZ WO4 DEC 66H MOV 65H,#05H MOV 64H,#09H LJMP WO5 WO4: MOV A,67H JZ WO6 DEC 67H MOV 66H,#09H MOV 65H,#05H MOV 64H,#09H WO5: CLR X7 LJMP WOR WO6: RET MOV C,Y0 JNC WO7 SETB P3.7 SETB P3.7 CLR X7 RET WO7: CLR P3.7 CLR P3.7 CLR X7 RET NOP KEY: MOV C,P3.2 LCALL DEL LCALL DEL JC KE1 MOV C,Y1 JNC KE2 LCALL WTIME CLR Y1 KE2: RET SB0: LJMP S0 KE1: MOV C,P3.1 LCALL DEL LCALL DEL JC KE3 MOV C,P3.5 JNC SB0 LCALL MOV2 MOV C,P3.3 LCALL DEL JC KE4 KE10: MOV C,P3.3 LCALL DEL JNC KE10 CLR C MOV A,6CH ADD A,#0F7H JC KE5 INC 6CH LJMP KE9 KE5: MOV 6CH,#00H CLR C MOV A,6DH ADD A,#0F7H JC KE6 INC 6DH LJMP KE9 KE6: MOV 6DH,#00H LJMP KE9 KE4: LCALL MOV2 MOV C,P3.4 LCALL DEL JC KEY KE11: MOV C,P3.4 LCALL DEL JNC KE11 CLR C MOV A,6AH ADD A,#0F7H JC KE7 INC 6AH LJMP KE9 KE7: MOV 6AH,#00H CLR C MOV A,6BH ADD A,#0FBH JC KE8 INC 6BH LJMP KE9 KE8: MOV 6BH,#00H LJMP KE9 KE9: LCALL MOV2 SETB Y1 LJMP KEY NOP SB1: LJMP Z0 KE3: MOV C,P3.5 JNC SB1 LCALL MOV1 MOV C,P3.3 LCALL DEL JC KE15 KE12: MOV C,P3.3 LCALL DEL JNC KE12 CLR C MOV A,72H ADD A,#0F7H JC KE13 INC 72H LJMP KE20 KE13: MOV 72H,#00H CLR C MOV A,73H ADD A,#0F7H JC KE14 INC 73H LJMP KE20 KE14: MOV 73H,#00H LJMP KE20 KE15: LCALL MOV1 MOV C,P3.4 LCALL DEL JC KE19 KE16: MOV C,P3.4 LCALL DEL JNC KE16 CLR C MOV A,70H ADD A,#0F7H JC KE17 INC 70H LJMP KE20 KE17: MOV 70H,#00H CLR C MOV A,71H ADD A,#0FBH JC KE18 INC 71H LJMP KE20 KE18: MOV 71H,#00H LJMP KE20 KE19: LJMP KEY NOP KE20: LCALL MOV1 SETB Y1 LJMP KEY NOP NOP DEL: MOV R7,#06H ;20MS DEL 3.579545 MHz MOV R6,#0C8H DE1: NOP NOP NOP DJNZ R6,DE1 DJNZ R7,DE1 RET NOP L0: LCALL CLR ;TIME SET LCALL MOV3 MOV C,P3.3 LCALL DEL JC LL0 L1: MOV C,P3.3 ;XIAO SHI SET LCALL DEL JNC L1 CLR C MOV A,77H JZ L2 DEC 77H AJMP L4 L2: MOV A,76H JZ L3 DEC 76H MOV 77H,#09H AJMP L4 L3: MOV 77H,#03H MOV 76H,#02H L4: LCALL MOV3 LJMP KEY NOP RR3: LJMP Z8 LL0: LCALL MOV3 ;FEN SET MOV C,P3.4 LCALL DEL JC RR3 L5: MOV C,P3.4 LCALL DEL JNC L5 MOV A,79H JZ L6 DEC 79H AJMP L4 L6: MOV A,78H JZ L7 DEC 78H MOV 79H,#09H AJMP L4 L7: MOV 78H,#05H MOV 79H,#09H LJMP L4 NOP S0: LCALL CLR ;STOP SET LCALL MOV2 MOV C,P3.3 LCALL DEL JC SS0 S1: MOV C,P3.3 ;XIAO SHI SET LCALL DEL JNC S1 CLR C MOV A,6CH JZ S2 DEC 6CH AJMP S4 S2: MOV A,6DH JZ S3 DEC 6DH MOV 6CH,#09H AJMP S4 S3: MOV 6CH,#09H MOV 6DH,#09H S4: LCALL MOV2 SETB Y1 LJMP KEY RR4: LJMP Z8 NOP SS0: LCALL MOV2 ;FEN SET MOV C,P3.4 LCALL DEL JC RR4 S5: MOV C,P3.4 LCALL DEL JNC S5 MOV A,6AH JZ S6 DEC 6AH AJMP S4 S6: MOV A,6BH JZ S7 DEC 6BH MOV 6AH,#09H AJMP S4 S7: MOV 6BH,#05H MOV 6AH,#09H LJMP S4 NOP Z0: LCALL CLR ;WORK SET LCALL MOV1 MOV C,P3.3 LCALL DEL JC ZZ0 Z1: MOV C,P3.3 ;XIAO SHI SET LCALL DEL JNC Z1 CLR C MOV A,72H JZ Z2 DEC 72H AJMP Z4 Z2: MOV A,73H JZ Z3 DEC 73H MOV 72H,#09H AJMP Z4 Z3: MOV 72H,#09H MOV 73H,#09H Z4: LCALL MOV1 SETB Y1 LJMP KEY NOP ZZ0: LCALL MOV1 ;FEN SET MOV C,P3.4 LCALL DEL JC Z8 Z5: MOV C,P3.4 LCALL DEL JNC Z5 MOV A,70H JZ Z6 DEC 70H AJMP Z4 Z6: MOV A,71H JZ Z7 DEC 71H MOV 70H,#09H AJMP Z4 Z7: MOV 71H,#05H MOV 70H,#09H LJMP Z4 Z8: LJMP KEY NOP CLR: MOV 7CH,#00H MOV 7BH,#00H MOV 7AH,#00H MOV 79H,#00H MOV 78H,#00H MOV 77H,#00H MOV 76H,#00H RET NOP MOV1: MOV 64H,70H MOV 65H,71H MOV 66H,72H MOV 67H,73H SETB Y0 RET NOP MOV2: MOV 64H,6AH MOV 65H,6BH MOV 66H,6CH MOV 67H,6DH CLR Y0 RET NOP MOV3: MOV 64H,79H MOV 65H,78H MOV 66H,77H MOV 67H,76H CLR Y0 RET END 在下愿意重酬,qq:17500466 E-MAIL:lsd1980@163.com

回复

使用道具 举报

已有3人评论

新浪微博达人勋

千家认证

沙发
lsd1980 发表于 2004-5-24 17:56:00
怎么没人来呀!!
回复 支持 反对

使用道具 举报

新浪微博达人勋

千家认证

板凳
fclvgyfe 发表于 2004-5-24 18:18:00
把酬劳公开先
回复 支持 反对

使用道具 举报

新浪微博达人勋

千家认证

地板
whm530520 发表于 2004-5-25 10:21:00
重赏之下必有勇夫,经济时代啊
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆 千家通行证登陆

本版积分规则

千家智客微信号
千家智客微信
玩物说商城
玩物说商城