Robotrontechnik-Forum

Registrieren || Einloggen || Hilfe/FAQ || Suche || Mitglieder || Home || Statistik || Kalender || Admins

Willkommen Gast!

Robotrontechnik-Forum » Technische Diskussionen » BHL.OVR Standard Basic Hilfe-Datei » Themenansicht

Autor

Thread - Seiten: -1-

000
09.08.2025, 09:45 Uhr
martinm86

Hat die Datei jemand ?
Wenn ja bitte PM schreiben.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

001
09.08.2025, 10:11 Uhr
martinm86

Ich brauch die halt dringend.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

002
09.08.2025, 10:58 Uhr
Enrico
Default Group and Edit

Ich wüsste nicht mal, wo die dazu gehören sollte.
Die liegt bei mir jedenfalls nicht lose rum.
--
MFG
Enrico

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

003
09.08.2025, 11:12 Uhr
MarioG77

Die hat Holm schon 2009 gesucht und nicht gefunden...

https://www.robotrontechnik.de/html/forum/thwb/showtopic.php?threadid=4040
--
Gruss Mario

Betriebsbereit: KC85/3, 2x [KC85/4, D004+Floppy, D008], PPC512, PC1512, 2xEC1834, Soemtron 286, 3x PC1715, picoAC1
Zu restaurieren: 1x A5120 und hin und wieder was von oben

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

004
09.08.2025, 11:12 Uhr
Rüdiger
Administrator

Zitat:

martinm86 schrieb
Hat die Datei jemand ?

Unobtanium.
Wofür braucht man diese Datei?
--
Kernel panic: Out of swap space.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

005
09.08.2025, 11:56 Uhr
martinm86

Das ist die Hilfe-Datei.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

006
09.08.2025, 13:11 Uhr
ralle

Für welches BASIC. Es gibt verschiedene BASIC-Dialekte. Auf ROM HC-BASIC und RBASIC. Unter SCP, cpm, das MBASIC.
--
Gruß Ralle

Wenn Sie dazu neigen, Bedienungsanleitungen zusammen mit dem Verpackungsmaterial wegzuwerfen, sehen Sie bitte von einem derart drastischen Schritt ab!...
... Nachdem Sie das Gerät eine Weile ausprobiert haben, machen Sie es sich am besten mit dieser Anleitung und ihrem Lieblingsgetränk ein oder zwei Stunden lang in Ihrem Sessel bequem. Dieser Zeitaufwand wird Sie dann später belohnen...

aus KENWOOD-Bedienungsanleitung TM-D700

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

007
09.08.2025, 14:13 Uhr
martinm86

Ich mein Standard Basic.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

008
09.08.2025, 14:13 Uhr
martinm86

Unter DCP

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

009
09.08.2025, 14:35 Uhr
Enrico
Default Group and Edit

Dann muss es ja bei MS-DOS auch dabei sein.
--
MFG
Enrico

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

010
09.08.2025, 14:52 Uhr
Rüdiger
Administrator

Zitat:

Enrico schrieb
Dann muss es ja bei MS-DOS auch dabei sein.

Nein.
Bei MS-DOS war MS BASIC dabei.
DCP STANDARD BASIC war ein eigenständiges Produkt.
--
Kernel panic: Out of swap space.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

011
09.08.2025, 14:53 Uhr
martinm86

Bei den späteren Versionen von MS-DOS ist wenigstens QBasic und Edit dabei.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

012
09.08.2025, 15:00 Uhr
volkerp
Default Group and Edit

Kann dir im ZCOM geholfen werden?

https://global.museum-digital.org/object/2386593
--
VolkerP

http://hc-ddr.hucki.net
(Z9001, Z1013, LC-80, ...)

Dieser Beitrag wurde am 09.08.2025 um 15:01 Uhr von volkerp editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

013
09.08.2025, 15:09 Uhr
Rüdiger
Administrator

Zitat:

volkerp schrieb
Kann dir im ZCOM geholfen werden?

Dem Martin kann keiner helfen: die Datei wurde nie mitgeliefert.
Insofern ist das mit dem "dringend" etwas fraglich.
--
Kernel panic: Out of swap space.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

014
09.08.2025, 15:34 Uhr
ralle

Es gibt neben BASI/BASC auch ein MBASIC für CPM. Zusätzlich auch die BRUN.COM als Bibliothek.
--
Gruß Ralle

