Hi.
Ich hatte das mal auf a1k.org vorgeschlagen, als Tool, was in das WBStartup-Verzeichnis installiert wird bei einer Neuinstallation des Systems (namentlich 3.1.4).
   
Es ist nicht fertig und leider sehr groß (84kB), aber das Prinzip ist doch recht interessant, finde ich!?

(FUCK: kein .LHA möglich)

Angehängte Dateien

  WBAss.lha.zip (Größe: 37,89 KB / Downloads: 1181)

Hier noch ein anderes Projekt. Leider habe ich (noch) keine funktionierende Hardware.

Die Werte sind demnach von einem RandomNumberGenerator.... 

Angehängte Dateien

Thumbnail(s)
           

Ich hatte mal (damals) ein modifiziertes Beispiel für Displayscroll auf EAB gepostet:
http://eab.abime.net/showpost.php?p=1086590&postcount=7

Das läuft auch super, zumindest mit 50MHz 030er.  

Kürzlich jedoch scheint es wieder Diskussionen zu geben, man findet es zu langsam.

Da im o.g. Thread niemand auf das offensichtliche Optimierungspotenzial kommt, schreib ich es hier mal rein (ich bin dort rausgeekelt worden):

Die Leute wollen halt nicht mehr selbst denken.....

Org. Src:

;display scroll adapted by cylon

DEFTYPE.w
BitMap1,320,256,3

LoadBitMap1,"face8.iff",1  ;3planes 8 cols

VWait50
BLITZ

BitMapOutput1    ;print onto bmap

Locate 2,28: Print "THIS IS AGA DISPLAYSCROLL"
Locate 2,30: Print "<<<<< Move Mouse >>>>>"
Use BitMap1

;For a=7To1 Step -1
;  b=1-b
;  Circlef160,128,10*a,10*a,b
;Next

InitCopList1,44,256,$10003,8,8,-$10

CreateDisplay1

DisplayBitMap1,1

DisplayPalette1,1

For y=0 To7                           ;debug colour boxes

 Boxf 0,y*16,7,y*16+15,y

 Locate2,y*2+0.5:Colour1: Print y

Next y

Dim xpo.q(256),xpe.q(256)

a=0
VWait150
Mouse On

tpi.q=2*Pi  ;precalc

xpe(0)=-13  ;offset for even planes start at ypos=0
;not quite accurate! sub-pixel fetch or what the hell....

While Joyb(0)=0

For a=1 To 253
  d.q+Pi/18:If d>tpi Then d=0.0

  c.q=Sin(d)+(MouseX-160)/160

  xpo(a)=c

  xpe(a)=c  ;same as odd, but with offset

Next
VWait

DisplayScroll1,&xpo(0),&xpe(0);,-13 offset does not work here?

VWait
Wend

VWait25
QAMIGA
End

NoCli:CloseEd
In Fett habe ich mal die dicksten Brummer markiert:
wenn man dort ansetzt (precalc, Tabelle), dann läuft es auch auf dem Standard A1200 mit etwas FastRAM schnell!

Angehängte Dateien

  Displayscr_bb.lha.zip (Größe: 24,5 KB / Downloads: 1328)

Hallo Leute.

In einem Anfall von Wahn habe ich gestern Nacht angefangen, einen AMOS2Blitz Src-Converter zu schreiben. Bislang sind es ca. 450 Zeilen Code, vonehmlich ASCII-Parsing.
Man könnte das wahrscheinlich effizienter durch direkt AMOS->Blitz Tokenisiert->Tokenisiert lösen, aber der AMOS-Src hat für solche Parsing-Fingerübungen einen (den einzigen) Vorteil:
Der Editor hat extrem strikte Formatier-Regeln! Es gibt keine freie Formatierung des Quelltextes, sodaß man immer z.B. ' : ' als Befehlstrenner annehmen kann, wenn der Code im AMOS-Editor als ok getestet wurde.

