Mal ne Frage, rein interessenhalber:

Wie zeichnet eigentlich das System Kreise? Mir ist schon klar das im System in der graphics.lib ein Befehl vorhanden ist, aber wie berechnet dieser Befehl die Kreise?

Bin da auf denn Besenham-Algo gestoßen(ja, der ist recht alt und bekannt und jeder der programmiert sollte ihn kennen... :-) ) der wirklich recht interesant ist und vorallem recht schnell! Ich war echt überrascht wie schnell er sogar unter MaxonBasic läuft.

--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Der_Wanderer:
Der Kreisbefehl in Maxon ist ja nicht in Maxon geschrieben, oder?
Ich nehme mal an der ist in Assembler geschrieben.
Irgendwo optimiert er dann besser oder lässt was weg, vielleicht berücksichtigt er keine Layer etc.

> Wie zeichnet eigentlich das System Kreise?
Das hängt wohl ganz vom Treiber ab.

Da wir aber keinen der Sourcen kennen, ist das schwer zu sagen. Ein Unterschied von 50% ist aber noch gar nicht so gross.

--
HD-Rec, Sweeper, Samplemanager, ArTKanoid, Monkeyscript, Toadies, AsteroidsTR, TuiTED, PosTED, TKPlayer, AudioConverter, ScreenCam, PerlinFX, MapEdit, AB3 Includes und viele mehr...
Homepage: http://www.hd-rec.de

---

Der Befehl (Circle) von MaxonBasic ist bestimmt nicht in Basic geschrieben. Der Besenham-Code ist aber in MaxonBasic geschrieben und der ganze Code läuft schneller als ein Aufruf der Systemroutine DrawEllipse() von der graphics.lib. Das ist wirklich schon etwas seltsam.
--
http://www.alternativercomputerclub.de.vu

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Der_Wanderer:
Die Geschwindigkeit hängt vor allem davon ab, wie die Pixel gesetzt werden. Wie machst du das in Maxon?
Vermutlich "illegal" durch direktes schreiben der Bitmap?

---

Interesante Vermutung.

Nein, auf einem MaxonBasic-Fenster mit PSET(x,y), auf einem Systemfenster mit WritePixel(). Also, legal.


Illegal habe ich es noch nicht versucht, ich denke, aber das es gerade in MaxonBasic langsamer wäre, da ich mehr berechnen müßte.

--
http://www.alternativercomputerclub.de.vu

