[6809] modułowy system na bazie Motorola MC6809
[6809] modułowy system na bazie Motorola MC6809
nie ukrywam, mnie oględziny pdf od phill2k ( viewtopic.php?f=82&t=1108 ) i przyuważony mandarynkowy Tangerine Microtan 65 w jednym ze skanów jakoś zmobilizowały do pokazania tego oto cudnego znaleziska; to jest z lutego 2016, kupione po dłuższej dyskusji za całe 30 euro w jednym z butików ze starymi rupciami w Dublinie, heh - normalnie pamiątka ze zmywaka, ale warto było, tak uważam; wszelkie układy są w sumie nadmiarowe, dwa cpu, kilka portów równoległych, stadko całe szeregowych, nawet jakbym głupstwo zrobiła w pośpiechu i coś by padło - jest szansa na wznowienie prac na kolejnych kostkach; można zbudować coś a'la CA80, kwestia uporu no i złapania chwili czasu na taką zabawę... a póki co przedstawiam zdobycz:
0. rodzinka cała na dywanie
1. płytka z procesorem
MC6809 - CPU http://www.gbgmv.se/dl/doc/md09/MC6809_DataSheet.pdf
MC6821 - PIA http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter)
MC6840 - PTM http://liris.cnrs.fr/~mmrissa/lib/exe/f ... mc6840.pdf (programmable timer module)
2. płytka z procesorem
stuff ten sam co powyżej, ale wykonanie i złączki jakby inne, może nowciejsza wersja?
3. moduł komunikacyjny (tak sobie nazwałam roboczo)
MC6850 - ACIA http://dev-docs.atariforge.org/files/MC6850.pdf (asynchronous communication interface adapter) x 4
MC1441 - http://www.swtpc.com/mholley/Notebook/MC14411.pdf bit rate generator + czadowy stary kwarc
4. moduł portów równoległych
MC6821 - PIA http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter) x 2
fotoplastikon, archiwalny nieco, z początku 2016
0. rodzinka cała na dywanie
1. płytka z procesorem
MC6809 - CPU http://www.gbgmv.se/dl/doc/md09/MC6809_DataSheet.pdf
MC6821 - PIA http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter)
MC6840 - PTM http://liris.cnrs.fr/~mmrissa/lib/exe/f ... mc6840.pdf (programmable timer module)
2. płytka z procesorem
stuff ten sam co powyżej, ale wykonanie i złączki jakby inne, może nowciejsza wersja?
3. moduł komunikacyjny (tak sobie nazwałam roboczo)
MC6850 - ACIA http://dev-docs.atariforge.org/files/MC6850.pdf (asynchronous communication interface adapter) x 4
MC1441 - http://www.swtpc.com/mholley/Notebook/MC14411.pdf bit rate generator + czadowy stary kwarc
4. moduł portów równoległych
MC6821 - PIA http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter) x 2
fotoplastikon, archiwalny nieco, z początku 2016
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
Super..., jak już wszystko poskładasz i uruchomisz to jest sofcik do sprawdzenia w działaniu
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Re: [6809] modułowy system na bazie Motorola MC6809
Myślę że pomocne będą Ci poniższe artykuły, nie jest to wszak opis Tangerine Microtan 65 i brakuje trzeciej części (archiwum nie jest kompletne), ale już można na czymś bazować.
i i nformacje z tej stronki http://www.microtan.ukpc.net/
i i nformacje z tej stronki http://www.microtan.ukpc.net/
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Re: [6809] modułowy system na bazie Motorola MC6809
och, no ja dziękuje za to ślicznie, na pewno przed zabraniem się za cokolwiek to te dokumenty przeczytam,
ta konstrukcja do złudzenia przypomina mi nasz publikowany kiedyś w gazetkach komputer COBRA, ale on był na Z80, ze słyszenia/czytania znam tylko; a co do tej konstrukcji, czy zauważyliście na czym oni zrobili graficzkę? NEC 7220 https://en.wikipedia.org/wiki/NEC_%C2%B5PD7220
no na bogato, że tak powiem, jakby dobrze pomyśleć, to ten sprzęt i do deko poważniejszych prac by się nadał....
ta konstrukcja do złudzenia przypomina mi nasz publikowany kiedyś w gazetkach komputer COBRA, ale on był na Z80, ze słyszenia/czytania znam tylko; a co do tej konstrukcji, czy zauważyliście na czym oni zrobili graficzkę? NEC 7220 https://en.wikipedia.org/wiki/NEC_%C2%B5PD7220
no na bogato, że tak powiem, jakby dobrze pomyśleć, to ten sprzęt i do deko poważniejszych prac by się nadał....
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
Grzebiąc po starych swoich CD'kach znalazłem swój kompilator procka MC6800 (MOTOROLA). Miałem kiedyś takiego proca, więc potrzebny był narządź do tworzenia softu dla tego proca. Napisany w TURBOPASCALU, po skompilowaniu działa nawet pod windozą. Właśnie kompilnołem sobie jakiś testowy plik.
Załącznik:
Pakunek zawiera:
PS.
Przy okazji na CD-ku było podobne oprogramowanie dla:
Kod: Zaznacz cały
PWTK "SIGNUM" Bialystok . Assembler mikroprocesora 6800 . Data= 2017.06.14 Godz.= 22:18:19 Strona= 1
1 ;
2 ; **************************************************************************
3 ; * *
4 ; * *
5 ; * zbior instrukcji kompilatora assemblera mikroprocesora 6800 *
6 ; * *
7 ; * *
8 ; **************************************************************************
9 ;
10 ;
11 ; ustawienie licznika rozkazow
12 ;
13 storg equ 0f800H
14 org storg
15 ;
16 displ equ 5Ah
17 const equ 15h
18 size equ 10
19 lconst equ 10ffh
20 sconst equ 0010h
21 F800 2A2A2A2A2A TEXT1 defm '***** zestaw analizowanych instrukcji *****'
F805 207A657374
F80A 617720616E
F80F 616C697A6F
F814 77616E7963
F819 6820696E73
F81E 7472756B63
F823 6A69202A2A
F828 2A2A2A
22 F82B 2A2A2A2A2A TEXT2 defm '***** mikroprocesora 6800 (MOTOROLA) *****'
F830 206D696B72
F835 6F70726F63
F83A 65736F7261
F83F 2036383030
F844 20284D4F54
F849 4F524F4C41
F84E 29202A2A2A
F853 2A2A
23 ;
24 ;
25 ;
26 F855 START_LABEL
27 F855 space defs size
28 ;
29 F85F 1B ABA
30 ;
31 F860 8915 adc a,#const
32 F862 9910 adc a,sconst
33 F864 B910FF adc a,lconst
34 F867 A915 adc a,const,x
35 F869 C915 adc b,#const
36 F86B D910 adc b,sconst
37 F86D F910FF adc b,lconst
38 F870 E915 adc b,const,x
39 ;
40 F872 label1
41 F872 8B15 add a,#const
42 F874 9B10 add a,sconst
43 F876 BB10FF add a,lconst
44 F879 AB15 add a,const,x
PWTK "SIGNUM" Bialystok . Assembler mikroprocesora 6800 . Data= 2017.06.14 Godz.= 22:18:19 Strona= 2
45 F87B CB15 add b,#const
46 F87D DB10 add b,sconst
47 F87F FB10FF add b,lconst
48 F882 EB15 add b,const,x
49 ;
50 F884 8415 and a,#const
51 F886 9410 and a,sconst
52 F888 B410FF and a,lconst
53 F88B A415 and a,const,x
54 F88D C415 and b,#const
55 F88F D410 and b,sconst
56 F891 F410FF and b,lconst
57 F894 E415 and b,const,x
58 ;
59 F896 48 ASL A
60 F897 58 ASL B
61 F898 6815 asl const,x
62 F89A 780010 asl sconst
63 F89D 7810FF asl lconst
64 ;
65 F8A0 47 ASR A
66 F8A1 57 ASR B
67 F8A2 6715 asr const,x
68 F8A4 770010 asr sconst
69 F8A7 7710FF asr lconst
70 ;
71 F8AA 8515 bit a,#const
72 F8AC 9510 bit a,sconst
73 F8AE B510FF bit a,lconst
74 F8B1 A515 bit a,const,x
75 F8B3 C515 bit b,#const
76 F8B5 D510 bit b,sconst
77 F8B7 F510FF bit b,lconst
78 F8BA E515 bit b,const,x
79 ;
80 F8BC disp
81 ;
82 ; skoki relatywne do tylu
83 ;
84 F8BC 24FE bcc disp
85 ;
86 F8BE 25FC bcs disp
87 ;
88 F8C0 27FA beq disp
89 ;
90 F8C2 2CF8 bge disp
91 ;
92 F8C4 2EF6 bgt disp
93 ;
94 F8C6 22F4 bhi disp
95 ;
96 F8C8 2FF2 ble disp
97 ;
98 F8CA 23F0 label2 bls disp
99 ;
100 F8CC 2DEE blt disp
101 ;
102 F8CE 2BEC bmi disp
103 ;
104 F8D0 26EA bne disp
(...)
PWTK "SIGNUM" Bialystok . Assembler mikroprocesora 6800 . Data= 2017.06.14 Godz.= 22:18:19 Strona= 11
Alfabetyczny wydruk identyfikatorow
START_LABEL LABEL F855 26
STOP_LABEL LABEL FA22 353
TEXT1 LABEL F800 21
TEXT2 LABEL F82B 22
const CONST 0015 17 31 34 35 38 41 44 45 48 50 53 54 57 61 67
71 74 75 78 160 166 169 170 173 177 183 185 192 200 203
204 207 211 222 225 227 230 231 234 236 239 241 244 248 254
260 263 264 267 277 283 293 296 297 300 310 313 317 321 323
326 327 330 344 356 359 360 363 364 367 368 371 372 375 376
379 382 386 395 398 399 402 435 438 441 442 445 448 450 452
457 461 464 465 468 471 476 478 479 482 483 486 487 490 491
494 497 501 504 507 508 511 518 522 527 530 531 534 540 543
546 549 550 553 554 557 565
disp LABEL F8BC 80 84 86 88 90 92 94 96 98 100 102 104 106 108 110
112 114
disp1 LABEL F8FC 118 120 122 124 126 128 130 132 134 136 138 140 142 144 146
148 150
disp2 LABEL FA68 388 389 390 391 392 393 394 403 404 405 406 407 408 409 410
411 412
disp3 LABEL FABB 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427
428 429
displ CONST 005A 16
label1 LABEL F872 40 575
label2 LABEL F8CA 98 576
label3 LABEL F926 181 573
label4 LABEL F95A 217 574
lconst CONST 10FF 19 33 37 43 47 52 56 63 69 73 77 162 168 172 179
186 194 202 206 212 221 224 229 233 238 243 249 255 262 266
278 284 295 299 309 312 316 320 325 329 345 358 362 366 370
374 378 383 387 397 401 436 440 444 449 453 458 463 467 472
475 477 481 485 489 493 498 502 506 510 519 523 529 533 539
542 545 548 552 556 566
sconst CONST 0010 20 32 36 42 46 51 55 62 68 72 76 161 167 171 178
184 193 201 205 213 228 232 237 242 250 256 261 265 279 285
294 298 308 311 315 319 324 328 346 357 359 361 365 367 369
371 373 375 377 396 400 439 443 451 462 466 480 484 488 492
505 509 528 532 538 541 544 547 551 555
size CONST 000A 18 27
space LABEL F855 27
storg CONST F800 13 14
Załącznik:
Pakunek zawiera:
- program źródłowy w turbopascalu 6800.pas
- skompilowaną wersję 6800.exe
- dokumentację 6800.doc (plik tekstowy bez polskich liter)
- dokumentację 6800.chi (plik w standardzie chiwritera → taki poprzednik wordstara)
- kilka plików testowych
PS.
Przy okazji na CD-ku było podobne oprogramowanie dla:
- 8035
- 8048
- 8080
- 8085
- Z80
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
ale we środku jest tylko TESTDATA.LST, a przynajmniej tak mi Arc pokazuje
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:ale we środku jest tylko TESTDATA.LST, a przynajmniej tak mi Arc pokazuje
nie ruzumiem, jak to się spakowało. Miało być wszystko z wyjątkiem TESTDATA.LST.
Już się poprawiam:
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
a może podczas pakowania archa zaznaczyło się include zamiast exclude a może ... a kogo to teraz...ważne, że programik sympatyczny ten działa całkiem sprawne pod dosbox w środowisku linux i przetwarza załączone próbki źródeł w asm pracowicie generując kod maszynowy, oto kolejne narządko do kolekcji zebranych przydasiów na dziwne okazje; a w tle gra sobie Moonlight.
https://youtu.be/5Xs5H0AxB6Q
https://youtu.be/5Xs5H0AxB6Q
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:narządko do kolekcji zebranych przydasiów na dziwne okazje
Znalazłem pół godziny temu innego przydasia, "książkę kucharską"
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
no ja zaniemówiła teraz ...pare lat temu miałam okazję, zaszczyt! przekartkować sobie te cegłę w cichej czytelni naukowej Trinity College, chyba nawet xero rewersu do lib. mam gdzieś, pamiątka taka, ale ten pdf super! ja dziękuje!!!!!
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:no ja zaniemówiła teraz ...
Jeszcze trochę, a głos stracisz
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:oto kolejne narządko do kolekcji zebranych przydasiów na dziwne okazje; a w tle gra sobie Moonlight.
https://youtu.be/5Xs5H0AxB6Q
jak masz zamiar tego używać, to muszę trochę uwspółcześnić ten program. Przede wszystkim by generował wynik w postaci pliku hex (wtedy nie umiałem tego robić).
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
gaweł pisze: jak masz zamiar tego używać, to muszę trochę uwspółcześnić ten program. Przede wszystkim by generował wynik w postaci pliku hex (wtedy nie umiałem tego robić).
nie no, luz, ja tylko tak wykazała rozanielenie nowym znaleziskiem, jak coś to generowanie intel hex sama dorobię aż taka sierota nie jestem ....
zastanawiam się nad portem tej aplikacji na FPC, free pascal, może pod lazarusa?
wtedy zabaweczka twoja byłaby także i pod linux natywnie /bez dosbox/ i pod za przeproszeniem windows także...
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:nie no, luz, ja tylko tak wykazała rozanielenie nowym znaleziskiem,
tasza pisze:zastanawiam się nad portem tej aplikacji na FPC, free pascal, może pod lazarusa? wtedy zabaweczka twoja byłaby także i pod linux natywnie /bez dosbox/ i pod za przeproszeniem windows także...
No chętka na lazarusa od jakiegoś czasu mnie nachodzi. Z jednej strony to wolny soft, a z drugiej ... ciekawe experience. Kilka dni temu ściągnąłem sobie pakiet ale jeszcze nie odpaliłem.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
gaweł pisze:(...) Z jednej strony to wolny soft, a z drugiej ... ciekawe experience.
no to ja dokończę wprost, bo widzę drobne zawahanie - tak... i on pełen niedoróbek i przypadłości wszelkich, co towarzyszą wolnemu oprogramowaniu /brak standardów pisania, niespójne koncepcje, brak code review etc-itd/, nie zmienia to faktu że:
* jeżeli kto zna Delphi czy C++ Builder to Laz ogranie w jeden wieczór
* masakrystycznie wielkie exe-ki czy elf-y generowane przez linker /co załącza do kodu połowę zawartości twardego dysku/ idzie okiełznać stosownymi opcjami kompilatora
* statyczne linkowanie komponentów, no to wada niezmierna, bo Delphi czy Builder bazował na dynamicznie ładowanych libach ... a tu po prostu pomaga zawłaszczenie foldera środowiska przez polecenie chown i wtenczas można do Laz IDE dodawać takie klocki jak potrzeba i budować środowisko ile razy kto chce;
FPC /free pascal compiler/ i na niego graficzna powłoka Lazarus to jest sofcik naprawdę wart uwagi....
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:no to ja dokończę wprost, bo widzę drobne zawahanie - tak... i on pełen niedoróbek i przypadłości wszelkich, co towarzyszą wolnemu oprogramowaniu /brak standardów pisania, niespójne koncepcje, brak code review etc-itd/, nie zmienia to faktu że:
* jeżeli kto zna Delphi czy C++ Builder to Laz ogranie w jeden wieczór
* masakrystycznie wielkie exe-ki czy elf-y generowane przez linker /co załącza do kodu połowę zawartości twardego dysku/ idzie okiełznać stosownymi opcjami kompilatora
* statyczne linkowanie komponentów, no to wada niezmierna, bo Delphi czy Builder bazował na dynamicznie ładowanych libach ... a tu po prostu pomaga zawłaszczenie foldera środowiska przez polecenie chown i wtenczas można do Laz IDE dodawać takie klocki jak potrzeba i budować środowisko ile razy kto chce;
FPC /free pascal compiler/ i na niego graficzna powłoka Lazarus to jest sofcik naprawdę wart uwagi....
Alter alterum docet
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
6800 po liftingu (robi plik intel-hex).
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
eksperyment uważam za udany w miarę - aplikacja buduje się pod Lazarusem (1.6), zarówno na Windows XP jak i pod Linux (Mint 17)
musiałam kilka drobiazgów zmienić, aby dostosować się do filozofii Laz (ot, choćby nazwa projektu) ale to są detale i assemblerek ruszył praktycznie od razu; generowane przez oryginalną aplikację pod dosbox pliki *.hex są treścią identyczne z tymi z Linux
przyznam szczerze, zupełnie przypadkiem w oko mi wpadła zerowa data i czas w listingach pod Linux i taka dziwaczna pod Win, w sumie to na takie drobiazgi nie zwracam uwagi;
i to jest tak, że do zbierania daty i czasu program korzysta z przerwania 21h, a w helpie wyraźnie napisali, że w systemach nie-dosowych to wywołanie jest wydmuszką; http://lazarus-ccr.sourceforge.net/docs ... msdos.html
no i trzeba było deko program zmienić; procedurki do tekstowego daty/czasu są teraz takie:
no i jest jeszcze jedna zasadzka, gdyby kto chciał to sobie na przykład na Raspberry PI skompilować (bo Lazarus/FPC na tym też chodzą),
że w dosh.inc jest kompilacja warunkowa i taka rewitalizacja będzie wymagała także kompilacji warunkowej tej aplikacji, albo zupełnego wyrugowania wszelkich dos-owych odniesień
całość w załączniku, moje zmiany skomentowane
-- edit --
aha i jeszcze drobiazg i łatwy to modyfikacji - względem nowego FPC wystąpił tam konflikt na poziomie słów kluczowych języka, jeden ze składników rekordu wariantowego IdentifierRecord został nazwany Class a to zastrzeżone dla składni Pascala, no więc siermiężne przemianowanie na Class_ pomogło, no to chyba wszystkie zmiany
musiałam kilka drobiazgów zmienić, aby dostosować się do filozofii Laz (ot, choćby nazwa projektu) ale to są detale i assemblerek ruszył praktycznie od razu; generowane przez oryginalną aplikację pod dosbox pliki *.hex są treścią identyczne z tymi z Linux
przyznam szczerze, zupełnie przypadkiem w oko mi wpadła zerowa data i czas w listingach pod Linux i taka dziwaczna pod Win, w sumie to na takie drobiazgi nie zwracam uwagi;
listing pod XP pisze:Kod: Zaznacz cały
forum microgeek.eu - assembler mikroprocesora 6800 . Data= 65.00.00 Godz.= 00:65:00 Strona= 1
llisting pod Linux pisze:Kod: Zaznacz cały
forum microgeek.eu - assembler mikroprocesora 6800 . Data= 0.00.00 Godz.= 00:00:00 Strona= 1
i to jest tak, że do zbierania daty i czasu program korzysta z przerwania 21h, a w helpie wyraźnie napisali, że w systemach nie-dosowych to wywołanie jest wydmuszką; http://lazarus-ccr.sourceforge.net/docs ... msdos.html
no i trzeba było deko program zmienić; procedurki do tekstowego daty/czasu są teraz takie:
Kod: Zaznacz cały
procedure GiveDateStr ( var OutDateString : DateString ) ;
begin
OutDateString := FormatDateTime( 'yyyy.mm.dd', Now );
end;
procedure GiveTimeStr ( var OutTimeString : TimeString ) ;
begin
OutTimeString := FormatDateTime( 'hh:nn:ss', Now );
end;
no i jest jeszcze jedna zasadzka, gdyby kto chciał to sobie na przykład na Raspberry PI skompilować (bo Lazarus/FPC na tym też chodzą),
że w dosh.inc jest kompilacja warunkowa i taka rewitalizacja będzie wymagała także kompilacji warunkowej tej aplikacji, albo zupełnego wyrugowania wszelkich dos-owych odniesień
dosh.inc pisze:Kod: Zaznacz cały
{$ifdef cpui386}
{Interrupt}
Procedure Intr(intno: byte; var regs: registers);
Procedure MSDos(var regs: registers);
{$endif cpui386}
całość w załączniku, moje zmiany skomentowane
-- edit --
aha i jeszcze drobiazg i łatwy to modyfikacji - względem nowego FPC wystąpił tam konflikt na poziomie słów kluczowych języka, jeden ze składników rekordu wariantowego IdentifierRecord został nazwany Class a to zastrzeżone dla składni Pascala, no więc siermiężne przemianowanie na Class_ pomogło, no to chyba wszystkie zmiany
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:przyznam szczerze, zupełnie przypadkiem w oko mi wpadła zerowa data i czas w listingach pod Linux i taka dziwaczna pod Win, w sumie to na takie drobiazgi nie zwracam uwagi;
Aż pomyślałem, że byłem nieuważny, jednak... jest to jakaś zagadka. Program był ćwiczony pod XP.
Kod: Zaznacz cały
forum microgeek.eu - assembler mikroprocesora 6800 . Data= 2017.06.17 Godz.= 00:30:15 Strona= 1
1 ;
2 ; **************************************************************************
3 ; * *
4 ; * *
5 ; * zbior instrukcji kompilatora assemblera mikroprocesora 6800 *
6 ; * *
7 ; * *
8 ; **************************************************************************
9 ;
10 ;
11 ; ustawienie licznika rozkazow
12 ;
13 storg equ 0f800H
14 org storg
15 ;
16 displ equ 5Ah
17 const equ 15h
18 size equ 10
19 lconst equ 10ffh
20 sconst equ 0010h
21 F800 2A2A2A2A2A TEXT1 defm '***** zestaw analizowanych instrukcji *****'
F805 207A657374
F80A 617720616E
F80F 616C697A6F
F814 77616E7963
F819 6820696E73
F81E 7472756B63
F823 6A69202A2A
F828 2A2A2A
22 F82B 2A2A2A2A2A TEXT2 defm '***** mikroprocesora 6800 (MOTOROLA) *****'
F830 206D696B72
F835 6F70726F63
F83A 65736F7261
F83F 2036383030
F844 20284D4F54
F849 4F524F4C41
F84E 29202A2A2A
F853 2A2A
23 ;
24 ;
25 ;
26 F855 START_LABEL
27 F855 space defs size
28 ;
29 F85F 1B ABA
30 ;
31 F860 8915 adc a,#const
32 F862 9910 adc a,sconst
33 F864 B910FF adc a,lconst
34 F867 A915 adc a,const,x
35 F869 C915 adc b,#const
36 F86B D910 adc b,sconst
37 F86D F910FF adc b,lconst
38 F870 E915 adc b,const,x
39 ;
40 F872 label1
41 F872 8B15 add a,#const
42 F874 9B10 add a,sconst
43 F876 BB10FF add a,lconst
44 F879 AB15 add a,const,x
forum microgeek.eu - assembler mikroprocesora 6800 . Data= 2017.06.17 Godz.= 00:30:15 Strona= 2
A tak przy okazji, bo popatrzyłem w twój kod (fragment procedury ReadInputFileName):
Kod: Zaznacz cały
(*$I-*)
reset ( InputFile ) ;
if ioresult <> 0 then
begin (* 2 *)
gotoxy ( 1 , 16 ) ;
write ( 'Podany zbior nie istnieje...nacisnij ENTER' ) ;
readln ;
gotoxy ( 1 , 16 ) ;
clreol ;
InputFileName := '' ;
NameKern := '' ;
end (* 1 *)
else
close ( InputFile ) ;
(*$I+*)
Normalnie w TP to oznacza wyłączenie/włączenie diagnostyki operacji plikowych [chodzi o (*$I-*) i (*$I+*)], czy pod FPC też to działa, to jest jakiś szerszy standard czy tylko lokalny wynalazek TP.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
gaweł pisze:Aż pomyślałem, że byłem nieuważny, jednak... jest to jakaś zagadka. Program był ćwiczony pod XP.
przepraszam, powinnam uściślić od razu - to się dzieje w aplikacji po skompilowaniu Lazarusem a nie w oryginalnej, z zip-a na forum, ta działa;
wspominałam dokumentację - wywołania dos w Laz. są...jakie są i to ma prawo anomalnie się zachowywać.
poza tym co zaznaczone, nic nie zmieniałam, w szczególności ReadInputFileName
a tak w ogóle, to FPC ma dość mocno rozbudowany zestaw do operacji dyskowych: https://www.freepascal.org/docs-html/rt ... tines.html więc przy porządnym portowaniu aplikacji na FPC powinno się takie triki z dyrektywami jak $I- etc, wyłapać i zastąpić dedykowanymi funkcjami bibliotecznymi ( tu: FileExists() ), tak myślę
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:przepraszam, powinnam uściślić od razu - to się dzieje w aplikacji po skompilowaniu Lazarusem a nie w oryginalnej, z zip-a na forum, ta działa;
wspominałam dokumentację - wywołania dos w Laz. są...jakie są i to ma prawo anomalnie się zachowywać.
poza tym co zaznaczone, nic nie zmieniałam, w szczególności ReadInputFileName
a tak w ogóle, to FPC ma dość mocno rozbudowany zestaw do operacji dyskowych: https://www.freepascal.org/docs-html/rt ... tines.html więc przy porządnym portowaniu aplikacji na FPC powinno się takie triki z dyrektywami jak $I- etc, wyłapać i zastąpić dedykowanymi funkcjami bibliotecznymi ( tu: FileExists() ), tak myślę
Nie ma powodu do przepraszania, po prostu iteracyjnie szukamy konsensusu, a twoje uwagi są cenne. To jedynie świadczy, że zmiana środowiska wnosi nowe wartości.
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
w ramach kontynuacji tematu Motoroli - takie oto klamoty wczoraj mi przypadły w udziale, zidentyfikowane układy za koleją:
UM6551A - uart (acia)
R6551 - od Rockwell
http://www.cselettronica.com/datasheet/UM6551.pdf
UM6522A - via (ppi)
http://www.vectrex.co.uk/files/datasheets/6522AP.pdf
MC6809P - cpu
HFBR-2524 - odbiornik linii światłowodowej
HFBR-1524 - nadajnik linii świadłowodowej
http://datasheet.octopart.com/HFBR-2524 ... 087547.pdf
AD708 - podwójny WO wysokiej precyzji
http://www.analog.com/media/en/technica ... /AD708.pdf
AD75002 - zgaduje, że podwójny 12 bitowy przetwornik C/A bo AD75004 to poczwórny, o:
http://www.analog.com/en/products/digit ... t-overview
no i jeszcze garść RAM i EPROM i innej drobnicy ogólnego zastosowania
odnośnie płytek z MC6809 - wyszło mi na to, że to popełnili ci państwo:
https://www.ekf.de/
https://www.ekf.de/ekf/profile/ekf_40jahre.pdf
więc zaczem owe płytki uzyskają nobilitujący status dawców organów to po weekendzie wykonam komunikację do tej firmy, a nuż coś mi podeślą o tych modułkach...
UM6551A - uart (acia)
R6551 - od Rockwell
http://www.cselettronica.com/datasheet/UM6551.pdf
UM6522A - via (ppi)
http://www.vectrex.co.uk/files/datasheets/6522AP.pdf
MC6809P - cpu
HFBR-2524 - odbiornik linii światłowodowej
HFBR-1524 - nadajnik linii świadłowodowej
http://datasheet.octopart.com/HFBR-2524 ... 087547.pdf
AD708 - podwójny WO wysokiej precyzji
http://www.analog.com/media/en/technica ... /AD708.pdf
AD75002 - zgaduje, że podwójny 12 bitowy przetwornik C/A bo AD75004 to poczwórny, o:
http://www.analog.com/en/products/digit ... t-overview
no i jeszcze garść RAM i EPROM i innej drobnicy ogólnego zastosowania
odnośnie płytek z MC6809 - wyszło mi na to, że to popełnili ci państwo:
https://www.ekf.de/
https://www.ekf.de/ekf/profile/ekf_40jahre.pdf
więc zaczem owe płytki uzyskają nobilitujący status dawców organów to po weekendzie wykonam komunikację do tej firmy, a nuż coś mi podeślą o tych modułkach...
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)
Re: [6809] modułowy system na bazie Motorola MC6809
tasza pisze:w ramach kontynuacji tematu Motoroli - takie oto klamoty wczoraj mi przypadły w udziale, zidentyfikowane układy za koleją:
UM6551A - uart (acia)
R6551 - od Rockwell
http://www.cselettronica.com/datasheet/UM6551.pdf
UM6522A - via (ppi)
http://www.vectrex.co.uk/files/datasheets/6522AP.pdf
Katalog firmy UMC, miałem go w wersji papierowej i kilka lat temu oddałem na makulaturą (razem z kilkoma innymi). Strata niepowetowana... szkoda
Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse
Re: [6809] modułowy system na bazie Motorola MC6809
Tasza, ostatnio wpadła mi w ręce książka pt. Mikroprocesory Poradnik S.A.Money, wyd. WKŁ, wrzuciłem fotki spisu treści, jak byś coś potrzebowała to daj znać, zrobię skany.
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Re: [6809] modułowy system na bazie Motorola MC6809
Manual od kolegów z Motoroli
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.
Kto jest online
Użytkownicy przeglądający to forum: Obecnie na forum nie ma żadnego zarejestrowanego użytkownika i 5 gości