Wenn Sie dazu neigen, Bedienungsanleitungen zusammen mit dem Verpackungsmaterial wegzuwerfen, sehen Sie bitte von einem derart drastischen Schritt ab!...
... Nachdem Sie das Gerät eine Weile ausprobiert haben, machen Sie es sich am besten mit dieser Anleitung und ihrem Lieblingsgetränk ein oder zwei Stunden lang in Ihrem Sessel bequem. Dieser Zeitaufwand wird Sie dann später belohnen...

aus KENWOOD-Bedienungsanleitung TM-D700

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

015
09.08.2025, 15:57 Uhr
volkerp
Default Group and Edit

Hier gibt’s das Handbuch: http://www.kc85.de/Service/Dokus/dcpbasic.pdf
--
VolkerP

http://hc-ddr.hucki.net
(Z9001, Z1013, LC-80, ...)

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

016
09.08.2025, 17:56 Uhr
ralle

Das könnte sogar das GW-Basic sein, was auch dem DOS3.3 mitgeliefert wurde.
--
Gruß Ralle

Wenn Sie dazu neigen, Bedienungsanleitungen zusammen mit dem Verpackungsmaterial wegzuwerfen, sehen Sie bitte von einem derart drastischen Schritt ab!...
... Nachdem Sie das Gerät eine Weile ausprobiert haben, machen Sie es sich am besten mit dieser Anleitung und ihrem Lieblingsgetränk ein oder zwei Stunden lang in Ihrem Sessel bequem. Dieser Zeitaufwand wird Sie dann später belohnen...

aus KENWOOD-Bedienungsanleitung TM-D700

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

017
09.08.2025, 18:22 Uhr
Rüdiger
Administrator

Zitat:

ralle schrieb
Das könnte sogar das GW-Basic sein, was auch dem DOS3.3 mitgeliefert wurde.

Hör auf zu orakeln! Es geht hier nicht um ein MS-Programm.
--
Kernel panic: Out of swap space.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

018
09.08.2025, 19:05 Uhr
BICa5105

Es ist ein eigenständiges Basic im ANSI-BASIC-Standard was sich an GW Basic orientiert.
Hat mehr Funktionen.
--
https://www.youtube.com/@robotronA5105

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

019
10.08.2025, 10:22 Uhr
martinm86

Aber leider funktioniert das mit den CALL-Aufrufen nicht richtig !
Ich hab da mal das SCREEN-Modul (SCREEN.CLB) geladen und die CALLs
mit Variablen funktionieren nicht richtig !

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

020
10.08.2025, 10:33 Uhr
martinm86

Ich wollte eine Bresenham-Ellipse darstellen aber wie gesagt die CALL-Aufrufe funktionieren nicht richtig. Ich habe den Bildschirm-Modus 6 und 4 (S_SST) und dann
wollte ich mit S_WPX die Pixel plotten.

Schade.

Getestet habe ich es mit qemu und 86Box.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

021
10.08.2025, 10:48 Uhr
Bert

Zitat:

martinm86 schrieb
Getestet habe ich es mit qemu und 86Box.

Welche Hardware (Prozessor/Grafiksystem) wird da genau emuliert?
--
Viele Grüße,
Bert

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

022
10.08.2025, 11:00 Uhr
martinm86

Also mit qemu wird der Host-Prozessor genutzt (Grafiksystem weiß ich nicht).
Mit 86Box habe ich den 80486 und IBM VGA eingestellt.
Der Videomodus wird korrekt eingestellt aber mit dem CALL
zu S_WPX wird eine Exception ausgelöst.

Ich kann ja mal den CGA-Adapter ausprobieren (86Box).

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

023
10.08.2025, 11:03 Uhr
martinm86

Also mit dem CGA-Adapter funktionierts leider auch nicht

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

024
10.08.2025, 11:18 Uhr
martinm86

Ich dachte mir immer wenn der Videomodus erfolgreich eingestellt worden
ist klappt das auch mit plotten.

Wird das BIOS genutzt oder wird direkt die Karte angesteuert (SCREEN.CLB) ?
Gibts mit 86Box irgend einen Adapter mit dem das funktioniert ?

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

025
10.08.2025, 14:13 Uhr
martinm86

