803E 7A64 64 MOV R2,#TIm2
8040 65 DO22:
8040 75A6E1 66 mov 0xA6, #0E1H
8043 75A61E 67 mov 0xA6, #01EH
8046 7B64 68 MOV R3,#TIm3
8048 69 DO32:
8048 75A6E1 70 mov 0xA6, #0E1H
804B 75A61E 71 mov 0xA6, #01EH
804E 1B 72 DEC R3
804F EB 73 MOV A,R3
74
8050 70F6 75 JNZ DO32
8052 76 ED032:
8052 1A 77 DEC R2
8053 EA 78 MOV A,R2
79
8054 70EA 80 JNZ DO22
8056 81 EDO22:
8056 19 82 DEC R1
8057 E9 83 MOV A,R1
8058 70DE 84 JNZ DO12
805A 85 EDO12:
86 ;----------------------------87 ;vicl krasnogo
805A E5F8 88 MOV A,P5
805C 6410 89 XRL A,#RED
805E F5F8 90 MOV P5,A
91 ;----------------------------92 ;timer
8060 7904 93 MOV R1,# TIm1
8062 94 DO13:
8062 75A6E1 95 mov 0xA6, #0E1H
8065 75A61E 96 mov 0xA6, #01EH
8068 7A64 97 MOV R2,#TIm2
806A 98 DO23:
806A 75A6E1 99 mov 0xA6, #0E1H
806D 75A61E 100 mov 0xA6, #01EH
8070 7B64 101 MOV R3,#TIm3
8072 102 DO33:
8072 75A6E1 103 mov 0xA6, #0E1H
8075 75A61E 104 mov 0xA6, #01EH
8078 1B 105 DEC R3
8079 EB 106 MOV A,R3
107
807A 70F6 108 JNZ DO33
807C 109 EDO33:
807C 1A 110 DEC R2
807D EA 111 MOV A,R2
112
807E 70EA 113 JNZ DO23
8080 114 EDO23:
8080 19 115 DEC R1
8081 E9 116 MOV A,R1
8082 70DE 117 JNZ DO13
8084 118 EDO13:
119 ;----------------------------120 ;vicl zheltogo
8084 E5F8 121 MOV A,P5
8086 6420 122 XRL A,#YEL
123 ;----------------------------124 ;vcl zelenogo
A51 MACRO ASSEMBLER PROG 11/25/2010 21:00:41 PAGE 3
8088 F5F8 125 MOV P5,A
808A 4440 126 ORL A,#GRE
808C F5F8 127 MOV P5,A
128 ;----------------------------129 ;timer
808E 7904 130 MOV R1, #TIm1
8090 131 DO14:
8090 75A6E1 132 mov 0xA6, #0E1H
8093 75A61E 133 mov 0xA6, #01EH
8096 7A64 134 MOV R2,#TIm2
8098 135 DO24:
8098 75A6E1 136 mov 0xA6, #0E1H
809B 75A61E 137 mov 0xA6, #01EH
809E 7B64 138 MOV R3,#TIm3
80A0 139 DO34:
80A0 75A6E1 140 mov 0xA6, #0E1H
80A3 75A61E 141 mov 0xA6, #01EH
80A6 1B 142 DEC R3
80A7 EB 143 MOV A,R3
80A8 70F6 144 JNZ DO34
80AA 145 EDO34:
80AA 1A 146 DEC R2
80AB EA 147 MOV A,R2
80AC 70EA 148 JNZ DO24
80AE 149 EDO24:
80AE 19 150 DEC R1
80AF E9 151 MOV A,R1
80B0 70DE 152 JNZ DO14
80B2 153 EDO14:
154 ;----------------------------155 ;povtorit' programmu
80B2 0100 156 JMP BEG
157 ;----------------------------158 END
A51 MACRO ASSEMBLER PROG 11/25/2010 21:00:41 PAGE 4
SYMBOL TABLE LISTING
------ ----- ------N A M E T Y P E V A L U E ATTRIBUTES
BEG. . . . . . . . C ADDR 8000H A
DO1. . . . . . . . C ADDR 800EH A
DO12 . . . . . . . C ADDR 8038H A
DO13 . . . . . . . C ADDR 8062H A
DO14 . . . . . . . C ADDR 8090H A
DO2. . . . . . . . C ADDR 8016H A
DO22 . . . . . . . C ADDR 8040H A
DO23 . . . . . . . C ADDR 806AH A
DO24 . . . . . . . C ADDR 8098H A
DO3. . . . . . . . C ADDR 801EH A
DO32 . . . . . . . C ADDR 8048H A
DO33 . . . . . . . C ADDR 8072H A
DO34 . . . . . . . C ADDR 80A0H A
ED032. . . . . . . C ADDR 8052H A
EDO1 . . . . . . . C ADDR 8030H A
EDO12. . . . . . . C ADDR 805AH A
EDO13. . . . . . . C ADDR 8084H A
EDO14. . . . . . . C ADDR 80B2H A
EDO2 . . . . . . . C ADDR 802CH A
EDO22. . . . . . . C ADDR 8056H A
EDO23. . . . . . . C ADDR 8080H A
EDO24. . . . . . . C ADDR 80AEH A
EDO3 . . . . . . . C ADDR 8028H A
EDO33. . . . . . . C ADDR 807CH A
EDO34. . . . . . . C ADDR 80AAH A
GRE. . . . . . . . N NUMB 0040H A
OFF. . . . . . . . N NUMB 008FH A
P5 . . . . . . . . N NUMB 00F8H A
RED. . . . . . . . N NUMB 0010H A
TIM1 . . . . . . . N NUMB 0004H A
TIM2 . . . . . . . N NUMB 0064H A
TIM3 . . . . . . . N NUMB 0064H A
YEL. . . . . . . . N NUMB 0020H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.