[ Dieser Beitrag wurde von Ralf27 am 11.04.2010 um 14:39 Uhr geändert. ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

code:

---

optimize 7
syntax 2
XINCLUDE "eclock.include.bb2"

WBToScreen 0 ; Workbench holen
Window 0,0,0,320,200,$0,"Circle Test",1,0 ; Fenster aufmachen

*rp.RastPort = RastPort(0) ; Rastport von Fenster holen
SetApen_ *rp,1 ; schwarz setzen
eclock_Start{1000} ; 1/1000 sec Auflösung für die Uhr und los geht's


; dein Algorithmus
...
x.l = ...
y.l = ...
WritePixel_ *rp,x,y ; Pixel malen
...

elapsed_ms.l = eclock_Stop{} ; Zeit stoppen

; Bericht ausgeben
message{"Verstrichene Zeit: "+str$(elapsed_ms)+" ms!"}
End

---

[ - Antworten - Zitieren - Direktlink - ]

code:

---

WBStartup
  optimize 7
  Screen 1,1,""
  Window 1,0,0,320,256,0,"",0,1
  rp.l=RastPort(1)
  x.w=160
  y.w=128
  r.w=80
  t.f=Timer

For te.b=1 To 100
 xh.w=0
 yh.w=r
 d.w=1-r
 dx.w=3
 dxy.w=-r-r+5
 While yh>=xh
  WritePixel_ rp,x+xh,y+yh
  WritePixel_ rp,x+yh,y+xh
  WritePixel_ rp,x+yh,y-xh
  WritePixel_ rp,x+xh,y-yh
  WritePixel_ rp,x-xh,y-yh
  WritePixel_ rp,x-yh,y-xh
  WritePixel_ rp,x-yh,y+xh
  WritePixel_ rp,x-xh,y+yh
  If d<0
   d+dx
   dxy+2
  Else
   d+dxy
   dxy+4
   yh-1
  End If
  dx+2
  xh+1
 Wend
Next
  Print (Timer-t)/50
  MouseWait

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Mal ein paar Zahlen, mit einem MaxonBasic-Fenster:
Alle Kreise haben einen Radius von 80 und es werden 100 Kreise gezogen. Dauer in Sekunden:
...
Aber: Es kann doch nicht sein das das langsame MaxonBasic schneller ist als eine Systemroutine?!? Ich kann mir auch nicht vorstellen das das aufrufen einer Systemroutine von MaxonBasic aus so lange dauern kann...

---

klar. wenn du es "knapp" genug schreibst, holt der Compiler das Beste raus. Und wer weiß, was MB für "Verrenkungen" machen muß, um Systemroutinen wirklich systemnah aufzurufen? Wahrscheinlich noch ein Haufen Registerrettung oder so. und das 100 Mal...

P.S.
Wenn ich mit (BB2) AmiBlitz auf dem Emu ohne JIT den Debugger mitlaufen lasse, kann man SEHEN, wie die Gadgets gezeichnet werden



gruß
inq

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:

klar. wenn du es "knapp" genug schreibst, holt der Compiler das Beste raus. Und wer weiß, was MB für "Verrenkungen" machen muß, um Systemroutinen wirklich systemnah aufzurufen? Wahrscheinlich noch ein Haufen Registerrettung oder so. und das 100 Mal...

P.S.
Wenn ich mit (BB2) AmiBlitz auf dem Emu ohne JIT den Debugger mitlaufen lasse, kann man SEHEN, wie die Gadgets gezeichnet werden



gruß
inq

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
... Die Zeit wird wohl bei WritePixel() verhauen. Eigentlich müßte AmiBlitz mindestens 50 bis 100 mal schneller sein. MaxonBasic ist echt schnarchlangsam.
Interesant ist auch das der eingebaute Circle-Befehl von MaxonBasic mehr als doppelt so schnell ist wie die Betriebssystemroutine. Da läuft wohl irgendwas seltsam ab. Deswegen auch am Anfang die Frage, wie wohl das Betriebssystem die Kreise zeichnet.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:

Tja. wie der_wanderer schon schrieb, kann man ohne Src nix sagen. Vermutlich werden bei WritePixel_ jedesmal die Coords gegen die Zielbitmap gecheckt, während der interne MB-Befehl möglicherweise direkt zeilenweise oder BPlaneweise in den BMap-Speicher kopiert. hast du mal versucht, die Ausgabe zu verlangsamen? dann siehst du, wie der Kreis "gemalt" wird.
GRuß
inq

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:

Zitat:

---

Original von inq:

... hast du mal versucht, die Ausgabe zu verlangsamen? dann siehst du, wie der Kreis "gemalt" wird.
GRuß
inq

---

Interesante Idee, aber ich weiß nicht wie ich das machen könnte.

---

du schreibst das programm so um, daß es den Zielrechner überfordert, z.B.
Bildschirm superhires 8Bit auf nem std. A1200. multitasking bleibt an und du startest noch irgendwas anderes ohne Speicherverbrauch, aber mit einem cpu-fressenden mainloop. gibts vielleicht sogar als testtool auf den DEveloperCDs, wenn ich mich nicht irre, hihihi

oder, wie angedeutet: Emulator, ohne JIT oder Speed auf Original.
inq

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Der_Wanderer:
Amiblitz3 speichert als ASCII, man muss die Datei Endung .ab2 oder .ab3 (ab Version 3.5) angeben. Nur das veraltete .bb2 Format speichert proprietär.

---

Zitat:

---

Ein wenig mehr Speed bekommst du, wenn du statt .b oder .w den Typ .l verwendest, zumindest auf EMUs ist 32bit schneller als 16 oder 8bit.

---

Interesante.
Ich bleib aber bei w und b um Speicher zu sparen. Ich bin noch auf einem echten Amiga.

Zitat:

---

Aber der Algorithmus ist schon extrem optimiert, bei AB3 schätze ich mal 99% WritePixel und 1% Algorithmus. D.h. selbst wenn Maxon 10mal langsamer wäre, fällt das kaum ins Gewicht.

---

Danke, bei MB muß man optimieren das der Arzt kommt, sonst geht da nix vom Speed her. AB3 ist da anderst. Aber vermutlich optimiert man dann auch weniger, weil man da mehr vom Speed verwöhnt wird.

Zitat:

---

Wenn du also die Speed der Srpachen testen willst, dann kommentiere WritePixel aus und teste dann mal. Verwende die eclock, das ist viel genauer. Timer nutzt vermutlich den Vertical Blank.

---

Mir ist schon klar das AB3 MB um welten schlägt. Diesmal habe ich übrigens mein erstes AB3 Programm geschrieben was auch funktioniert!

Zitat:

---

Der atomare Maxon Circle Befehl ist vermutlich deshalb schneller, weil er kein WritePixel verwendet (das mss ja jedesmal den Layer abklopfen), sondern evtl. nur einmal und dann direkt die Bitmap bearbeitet.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:
du schreibst das programm so um, daß es den Zielrechner überfordert, z.B.
Bildschirm superhires 8Bit auf nem std. A1200. multitasking bleibt an und du startest noch irgendwas anderes ohne Speicherverbrauch, aber mit einem cpu-fressenden mainloop. gibts vielleicht sogar als testtool auf den DEveloperCDs, wenn ich mich nicht irre, hihihi

oder, wie angedeutet: Emulator, ohne JIT oder Speed auf Original.
inq

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Der_Wanderer:
...Wenn du also die Speed der Srpachen testen willst, dann kommentiere WritePixel aus und teste dann mal. Verwende die eclock, das ist viel genauer. Timer nutzt vermutlich den Vertical Blank.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Ja, ist schon irgendwie interesant. Aber: Dann ruft wohl der DrawEllipse() aus der graphics.lib wohl auch WritePixel() auf?
Vermutung: Dann könnte man in der graphics.lib wohl auch noch einiges optimieren.

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Der_Wanderer:
> Ich bleib aber bei w und b um Speicher zu sparen. Ich bin noch auf einem echten Amiga.
Du sparst satte 4 Bytes, bist aber dafür langsamer. Schlechter Deal!

---

Zitat:

---

Geht denn der "schnelle" Maxon Befehl überall (AGA/RTG ?)

---

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:
DrawEllipse_ ist sowieso universell ausgelegt, wegen der veschiedenen Radien. da wird sicher erst auf gleiche Radien getestet. das macht aber erst bei >1000 Kreisen was aus, denke ich (siehe SysSpeed).

---

Zitat:

---

gfxlib wird optimiert, irgendwo im Aminet zu finden (BETA).
(suchen macht jeder selbst....)
inq

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Der MaxonBasic Befehl ist da wesentlich universeller, er kann z.b. auch Kreisausschnitte zeichnen und logischeiweise auch Ellipsen. Das ganze in einem Befehl.

---

Naja, wer's glaubt
Ist natürlich Täuschung:
Der Befehl wird ja je nach Argumenten aufgeteilt in Subroutinen.
in Wahrheit erkennt der Compiler deinen Loop und behält alle Register, außer die, die sich ändern (x,y) für die Coords des Mittelpunkts. Du erzeugst ja keine neuen Kreise, sondern immer nur denselben.
Und Segmente oder Ellipsen sind auch nicht vorhanden, darum kannst du ja den Speed auf die eigentliche Zeichenroutine festnageln.

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von Ralf27:
Grr, was mich an AB3 nervt ist das dauernde Abstürzen mit Gurus, vorallem beim Quellcode laden. Ja, ich weiß auch das man für AB3 ein High-End Amiga nehmen sollte, vornehmlich einen emulierten...
..

---

Hihi
Nee, war nur Spasssss !
Ich nehm nur mein eigenes Blitz2, bewährte Deflibs, eigene Libs in /Beta usw.
Das wird der_Wanderer sicher nicht gutheißen, aber ich bleib vorerst dabei, auch mit dem Emu.
Das bringt mich zwar um die Arbeit der AB-Community, aber ich code ja auch für mich...
Gruß
inq

[ - Antworten - Zitieren - Direktlink - ]

Zitat:

---

Original von inq:
Naja, wer's glaubt
Ist natürlich Täuschung:
Der Befehl wird ja je nach Argumenten aufgeteilt in Subroutinen.
in Wahrheit erkennt der Compiler deinen Loop und behält alle Register, außer die, die sich ändern (x,y) für die Coords des Mittelpunkts. Du erzeugst ja keine neuen Kreise, sondern immer nur denselben.
Und Segmente oder Ellipsen sind auch nicht vorhanden, darum kannst du ja den Speed auf die eigentliche Zeichenroutine festnageln.

---

[ - Antworten - Zitieren - Direktlink - ]

[ - Antworten - Zitieren - Direktlink - ]