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

Subversion Repositories zet86

[/] [zet86/] [trunk/] [tests/] [07_strings.s] - Blame information for rev 49

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 39 zeus
.code16
2
start:
3
movw $0xf000, %cx
4
movw %cx, %ds
5
movw %cx, %es
6
movw $0x1000, %si
7
movw $0x2001, %di
8
 
9
cmpsb              # (1) flags=0x97 (SAPC)
10
pushf
11
ret
12
 
13
.org 0x46
14
cmpsb              # (1) flags=0x82 (S)
15
pushf
16
ret
17
 
18
.org 0x82
19
cmpsb              # (1) flags=0x812 (OA)
20
pushf
21
ret
22
 
23
.org 0x97
24
cmpsb              # (1) flags=0x46 (ZP)
25
pushf
26
ret
27
 
28
.org 0x812
29
cmpsw              # (2)
30
pushf
31
ret                # jump to f000:0883
32
 
33
.org 0x883
34
movb $0x10, %ah
35
std
36
lodsb              # (3)
37
jmp *%ax           # jump to f000:10c2
38
 
39
.org 0x1000
40
.byte 0x01,0xff,0xff,0x80
41
.word 0x0002
42
.byte 0xc2
43
 
44
.org 0x10c2
45
lodsw              # (4)
46
jmp *%ax
47
 
48
.org 0x1300
49
movw %ax, (%di)
50
movw %dx, %es
51
scasw              # (8)
52
jz stor
53
 
54
.org 0x1350
55
stor:
56
movb  $0x80, %al
57
std
58
stosb              # (9)
59
jmp  *(%di)
60
 
61
.org 0x2001
62
.byte 0x02,0xff,0x01,0x01
63
.word 0x8001
64
 
65
.org 0x8013
66
movw $0xd000, %ax
67
stosw              # (10)
68
jmp *2(%di)
69
 
70
.org 0x80c2
71
movw %cx, %ds
72
movsw              # (6)
73
movw %dx, %ds
74
jmp *2(%di)
75
 
76
.org 0x80ff
77
movw $0x2002, %di
78
movw %cx, %es
79
cld
80
scasb              # (7)
81
lahf
82
jmp *%ax
83
 
84
.org 0xc200
85
movw $0x1000, %dx
86
movw %dx, %es
87
movw $0xffff, %di
88
movsb              # (5)
89
movw %dx, %ds
90
movb $0xc2, (%di)
91
jmp *(%di)
92
 
93
.org 0xd000
94
movw $0, %dx
95
movw %dx, %ds
96
movw $0x1234, (2)
97
 
98
hlt
99
 
100
.org 65520
101
jmp start
102
 
103
.org 65535
104
.byte 0xff

powered by: WebSVN 2.1.0

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