Subversion Repositories pentevo

Rev

Rev 889 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 889 Rev 890
Line 91... Line 91...
91
                JR NZ,ZAW006
91
                JR NZ,ZAW006
92
                LD H,0X40
92
                LD H,0X40
93
ZAW006          LD A,CMD_55
93
ZAW006          LD A,CMD_55
94
                CALL OUT_COM
94
                CALL OUT_COM
95
                CALL IN_OOUT
95
                CALL IN_OOUT
96
                defb 0xed,0x70 ;in f,(c)
96
                in (c) ;in f,(c)
97
                defb 0xed,0x70 ;in f,(c)
97
                in (c) ;in f,(c)
98
                LD A,ACMD_41
98
                LD A,ACMD_41
99
                OUT (C),A
99
                OUT (C),A
100
                NOP
100
                NOP
101
                OUT (C),H
101
                OUT (C),H
102
                NOP
102
                NOP
Line 151... Line 151...
151
                RET
151
                RET
152
 
152
 
153
OUT_COM         PUSH BC
153
OUT_COM         PUSH BC
154
                CALL CS__LOW
154
                CALL CS__LOW
155
                LD BC,P_DATA
155
                LD BC,P_DATA
156
                defb 0xed,0x70 ;in f,(c)
156
                in (c) ;in f,(c)
157
                defb 0xed,0x70 ;in f,(c)
157
                in (c) ;in f,(c)
158
                OUT (C),A
158
                OUT (C),A
159
                XOR A
159
                XOR A
160
                OUT (C),A
160
                OUT (C),A
161
                NOP
161
                NOP
162
                OUT (C),A
162
                OUT (C),A
Line 211... Line 211...
211
                LD H,L
211
                LD H,L
212
                LD L,D
212
                LD L,D
213
                LD D,E
213
                LD D,E
214
                LD E,0
214
                LD E,0
215
SECN200         POP AF
215
SECN200         POP AF
216
                defb 0xed,0x70 ;in f,(c)
216
                in (c) ;in f,(c)
217
                defb 0xed,0x70 ;in f,(c)
217
                in (c) ;in f,(c)
218
                LD BC,P_DATA
218
                LD BC,P_DATA
219
                OUT (C),A
219
                OUT (C),A
220
                NOP
220
                NOP
221
                OUT (C),H
221
                OUT (C),H
222
                NOP
222
                NOP