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

Subversion Repositories z80control

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

Details | Compare with Previous | View Log


;
MACLIB    Z80
;
          ORG       0
;
START     JMP       STARTU
          ;
          DB        0FFH
          DW        (CHPEND-4)
          DW        3212
;
CHIP1ID   DB        1         ;CHIP I.D. NUMBER
;
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          JMP       SFTSTART0
;
;
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          JMP       SFTSTART2
;
;
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
          NOP
IBMVECT
          DW        COMMAIN    ;WAS CRTINP    ;ARECEIVE
;
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;
;         NON MASKABLE INT.
;
          ORG       66H       ;TRAP
;
          JMP       POWERF
;
;******************************
;
          ORG       72H
;
 
SFTSTART0
SFTSTART2
;
;    POWER UP START UP
;
; @ @ @ USED TO TEST COMM @ @ @
;
STARTU
          DI
 
          LXI       SP,0DFEAH
 
          IM2                 ; SET Z80 INT MODE
 
          LXI       B,0
MAINLOOP
          EI
 
          CALL      DELAY
          CALL      DELAY
          CALL      DELAY
 
 
          MOV       A,C
          INR       C
 
          OUT       10H                 ; HEX DISPLAY 0,1
 
          OUT       024H                ; COMPORT
 
          OUT       002H                ; LEDG
 
          JMP       MAINLOOP
 
;
;
POWERF    PUSH      PSW       ;+1  NMSK INT 60 TIMES A SEC
          PUSH      B         ;+2
          PUSH      D         ;+3
          PUSH      H         ;+4
;
          POP       H
          POP       D
          POP       B
          POP       PSW
          RETN
;
 
 
;4CH
COMMAIN
          IN        24H       ; COMMPORT
          OUT       11H       ; HEX DISPLAY
          EI
          RET
 
 
 
DELAY     PUSH      B
          LXI       B,4000H
DELLOP
          DCR       C
          JNZ       DELLOP
          DCR       B
          JNZ       DELLOP
          POP       B
          RET
 
CHPEND    DW        0FFFFH
;
          END       START

Line No.	Rev	Author	Line
1	12	tylerapohl	`;`
2			`MACLIB Z80`
3			`;`
4			`ORG 0`
5			`;`
6			`START JMP STARTU`
7			`;`
8			`DB 0FFH`
9			`DW (CHPEND-4)`
10			`DW 3212`
11			`;`
12			`CHIP1ID DB 1 ;CHIP I.D. NUMBER`
13			`;`
14			`NOP`
15			`NOP`
16			`NOP`
17			`NOP`
18			`NOP`
19			`NOP`
20			`NOP`
21			`NOP`
22			`NOP`
23			`NOP`
24			`NOP`
25			`NOP`
26			`NOP`
27			`NOP`
28			`NOP`
29			`NOP`
30			`NOP`
31			`NOP`
32			`NOP`
33			`NOP`
34			`NOP`
35			`NOP`
36			`NOP`
37			`NOP`
38			`NOP`
39			`NOP`
40			`NOP`
41			`NOP`
42			`JMP SFTSTART0`
43			`;`
44			`;`
45			`NOP`
46			`NOP`
47			`NOP`
48			`NOP`
49			`NOP`
50			`NOP`
51			`NOP`
52			`NOP`
53			`NOP`
54			`NOP`
55			`NOP`
56			`NOP`
57			`NOP`
58			`NOP`
59			`NOP`
60			`NOP`
61			`NOP`
62			`NOP`
63			`NOP`
64			`NOP`
65			`NOP`
66			`JMP SFTSTART2`
67			`;`
68			`;`
69			`NOP`
70			`NOP`
71			`NOP`
72			`NOP`
73			`NOP`
74			`NOP`
75			`NOP`
76			`NOP`
77			`NOP`
78			`NOP`
79			`NOP`
80			`NOP`
81			`IBMVECT`
82			`DW COMMAIN ;WAS CRTINP ;ARECEIVE`
83			`;`
84			`;@@@@@@@@@@@@@@@@@@@@@@@@@@@@`
85			`;`
86			`; NON MASKABLE INT.`
87			`;`
88			`ORG 66H ;TRAP`
89			`;`
90			`JMP POWERF`
91			`;`
92			`;******************************`
93			`;`
94			`ORG 72H`
95			`;`
96
97			`SFTSTART0`
98			`SFTSTART2`
99			`;`
100			`; POWER UP START UP`
101			`;`
102			`; @ @ @ USED TO TEST COMM @ @ @`
103			`;`
104			`STARTU`
105			`DI`
106
107			`LXI SP,0DFEAH`
108
109			`IM2 ; SET Z80 INT MODE`
110
111			`LXI B,0`
112			`MAINLOOP`
113			`EI`
114
115			`CALL DELAY`
116			`CALL DELAY`
117			`CALL DELAY`
118
119
120			`MOV A,C`
121			`INR C`
122
123			`OUT 10H ; HEX DISPLAY 0,1`
124
125			`OUT 024H ; COMPORT`
126
127			`OUT 002H ; LEDG`
128
129			`JMP MAINLOOP`
130
131			`;`
132			`;`
133			`POWERF PUSH PSW ;+1 NMSK INT 60 TIMES A SEC`
134			`PUSH B ;+2`
135			`PUSH D ;+3`
136			`PUSH H ;+4`
137			`;`
138			`POP H`
139			`POP D`
140			`POP B`
141			`POP PSW`
142			`RETN`
143			`;`
144
145
146			`;4CH`
147			`COMMAIN`
148			`IN 24H ; COMMPORT`
149			`OUT 11H ; HEX DISPLAY`
150			`EI`
151			`RET`
152
153
154
155			`DELAY PUSH B`
156			`LXI B,4000H`
157			`DELLOP`
158			`DCR C`
159			`JNZ DELLOP`
160			`DCR B`
161			`JNZ DELLOP`
162			`POP B`
163			`RET`
164
165			`CHPEND DW 0FFFFH`
166			`;`
167			`END START`

Browse

Tools

Subversion Repositories z80control

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