[6809] modułowy system na bazie Motorola MC6809

Kącik dla elektroniki retro - układy, urządzenia, podzespoły, literatura itp.
Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

[6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » piątek 02 cze 2017, 18:34

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
0_IMG_6854.JPG


1. płytka z procesorem
MC6809 - CPU :arrow: http://www.gbgmv.se/dl/doc/md09/MC6809_DataSheet.pdf
MC6821 - PIA :arrow: http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter)
MC6840 - PTM :arrow: http://liris.cnrs.fr/~mmrissa/lib/exe/f ... mc6840.pdf (programmable timer module)
1_IMG_6857.JPG


2. płytka z procesorem
stuff ten sam co powyżej, ale wykonanie i złączki jakby inne, może nowciejsza wersja?
2_IMG_6858.JPG


3. moduł komunikacyjny (tak sobie nazwałam roboczo)
MC6850 - ACIA :arrow: http://dev-docs.atariforge.org/files/MC6850.pdf (asynchronous communication interface adapter) x 4
MC1441 - :arrow: http://www.swtpc.com/mholley/Notebook/MC14411.pdf bit rate generator + czadowy stary kwarc
3_IMG_6855.JPG


4. moduł portów równoległych
MC6821 - PIA :arrow: http://www.pinballpcb.com/datasheets/Mot6821.pdf (peripheral interface adapter) x 2
4_IMG_6856.JPG


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ć)

Awatar użytkownika
phill2k
User
User
Posty: 272
Rejestracja: niedziela 18 paź 2015, 00:12

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: phill2k » piątek 02 cze 2017, 20:32

Super..., jak już wszystko poskładasz i uruchomisz to jest sofcik do sprawdzenia w działaniu :D
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.

Awatar użytkownika
phill2k
User
User
Posty: 272
Rejestracja: niedziela 18 paź 2015, 00:12

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: phill2k » piątek 02 cze 2017, 21:44

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ć.

6809-based microcomputer part 1.pdf

6809-based microcomputer part 2.pdf

6809-based microcomputer part 4.pdf

6809-based microcomputer part 5.pdf

i i nformacje z tej stronki http://www.microtan.ukpc.net/
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » sobota 03 cze 2017, 08:58

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 :arrow: 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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » środa 14 cze 2017, 23:34

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.

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:
TESTDATA.ZIP


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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » czwartek 15 cze 2017, 05:19

ale we środku jest tylko TESTDATA.LST, a przynajmniej tak mi Arc pokazuje
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » czwartek 15 cze 2017, 11:15

tasza pisze:ale we środku jest tylko TESTDATA.LST, a przynajmniej tak mi Arc pokazuje

:o nie ruzumiem, jak to się spakowało. Miało być wszystko z wyjątkiem TESTDATA.LST.
Już się poprawiam:
6800.ZIP
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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » czwartek 15 cze 2017, 20:45

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
______________________________________________ ____ ___ __ _ _ _ _
Kończysz tworzyć dopiero, gdy umierasz. (Marina Abramović)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » czwartek 15 cze 2017, 21:32

tasza pisze:narządko do kolekcji zebranych przydasiów na dziwne okazje

Znalazłem pół godziny temu innego przydasia, "książkę kucharską"
The MC6809 CookBook.pdf
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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » czwartek 15 cze 2017, 21:58

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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » piątek 16 cze 2017, 00:27

tasza pisze:no ja zaniemówiła teraz ...

Jeszcze trochę, a głos stracisz :lol:

Prawdziwe słowa nie są przyjemne. Przyjemne słowa nie są prawdziwe.
Lao Tse

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » piątek 16 cze 2017, 01:33

tasza pisze:oto kolejne narządko do kolekcji zebranych przydasiów na dziwne okazje; a w tle gra sobie Moonlight.
https://youtu.be/5Xs5H0AxB6Q

:o :o :o 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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » piątek 16 cze 2017, 09:15

gaweł pisze: :o :o :o 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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » piątek 16 cze 2017, 14:12

tasza pisze:nie no, luz, ja tylko tak wykazała rozanielenie nowym znaleziskiem,

:D

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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » piątek 16 cze 2017, 15:19

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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » piątek 16 cze 2017, 22:51

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

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » sobota 17 cze 2017, 00:36

6800 po liftingu (robi plik intel-hex).
6800-1.zip
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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » sobota 17 cze 2017, 19:09

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

skan-karta-86.png


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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » niedziela 18 cze 2017, 02:45

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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » niedziela 18 cze 2017, 06:09

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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » niedziela 18 cze 2017, 11:39

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

Awatar użytkownika
tasza
Geek
Geek
Posty: 1082
Rejestracja: czwartek 12 sty 2017, 10:24
Kontaktowanie:

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: tasza » piątek 03 lis 2017, 16:57

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
:arrow: http://www.cselettronica.com/datasheet/UM6551.pdf

UM6522A - via (ppi)
:arrow: http://www.vectrex.co.uk/files/datasheets/6522AP.pdf

MC6809P - cpu

HFBR-2524 - odbiornik linii światłowodowej
HFBR-1524 - nadajnik linii świadłowodowej
:arrow: http://datasheet.octopart.com/HFBR-2524 ... 087547.pdf

AD708 - podwójny WO wysokiej precyzji
:arrow: 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ć)

Awatar użytkownika
gaweł
Geek
Geek
Posty: 1259
Rejestracja: wtorek 24 sty 2017, 22:05
Lokalizacja: Białystok

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: gaweł » sobota 04 lis 2017, 11:18

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
:arrow: http://www.cselettronica.com/datasheet/UM6551.pdf

UM6522A - via (ppi)
:arrow: 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

Awatar użytkownika
phill2k
User
User
Posty: 272
Rejestracja: niedziela 18 paź 2015, 00:12

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: phill2k » sobota 04 lis 2017, 21:21

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.

M1.JPG

M2.JPG
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.

Awatar użytkownika
phill2k
User
User
Posty: 272
Rejestracja: niedziela 18 paź 2015, 00:12

Re: [6809] modułowy system na bazie Motorola MC6809

Postautor: phill2k » środa 08 lis 2017, 22:18

Manual od kolegów z Motoroli ;)

MC6809-MC6809E 8-Bit Microprocessor Programming Manual (Motorola Inc.) 1981.pdf
Nie masz wymaganych uprawnień, aby zobaczyć pliki załączone do tego posta.


Wróć do „Retro”

Kto jest online

Użytkownicy przeglądający to forum: Obecnie na forum nie ma żadnego zarejestrowanego użytkownika i 1 gość