OpenCores
URL https://opencores.org/ocsvn/zet86/zet86/trunk

Subversion Repositories zet86

[/] [zet86/] [trunk/] [tests/] [12_rotate.s] - Blame information for rev 49

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 39 zeus
.code16
2
start:
3
 
4
# rcl word operations
5
movw $0x3b5e, %ax
6
movw $0xc8a7, %bx
7
movw $0x2072, (0)
8
movw $0x3e79, (2)
9
 
10
movw $160, %sp
11
 
12
rcl  %ax        # (1)
13
pushf
14
mov  %ax, (32)
15
 
16
rclw (0)        # (2)
17
pushf
18
 
19
movw $0x100, %cx
20
rcl  %cl, %bx   # (3), zero bit shift
21
pushf
22
movw %bx, (34)
23
 
24
movw $0xffff, %cx
25
movw %bx, %dx
26
rcl  %cl, %dx   # (3), -1, result 0
27
pushf
28
movw %dx, (36)
29
 
30
movb $0x8, %cl
31
rcl  %cl, %bx   # (3) normal
32
pushf
33
movw %bx, (38)
34
 
35
movb $0x4, %cl
36
rclw %cl, (2)   # (4)
37
pushf
38
 
39
# rcl byte operations
40
movw $0x5904, %dx
41
movw $0xbe7c, %ax
42
movw $0xd62f, (4)
43
movw $0x6fd8, (6)
44
 
45
rcl  %ah        # (5)
46
pushf
47
mov  %ax, (40)
48
 
49
rclb (5)        # (6)
50
pushf
51
 
52
movb $0x7, %cl
53
rcl  %cl, %dl   # (7)
54
pushf
55
movw %dx, (42)
56
 
57
rclb %cl, (6)   # (8)
58
pushf
59
 
60
# rcr word operations
61
movw $0x15d6, %ax
62
movw $0x8307, %bx
63
movw $0x9ab7, (8)
64
movw $0x28b6, (10)
65
 
66
rcr  %ax        # (9)
67
pushf
68
mov  %ax, (44)
69
 
70
rcrw (8)        # (10)
71
pushf
72
 
73
movw $0x100, %cx
74
rcr  %cl, %bx   # (11), zero bit shift
75
pushf
76
movw %bx, (46)
77
 
78
movw $0xffff, %cx
79
movw %bx, %dx
80
rcr  %cl, %dx   # (11), -1, result 0
81
pushf
82
movw %dx, (48)
83
 
84
movb $0x5, %cl
85
rcr  %cl, %bx   # (11) normal
86
pushf
87
movw %bx, (50)
88
 
89
movb $0x4, %cl
90
rcrw %cl, (10)  # (12)
91
pushf
92
 
93
# rcr byte operations
94
movw $0x7eaa, %dx
95
movw $0x3a8d, %ax
96
movw $0xa414, (12)
97
movw $0x2838, (14)
98
 
99
rcr  %ah        # (13)
100
pushf
101
mov  %ax, (52)
102
 
103
rcrb (13)       # (14)
104
pushf
105
 
106
movb $0x7, %cl
107
rcr  %cl, %dl   # (15)
108
pushf
109
movw %dx, (54)
110
 
111
rcrb %cl, (14)  # (16)
112
pushf
113
 
114
# rol word operations
115
movw $0x020d, %ax
116
movw $0x8d5a, %bx
117
movw $0x28dd, (16)
118
movw $0xd74a, (18)
119
 
120
rol  %ax        # (17)
121
pushf
122
mov  %ax, (56)
123
 
124
rolw (16)       # (18)
125
pushf
126
 
127
movw $0x100, %cx
128
rol  %cl, %bx   # (19), zero bit shift
129
pushf
130
movw %bx, (58)
131
 
132
movw $0xffff, %cx
133
movw %bx, %dx
134
rol  %cl, %dx   # (19), -1, result 0
135
pushf
136
movw %dx, (60)
137
 
138
movb $0x4, %cl
139
rol  %cl, %bx   # (19) normal
140
pushf
141
movw %bx, (62)
142
 
143
movb $0x4, %cl
144
rolw %cl, (18)  # (20)
145
pushf
146
 
147
# rol byte operations
148
movw $0x9d09, %dx
149
movw $0xc948, %ax
150
movw $0x0b80, (20)
151
movw $0x48e8, (22)
152
 
153
rol  %ah        # (21)
154
pushf
155
mov  %ax, (64)
156
 
157
rolb (21)       # (22)
158
pushf
159
 
160
movb $0x7, %cl
161
rol  %cl, %dl   # (23)
162
pushf
163
movw %dx, (66)
164
 
165
rolb %cl, (22)  # (24)
166
pushf
167
 
168
 
169
# ror word operations
170
movw $0xf25e, %ax
171
movw $0x2eb5, %bx
172
movw $0x0151, (24)
173
movw $0x7237, (26)
174
 
175
ror  %ax        # (25)
176
pushf
177
mov  %ax, (68)
178
 
179
rorw (24)       # (26)
180
pushf
181
 
182
movw $0x100, %cx
183
ror  %cl, %bx   # (27), zero bit shift
184
pushf
185
movw %bx, (70)
186
 
187
movw $0xffff, %cx
188
movw %bx, %dx
189
ror  %cl, %dx   # (27), -1, result 0
190
pushf
191
movw %dx, (72)
192
 
193
movb $0x4, %cl
194
ror  %cl, %bx   # (27) normal
195
pushf
196
movw %bx, (74)
197
 
198
movb $0x4, %cl
199
rorw %cl, (26)  # (28)
200
pushf
201
 
202
# ror byte operations
203
movw $0x4288, %dx
204
movw $0x8bab, %ax
205
movw $0x5dd9, (28)
206
movw $0xc7f7, (30)
207
 
208
ror  %ah        # (29)
209
pushf
210
mov  %ax, (76)
211
 
212
rorb (29)       # (30)
213
pushf
214
 
215
movb $0x7, %cl
216
ror  %cl, %dl   # (31)
217
pushf
218
movw %dx, (78)
219
 
220
rorb %cl, (30)  # (32)
221
pushf
222
 
223
 
224
hlt
225
 
226
.org 65520
227
jmp start
228
.org 65535
229
.byte 0xff

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.