Robotrontechnik-Forum

Registrieren || Einloggen || Hilfe/FAQ || Suche || Mitglieder || Home || Statistik || Kalender || Admins Willkommen Gast! RSS

Robotrontechnik-Forum » Technische Diskussionen » SCP auf K2521 + AMF K512X im Wait Betrieb? » Themenansicht

Autor Thread - Seiten: -1-
000
31.03.2010, 19:04 Uhr
holm

Avatar von holm

Ich hatte zu DDR zeiten an der TU einige K8913 zusammen mit 8Zoll Beistellern zu CP/M Rechnern umgebastelt. U.A. hatten unsere Institutssekretösen so ein Ding als Schreibmaschine stehen. Das SCP kam wohl mal Fertig irgendwo aus der Wilhelm Piek Uni in Rostock, hatte mein Chef mal da aufgegabelt und irgendwie handelte es sich bei dem Umbau um das Ergebnis einer Diplomarbeit, kam auch mit Urlade Eprom. Ich kann mich irgendwie noch dunkel erinnern, das da eine kleine zusätzliche Platine mit einem D174 drin war, die da die MEMDI Umschaltung bewerkstelligte. Jedenfalls waren die Sekretösen happy mit dem Ding, konnten ja Wordstar (TP) benutzen und hatten einen 1152 dran.

Weiß irgend Jemand noch was über eine solche Konfiguration? Gab es das SCP als Source?
Was für Rechner gibt es noch mit K2521 un CP/M ?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
001
31.03.2010, 19:35 Uhr
felge1966
Default Group and Edit


Irgendwie hört sich das nach einem Nachbau eines K8915 (alte Bauform) an. Da gab es doch eine Version mit einer K2521.
http://www.robotrontechnik.de/html/computer/k8915.htm
--
http://felgentreu.spdns.org/bilder/jacob120.gif

Dieser Beitrag wurde am 31.03.2010 um 19:38 Uhr von felge1966 editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
002
31.03.2010, 20:23 Uhr
holm

Avatar von holm

Hmm, da könntest Du Recht haben, allerdings ist der K8915 hier augenscheinlich mit einem Gefäß für 7 Slots bestückt, was dazu führt, das noch Erweiterungsplätze frei sind. Die 5er Einschübe waren gerammelt voll.

Dann hääte ich mal 2 Fragen in die Runde:

Gab es in diesen "alten" K8915 auch eine Zusatzplatine für die MEMDI Umschaltung drin ist.

Gibts das SCPX noch irgendwo?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
003
31.03.2010, 20:36 Uhr
felge1966
Default Group and Edit


der Inhalt der ROMs und die Systemdiskette würden mich auch interessieren.

Gruß Jörg
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
004
31.03.2010, 21:26 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Was für Rechner gibt es noch mit K2521 un CP/M ?

PRG700, PRG710 und Audatec IBE.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
005
01.04.2010, 12:19 Uhr
felge1966
Default Group and Edit


Das SCPX des K 8915 (SCPX 8915 BIOS-Version 5.2) habe ich, der Inhalt der zugehörigen ROMs http://www.robotrontechnik.de/html/software/scp.htm#scp8 wird noch gesucht.
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
006
01.04.2010, 12:51 Uhr
holm

Avatar von holm

Hmm, Du hast jetzt aber den Link auf die neue K8915 Version gesetzt, die hat ja völlig andere Karten.

Ich frage mich halt nur, ob aus dem alten Schraddel der hier herumliegt noch was Brauchbares zu machen ist und brauchbar wird es erst mit einem CP/M.
Nach der K8915 Seite hier würde ich "SCPX 0/2 BIOS-Version G3.2" benötigen und die ROMinhalte aus diesem alten K8915 der mit K2521, K3528, K7028, K7024 und K5122 bestückt ist.
Da müßte sich also mindestens ein Eprom auf der ZRE K2521 finden. Auf der Webseite steht ja auch das noch ein existierendes Gerät bekannt ist...

Alternativ müßte man wissen was die in den PRGs so für Schweinereien getrieben haben (Schaltpläne, Roms..) was auch nicht uninteressant wäre, da ich ja noch die komische EFE7x0 habe.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 01.04.2010 um 12:53 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
007
01.04.2010, 13:02 Uhr
DL
Default Group and Edit


auf ner Diskette eines K8915 hab ich mal ein File Namens anflad.rom gefunden, keine Ahnung, ob das hilft...
@holm, habs dir mal geschickt
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
008
01.04.2010, 13:05 Uhr
felge1966
Default Group and Edit


In dem aufgeführten K8915 http://www.robotrontechnik.de/index.htm?/html/computer/k8915.htm ist doch alles wie im alten (außer der K7028.30). Die Schaltungsunterlagen des ganz neuen K8915 habe ich mal irrgendwo runtergeladen (u.a. die Schaltung der K7028.30).

@rüdiger
hast du Kontakt zu dem Besitzer des alten K8915 (Die 8-Zoll-Version)?
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
009
01.04.2010, 13:10 Uhr
felge1966
Default Group and Edit


@holm

ich habe dir mal ein paar Sachen dazu geschickt, hoffentlich gibts bei dir mit dem Spammfilter kein Problem (habe den Betreff vergessen).

Gruß Jörg
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
010
01.04.2010, 14:03 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Auf der Webseite steht ja auch das noch ein existierendes Gerät bekannt ist...

Und den hat Ernst Benser.
Seine EPROMs sind noch nicht gesichert.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
011
01.04.2010, 14:04 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
felge1966 schrieb
hast du Kontakt zu dem Besitzer des alten K8915 (Die 8-Zoll-Version)?

Ja. Auch dessen EPROMs sind noch nicht gesichert.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
012
01.04.2010, 14:20 Uhr
holm

Avatar von holm

Aber dann wird es langsam höchste Zeit. Ich habe ständig Karten bei denen diei EPROMs alle sind. Interessanterweise hatte ich jetz auf Xaars K5122 einen ROM (U505) bei dem verschiedene BITs 1 geworden sind. BTW: Es scheint so, als ob auf der AMF5120, AMF5122 und im PC1715 die selben Bitmuster als Schreib und Leserom gebrannt sind, jeweils 068 und 069.

Das unterstützt meine These, das der PC1715 FDC im Wesentlichen eine AMF5122 im WAIT Betrieb ist.

@Felge: Spamassassin hat Dich promt aussortiert und in dem Müll geschmissen, ich hole Dich dai wieder raus..

@Detlef: ich habs schon als Mail geschrieben: normalerweise ist das zu viel für die 3K Eprom
der K2521. Ich werde heute Abend mal Rezilog draufansetzten...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 01.04.2010 um 14:23 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
013
01.04.2010, 14:31 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Aber dann wird es langsam höchste Zeit.

Höre ich da einen Vorwurf?
Halberstadt liegt nicht gerade auf meiner Fahrstrecke...
--
Kernel panic: Out of swap space.

Dieser Beitrag wurde am 01.04.2010 um 14:41 Uhr von Rüdiger editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
014
01.04.2010, 14:50 Uhr
DL
Default Group and Edit


@holm, ja, hast recht, evtl. hat man da ein Stück RAM mit ausgelesen, am Ende der 3K ist ja alles 00...
Kann ja auch von sonst was stammen, auch wenn es auf ner Disk vom K8915 war
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
015
01.04.2010, 16:06 Uhr
holm

Avatar von holm

@Rüdiger: klar doch!

:-)

Halberstadt hin oder her, was ist denn das für ein Mensch der die Roms nicht alleine ausbauen und als Paket (!) durch die Gegend schicken kann?

Man sollte ihm mal klar machen das das Risiko die Kiste tot vorzufinden von Tag zu Tag quadratisch zunimmt ...

