Subversion Repositories pentevo

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1186 savelij 1
 
2
        CPU     6100
3
 
4
        ORG     00000
5
 
6
        NOP
7
        NOP
8
 
9
        JMP     I ZLABEL
10
        NOP
11
ZLABEL: DC      TOP
12
 
13
        ORG     .+8
14
 
15
        ORG     01000
16
 
17
        ;;
18
        ;; Intersil IM6100
19
        ;;
20
 
21
TOP:
22
        ;; Memory Reference Instruction
23
        AND     CLABEL
24
        TAD     ZLABEL
25
        ISZ     I CLABEL
26
        DCA     I ZLABEL
27
        JMS     CLABEL
28
        JMP     ZLABEL
29
 
30
        ;; Operate Instruction (Group 1)
31
        NOP
32
        IAC
33
        BSW
34
        RAL
35
        RTL
36
        RAR
37
        RTR
38
        EXPECT 1500
39
        R3L                     ; 6120 only
40
        ENDEXPECT
41
        CML
42
        CMA
43
        CIA
44
        CLL
45
        CLL RAL
46
        CLL RTL
47
        CLL RAR
48
        CLL RTR
49
        STL
50
        CLA
51
        CLA IAC
52
        GLK
53
        STA
54
        CLA CLL
55
 
56
        BSW IAC
57
        bsw IAC
58
        bsw iac
59
 
60
        ;; Operate Instruction (Group 2)
61
        ;; NOP
62
        HLT
63
        OSR
64
        SKP
65
        SNL
66
        SZL
67
        SZA
68
        SNA
69
        SZA SNL
70
        SNA SZL
71
        SMA
72
        SPA
73
        SMA SNL
74
        SPA SZL
75
        SMA SZA
76
        SPA SNA
77
        SMA SZA SNL
78
        SPA SNA SZL
79
        ;; CLA
80
        LAS
81
        SZA CLA
82
        SNA CLA
83
        SMA CLA
84
        SPA CLA
85
        OSR HLT         ; 0xF06 / 07406
86
        SNL OSR HLT     ; 0xF16 / 07426
87
        SZL OSR HLT     ; 0xF1E / 07436
88
 
89
        ;; Operate Instruction (Group 3)
90
        ;; NOP
91
        MQL
92
        MQA
93
        SWP
94
        CLA
95
        CAM
96
        ACL
97
        CLA SWP
98
 
99
CLABEL: DC      07777
100
 
101
        ;; I/O Transfer Instruction
102
        IOT     63 7
103
        SKON
104
        ION
105
        IOF
106
        SRQ
107
        GTF
108
        RTF
109
        SGT
110
        CAF
111
 
112
        PANEL   ON
113
 
114
        EXPECT  400
115
        SKON
116
        ENDEXPECT
117
 
118
        PANEL   OFF
119
 
120
        ;;
121
        ;; Harris HD1-6120
122
        ;;
123
 
124
        CPU     6120
125
 
126
        ;; Stack Operation Instruction
127
        PPC1
128
        PPC2
129
        PAC1
130
        PAC2
131
        RTN1
132
        RTN2
133
        POP1
134
        POP2
135
        RSP1
136
        RSP2
137
        LSP1
138
        LSP2
139
 
140
        ;; Internal Control Instruction
141
        WSR
142
        GCF
143
 
144
        ;; Main Memory Control Instruction
145
        PR0
146
        PR1
147
        PR2
148
        PR3
149
 
150
        ;; Panel Mode Control Instruction
151
        PANEL   ON
152
 
153
        PRS
154
        PG0
155
        PEX
156
        CPD
157
        SPD
158
 
159
        PANEL   OFF
160
 
161
        ;; Memory Extension Instruction
162
        CDF     1
163
        CIF     4
164
        CDF CIF 6
165
        RDF
166
        RIF
167
        RIB
168
        RMF
169
 
170
        ;;
171
        ;; Pseudo Instruction
172
        ;;
173
        CPU     6100
174
 
175
        DC      07777
176
        DC      "IM6100" 0xd 012
177
 
178
        ;; DECIMAL / OCTAL
179
        OCTAL
180
        DC      2525
181
        DECIMAL
182
        DC      2525
183
 
184
        ;; LTORG
185
LABB:
186
        AND     L LABB
187
        AND     L LABF
188
        TAD     L LABG
189
        TAD     L 01000
190
LABF:
191
        LTORG
192
LABG:
193