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

Subversion Repositories z80control

[/] [z80control/] [trunk/] [DE1/] [ROM/] [Z80TEST.PRN] - Blame information for rev 12

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 12 tylerapohl
                ;
2
                MACLIB    Z80
3
                ;
4
 0000                     ORG       0
5
                ;
6
 0000 C37200    START     JMP       STARTU
7
                          ;
8
 0003 FF                  DB        0FFH
9
 0004 AA00                DW        (CHPEND-4)
10
 0006 8C0C                DW        3212
11
                ;
12
 0008 01        CHIP1ID   DB        1         ;CHIP I.D. NUMBER
13
                ;
14
 0009 00                  NOP
15
 000A 00                  NOP
16
 000B 00                  NOP
17
 000C 00                  NOP
18
 000D 00                  NOP
19
 000E 00                  NOP
20
 000F 00                  NOP
21
 0010 00                  NOP
22
 0011 00                  NOP
23
 0012 00                  NOP
24
 0013 00                  NOP
25
 0014 00                  NOP
26
 0015 00                  NOP
27
 0016 00                  NOP
28
 0017 00                  NOP
29
 0018 00                  NOP
30
 0019 00                  NOP
31
 001A 00                  NOP
32
 001B 00                  NOP
33
 001C 00                  NOP
34
 001D 00                  NOP
35
 001E 00                  NOP
36
 001F 00                  NOP
37
 0020 00                  NOP
38
 0021 00                  NOP
39
 0022 00                  NOP
40
 0023 00                  NOP
41
 0024 00                  NOP
42
 0025 C37200              JMP       SFTSTART0
43
                ;
44
                ;
45
 0028 00                  NOP
46
 0029 00                  NOP
47
 002A 00                  NOP
48
 002B 00                  NOP
49
 002C 00                  NOP
50
 002D 00                  NOP
51
 002E 00                  NOP
52
 002F 00                  NOP
53
 0030 00                  NOP
54
 0031 00                  NOP
55
 0032 00                  NOP
56
 0033 00                  NOP
57
 0034 00                 NOP
58
 0035 00                  NOP
59
 0036 00                  NOP
60
 0037 00                  NOP
61
 0038 00                  NOP
62
 0039 00                  NOP
63
 003A 00                  NOP
64
 003B 00                  NOP
65
 003C 00                  NOP
66
 003D C37200              JMP       SFTSTART2
67
                ;
68
                ;
69
 0040 00                  NOP
70
 0041 00                  NOP
71
 0042 00                  NOP
72
 0043 00                  NOP
73
 0044 00                  NOP
74
 0045 00                  NOP
75
 0046 00                  NOP
76
 0047 00                  NOP
77
 0048 00                  NOP
78
 0049 00                  NOP
79
 004A 00                  NOP
80
 004B 00                  NOP
81
                IBMVECT
82
 004C 9A00                DW        COMMAIN    ;WAS CRTINP    ;ARECEIVE
83
                ;
84
                ;@@@@@@@@@@@@@@@@@@@@@@@@@@@@
85
                ;
86
                ;         NON MASKABLE INT.
87
                ;
88
 0066                     ORG       66H       ;TRAP
89
                ;
90
 0066 C39000              JMP       POWERF
91
                ;
92
                ;******************************
93
                ;
94
 0072                     ORG       72H
95
                ;
96
 
97
                SFTSTART0
98
                SFTSTART2
99
                ;
100
                ;    POWER UP START UP
101
                ;
102
                ; @ @ @ USED TO TEST COMM @ @ @
103
                ;
104
                STARTU
105
 0072 F3                  DI
106
 
107
 0073 31EADF              LXI       SP,0DFEAH
108
 
109
                          IM2                 ; SET Z80 INT MODE
110
 0076+ED5E              DB      0EDH,5EH ;
111
 
112
 0078 010000              LXI       B,0
113
                MAINLOOP
114
 007B FB                  EI
115
 
116
 007C CDA000              CALL      DELAY
117
 007F CDA000              CALL      DELAY
118
 0082 CDA000              CALL      DELAY
119
 
120
 
121
 0085 79                  MOV       A,C
122
 0086 0C                  INR       C
123
 
124
 0087 D310                OUT       10H                 ; HEX DISPLAY 0,1
125
 
126
 0089 D324                OUT       024H                ; COMPORT
127
 
128
 008B D302                OUT       002H                ; LEDR
129
 
130
 008D C37B00              JMP       MAINLOOP
131
 
132
                ;
133
                ;
134
 0090 F5        POWERF    PUSH      PSW       ;+1  NMSK INT 60 TIMES A SEC
135
 0091 C5                  PUSH      B         ;+2
136
 0092 D5                  PUSH      D         ;+3
137
 0093 E5                  PUSH      H         ;+4
138
                ;
139
 0094 E1                  POP       H
140
 0095 D1                  POP       D
141
 0096 C1                  POP       B
142
 0097 F1                  POP       PSW
143
                          RETN
144
 0098+ED45              DB      0EDH,45H ;RETN
145
                ;
146
 
147
 
148
                ;4CH
149
                COMMAIN
150
 009A DB24                IN        24H       ; COMMPORT
151
 009C D311                OUT       11H       ; HEX DISPLAY
152
 009E FB                  EI
153
 009F C9                  RET
154
 
155
 
156
 
157
 00A0 C5        DELAY     PUSH      B
158
 00A1 010040              LXI       B,4000H
159
                DELLOP
160
 00A4 0D                  DCR       C
161
 00A5 C2A400              JNZ       DELLOP
162
 00A8 05                  DCR       B
163
 00A9 C2A400              JNZ       DELLOP
164
 00AC C1                  POP       B
165
 00AD C9                  RET
166
 
167
 00AE FFFF      CHPEND    DW        0FFFFH
168
                ;
169
 00B0                    END       START
170


powered by: WebSVN 2.1.0

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