@DL... schon klar, Felge hat mir was Ähnliches mitgeschickt, ich schaue mir das noch genauer an. Momentan bin ich im Lager und habe den Monitor aus Felges K8915 Gehäuse wieder in Ordnung gebracht (Nein Rüdiger, nun sind keine Zeilentrafos mehr da.. :-) ) Einen 5er Rahmen von Günther eingebaut uns Saft drauf gegeben... es leuchtet jetzt grün, gewissermaßen grünt es ziemlich grün. Jetzt muß ich mir überlegen was ich machen will, K2521 oder K2526. Warscheinlich wird es das Experiment mit der K2521 werden, einen laufenden K8924 habe ich ja noch zu Hause.

BTW: hat noch Jemand eine kaputte K5122 auf Halde die er mir abtreten könnte?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
016
01.04.2010, 21:34 Uhr
DL
Default Group and Edit


die Sache wird interessant, hab grad mal meine Reserven gesichtet, hab da auch noch einen halben K8912, fehlt aber wieder eine Tastatur...
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
017
02.04.2010, 05:16 Uhr
ambrosius



Kaputte K5122 kannst Du zwei Stck von mir haben, aber leider nicht sofort

mfg
Holger
--
viele Grüße
Holger
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
018
02.04.2010, 09:22 Uhr
holm

Avatar von holm

Das währe mehr als ok Holger :-)


Ich bin gestern nicht zu Rezilog gekommen, habe erst mal (bis ca. 1.40 Uhr) in Rüdigers C-Compiler herumgestochert und immernoch kein Compilat... wird aber..

Gruß,
Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
019
02.04.2010, 15:01 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Halberstadt hin oder her, was ist denn das für ein Mensch der die Roms nicht alleine ausbauen und als Paket (!) durch die Gegend schicken kann?

Die EPROMs meiner Recher habe ich natürlich gesichert. Zumindest wenn sie gesockelt sind.
Die Eingelöteten sind nach wie vor ein Problem, z.B. mein unikater Plotter mit 20 gelöteten 2716...

Anderen Leuten diese Problematik nahe zu bringen ist nicht ganz einfach.
Es gibt z.B ein Computermuseum in Deiner Gegend, das mehr Angst davor hat, dass beim Auslesen irgendwas kaputt geht, als vor einem schleichenden EPROM-Tod seiner Unikat-Geräte.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
020
02.04.2010, 17:38 Uhr
holm

Avatar von holm

Das war auch kein Vorwurf gegen Dich, abgesehen das auf keiner mir bekannten K2521 die EPROMs eingelötet sind.

Für Solche Massenaktionen beim Auslöten gibts im Prinzip nur 2 Lösungen:

1. Nachgucken wie man den Rechnerbus anzapfen kann (BUSRQ?) und mittels externen Rechner auslesen. Dazu reichen 2 PIOs und ein Basic Programm. Evtl. geht das auch mit einer auf die CPU
gesetzten 40 poligen Adapterklammer.

2. Platine ausbauen und Heißluftpistole, dann mit neidrigen Temperaturen anfangen und flächig erwärmen. Das evtl. Lack braun wird muß man in Kauf nehmen oder man riskiert den Totalverlust.

Was ist das für ein komischen Computermuseum?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
021
02.04.2010, 17:48 Uhr
holm

Avatar von holm

Mal zurück zum Thema:

Felge, die Dateien die Du mir geschickt hast, enthalten wirklich auch die Schaltpläne der neuern Version des K8915 mit längernen Karten etc. Das wird für den von mir avisierten Zweck nicht so recht brauchbar sein, da die Hardware eben völlig anders aussieht.

Die K2521 verfügt on Board über keinen Urlademechanismus. Es bleibt also nur, die ROMS in einen Speicherbereich zu kopieren der oberhalb des K2521 Bereieches liegt (0x1000), diesen Bereich anzuspringen, von dort aus auf den DRAM ab 0 zu kopieren, den Speicher der K2521 abzuschalten und dafür den Hintergrundspeicher ein. Dazu muß abhängig von Lese oder Schreibbetrieb der Hintergrundspeicher aus- bzw. eingeschaltet werden. Dazu braucht man etwas Adreßdecode, ein Flipflop das nach Reset wieder zurück kippt und die Auswertung des /RD Signals (/WR ist zu spät dran). Waren in den alten K8915 derartige Schaltungen enthalten und waren die irgendwie extern aufgebaut? Mir ist keine Einsteckkarte bekannt mit der sich das mit "Boardmitteln" realisieren ließe...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
022
03.04.2010, 09:46 Uhr
felge1966
Default Group and Edit


Zur Umschaltung könnte eventuell das /MEMDI Signal genutz worden sein, denn die ABS wird im K8915 neu ja zusätzlich mit /MEMDI1 gesteuert (ist in der Übersichtsschaltung ersichtlich)
--
http://felgentreu.spdns.org/bilder/jacob120.gif

Dieser Beitrag wurde am 03.04.2010 um 09:46 Uhr von felge1966 editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
023
03.04.2010, 13:21 Uhr
holm

Avatar von holm

Ja klar Felge. Darauf läuft es sowieso hinaus.
Ich meine nur, wo wiurden die /MEMDI Signale gerneriert (externe Platine?)

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
024
03.04.2010, 14:36 Uhr
holm

Avatar von holm

Ich habe mal in Dein anflad.rom file reingelukt Detlef, da werden komische EA Adressen befeuert.

Wenn da eine K2521 drin ist, dann liegt deren IO Bereich zwischen 80h und 087h.
Eine ATS liegt normalerweise in der 50er Gegend. Eine K5122 liegt normalerweise bei 10h-17h.

Was ich gar nicht kenne ist die AFS K5121 die möglich wäre (hat Jemand verwertbare Doku?)

Dein Anfangslader kümmert sich als aller erstes um die Adressen A8,E2,E4,E0,B1 in dieser Reihenfolge. hat Jemand ne Idee? Des Weiteren scheint der Lader von einem Bildschirm 64x16 auszugehen, unterhalb FC00 geht der Stack los...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 03.04.2010 um 14:37 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
025
03.04.2010, 14:52 Uhr
Enrico
Default Group and Edit



Zitat:
holm schrieb
Was ich gar nicht kenne ist die AFS K5121 die möglich wäre (hat Jemand verwertbare Doku?)

Dazu habe ich nur die techn. Beschreibung, keinen Plan.
Wenns hilft?

Zitat:
Dein Anfangslader kümmert sich als aller erstes um die Adressen A8,E2,E4,E0,B1 in dieser Reihenfolge. hat Jemand ne Idee? Des Weiteren scheint der Lader von einem Bildschirm 64x16 auszugehen, unterhalb FC00 geht der Stack los...

Gruß,

Holm

Ich dachte zuerst, es wäre die RADE.COM RAM-Floppy, die hat aber andere
I/O-Adressen. Es sei denn, die hätten da mal ewas geändert. Ich habe ja den neuen K8915.
--
MFG
Enrico
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
026
03.04.2010, 14:58 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
abgesehen das auf keiner mir bekannten K2521 die EPROMs eingelötet sind.

Akzeptierst Du das als Beweis?

--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
027
03.04.2010, 15:31 Uhr
DL
Default Group and Edit


@Holm, wenn ich mir so den anderen Kram auf der Diskette ansehe, scheint dies auch von einer HD-Version zu stammen, war dann wohl wieder mal nix....
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
028
03.04.2010, 17:00 Uhr
holm

Avatar von holm

@Rüdiger: Nö!
Hinterhältig wie Du bist, hast Du die Epromfassungen ausgelötet und billige Pollinchips eingelötet, nein sowas ...

