211
31.03.2024, 21:01 Uhr
wpwsaw
Default Group and Edit
|
wünsche einen schönen Ostersonntag gehabt zu haben :-)
hat denn schon jemand Zeit gefunden meiner Frage aus 210 bzw. 198/199 nach zu gehen?
"" Hat denn jemand von den MPC Besitzern schon mal die Hauptplatine auf den von mir in 198 / 199 erwähnten Fehler geprüft? ""
meine LP liegen noch ungesichtet und ungetestet im Lager :-(
und nur mal zur Info:
zu der Terminal.COM Sache, ich habe ja noch ein paar Experimente mit den Schnittstellen des MPC4 gemacht und habe heute mal die Terminal.COM zerlegt, komplett reassembliert und das solange bis ich genau die COM Datei erzeugen konnte wie sie im Original vorlag. Das TERMINAL.COM Programm läuft ja über die Druckerschnittstelle fest als Xon/off 9600,8,n,1
ich versuche sie mal zu Kommentieren was da passiert, um auch die anderen Schnittstellen mal nutzen zu können. Vor allem um auch die Einstellungen der Daten und die Wahl der Schnittstellen per Programm ändern zu können.
wen es interessiert:
Quellcode: | 0001 0000 ;#### Terminalprogramm 0002 0000 ;#### für MPC4 an P8000 0003 0000 ;#### am Druckerport X4.1 0004 0000 ;#### XonXoff 9600,8,n,1 0005 0000 ; 0006 0000 org 100h 0007 0100 C3 78 01 jp 0178h 0008 0103 ; 0009 0103 E0 DB 0E0h 0010 0104 02 DB 02h 0011 0105 47 DB 47h 0012 0106 0D DB 0Dh 0013 0107 E6 DB 0E6h 0014 0108 0A DB 0Ah 0015 0109 00 DB 00h 0016 010A 18 DB 18h 0017 010B 04 DB 04h 0018 010C 4C DB 4Ch 0019 010D 05 DB 05h 0020 010E 68 DB 68h 0021 010F 03 DB 03h 0022 0110 C1 Db 0C1h 0023 0111 01 db 01h 0024 0112 18 Db 18h 0025 0113 1B db 1Bh 0026 0114 5B Db 5Bh 0027 0115 32 db 32h 0028 0116 4A Db 4Ah 0029 0117 0A db 0Ah 0030 0118 1B Db 1Bh 0031 0119 5B db 5Bh 0032 011A 32 Db 32h 0033 011B 5A db 5Ah 0034 011C 1B Db 1Bh 0035 011D 5B db 5Bh 0036 011E 37 Db 37h 0037 011F 6D db 6Dh 0038 0120 20 Db 20h 0039 0121 08 db 08h 0040 0122 1B Db 1Bh 0041 0123 5B db 5Bh 0042 0124 31 Db 31h 0043 0125 6D db 6Dh 0044 0126 20 Db 20h 0045 0127 20 db 20h 0046 0128 20 Db 20h 0047 0129 20 db 20h 0048 012A 20 Db 20h 0049 012B 20 db 20h 0050 012C 20 Db 20h 0051 012D 4D db 4Dh 0052 012E 50 Db 50h 0053 012F 43 db 43h 0054 0130 20 Db 20h 0055 0131 61 db 61h 0056 0132 6C Db 6Ch 0057 0133 73 db 73h 0058 0134 20 Db 20h 0059 0135 50 db 50h 0060 0136 38 Db 38h 0061 0137 30 db 30h 0062 0138 30 Db 30h 0063 0139 30 db 30h 0064 013A 2D db 2Dh 0065 013B 54 db 54h 0066 013C 65 db 65h 0067 013D 72 db 72h 0068 013E 6D db 6Dh 0069 013F 69 db 69h 0070 0140 6E db 6Eh 0071 0141 61 db 61h 0072 0142 6C db 6Ch 0073 0143 20 db 20h 0074 0144 20 db 20h 0075 0145 1B db 1Bh 0076 0146 5B db 5Bh 0077 0147 30 db 30h 0078 0148 3B db 3Bh 0079 0149 37 db 37h 0080 014A 6D db 6Dh 0081 014B 20 db 20h 0082 014C 20 db 20h 0083 014D 20 db 20h 0084 014E 20 db 20h 0085 014F 20 db 20h 0086 0150 20 db 20h 0087 0151 20 db 20h 0088 0152 20 db 20h 0089 0153 20 db 20h 0090 0154 1B db 1Bh 0091 0155 5B db 5Bh 0092 0156 31 db 31h 0093 0157 5A db 5Ah 0094 0158 1B db 1Bh 0095 0159 5B db 5Bh 0096 015A 30 db 30h 0097 015B 6D db 6Dh 0098 015C 0D db 0Dh 0099 015D 0A db 0Ah 0100 015E 24 db 24h 0101 015F ; 0102 015F ; 0103 015F F3 di 0104 0160 C5 push bc 0105 0161 4E ld c,(hl) 0106 0162 23 inc hl 0107 0163 46 ld b,(hl) 0108 0164 23 inc hl 0109 0165 ED B3 otir 0110 0167 C1 pop bc 0111 0168 10 F6 djnz 0160h 0112 016A FB ei 0113 016B C9 ret 0114 016C ; 0115 016C 21 74 01 ld hl,0174h 0116 016F 06 01 ld b,01h 0117 0171 C3 5F 01 jp 015fh 0118 0174 ; 0119 0174 E6 db 0e6h 0120 0175 02 db 02h 0121 0176 00 db 0 0122 0177 18 db 18h 0123 0178 ; 0124 0178 21 1F C0 ld hl,0c01fh 0125 017B 22 0C FD ld (0fd0ch),hl 0126 017E 22 0E FD ld (0fd0eh),hl 0127 0181 21 09 02 ld hl,0209h 0128 0184 01 44 01 ld bc,0144h 0129 0187 11 00 C0 ld de,0c000h 0130 018A ED B0 ldir 0131 018C 21 03 01 ld hl,0103h 0132 018F 06 02 ld b,02h 0133 0191 CD 5F 01 call 015fh 0134 0194 0E 09 ld c,09h 0135 0196 11 13 01 ld de,0113h 0136 0199 CD 05 00 call 0005h 0137 019C CD E8 01 call 01e8h 0138 019F 20 0C jr nz,01adh 0139 01A1 3A 45 C0 ld a,(0c045h) 0140 01A4 FE 13 cp 13h 0141 01A6 3E 11 ld a,11h 0142 01A8 CC 00 C0 call z,0c000h 0143 01AB 18 06 jr 01b3h 0144 01AD 5F ld e,a 0145 01AE 0E 06 ld c,06h 0146 01B0 CD 05 00 call 0005h 0147 01B3 0E 06 ld c,06h 0148 01B5 1E FF ld e,0ffh 0149 01B7 CD 05 00 call 0005h 0150 01BA 0151 01BA B7 or a 0152 01BB 28 DF jr z,019ch 0153 01BD FE BB cp 0bbh 0154 01BF 28 AB jr z,016ch 0155 01C1 F5 push af 0156 01C2 3A 44 C0 ld a,(0c044h) 0157 01C5 FE 13 cp 13h 0158 01C7 28 06 jr z,01cfh 0159 01C9 F1 pop af 0160 01CA CD 00 C0 call 0c000h 0161 01CD 18 CD jr 019ch 0162 01CF CD E8 01 call 01e8h 0163 01D2 20 0C jr nz,01e0h 0164 01D4 3A 45 C0 ld a,(0c045h) 0165 01D7 FE 13 cp 13h 0166 01D9 3E 11 ld a,11h 0167 01DB CC 00 C0 call z,0c000h 0168 01DE 18 E2 jr 01c2h 0169 01E0 5F ld e,a 0170 01E1 0E 06 ld c,06h 0171 01E3 CD 05 00 call 0005h 0172 01E6 18 DA jr 01c2h 0173 01E8 C5 push bc 0174 01E9 D5 push de 0175 01EA E5 push hl 0176 01EB 2A 12 C1 ld hl,(0c112h) 0177 01EE 7C ld a,h 0178 01EF B5 or l 0179 01F0 28 13 jr z,0205h 0180 01F2 F3 di 0181 01F3 2A 12 C1 ld hl,(0c112h) 0182 01F6 2B dec hl 0183 01F7 22 12 C1 ld (0c112h),hl 0184 01FA 2A 48 C0 ld hl,(0c048h) 0185 01FD 7E ld a,(hl) 0186 01FE CD 35 C1 call 0c135h 0187 0201 FB ei 0188 0202 22 48 C0 ld (0c048h),hl 0189 0205 E1 pop hl 0190 0206 D1 pop de 0191 0207 C1 pop bc 0192 0208 C9 ret 0193 0209 ; 0194 0209 F5 push af 0195 020A 3A 45 C0 ld a,(0c045h) 0196 020D 47 ld b,a 0197 020E DB E6 in a,(0e6h) 0198 0210 CB 57 bit 2,a 0199 0212 28 FA jr z,020eh 0200 0214 3A 45 C0 ld a,(0c045h) 0201 0217 B8 cp b 0202 0218 20 F0 jr nz,020ah 0203 021A F1 pop af 0204 021B D3 E4 out (0e4h),a 0205 021D FE 13 cp 13h 0206 021F 28 03 jr z,0224h 0207 0221 FE 11 cp 11h 0208 0223 C0 ret nz 0209 0224 ; 0210 0224 32 45 C0 ld (0c045h),a 0211 0227 C9 ret 0212 0228 ; 0213 0228 F5 push af 0214 0229 DB E4 in a,(0e4h) 0215 022B FE 13 cp 13h 0216 022D 28 19 jr z,0248h 0217 022F FE 11 cp 11h 0218 0231 28 15 jr z,0248h 0219 0233 CD 14 C1 call 0c114h 0220 0236 20 0C jr nz,0244h 0221 0238 3A 45 C0 ld a,(0c045h) 0222 023B FE 13 cp 13h 0223 023D 28 05 jr z,0244h 0224 023F 3E 13 ld a,13h 0225 0241 CD 00 C0 call 0c000h 0226 0244 F1 pop af 0227 0245 FB ei 0228 0246 ED 4D reti 0229 0248 ; 0230 0248 32 44 C0 ld (0c044h),a 0231 024B 18 F7 jr 0244h 0232 024D 00 nop 0233 024E 00 nop 0234 024F 4A ld c,d 0235 0250 C0 ret nz 0236 0251 ; 0237 0251 4A ld c,d 0238 0252 C0 ret nz 0239 0253 ; 0240 0253 ; 0241 0253 ; 0242 0253 org 31dh 0243 031D C5 push bc 0244 031E D5 push de 0245 031F E5 push hl 0246 0320 2A 12 C1 ld hl,(0c112h) 0247 0323 A7 and a 0248 0324 11 BD 00 ld de,00bdh 0249 0327 ED 52 sbc hl,de 0250 0329 F5 push af 0251 032A 19 add hl,de 0252 032B 23 inc hl 0253 032C 22 12 C1 ld (0c112h),hl 0254 032F 2A 46 C0 ld hl,(0c046h) 0255 0332 77 ld (hl),a 0256 0333 CD 35 C1 call 0c135h 0257 0336 F1 pop af 0258 0337 22 46 C0 ld (0c046h),hl 0259 033A E1 pop hl 0260 033B D1 pop de 0261 033C C1 pop bc 0262 033D C9 ret 0263 033E ; 0264 033E 11 11 C1 ld de,0c111h 0265 0341 A7 and a 0266 0342 ED 52 sbc hl,de 0267 0344 20 04 jr nz,034ah 0268 0346 21 4A C0 ld hl,0c04ah 0269 0349 C9 ret 0270 034A ; 0271 034A 19 add hl,de 0272 034B 23 inc hl 0273 034C C9 ret 0274 034D ; 0275 034D 0276 034D Number of errors = 0
|
gruß wpw -- RECORD, CRN1; CRN2; PicoDat; LC80; Poly880; KC85/2,3,4,5 ; KC87; Z1013; BIC; PC1715; K8915; K8924; A7100; A7150; EC1834; und P8000 ab jetzt ohne Tatra813-8x8 aber mit W50LA/Z/A; P3; ES175/2 und Multicar M25 3SK; Barkas B1000 HP |