Cardinal

Module with operation on HUGECARD (64bit)

Vars

randomSeed* : HUGECARD;

Procedures

Random

PROCEDURE Random* (): HUGECARD;

RandomRange

Next psuedo random number

PROCEDURE RandomRange* (max : HUGECARD): HUGECARD;

Format

Format HUGECARD.

base : Number base.
width : Total field with. Can overflow if number is bigger.

The alignment formatting flags are Left, Right & Center . The Zero flag fills with 0 of the formatting is right aligned. The Upper flag the hex decimal letters are upper case.

The Alt flags prefix binary (base 2) numbers with 0b, octal numbers (base 8) with 0o and hex decimal numbers with either 0x or 0X depending on the Upper flag.

PROCEDURE Format*(VAR Writer : Type.Stream; value : HUGECARD; base, width: INTEGER; flags: SET);

FromSubString

Convert string str to HUGECARD with number base and with argument start position into str. Return FALSE in case of an invalid base argument (2, 8, 10 or 16 is valid). If length is > 0 then the number of converted characters is expected to be length. If length is < 0 then the whole string is expected to be converted. If an overflow is detected then FALSE is returned. Return TRUE if success.

PROCEDURE FromSubString* (VAR result : HUGECARD; str- : ARRAY OF CHAR; base : INTEGER; start : LENGTH ; length : LENGTH): BOOLEAN;

FromString

Convert string str to HUGECARD with base.

Return TRUE if success.

PROCEDURE FromString* (VAR result : HUGECARD; str- : ARRAY OF CHAR; base : INTEGER): BOOLEAN;