Int 4 in Turbo Pascal?

[glkgereon]

hi wie kann ich mir einen neuen int-typ machen, der über die grenzen der vorhandenen hinausgeht??

ich hab lediglich longint, also 2,1... Milliarden

ich will praktisvch einen int64 haben

[neolithos]

Definier ihn als Array [0..7] of Byte.

Und der rest ist Assembler in vielen funktionen.

[glkgereon]

das problem ist, ich ahb keinen dunst von assembler

ich brauch einfach nur einen quelltext....

noch besser wär es wenn ich den int64 nicht von -´sonstwieviel bis sonstwieviel-1 habe sondern von 0 bis sonstwieviel*2-1

ich haffe ihr versateht was ich meine, so wie word und integer...

[Dax]

Probiers mal mit Hagens DEC-Math in Diesem Thread.

[sakura]

Warum nutzt Du nicht einfach Int64 :gruebel:

...:cat:...

[Dax]

Ja. Gute Frage, aber vielleicht ist ihm Int64 doch noch nicht genug, sondern nur für Berechnungen mit kleinen(?) Zahlen groß genug. Hagens DEC ist aber zu empfehlen.

[glkgereon]

weil es int64 in Turbo Pascal nicht gibt, is sch***

[sakura]

Zitat:

Zitat von glkbkk

weil es int64 in Turbo Pascal nicht gibt, is sch***

Du hättest ja wenigstens erwähnen können, daß es um TP geht ;) Hm, da wird wohl nur Handarbeit übrig bleiben, da Hagens DEC da auch nicht geht :D

...:cat:...

P.S.: :oops: Im Titel stehts ja :roll:

[Dax]

Zitat:

Titel: Int 4 in Turbo Pascal?

:wall:

[glkgereon]

áber es muss ja gehen, wie hat borland das denn gemacht?

bei delphi muss das ja auch deklariert sein, oder???

[Chewie]

Klar geht das. Bei Delphi ist das aber in den Compiler integriert und dürfte recht komplex sein.

[Dax]

Borland hat das in den Compiler integriert, der erzeugt automatisch Instructions, die aus 2 Int32 einen Int64 machen. In TP müsste man das mit ASM auch machen können.

[glkgereon]

dassis jetzt dumm, da ich ka von assembler hab...

geht es denn, das ich miur einen typ mache, der einfach nur die zahlenspanne von longint im positivenb bereich umfasst?

würd zur not reichen

[sakura]

In Turbo Pascal ist das nicht so einfach. In Turbo Pascal gab es Integer (16 Bit) und LongInt (32 Bit, genauer 2x16 Bit).

Seit Delphi 2 und damit 32-Bit Delphi-Pascal ist Integer 32 Bit per Standard und Int64 sind 64 Bit (genau, 2x32 Bit ;))

In Turbo Pascal wird das mit Assembler sehr umständlich, da die "Komposit-Integer" von der CPU unterstützt werden, aber nur für das doppelte des eigentlich vorhandenen. TP ist 16 Bit und Int64 ist damit 4 mal so groß wie eigentlich möglich und dadurch solltest Du, wenn überhaupt das ganze über Arrays und reinem Pascal lösen - aber das wird ein riesen Aufwand...

...:cat:...

[glkgereon]

also gibt es keine lösung die ich ma eben in info da in tp reintun könnte, wie?

naja, schade, aber auch egal...

[Dax]

DER COMP-Typ!

Zitat:

Zitat von TP-Hilfe

Anmerkung: Comp ist ein 64 Bit großer Integer.

Und es geht doch..

[glkgereon]

gibt es comp in borland turbo Pascal?
hab ich in der hilfe nix von gesehen

[mirage228]

Zitat:

Zitat von Dax

DER COMP-Typ!

Zitat:

Zitat von TP-Hilfe

Anmerkung: Comp ist ein 64 Bit großer Integer.

Und es geht doch..

Hi,

da bin ich jetzt aber ein wenig ratlos... das steht tatsächlich auch so in meiner TP7 Hilfe.

Aber, irgendwas war da noch mit Comp...


mfG
mirage228

[Dax]

Ja, Comp gilt in TP wie in Delphi als Real-Typ, nicht als Integer, obwohl es ein 64Bit-Integer ist.

[glkgereon]

stimmt....

kann ich den denn als "normalen" integer nutzen?
er steht ja bei den integern nicht drin, sondern (nur!) bei den Fliesskommazahlen

aber den gibts...


PS:
zieht euch dass ma rein: anmerkung: Comp ist ein 64Bit großen Integer :-)
bitte kein ot...

[Dax]

Zitat:

Zitat von glkbkk

PS:
zieht euch dass ma rein: anmerkung: Comp ist ein 64Bit großen Integer :)

Hab' ich doch schon gesagt!

Zitat:

Zitat von glkbkk

kann ich den denn als "normalen" integer nutzen?
er steht ja bei den integern nicht drin, sondern (nur!) bei den Fliesskommazahlen

Zitat:

Zitat von Dax

Ja, Comp gilt in TP wie in Delphi als Real-Typ, nicht als Integer, obwohl es ein 64Bit-Integer ist.

Du wiederholst nur andere!

BtW: Du kannst ihn NICHT als normalen Int-Typ nutzen, weil TP nur mit 16Bit rechnet, 32 kann die CPU noch emulieren, aber für die 64Bit in TP brauchst du Fließkommarithmetik mit Mantissen und so.
Aber alle Funnktionen, die man auf Integer anwenden kann, lassen sich zu Float-Funktionen umschreiben, Beispiel:

Delphi-Quellcode:

procedure Inc(var i: integer); assembler;
asm
  inc i, 1
end;

procedure IncF(var f: Comp);
begin
  f := f + 1;
end;

Und wenn du alle genutzen Prozeduren und Funktionen so umschreibst, gehts.

ABER: Du kannst keine for-Schleifen benutzen, das musst du mit while oder repeat machen.

[glkgereon]

hat sich erledigt, um meinen plan umzusetzen und irgendwie 64 Bit-ints zu nehmen muss ich erst ma die ide manipulieren: max. stack grösse höchstens 64 KB

das reicht so gerade

[neolithos]

Zitat:

Zitat von glkbkk

hat sich erledigt, um meinen plan umzusetzen und irgendwie 64 Bit-ints zu nehmen muss ich erst ma die ide manipulieren: max. stack grösse höchstens 64 KB

das reicht so gerade

Mehr kann aber TP nicht! Da der 8086 bzw. 286 auch nicht mehr konnte!