Eigentlich steht da ja nur 'CALL S_WPX (I, I, C)' dort.
Dieser CALL-Aufruf funktioniert aber leider nicht.
Die Variable I läuft von 0 bis 100.
Ich habe das genutzt, um die Funktion S_WPX auszuprobieren.

Der Aufruf mit zwei Konstanten für I funktioniert aber
(beispielsweise 'CALL S_WPX (100, 100, 11) oder 'CALL S_WPX (100, 100, C)').

Woran liegt das ?

Grüße,
Martin

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

026
10.08.2025, 14:18 Uhr
martinm86

Ursprünglich hatte ich eine SUB-Routine namens 'ELLIPSE' (Bresenham)
geschrieben. Aber leider ging halt der S_WPX-Aufruf nicht.

Dann habe ich gedacht das irgendwie Standard Basic Probleme mit der
SUB-Routine hat und habe dann das Programm auf GOTO-Aufrufe umgestellt.

Aber beides ging leider nicht.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

027
10.08.2025, 14:26 Uhr
martinm86

Was ich eigentlich nicht schlecht finde ist der Grafikmodus 6
(Insgesamt 7 Mögliche 0..6).

Müßte ein CGA-Spezialmodus sein (oder halt EGA oder VGA).

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

028
10.08.2025, 20:19 Uhr
Bert

@martinm86:
Ich welchem BASIC gibt es denn eine S_WPX Funktion?

Wenn ich mir die Fragestellungen hier so ansehe, habe ich die Vermutung, daß da ein paar grundlegende Zusammenhänge nicht so ganz klar sind.

Die genutzte Software (bzw. Bibliothek) muß natürlich auch zur verwendeten (bzw. emulierten) Hardware passen.
--
Viele Grüße,
Bert

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

029
11.08.2025, 08:31 Uhr
martinm86

Die Funktion 'S_WPX' (Write Pixel) ist im SCREEN-Modul (SCREEN.CLB)
unter Standard BASIC enthalten.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

030
11.08.2025, 12:03 Uhr
Dresdenboy

So langsam ergibt sich ein Bild. Könnte mir jemand die Standard BASIC-Dateien einmal zukommen lassen? Vllt. finde ich noch ein paar Hinweise.

Bei der CALL S_WPX-Beschreibung interpretiere ich die Buchstaben "I" und "C" als Datentypen, vermutlich Integer und Character. Bei Konstanten kann das sicher entspr. vom Compiler angepasst werden, aber für übergebene Variablen gibt es evtl. keine implizite Typkonvertierung. Dann könnten ein Integer-Wert auf einem Character-Platz oder eine Gleitkommazahl statt Integer schonmal zu einem Crash führen. Liegt es vllt. daran? Lt. "Programmiersystem Standard BASIC" sollte das über "OPTION INTEGER <var>" definiert werden.

Edit: Entspr. Berts Hinweis ist natürlich wichtig, was die Lib genau unterstützt und v.a. die Emulatoren. Der A7150 hat offenbar ja keine komplette HW-Kompatibilität (siehe z.B. dieser Thread) zu CGA und darüber hinaus. Somit werden entspr. geschriebene Libs auf emulierter IBM-kompatibler HW Probleme haben.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 11.08.2025 um 12:56 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

031
11.08.2025, 16:16 Uhr
martinm86

Mit 'OPTION INTEGER I, C' gehts auch nicht.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

032
11.08.2025, 17:02 Uhr
Dresdenboy

Zitat:

martinm86 schrieb
Mit 'OPTION INTEGER I, C' gehts auch nicht.

Falls "C" hier einen anderen Datentyp meint, dann wäre das so erwartbar. Könntest du hier mal mit einem Konstantwert für C testen oder ginge OPTION CHARACTER C hier? Da kenne ich mich mit Standard BASIC nicht genug aus.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

033
11.08.2025, 18:30 Uhr
ralle

Ich habe mal auf winworldpc geschaut. Nix. Leider ist das nur ein dunkeltasten, da immer noch nicht die wirkliche BASIC-Version bekannt ist. Zu dem Frühen Zeitpunkt des IBM-PC und auch Compaq, war das BASIC sogar fester Bestandteil der ROM-Bestückung.

CGA ist auf Wunsch Microsoft entwickelt und eingesetzt worden. Herkules wurde von einem Thailändischen Ingenieur entwickelt, um seine Abschlussarbeit in thai zu schreiben.
--
Gruß Ralle

Wenn Sie dazu neigen, Bedienungsanleitungen zusammen mit dem Verpackungsmaterial wegzuwerfen, sehen Sie bitte von einem derart drastischen Schritt ab!...
... Nachdem Sie das Gerät eine Weile ausprobiert haben, machen Sie es sich am besten mit dieser Anleitung und ihrem Lieblingsgetränk ein oder zwei Stunden lang in Ihrem Sessel bequem. Dieser Zeitaufwand wird Sie dann später belohnen...

aus KENWOOD-Bedienungsanleitung TM-D700

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

034
11.08.2025, 20:05 Uhr
martinm86

OPTION CHARACTER C hat er nicht als gültig erkannt.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

035
12.08.2025, 11:03 Uhr
Dresdenboy

Schade. Hattest du schon probiert, Koordinaten als Integer, aber Farbe als Konstante zu übergeben?

Und auch nochmal die Frage: Könnte mir jemand mal das Standard BASIC mit diesen Libs zusenden? (nicht auf Diskette

)
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

036
12.08.2025, 23:13 Uhr
kaiOr

In der DOSBOX läuft's zumindest.

Quellcode:


IDENTIFICATION: TEST

LOAD SCREEN

100 DECLARE EXTERNAL SUB S_CLR,S_SST,S_WPX
110 CALL S_SST(4)
120 CALL S_CLR
130 FOR I=1 TO 200
140 CALL S_WPX(I,I,I)
150 NEXT I
160 END

RUN

Gruß,
Kai

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

037
13.08.2025, 10:50 Uhr
martinm86

Da liegt wohl ein Fehler im BIOS oder Emulation in 86Box und qemu vor.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

038
13.08.2025, 11:53 Uhr
martinm86

Ja, ich habe schon probiert die Koordinaten als Variable (I) und die Farbe als
Konstante zu übergeben (11 und 3). Aber leider hat dass auch nicht funktioniert.

Dann liegts wohl doch nur an den beiden Emulatoren.
Dass mit DOSBox werde ich später einmal ausprobieren.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

039
13.08.2025, 13:40 Uhr
martinm86

Ich hab da dein Programm mal mit DOSBox getestet, aber leider hat dass nicht
funktioniert. Auch der 'PROGRAM'-Header fehlt.

Schade.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

040
13.08.2025, 14:00 Uhr
martinm86

Ja, ging doch so.
Ach da war noch ein altes Programm geladen.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

041
13.08.2025, 14:36 Uhr
martinm86

Ich wollte da mal eine ELLIPSE zeichnen, aber leider funktioniert das Programm nicht.
Kann da mal jemand drübergucken:

100 DECLARE EXTERNAL SUB S_CLR,S_SST,S_WPX
110 CALL S_SST(6)
120 CALL S_CLR
130 CALL ELLIPSE (100,100,10,10,10)
135 GOTO 500
180 SUB ELLIPSE (X,Y,R1,R2,C)
190 LET T = 3.141592653598 / 180.
200 FOR I=0 TO 359
230 LET D = I * T
280 LET X1 = X+R1*SIN(D)
300 LET Y1 = Y+R2*COS(D)
330 CALL S_WPX (X1,Y1,C)
400 NEXT I
430 END SUB
500 END

Er hat da einen Fehler zurückgegeben.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

042
13.08.2025, 15:43 Uhr
Dresdenboy

Danke an Kai!

@Martin
In DOKERG.TXT steht, dass Screen Mode 6 nur s/w kann. Demnach würde ein Farbwert 10 schonmal nicht gehen.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

043
13.08.2025, 15:48 Uhr
martinm86

Die '1' als Farbwert ging auch nicht.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

044
13.08.2025, 16:25 Uhr
Dresdenboy

Zitat:

martinm86 schrieb
Die '1' als Farbwert ging auch nicht.

Oha. Dann wäre die Frage, ob ein anderer Modus funktioniert.
In der TXT-Datei gibt es den Hinweis:

Quellcode:

              Zur  Wahl des Farbwertes siehe "Arbeitsplatzcomputer A7150, 
              Betriebsdokumentation,  Band1,  Rechner und Geraete", Seite 
              68.

Ansonsten wäre noch offen, ob Gleitkommazahlen wie X1 und Y1 als Argumente funktionien. Hier könnte ein

Quellcode:

10 PRELUDE
20 OPTION INTEGER X1, Y1
30 END PRELUDE

(angelehnt an Doku in MOS_Programmiersystem_Standard_Basic.pdf) vllt. helfen, da es so aussieht, als würden dann Typkonvertierungen gerundet stattfinden. Und die Werte müssen lt. TXT wohl im erlaubten Bereich sein.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 13.08.2025 um 16:27 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

045
13.08.2025, 16:27 Uhr
martinm86

Ja dass muss darunter stehen.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

046
13.08.2025, 16:32 Uhr
martinm86

Das neue Programm:
Kompiliert hat ers, aber leider kam eine Exception beim Modus-Aufruf.

100 DECLARE EXTERNAL SUB S_CLR,S_SST,S_WPX
130 GOTO 460
180 SUB ELLIPSE (X,Y,R1,R2,C)
190 LET T = 3.141592653598 / 180
200 FOR I=0 TO 359
230 LET D = I * T
280 LET X1 = X+R1*SIN(D)
300 LET Y1 = Y+R2*COS(D)
330 CALL S_WPX (X1,Y1,C)
400 NEXT I
430 END SUB
460 CALL S_SST(4)
470 CALL S_CLR
480 CALL ELLIPSE (100,100,10,10,1)
500 END

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

047
13.08.2025, 17:13 Uhr
Dresdenboy

Hmm... Exceptions ließen sich abfangen, aber dann hat man immer noch nicht die Ursache.

Hast du mal "DEBUG ON" zu Beginn probiert?

Und wenn S_SST(6) bei dir geht, kannst du ja das weiter nutzen. Es ist ja immer die Frage, was nicht funktioniert. So ist es auch schwer, zu helfen.

Auf welchem Rechner machst du das? Das wäre zumindest für Farbwerte und Screen-Nummern wichtig.

Ich habe SCREEN.CLB mal kurz disassembliert. Das arbeitet mit Int 10h, also BIOS kompatibel. Dann sollte darüber auch alles hardwaremäßige abstrahiert sein.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 13.08.2025 um 17:16 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

048
13.08.2025, 17:22 Uhr
martinm86

Ich habe das unter DOSBox getestet.
Als Betriebssystem nutze ich Windows 8.1 Home Edition.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

049
13.08.2025, 17:51 Uhr
martinm86

Ich habe vergessen die SCREEN.CLB einzubinden.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

050
13.08.2025, 19:08 Uhr
Dresdenboy

Klassiker.

Aber keine Meldung zu den nicht eingebundenen Routinen ist seltsam.
Wie sieht es jetzt aus?

Übrigens ist die Doku in DOKERG.TXT ja sehr ausführlich zu den Grafikbefehlen.

Mein nächster Vorschlag wäre eine erste wesentliche Geschwindigkeitsoptimierung: sin-/cos-Werte in Tabelle (gern auch eine um pi/2 längere für beides. Dann könnte man das gleich als Festkomma-Werte machen. Vllt. kann der Compiler Integer-Division mit 2er-Potenzen in Shifts umsetzen.

Edit: Ich habe das mal selbst in DOSBox ausprobiert, die Lib geladen und das Programm ausgeführt. Läuft gut.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 13.08.2025 um 20:16 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

051
14.08.2025, 08:24 Uhr
martinm86

Für den Wert von Pi kann man auch 4.*ATN(1) nutzen.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

052
14.08.2025, 09:21 Uhr
Dresdenboy

Zitat:

martinm86 schrieb
Für den Wert von Pi kann man auch 4.*ATN(1) nutzen.

Was aber ohne entspr. Optimierung im Compiler mit mehr Rechenaufwand verbunden ist (Multiplikation + trigonometrische Funktion) als eine Konstante.

Für Prozessoren ist der Rechen-/Zeit-Aufwand üblicherweise etwa so gestaffelt (unabh. ob mit oder ohne Hardwareunterstützung wie MUL/DIV oder eine FPU):
- ADD, SUB, NEG, Bit-Operationen (Boolesche Logik, Bit-Schieben - hier aber bei alten CPUs nur für 1 Bit, mehr Bits zu schieben wurde später effizienter)
- MUL
- DIV
- SQRT
- komplexe, meist auf Reihenberechnung basierte Funktionen (log, ln, Potenzen, trig. Fkt.)

Das nochmal in der Abstufung (je nach anwendbarer Funktion) Ganzzahl, Festkommazahl, Gleitkommazahl
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 14.08.2025 um 09:22 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

053
14.08.2025, 10:00 Uhr
martinm86

Hier ein Screenshot:
Der Radius ist bei beiden Seiten 50 Pixel.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

054
14.08.2025, 10:24 Uhr
martinm86

Hier nochmal ein Screenshot im Grafikmodus 6:

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

055
14.08.2025, 11:25 Uhr
martinm86

Geht die Subroutine S_WCH eigentlich auch im Grafikmodus ?

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

056
14.08.2025, 12:09 Uhr
martinm86

Mit ein bisschen Mühe und Lohn ging doch S_WCH im Grafikmodus.
Aber warum geht die Routine C_ABO und C_EXE komplett aus dem
Programm bas.exe heraus ?

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

057
14.08.2025, 13:06 Uhr
martinm86

Aber warum geht die MID$-Funktion nicht ?
Ich wollte mit dieser Funktion einen String mit Hilfe der Funktion
S_WCH ausgeben.

Beispielsweise ging 'LET D = ORD(MID$(S$,I,1))' nicht.
Oder heißt diese Funktion anders ?

Hmmm...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

058
14.08.2025, 13:21 Uhr
Dresdenboy

S_WCH erfordert lt. DOKERG.TXT einen alphanumerischen Bildschirmmodus.

Warum C_ABO und C_EXE das so machen sollen, sehe ich nicht dokumentiert. Zumindest ist es das korrekte Verhalten. Nicht umsonst sind diese wohl über die CRASH-Bibliothek eingebunden.

Statt MID$ musst du Feld-Indizes für String-Variablen nutzen:

Quellcode:

100 LET A$ = "abcdefghi"
110 PRINT A$(3:5)
120 END

Siehe auch S. 38 in Programmiersystem Standard Basic
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Dieser Beitrag wurde am 14.08.2025 um 13:29 Uhr von Dresdenboy editiert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

059
14.08.2025, 13:33 Uhr
martinm86

Ja hat alles funktioniert.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

060
14.08.2025, 13:49 Uhr
martinm86

Kann den Text auch im Grafikmodus 6

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

061
14.08.2025, 14:16 Uhr
Dresdenboy

Sehr gut! Evtl. bezieht sich die Einschränkung für WCH ja auf den A7150, während ein IBM-kompatibler PC das kann. Es werden, wie oben schon erwähnt, BIOS-Routinen genutzt.
--
___________________________________
Produktionen im Rahmen der "The Computer Art Community" (Demoszene): https://demozoo.org/sceners/64936/, YT-Kanal: https://www.youtube.com/@4lpha0ne/videos
Programmierung seit '86 in BASIC: KC85/3, C64, A1200, PC | ASM: LC-80, C64, KC87, A1200, NeoGeo, PC, Mega 65, µC | Turbo Pascal: BIC, PC | C: RS/6000, Alpha, PC, µC | C++, Java, Javascript, Rust, Lua, Perl, PHP u.a. auf PC
HW: LC-80, BIC A5105 komplett, KC87, KC85/2-4, KCC, C64s, C16, Plus/4s, A500s, A1200, Mega 65, ESP32s, RasPis, PCs, Laptops, MR 610, ...

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

062
14.08.2025, 15:11 Uhr
martinm86

Auch farbig

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

063
14.08.2025, 16:53 Uhr
martinm86

Hat da jemand zufällig die GRAPH.CLB für mich, weil die bei meiner Diskette nicht dabei
war.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

064
14.08.2025, 16:54 Uhr
martinm86

Was kann man genau damit machen ?

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

065
14.08.2025, 17:00 Uhr
Rüdiger
Administrator

Zitat:

martinm86 schrieb
Hat da jemand zufällig die GRAPH.CLB für mich, weil die bei meiner Diskette nicht dabei
war.

Die ist auf keiner Diskette dabei.
--
Kernel panic: Out of swap space.

Profil || Private Nachricht || Suche

Zitatantwort || Editieren || Löschen

Seiten: -1- [ Technische Diskussionen ]