Data - Anzahl

[Tombi]

Hallo,
Suche ergab leider keine passenden Treffer.

Möchte herrausfinden wieviele Zeilen in einer DataSection vorhanden sind und wieviele Werte eine Zeile beinhaltet.

Z.b.:

Data.l 1,1,1,1,1
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1

Ich sollte ich zurückbekommen das es 3 Zeilen und 5 Werte jeweils sind.

[#NULL]

vielleicht so

Code: Alles auswählen

DataSection
lab1:
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1
lab2:
EndDataSection

count = (?lab2-?lab1) / SizeOf(Long)
Debug count

naja gut, nicht ganz was du wolltest.

[mk-soft]

Auch wenn mehrere Zeilen sind liegen die Daten nach ein ander im Speicher.
Arbeite dir eine Daten Strukture und Kennung aus.

[Kaeru Gaman]

da eine DataSection absolut Hardgecoded wird, besteht keine notwendigkeit für eine solche funktion.

Code: Alles auswählen

#Zeilen = 3
#Spalten = 5

Data.l 1,1,1,1,1
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1 

weil du die Datazeilen selber hinschreiben musst, kannst du auch die Konstanten selber hinschreiben.

[NicTheQuick]

Und wie mk-soft schon gesagt hat, sind die beiden Codes das selbe:

Code: Alles auswählen

Data.l 1,1,1,1,1
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1

Code: Alles auswählen

Data.l 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1

Du könntest es allerdings so machen:

Code: Alles auswählen

Data.l 5,3
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1
Data.l 1,1,1,1,1

Dann liest du mit 'Read' erst Zeile und Spalte aus und dann die Daten.

[#NULL]

Code: Alles auswählen

l1=#PB_Compiler_Line+3
DataSection
lab1:
Data.l 1,1,1,1,1
Data.l 1,0,0,0,1
Data.l 1,1,1,1,1
lab2:
EndDataSection
l2=#PB_Compiler_Line-2

count = (?lab2-?lab1) / SizeOf(Long)
Debug "elemente:"
Debug count
Debug "zeilen:"
Debug l2-l1
Debug "spalten:"
Debug count / (l2-l1)

..geht allerdings nur, wenn du das format einhälst und alle zeilen gleich lang sind.

[NicTheQuick]

Witzige Idee!