Aber das Ding läßt sich problemlos auslesen ohne einen Lötkolben anzufassen und zwar über den Bussteckverbinder. Mit einem gebastelten Adapter sicher auch aus einem anderen K1520 System. Man könnte z.B. eine höheres Adreßbit negieren, /BUSRQ an das Ding anlegen
aund von Außen lesend drauf zugreifen. Kein unlösbares Problem, aber ich schätze mal Du weißt eh was da drauf ist.

@DL: Na ich werde mal weiter gucken. Die IO Adresse A8 scheint für die Speicherumschaltung eine zentrale Rolle zu spielen. Wenn wir nix finden, ist das im Endeffekt warscheinlich auch nicht sooo schlimm. Ich muß mal in den neueren CP/A Sourcen herumgraben, da taucht erstens eine K2521 mit auf und 2. läuft das ja auch auf dem 1715 der wie ich es schon angedeutet hatte IMHO eine der K5122 sehr ähnliche AMF hat. Ich glaube nicht, das die Robotroner ständig alles neu erfunden haben.

Die diese Ladermimik aus Deinen File scheint übrigens den BWS als Zwischenspeicher zu nutzen,
ein Stück des Laders wird dort hin reloziert, d.h. die Blenden den BWS warscheinlich nicht aus
aber dafür die 64K Ram. Irgendwie laufen auch PIO und CTC Tests am Anfang, mal gucken ob ich da Adressen zuordnen kann. Hier mal ein paar Brösel aus den Dumps, evtl. hat Jemand schon mal sowas wo gelesen. Eine Fehlermeldung betreffs Harddisk oder so habe ich aber nicht gefunden..