Leider hat sich noch herausgestellt, daß man Newtypes offenbar nicht beliebig groß machen kann, was meine angedachte Speicherverwaltung zunichte macht. Ich bekomme, wenn ich nichts rausnehme, einen "Type too big"-Compilerfehler bei einem Array im Newtype. Ich bin aber schon über 32kB sizeof, trotzdem. Weiß nicht mehr, was die Grenze ist....

Momentan werden alle Zeilen klassifiziert, Prozeduren erkannt und globale Variablen aufgenommen. Insofern habe ich durch u.g. Beispiele schonmal eine grobe Richtlinie für die Größenordnungen.
Da bei AMOS GLOBAL vs. SHARED gilt, muß man sowieso alle GLOBALs vorher wissen, um in den Prozeduren diese als solche zu erkennen.

Was haltet ihr davon?

Unten die Ausgaben der testfiles, Parserausgabe "." heißt Leerzeile, "'" heißt Kommentarzeile.
[spoiler]

Ich kämpfe schon einige Zeit mit den MultiColumn-Listen. Ich kann immer nur eine bestimmte Anzahl von Elementen zufügen, sagen wir mal 100 (also 20 Zeilen á 5 Spalten), danach schmiert mir alles ab.
Ich nutze den Kludge wie er bei den Bespielen zu Blitz's MUI gezeigt wurde. Weil es eben dieses verkettete NULL-String-Array in Blitz nicht gibt.
Aber das funktioniert nicht unbegrenzt, irgendwie.

Ich habe sogar die NList-Includes begonnen, nach Blitz zu konvertieren, aber da bekomme ich auch keinen Inhalt in die Liste, aus dem gleichen Grund.

Hatte das schon mal jemand gelöst?
Das würde mir wirklich helfen.

Vielleicht kann man so ein Array auch mit einer ASM-Func erzeugen, nur müßte ich erstmal wissen, wie genau das aussehen muß.

Der Sinn ist, man nimmt das übliche
date$(ndays)

und findet mit Months heraus, ob man Februar hat. Wenn man dann die Anzahl der Tage feststellen will,
gibt man  + leapyear {year} ein, was einen Tag hinzufügt (oder eben nicht) für Februar.

There are a some examples included with the AmiBlitz distribution, and I am aware of the image.include.ab3
But as a beginner I find that example way to complex to figure out.

What I am after are just the pieces of code needed to display one image in a workbench window.
eg. an example code to open a workbench window, load an iff file and display it inside this window.

Heydraw t
I saw a tutorial about displaying rtg graphics like an example down below:

XINCLUDE "dbl_display.include.ab3"

succ.l = image_load {2, gfxpath.s+"glass_big", $FF00FF,20}: imagemidhandle{2}

and so on.


I understand there is no video tutorial or excellent book I can read to get me to understand the dbl_display.include.ab3 and I am in my own to learn from these example source codes. Which I am ok with. The reason i am posting here is this. If I want to draw a picture of a hero animated in four direction, a wall of four different sides and a gem and that is that, can I just draw them in normal png with 32 x 32 as each side and that is about it or can I draw them in a sheet and just extract them from a sheet? If I can get it from a single sheet is there a tutorial to show me how to do this in rtg mode (not custom chipset) or is there a tutorial in how to load single sprite by sprite of size 32 x 32 from separate file? thanks.

Hi AmiBlitz Verbliebenen
Hab gerade gesehen das die AmiBlitz3.6 Build 1 gestern im AmiNet hochgeladen wurde.
Ist das ein gutes Zeichen, das es mit AmiBlitz weiter geht :?:

Just as a side note.
Femu has been released, which is a FPU emulation and runs on most Amigas.
It practically overcomes the AmiBlitz3 FPU issue where people can now use AmiBlitz3 on hardware which has no hardware FPU.

<!-- m --><a class="postlink" href="http://koti.kapsi.fi/~jarpatus/femu.lha">http://koti.kapsi.fi/~jarpatus/femu.lha</a><!-- m -->

Here the Apollo forum entry:
<!-- m --><a class="postlink" href="http://www.apollo-core.com/knowledge.php?b=1&note=7442&z=Ur8ySo">http://www.apollo-core.com/knowledge.ph ... 2&z=Ur8ySo</a><!-- m -->


Cheers,
Manfred