1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
################################################################################
# #
# Micro Series 8051 Assembler V2.02/DOS 14/Jun/05 13:24:51 #
# #
# Source = p3_1.s03 #
# List = p3_1.lst #
# Object = p3_1.r03 #
# Options = f #
# #
# (c) Copyright IAR Systems 1990 #
################################################################################
1 ;Sven Eisenhauer
2 ;MPS1 Versuch 3 Aufgabe 1
3 ;14.06.2005
4
102
103 0000 ORG 0000h
104
105 0000 D290 SETB P1.0
106 0002 D293 SETB P1.3
107 0004 901000 MOV DPTR,#1000h
108
109 0007 309314 START: JNB P1.3,OUTPUT
110 000A 309002 JNB P1.0,READ
111 000D 80F8 SJMP START
112
113 000F E5E8 READ: MOV A,P4
114 0011 F0 MOVX @DPTR,A
115 0012 A3 INC DPTR
116 0013 12002D LCALL SENDSE
117 0016 7400 MOV A,#00h
118 0018 F0 MOVX @DPTR,A
119 0019 3090FD LOOP: JNB P1.0,LOOP
120 001C 80E9 SJMP START
121
122 001E 901000 OUTPUT: MOV DPTR,#1000h
123 0021 E0 OUTPUT2: MOVX A,@DPTR
124 0022 A3 INC DPTR
125 0023 12002D LCALL SENDSE
126 0026 E0 MOVX A,@DPTR
127 0027 B400F7 CJNE A,#00h,OUTPUT2
128 002A 028000 LJMP 8000h
129
130 002D F599 SENDSE: MOV SBUF,A
131 002F C299 CLR TI
132 0031 3099FD WARTE: JNB TI, WARTE
133 0034 22 RET
134
135 0035 END
Errors: None ########
Bytes: 53 # p3_1 #
CRC: 4500 ########
|