Quellcode:
0300  13017F07 3620EDB0  C9ED5B6E FF010300  *....6 .. ..[n....*
0310  EDB02143 FFED5B6C  FF0E0AED B0C9D921  *..!C..[l .......!*
0320  E0010100 0010FE2B  E5ED42E1 20F7D9C9  *.......+ ..B. ...*
0330  3CFBED4D 524F4D52  414D492F 4F4B4559  *<..MROMR AMI/OKEY*
0340  43544344 4941474E  4F535449 4320454E  *CTCDIAGN OSTIC EN*
0350  5445523A 204C4144  4552202F 204F4646  *TER: LAD ER / OFF*
0360  3A205A59 4B4C2E20  00107F17 40177017  *: ZYKL.  ....@.p.*
0370  75174820 20202020  20202048 0A009001  *u.H         H....*
0380  50002700 01002701  54002900 28002701  *P.'...'. T.).(.'.*
0390  55004F00 01004F01  55002700 28002901  *U.O...O. U.'.(.).*
03A0  54002700 010027FF  EF123F00 3E004F12  *T.'...'. ..?.>.O.*


0430  00103620 545D1301  7F07EDB0 3EB0CD07  *..6 T].. ....>...*
0440  092A2043 6F6C6473  74617274 202A2020  *.* Colds tart *  *
0450  4469736B 206F6E20  413A2072 65616479  *Disk on  A: ready*
0460  20BFAFCD 8404E9D3  10CBBFD3 10CBFFD3  * ....... ........*
0470  103E0D06 BC10FE3D  20F9C93E FBD3103E  *.>.....=  ..>...>*


06B0  160C2100 0C010110  11FFFFCD E0087AB3  *..!..... ......z.*
06C0  CA5D07CD 7B043E60  CD07094E 6F207379  *.]..{.>` ...No sy*
06D0  7374656D 20646973  6B2C2063 68616E67  *stem dis k, chang*
06E0  65206469 73EBC38B  05DB1600 00000000  *e dis... ........*

0830  28363EB0 CD07094C  6F616469 6E672063  *(6>....L oading c*
0840  6F6D706C 6574652C  20726570 6C616365  *omplete,  replace*
0850  20646973 6B206279  20707265 76696F75  * disk by  previou*
0860  73206469 73EB1830  3A0A0CA7 282A3EB0  *s dis..0 :...(*>.*
0870  CD07094C 6F616469  6E672063 6F6D706C  *...Loadi ng compl*
0880  6574652C 20726570  6C616365 20737973  *ete, rep lace sys*
0890  74656D20 646973EB  2A020C3A 120CC921  *tem dis. *..:...!*

Gruß,

Holm


Momomomoment!
Hatte ich nicht geschrieben K3528? Dieses elende Ding das im Bürocomputer nur unzuverlässig läuft? Das Ding mit dem 8212 als Ausgaberegister mit dem man 16K-weise den Speicher ein und ausschalten kann?

*grin*

Müssen wie doch mal in die Unterlagen gucken..

Jetzt ist der Zeitpunkt, an dem ich wirklich mal gute Fotos von den Platinen eines solchen alten K8915 sehen wollen würde..

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 03.04.2010 um 17:12 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
029
03.04.2010, 18:28 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
@Rüdiger: Nö!
Hinterhältig wie Du bist, hast Du die Epromfassungen ausgelötet und billige Pollinchips eingelötet, nein sowas ...

Und sogar eine Schwallötanlage zugelegt. Siehst Du mal, was ich für einen Aufwand treibe, um Dich zu täuschen:
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
030
03.04.2010, 18:38 Uhr
holm

Avatar von holm

Naja logisch, ich sach doch Du bist hinterhältig :-)

Die Adressen von E0-FF scheinen von einer ATS K7028 belegt zu sein. 80-83 ist auch klar,
das ist der CTC der ZVE. Dann ulpert irgend was bei B1 herum, muß mal weitersuchen ob ich
da noch den FDC herausbekomme.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
031
03.04.2010, 18:49 Uhr
DL
Default Group and Edit


ein Stück vom PROM kopierts hoch nach FD00 und 1000-177f ist Bildspeicher, da schreibts DIAGNOSTIC ROM und die letzten 3 Bytes von den 3 PROMS ist die Prüfsumme, dann ist mir ZSIM abgekippt

bis hierhin kommt mir das irgendwie vom K8912 bekannt vor

so etwa ab 0x470 sieht es nach Diskette aus, das scheint gar nicht hochgeladen zu werden

Dieser Beitrag wurde am 03.04.2010 um 20:14 Uhr von DL editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
032
04.04.2010, 18:47 Uhr
holm

Avatar von holm

Hmm, der BWS ab 1000 währe für CP/M aber sehr sehr unangenehm, da glaube ich noch nicht so recht dran. Das läge ja mitten im TPA.
Du hast Recht ab 470 sieht es nach Diskettenarbeit aus, auf den für die AMF5120 und 5122 üblichen Adressen (10h...). Das kann auch ruhig bei 400h herumhängen, es ist ja nur der primäre Loader, der zum Ladezeitpunt schon im RAM liegen müßte (umkopiert). Dieser holt normalerweise nur den sekundären SCP Loader von der Diskette der dann seinerseits das CP/M selbst lädt. Evtl. wird auch ein Ladeschritt ausgelassen und die ROMs holen direkt das CP/M in den Hauptspeicher dessen BIOS sich dann um die Diskettenarbeit kümmert und den Loader auf 400 überschreiben kann..
Interessant wäre zu wissen, wei die K3528 bewickelt ist und welche MEMDI Signale von ihr generiert werden. Auf alle Fälle scheint dieser Anfangslader für die alte Hardware gemacht zu sein, man bräuchte jetzt nur noch ein Diskimage was da drauf funtkioniert.
Ich weiß auch nicht, ob sich 8Zoll Versionen von den 5,25 unterscheiden, vermute aber das die auch mit 26x128 in den Bootspuren arbeiten, die restliche Geometrie dürfte ja SCP Sache sein..

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
033
05.04.2010, 16:23 Uhr
felge1966
Default Group and Edit


@holm

mit deiner Adresse der K7028.10 könntest du übrigens richtig liegen, denn die im K8912 mußte ich damals in meinem Umbau (allerdings mit K2526) im CP/A87 umprogrammieren. Ich denke, daß sie bei Exh lag.

Die Bildschirmsteuerung (K7024) hatte ich damals nicht modifiziert.

Eventuell kann ja Enrico mal Licht ins Dunkle mit den Adressen bringen - er hat doch wenn ich mich richtig erinnere einen K8915?
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
034
05.04.2010, 16:53 Uhr
Enrico
Default Group and Edit



Zitat:
felge1966 schrieb

Eventuell kann ja Enrico mal Licht ins Dunkle mit den Adressen bringen - er hat doch wenn ich mich richtig erinnere einen K8915?

Ja, ich habe den neuen mit Platte, nicht den alten.
Wo da der Unterscheid ist,weis ich nicht.
Anhand von Dokus hatte ich zu dem aber mal was zusammengefieselt.
--
MFG
Enrico
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
035
05.04.2010, 20:12 Uhr
holm

Avatar von holm

Naja, ich habe jetzt hier mal eine K3528 rausgesucht von der ich weiß das sie mit einer K2526 nicht vernünftig zusammen arbeitet (man kann die so wickeln, das die 4 Bänke ständig aktiv sind).
Irgendwas beißt sich da am Timing, ich kenne das aus DDR Zeiten mein privater 5120 damals (sah anders aus) hatte auch eine 3528 die ich mal nackig bekommen hatte. Ich habe dort ziemlich mit dem Timing rumhampeln müssen ehe das funktionierte. Das Problem waren die M1 Zyklen die ja bekanntlich etwas kürzer sind. Die Karte die ich hier habe ist eine Originale mit K565RU6, die funktioniert, Speichertests laufen durch aber nur mit Eine K2526 läuft sie nicht vernünftig.
Eine K2521 habe ich da, eine K7204 habe ich gerade für Xaar repariert, eine K5122 auch aber die hat eingelötete Brücken. Die 5122 in meinem K8924 hat Wickelstifte. Einen 5er Rahmen mit einer ATS drin habe ich wie eine K7634 auch. Ich werde mal experimentieren, schließlich sind die Wickelverbindungen auf der K3528 noch eine Herausforderung. Hat Jemand ein Diskimage von SCPX in der 5,25 Zoll Version?

Gruß,
Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
036
05.04.2010, 21:20 Uhr
Enrico
Default Group and Edit



Zitat:
holm schrieb
Hat Jemand ein Diskimage von SCPX in der 5,25 Zoll Version?

Hab gerade gesehn, dass ich da ein SCPX 5.3 da habe.
Das könnte das richtige sein.
Für meinen Neuen ist es ja SCPX 8.3

UHW?
--
MFG
Enrico
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
037
05.04.2010, 21:44 Uhr
felge1966
Default Group and Edit


Das ist aber auch schon für die Version mit der neuen CPU Karte
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
038
05.04.2010, 21:58 Uhr
Enrico
Default Group and Edit


schade
--
MFG
Enrico
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
039
05.04.2010, 22:52 Uhr
holm

Avatar von holm

HW!
Gucken was drauf ist...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
040
06.04.2010, 13:55 Uhr
holm

Avatar von holm

@Enrico:
Ich habe noch nicht auf die Diskette geguckt, aber ich habe mal im CP/A gestöbert und zwar in der 89er Version die Du glaube ich mir ma lgeschickt hattest (?)..

Es gibt da im bios.mac diverse Vereinbarungen für z.B. die CPU, die Bildschirmkarte und den FDC.
Ich habe jetzt mal versucht das Ding mit K2521 K5120 und K7024 zu übersetzen, der spuckt 2 undefinierte Symbole aus, aber das ist nicht das Problem, das könnte man fixen.

Er kommt aber mit einer Linkanweisung wie die hier : linkmt @os=cpmbas,ccp,bdos,x:bios/p:

Da steht cpmbas, nicht cpabas. Ich habe mal danach gesucht und in biosnuc.mac das hier gefunden:


Quellcode:
.printx * Link-Anweisung:
@diff   aset    tpaend-5-80h-ccpln      ;CCP beruecksichtigen
  IF (cpu eq k2521) and (fdc eq K5126)
  printh  <linkmt @oso=cpobas,ccp,bdos,x:bios/p:>,@diff
  ENDIF
  IF (cpu eq k2521) and (fdc ne K5126) and (dev eq oem)
  printh  <linkmt @os=cpmbas,ccp,bdos,x:bios/p:>,@diff
  ENDIF
  IF (cpu eq k2521) and (fdc ne K5126) and (dev eq K8915)
  printh  <linkmt @os=cpubas,ccp,bdos,x:bios/p:>,@diff
  ENDIF
  IF cpu eq k2526
  printh  <linkmt @os=cpabas,ccp,bdos,x:bios/p:>,@diff
  ENDIF
  IF cpu eq c1715
  printh  <linkmt @os=cppbas,ccp,bdos,x:bios/p:>,@diff
  ENDIF
.printx * mit x = Zielgeraet fuer bios.erl-File
endif

das heißt, das Ding kennt abhängig von der Hardware unterschiedliche Lader, für die K2526
cpabas, für PC1715 cppbas, für den alten K8915 mit K2521 cpubas und für anderen Kram
mit K2521 und nicht K2526 (was ist das für eine Karte, nie gesehen) cpmbas.


@All:

Traurigerweise befindet sich in meiner "Distribution" nur das cpabas.erl File, hat Jemand vielleicht die anderen Dateien, cpubas wäre hier wichtig......???

Bitte Alle mal gucken..


Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 06.04.2010 um 13:56 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
041
08.04.2010, 09:49 Uhr
felge1966
Default Group and Edit


Ich habe auf einem Diskettenimage (01_800.TD0) was ganz interessantes gefunden. Es scheint sich dabei um das gesuchte zu handeln (3 Eproms a1KByte) und ein Systemfile (@sys5122.com). Eine Kennung sagt dazu K8914!.

Zusätzlich ist aber noch ein ROM File (karte16k.prm) mit drin - ob diese aber erforderlich ist????
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
042
08.04.2010, 10:16 Uhr
felge1966
Default Group and Edit


Inzwischen habe ich auch noch passende Quelltexte gefunden und an holm geschickt. Eventuell kann er ja damit was anfangen. Es geht auf jeden Fall expliziet um CPM mit K2521 und K5122 (und K7024+ K7028).
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
043
08.04.2010, 12:55 Uhr
felge1966
Default Group and Edit


Das Rätsel der /MEMDI1 und /MEMDI2 Erzeugung ist jetzt auch gelöst. Die Signale werden durch die PIO der ZRE K2521 erzeugt. Diese ist dann auch zuständig für das Abschalten des Lade-ROM (der liegt auf PIO-A0).

Folgende Adresslagen gibt es:

ZRE - /MEMDI1 - 0000h PIO A0
RAM - /MEMDI1 - 0000h PIO A1
RAM - /MEMDI1 - 4000h PIO A1
RAM - /MEMDI1 - 4000h PIO A2 (Hintergrundram)
---------------------- PIO A3
ABS - /MEMDI1 - 8000h PIO A4
RAM - /MEMDI2 - 8000h PIO A5
RAM - /MEMDI - C000h PIO A6
---------------------- PIO A7

ATS K7028 Port e0-ffh
AMF K512x Port 10-2fh


Die Quellen stammen übrigens von einer Diskette hier aus dem Forum.

Gruß Jörg
--
http://felgentreu.spdns.org/bilder/jacob120.gif

Dieser Beitrag wurde am 08.04.2010 um 12:55 Uhr von felge1966 editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
044
08.04.2010, 13:55 Uhr
holm

Avatar von holm

Hab erst mal Dank. Ich schaue mir das an, sobals ich wieder etwas Zeit habe. Derzeit muß ich erst mal Geld verdienen, aber ich denke übers WE ist spätestens Zeit dafür.

Ich habe nur mal kurz in die Quellen geschüffelt, die haben da was Anderes gebaut als das alte SCP für den K8915 und warscheinlich das CP/A unterstützen, d.h. die Memory Umschaltung funzt anders. Es wird auch eine AKB für Kassetten als Laufwerk unterstützt. Das Ganze stammt von
Manfred Krzikalla, genannt "Manfred der Unaussprechliche" von der Humbug Nervosität in Berlin.
Es werden derzeit maximal 2 Seitige 40 spurige Floppies unterstützt, da müßte man den Urlader und die DPHs patchen, schaunmermal.. Ich glaube ich habe das schon mal wo laufen sehen, das meldet sich so:

"52k CP/M 2.2 vom 08.10.1986 (M. Krzikalla)"

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
045
11.04.2010, 16:38 Uhr
holm

Avatar von holm

Ich habe mich heute mal über denoben genannten Kram gesetzt und etwas durchgeschnüffelt

das ist der Inhalt der Diskette:


Quellcode:
bios2710.mac    fl.mac          lflo200.rom     mrsuni-1.rom    @syscpt2.com     zre2.rom
ci.mac          it.mac          lo.mac          mrsuni-2.rom    td.mac          zre3.rom
co.mac          km.mac          md.mac          pu.mac          um.mac          zreroms.rom
eq.mac          lflo200.mac     mrsuni-1.mac    ri.mac          zre1.rom

Bis auf die dateien zre1.rom,zre2.rom und zre3.rom, dabei handelt es sich lediglich um die zerhackstückte Datei zreroms.rom.

Der Manfred hat da ein ziemliches Ding gebastelt mit der Speicherumschaltung.


Quellcode:
; Speicherverteilung
;
; Kassettenroutine auf ZRE-Karte (mit PB0 geschaltet)
; ---------------------------------------------------
;
;  0000  ;  Anfangsmonitor                  0,5 k auf ZRE-PROM
;  0248  ;  Interruptsaeule Anfangsmonitor              "
;  0260  ;  KMB-BAMOS-Routine               2,5 k       "
;  0c00  ;                kasbu1-2          0,5 k auf ZRE-RAM
;  0e00  ;                MD-Arbeitssp.     0,25k       "
;  0ee4  ;                KMB-BAMOS-Arb.sp. 0,25k       "
;
; Hintergrundspeicher Verzeichnisse/CCP-Kopie (mit PB2 geschaltet)
; ----------------------------------------------------------------
;
;  4000  ;  ccpadr        CCP-Kopie         2,0 k weggeschaltet
;  4800  ;                dir1              2,0 k       "
;  5000  ;                dir2              2,0 k       "
;  5800  ;                dir3              2,0 k       "
;  6000  ;                dir4              2,0 k       "
;  6800  ;                dir5              2,0 k       "
;  7000  ;                dir6              2,0 k       "
;  7800  ;                kasbu3-6          1,0 k       "
;  7c00  ;                flobu1-4          1,0 k       "
;
; Bildschirm (mit PB4 geschaltet)
; -------------------------------
;
;  8000  ;  Bildschirm                      2,0 k weggeschaltet
;
; CP/M Arbeitsspeicher (0 und 4000 mit /PB1, 8000 mit PB5, c000 mit PB6 gesch.)
; -----------------------------------------------------------------------------
;
;  de00  ;  biosan        bios              8,5 k
;  d000  ;  biosan-0e00   bdos              3,5 k  =  12k
;  c800  ;  biosan-1600   ccp               2,0 k
;        ;                sim.disk
;   100  ;                tpa

d.h. er unterstützt augenscheinlich mehrere hinter dem Hauptspeicher liegende Speichersegmente wozu auch der Bildschirm gehört. In einem zusätzlichen 16K Speicherbereich hält er eine Kopie des CCP für der Warmstart, der dann einfach in den Hauptspeicher umkopiert wird. Er möchte 0-4000 mit /PB1 einschalten, 8000 mit PB5 und c000 mit PB6 der K2521 PIO.
Der Bildschirm wird mit PB4 umgeschaltet.

Das Ganze läßt sich auf der mir zur Verfügung stehenden Hardware nicht verwirklichen, das schreit gerade zu nach 5 einzelnen 16K RAM Karten und zumindest einer Art Patchwork auf einer K3526. Das Ganze läßt sich sicherlich relativ einfach umstellen auf eine K3528 (wenn diese denn funktioniert) aber ich habe in dem vorgesehenen 5er Einschub simpel keinen Platz für den ganzen Kram. Ich werde mich also nochmal nach der ollen SCP Variante und einem CP/A für meine Kiste umsehen, das CP/A kann ich bis auf das gesuchte cpubas.erl generieren, ma lsehen ob ich das File neu erfinden kann, immerhin muß man da in ein paar Bytes mit einer K5120/K5122 hantieren...

Manfred der Unaussprechliche hat aber dieverse goodies in sein CP/M gebastelt:

Quellcode:
;                   /           /
;   Krzikalla, M.   /27.10.1985 / folgendes wurde bearbeitet
;    HUB Berlin     /           /
; Sektion Mathematik/           /  Tastatur K7632/02, K7634/04 und K7636/06
;    Bereich IV     /           /    an ATS, ATD oder PIO;
;                   /           /    im Interruptbetrieb oder im Polling
;                   /           /  Tastatur K7637
;                   /           /
;                   /           /  Bildschirm 24*80 / 16*64 / 12*40 Zeichen
;                   /           /  (zur Laufzeit umschaltbar)
;                   /           /    - ADM31/ADM3A-kompatibel
;                   /           /    - SCP-kompatibel
;                   /           /    - SCP- und ADM31-kompatibel
;                   /           /
;                   /           /  Locher-Leser ueber ADA K6022
;                   /           /  Locher-Leser ueber ALB
;                   /           /
;                   /           /  Drucker SD1156/ASCII ueber ADA K6022
;                   /           /  Drucker SD1152/1157  ueber ATS K7028.10
;                   /           /  Drucker SD1152/1157-SIO zweibahnig
;                   /           /  Drucker SD1152/CENTRONICS ueber ATD
;                   /           /  Drucker SD1152/PIO        ueber ATD
;                   /           /  Drucker EPSON FX-80/RX-80 ueber ATD
;                   /           /
;                   /           /  KMB K5221 ueber AKB 5022
;                   /           /   geblockte Bedienung unter Verwendung
;                   /           /   der ROBOTRON-Routine vom 1.1.1981
;                   /           /
;                   /           /  8"-Floppy ueber AFS K5121
;                   /           /  5"-Floppy ueber AMF K5120/K5122 mit K2521
;                   /           /  5"-Floppy ueber AMF K5120/K5122 mit K2526
;                   /           /  5"-Floppy ueber AMF K5126
;                   /           /
;                   /           /  CP/M-RAM mit 4x16k RAM
;                   /           /  CP/M-RAM mit 1x64k OPS 3526.10
;                   /           /  CP/M-RAM mit 1x64k OPS 3527
;                   /           /  CP/M-RAM mit 1x64k OPS des ZWG
;                   /           /  CP/M-RAM mit 1x64k Test-RAM des IfR
;                   /           /
;                   /           /  sim. Disk im Hauptspeicher
;                   /           /  sim. Disk im Hintergr. mit K3526.10
;                   /           /  sim. Disk im Hintergr. mit K3527
;                   /           /  sim. Disk im Hintergr. mit OPS64/ZWG
;                   /           /  sim. Disk im Hintergr. mit Test-RAM des KEAW
;                   /           /  sim. Disk im Hintergr. mit OSS  des A5120/30
;                   /           /  sim. Disk im Hintergr. mit 256k des A5120.16

Wer also genug Platz im Einschub hat kann das gerne mal antesten. Das Bios läßt sich übersetzten und mit CCP und BDOS linken, was fehlt ist natürlich wieder dieser Lader analog dem cpubas.erl file vom CP/A. Es ist allerdings als Objektcode in der Datei @syscpt2.com enthalten, welche einem @os.com entspricht. Freilich fehlen ein Programm zum formatieren von Disketten und eins um die Systemdateien zu übertragen...

Es wäre schön wenn noch emand sachdienliche Dinge auf alten Disketten auffinden würde..

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
046
12.04.2010, 13:43 Uhr
holm

Avatar von holm

Ich habe indessen mal das cpabas.erl disassembliert, d.h. nicht das File direkt sondern das was davon an einem CP/A @os.com zu finden ist. Bis auf ein augescheinlich kurzes totes Stück Code da drin ist klar was es macht. Schwieriger wird es mit dem Lader auf dem Bootspuren, der enthält nämlich ein komplettes BDOS um die Datei @os.com laden zu können, als BIOS benutzt dieses BDOS etwas "Leim " Code und die Services die der Bootloader der K2526 (Bitmuster 083) zur Verfügung stellt. Gibt es irgendwo eine Doku über diesen Laderom? Der muß doch spezifizierte Interfaces haben...? Kann da einer helfen?

Hier mal mein CPABAS.MAC File:


Quellcode:
title   CPABAS 2nd Loader
        name    ('CPABAS')
        .z80

EXTRN   BIOS
EXTRN   CCP
EXTRN   BIOSCE
DEFAULT equ     0004h           ; default Laufwerk


START:          ;0100
        LD      HL,CCPKOP-START+0100h   ;Offset CCP im File
        LD      A,(DEFAULT)     ; default Laufwerk nach A
        JR      LOADER
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        LD      HL,3800H ; 0xdeadbeef ?
        DI
        LD      A,(03FCH)
        LD      B,3
L0129:  RLCA
        JR      NC,L012E
        DJNZ    L0129
L012E:  LD      A,B
LOADER: DI
        LD      SP,CCP  ; Ladeadresse CCP, Stack abwaerts (0BD00h)
        PUSH    HL      ; Ofsett sichern
        AND     3       ; ausmaskieren der hoeheren Bits des aktuellen Laufwerks
        PUSH    AF      ; sichern
        LD      BC,1603H; Laenge CCP,BDOS+3 = 1603h
        ADD     HL,BC   ; 180h Ofsett dazu = 1783h
        EX      DE,HL   ; Adresse nach DE
        LD      HL,CCP  ; CCP Ladeadresse
        ADD     HL,BC   ; (0BD00h) + 1603h = 0D303h
        LD      BC,30H  ; Laenge fuer Ueberpruefung jungfrl. Start
LVERG:  LD      A,(DE)  ; Daten aus geladenem File
        INC     DE      ; erhoehen
        CPI             ; Vergleich A,(HL)
        JR      NZ,LJUNG; Nicht gleich, neu laden, jungfrl. Start
        LD      A,B
        OR      C
        JR      NZ,LVERG; 30h verglichen?
        POP     AF      ; ja identisch, restauriere akt. Laufw.
        SET     7,A     ; Flag setzten fuer nicht jungfrl. Start
        PUSH    AF
LJUNG:                  ; Neu laden
        IN      A,(0AH) ; Datenbort B ZVE PIO
        AND     0F6H    ; ausblenden Lade ROM und WAIT-ZVE2
        OUT     (0AH),A ; Standardverhalten herstellen
        LD      A,3
        OUT     (9),A   ; Interrrupts Kanal A ZVE PIO gesperrt
        OUT     (0CH),A ; Kanalreset aller CTC Kanaele der ZVE-CTC
        OUT     (0DH),A
        OUT     (0EH),A
        OUT     (0FH),A
        OUT     (11H),A ; Interrupts SteuerPIO der AMF gesperrt
        OUT     (13H),A
        LD      A,0FFH
        OUT     (18H),A ; Ruecksetzten des Signalregisters 8121 auf der AMF
        POP     AF      ; aktives Laufwerk zurueck nach A
        LD      DE,CCP  ; CCP Ladeadresse
        LD      HL,BIOSCE       ; Endadresse BIOS
        OR      A       ; Carry ruecksetzen fuer Subtraktion
        SBC     HL,DE   ; Subtraktion
        LD      B,H     ; umzuladende Laenge nach BC (03501h)
        LD      C,L
        POP     HL      ; Offset im File (Quelladresse CCP)
        LDIR            ; Umladen
        JP      BIOS    ; BIOS Kaltstart
        NOP
        NOP
        NOP
CCPKOP  equ     $       ; Hier Kopie des CCP
        END

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 12.04.2010 um 20:00 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
047
12.04.2010, 15:22 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Es wäre schön wenn noch emand sachdienliche Dinge auf alten Disketten auffinden würde..

Wonach soll ich suchen?
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
048
12.04.2010, 16:50 Uhr
holm

Avatar von holm

Wenn ich b ei CP/A bleibe (was wohl auf Grund seiner durch die Bios Quellen gegebenen Universalität das Beste wäre), dann nach Quellen bzw. Bestandteilen (REL oder ERL Files) CPABCGEN.COM und FORMAT.COM. Ansonsten SCP Versionen die auf der alten K8915 Architekur gelaufen sind bzw. irgendwelche Disketten die mit dem Zeug zu tun haben.
Wie soll ich das genauer erklären?

Genauso irgend welche Systemprogrammier-Unterlagen zum A5120/K8924 die evtl. die Bootrom Funktionalität beschreiben. Ich mache mich sonst mit dem Disassembler zur Feile...
Irgendwie setzt ja ein ganzes BDOS auf diesem Krempel in dem 1K Eprom auf.


Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 12.04.2010 um 16:54 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
049
12.04.2010, 17:14 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Wie soll ich das genauer erklären?

Dateinamen oder Inhaltspassagen daraus.
Ansonsten würde ich micht tot suchen.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
050
12.04.2010, 18:53 Uhr
holm

Avatar von holm

Gute Idee, dann disassembliere ich mich halt tot...

Hat noch Jemand Lust zu sterben? Das ist reichlich Arbeit für einen Einzelnen...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
051
12.04.2010, 20:36 Uhr
holm

Avatar von holm

Rüdiger suche mal nach CPABCGENs die nicht auf .com enden...

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
052
12.04.2010, 21:05 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Rüdiger suche mal nach CPABCGENs die nicht auf .com enden...

141 x CPABCGEN, leider alles .COM.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
053
18.04.2010, 20:03 Uhr
holm

Avatar von holm

Ich habe gestern mit Wilfried Dames (Mr. CP/A von der AdW der DDR) telefoniert, war ein sehr nettes Gespräch. Leider hat er den ganzen Kram (Quellen etc.) vom CP/A wärend einiger Umzüge restlos entsorgt, er will aber mit einem Ex Kollegen Kontakt aufnehmen von dem er hofft, das dieser noch Etwas davon hat. Er hat sich gefreut, das sich noch Jemand (ich habe ihn korrigiert mit "Viele") mit dem alten Kram befaßt. und will mal hier vorbei schauen, ich weiß nur nicht ob er sich hier melden wird. Die Webseite hat er jedenfalls notiert.

Dann noch was Anderes: ambrosius hat mir seinen Anfang des Dissasemblierens vom Laderom V.09 geschickt, ich habe indessen noch ein wenig drin herum gehäckselt korrigiert und ergänzt,
es ist aber noch genug Arbeit für weitere Interessenten vorhanden.

Unter der Annahme das Holger nichts dagegen hat (er ist jetzt nicht zu erreichen, in der Mail in der er mir das schickte hat er sich für die nächste Zeit abgemeldet) habe ich die Datei mal auf meinen Webserver geworfen damit andere mitspielen können. Holger ist genausowenig ein Geheimniskrämer wie ich, soweit glaube ich ihn zu kennen...

http://www.tiffe.de/Robotron/K1520/v.09.asm

Wenn Jemandem Programmsequenzen bekannt vorkommen oder Unterlagen benötigt werden, bitte melden.

Ins Besondere habe ich mangels Hardware und Erfahrungen mit der AKB K5020 NOCH keine Erfahrungen, auch recht wenig mit den FDCs K5120 und K5122. Ihr könnt Euch da also gerne mit auslassen..

Ich halte das für notwendig, um zusammen mit anderen vorhandenen Programmen einen Laderom für die ZVE K2521 zusammenzubasteln, die ja bekanntlich ohne DMA aber dafür mit Waitstates der SystemCPU arbeitet. Zusammen mit den vorhandenen CP/A Quellen kann man dann ein OS für solche Hardware basteln.

In den Bootsektoren des originalen CP/A für den Bürocomputer befindet sich ein "Behelfsbios" das aus etwas CP/A eigenen Code und besteht und ein BDOS. Das BDOS ist dazu nötig um das @os.com von irgendwo auf der Diskette laden zu können. D.h. irgend Jemand muß sich mit CP/M Filesystemen auskennen und das ist halt das BDOS. Das zu ladende @os.com ist ca. 14Kbyte lang und überschreitet damit die Möglichkeiten der beiden Bootspuren (26*128*2=6656 Bytes, eine Spur wird effektiv nur genutzt, also ca 3Kbyte Platz in einer Bootspur).

Das Laden funktioniert also wie folgt: 1. ROM im V.09 lädt die Bootspur nach 0x400. Wenn in 0x400 "SYL" steht, wird 0x437 angesprungen, das ist der sekundäre Lader mit dem BDOS.
Der lädt das File @os.com in den Hauptspeicher, reloziert den Code und springt dann das echte BIOS an. Das ist also ein 3 Stage Bootprozess...

Der sekundäre Lader (Programm in der Bootspur) benutzt Unterprogramme des V.09 ROMs, es währe also hübsch zu wissen was da wirklich läuft, auch für solche Faxen wie z.B. UDOS Kopierschutz..


Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 18.04.2010 um 20:08 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
054
20.04.2010, 09:30 Uhr
felge1966
Default Group and Edit


@holm
Ist dein ROM (v.09.asm) identisch mit dem standardmäßig eingelöteten Eprom (M083) auf der K2526? Das würde eventuell beim Verständnis helfen, denn im Servicehandbuch der K2526 ist die Arbeit des Lade-ROM sehr gut beschrieben.
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
055
20.04.2010, 12:39 Uhr
holm

Avatar von holm

Ja, der ist identisch und entweder mit v.09 oder Bitmuster 083 beschriftet.
Es gab noch eine ältere Version, die V.06, da kanne ich aber die Bitmusterkenzeichnung nicht.

Servicehandbuch? Meinst Du die Betriebsdokumentation?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
056
20.04.2010, 19:35 Uhr
felge1966
Default Group and Edit


Genau die Beschreibung (Betriebsdokumentation) hatte ich gemeint.

marko_oette hat auf seiner Seite auch einen K8915. Die SCP Version ist mit 4.4 auf jedem Fall älter als meine. Leider hat er keine Bilder des Innenlebens dabei.

http://fi3k1.dyndns.org/robotron/robotron%20K8915/Bilder/Bild04.jpg
--
http://felgentreu.spdns.org/bilder/jacob120.gif

Dieser Beitrag wurde am 21.04.2010 um 09:39 Uhr von felge1966 editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
057
23.04.2010, 13:51 Uhr
DL
Default Group and Edit


K2526 auf einmal,hab ich was verpasst?
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
058
23.04.2010, 14:40 Uhr
felge1966
Default Group and Edit


nee, du hast nichts verpaßt. Holm sucht nur nach einem Ansatzpunkt zum Verständnis des Laders. Mit der K2526 wäre ja alles zu einfach - CPA nehmen und geht.
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
059
23.04.2010, 14:46 Uhr
Rüdiger
Administrator
Avatar von Rüdiger

@Holm: Warum nimmst Du nicht einfach das SCP1526/710? Das dürfte Deinem Rechner ziemlich gut entsprechen: K2521, AFS, 64K RAM, BABII.
Eventuell müsste die Adresse der Tastaturschnittstelle angepasst werden.
Boot-ROM (1k) und Diskette habe ich da.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
060
23.04.2010, 16:31 Uhr
holm

Avatar von holm

Hach Rüdiger. Ich hatte nach sowas gesucht und gefragt.

@Felge: das CP/A gabs auch für die K2521 Konfiguration, nur hat scheinbar keiner mehr diese Dateien, momentan nicht mal der, der sie gemacht hat.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
061
23.04.2010, 16:43 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Ich hatte nach sowas gesucht und gefragt.

-> 004
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
062
23.04.2010, 17:05 Uhr
holm

Avatar von holm

Dann schicke mir das mal bitte. Ich werde trotzdem versuchen das CP/A irgendwie damit auf die Beine zu bekommen, allerdings ist das bis dahin noch recht viel Arbeit. Der Vorteil ist halt das konfigurierbare BIOS. Ich müßte dann von den PRGs aber auch die Bewicklungen für MEMDI wissen.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 23.04.2010 um 17:06 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
063
17.02.2014, 16:18 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Was ist das für ein komischen Computermuseum?

TSD.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
064
17.02.2014, 16:46 Uhr
TTL-Grab



Aha, da hast du also knappe 4 Jahre gebraucht, bis dir das eingefallen ist :-)
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
065
17.02.2014, 22:59 Uhr
holm

Avatar von holm

Evtl. ein Hinweis von Rüdiger das ich mal weiter machen sollte?

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
066
18.02.2014, 09:19 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Evtl. ein Hinweis von Rüdiger das ich mal weiter machen sollte?

Mach, wenn Du magst, ist ja Dein Hobby.

Ich erinnere mich trübe, bei meinen Datenrettungen auch Fragmente der Quelltexte des Krzikallaschen CP/Ms gesehen zu haben.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
067
18.02.2014, 09:47 Uhr
holm

Avatar von holm

Naja, schön wärs. Mir fehlen nach wie vor wesentliche Bestandteile des Systems um Etwas zusammen generieren zu können das funktioniert. Das sind z.B. die Sysgen und Format Programme, also die Programmteile die die Systemspuren schreiben und dort dieses BDOS mit abgerüstetem BIOS installieren.

Nach wie vor bin ich für Alle Dateien oder noch besser Quellen dankbar die da Licht ins Dunkel bringen könnten.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
068
21.02.2014, 13:58 Uhr
Rüdiger
Administrator
Avatar von Rüdiger


Zitat:
holm schrieb
Nach wie vor bin ich für Alle Dateien oder noch besser Quellen dankbar die da Licht ins Dunkel bringen könnten.

Schau mal in Deinen Postkasten.
--
Kernel panic: Out of swap space.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
069
21.02.2014, 18:22 Uhr
holm

Avatar von holm

Ok, danke Dir. Ich werde das morgen mal durchsehen.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
070
03.03.2015, 18:34 Uhr
holm

Avatar von holm

Ich grabe mal die Leiche wieder aus :-)

Felge ich habe von Dir mal BIOS Quellen von der HUB/Manfred Krzikalla bekommen, ich habe das Zeuch gerade mal über die K1520NET Karte auf den K8924 gezogen und M80 angeworfen. Das BIOS läßt sich ohne Fehler übersetzen und prahlt mit ziemlich vielen Features wie z.B. RAM Floppy aus 8 Stück K3526,
Kassettenmagnetband K5200 und Minifloppies an AMF5120. Diverse Drucker und Lochband werden auch unterstützt. Ein Dinit für K5122 an K2521 gibts auch, ebenso ein CINIT für Kassetten.
Der Bildwiderholspeicher liegt bei 8000 und wird mit MEMDI weggeschaltet so das 55K TPA bleiben.
CCP und BDOS fehlen, das sehe ich aber heute zu tage nicht mehr als das Problem an, ich frage mich nur wie ich den Kram auf ein bootbares Medium bekomme. Dazu gibts ja nun noch irgendwelche ROMs für die K2521 die ab Reset auch schon irgendwelche Dinge treiben. Ich muß mal so ein Ding zusammenstecken.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}

Dieser Beitrag wurde am 03.03.2015 um 18:34 Uhr von holm editiert.
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
071
04.03.2015, 10:57 Uhr
felge1966
Default Group and Edit


Wenn ich das damals richtig verstanden habe, wurde eine Eprom Karte zusätzlich gesteckt und da wurde das ganze abgelegt. Aber da bin ich mir auch nicht ganz sicher. Ich habe halt nur die Quellen bisher gefunden.

Gruß Jörg
--
http://felgentreu.spdns.org/bilder/jacob120.gif
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
072
04.03.2015, 12:38 Uhr
holm

Avatar von holm

Nöö..unwahrscheinlich.

Da war ein Epromer Programm dabei und es existieren 3 Dateien:
bwsp.prm, cpu.prm,karte16k.prm.

bwsp.prm ist einfach ein Zeichengenerator,

cpu.prm enthält Sowas:

Quellcode:

0000a50  a7 7c 4d ed 52 67 69 c9  00 10 7f 17 50 52 4f 4d  |.|M.Rgi.....PROM|
00000a60  20 43 48 45 43 4b 20 20  20 20 20 20 56 49 44 45  | CHECK      VIDE|
00000a70  4f 20 52 41 4d 20 43 48  45 43 4b 43 50 55 20 52  |O RAM CHECKCPU R|
00000a80  41 4d 20 43 48 45 43 4b  20 20 4b 45 59 42 4f 41  |AM CHECK  KEYBOA|
00000a90  52 44 20 43 48 45 43 4b  20 49 2f 4f 20 4c 4f 4f  |RD CHECK I/O LOO|
00000aa0  50 20 43 48 45 43 4b 20  50 52 49 4e 54 45 52 20  |P CHECK PRINTER |
00000ab0  43 48 45 43 4b 20 20 49  4e 44 49 4b 41 54 4f 52  |CHECK  INDIKATOR|
00000ac0  53 20 4f 4e 20 20 4e 4f  20 50 52 54 20 41 43 43  |S ON  NO PRT ACC|
00000ad0  45 53 53 20 20 45 52 52  4f 52 20 53 49 47 4e 41  |ESS  ERROR SIGNA|
00000ae0  54 55 52 45 4e 4f 20 45  52 52 4f 52 20 44 45 54  |TURENO ERROR DET|
00000af0  45 4b 54 45 44 c0 48 20  20 20 20 20 20 20 20 48  |EKTED.H        H|
00000b00  0a 00 90 01 50 00 27 00  01 00 27 01 54 00 29 00  |....P.'...'.T.).|
00000b10  28 00 27 01 55 00 27 00  01 00 27 00 01 00 27 00  |(.'.U.'...'...'.|
00000b20  01 00 27 01 55 00 27 00  28 00 29 01 54 00 27 00  |..'.U.'.(.).T.'.|
00000b30  01 00 27 ff 4b 38 39 31  34 4d 48 4d 44 40 00 f0  |..'.K8914MHMD@..|
00000b40  12 30 17 38 17 58 17 6a  17 18 00 03 41 04 45 05  |.0.8.X.j....A.E.|
00000b50  28 1b 5b 31 63 ff 1b 5b  30 63 ff ff ff ff ff ff  |(.[1c..[0c......|
00000b60  ff ff ff ff ff ff ff ff  ff ff ff ff ff ff ff ff  |................|




weswegen ich auf die Herkunft ausd einem K8914 schließen würde :-)

Zu kart16k.prm habe ich keine rechte Meinung, das ist ausländisch:

Quellcode:

00003440  0f fe 00 ca 4c 54 21 80  21 c3 97 50 21 55 54 01  |....LT!.!..P!UT.|
00003450  21 00 c3 9a 50 73 6f 73  74 6f 71 6e 69 65 20 70  |!...Psostoqnie p|
00003460  65 7e 61 74 61 60 7d 65  67 6f 20 75 73 74 72 6f  |e~ata`}ego ustro|
00003470  6a 73 74 77 61 3a fe 3c  ca 67 03 c3 ff 03 f3 cd  |jstwa:.<.g......|
00003480  00 0a cd 33 55 21 a1 55  11 11 10 01 0c 00 ed b0  |...3U!.U........|
00003490  c3 3f 55 f3 fd e1 cd 00  0a cd 33 55 21 8c 55 11  |.?U.......3U!.U.|
000034a0  11 10 01 06 00 ed b0 21  19 10 fd e5 d1 7a cd 61  |.......!.....z.a|
000034b0  55 7b cd 61 55 c3 3f 55  f3 cd 00 0a cd 33 55 21  |U{.aU.?U.....3U!|
000034c0  11 10 36 31 c3 3f 55 f3  cd 00 0a cd 33 55 21 11  |..61.?U.....3U!.|
000034d0  10 36 32 c3 3f 55 f3 cd  00 0a cd 33 55 21 11 10  |.62.?U.....3U!..|
000034e0  36 33 c3 3f 55 f3 cd 00  0a cd 33 55 21 11 10 36  |63.?U.....3U!..6|
000034f0  34 c3 3f 55 f3 cd 00 0a  cd 33 55 21 11 10 36 35  |4.?U.....3U!..65|
00003500  c3 3f 55 fb ed 4d f3 cd  00 0a cd 33 55 21 11 10  |.?U..M.....3U!..|
00003510  36 37 c3 3f 55 f3 cd 00  0a cd 33 55 21 11 10 36  |67.?U.....3U!..6|
00003520  38 c3 3f 55 f3 cd 00 0a  cd 33 55 21 11 10 36 39  |8.?U.....3U!..69|
00003530  c3 3f 55 21 7d 55 11 00  10 01 0f 00 ed b0 c9 3e  |.?U!}U.........>|
00003540  18 d3 f1 d3 f3 21 92 55  11 50 10 01 0f 00 ed b0  |.....!.U.P......|
00003550  db e1 cb 5f c2 50 55 db  e0 fe 1f c2 50 55 c3 06  |..._.PU.....PU..|
00003560  04 f5 1f 1f 1f 1f cd 72  55 77 23 f1 cd 72 55 77  |.......rUw#..rUw|
00003570  23 c9 e6 0f fe 0a 38 02  c6 07 c6 30 c9 2a 20 45  |#.....8....0.* E|
00003580  52 52 4f 52 20 4d 41 53  53 41 47 45 52 53 54 20  |RROR MASSAGERST |
00003590  33 38 50 52 45 53 53 20  52 45 53 45 54 20 4b 45  |38PRESS RESET KE|
000035a0  59 53 54 41 43 4b 20 2d  20 4f 56 45 52 32 34 2e  |YSTACK - OVER24.|
000035b0  30 37 2e 38 39 ff ff ff  ff ff ff ff ff ff ff ff  |07.89...........|
000035c0  ff ff ff ff ff ff ff ff  ff ff ff ff ff ff ff ff  |................|




Ich habe bescslossen das das mit dem Rest Nichts zu tun hat.

Gruß,

Holm
--
float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v;
{s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+
(r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&&
(A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;}
Seitenanfang Seitenende
Profil || Private Nachricht || Suche Zitatantwort || Editieren || Löschen
Seiten: -1-     [ Technische Diskussionen ]  



Robotrontechnik-Forum

powered by ThWboard 3 Beta 2.84-php5
© by Paul Baecher & Felix Gonschorek