RE: A83: Re: RandInt(

To: <assembly-83@lists.ticalc.org>
Subject: RE: A83: Re: RandInt(
From: "Anton Kuckartz" <su025882@wolmail.nl>
Date: Fri, 22 Sep 2000 17:14:37 +0200
Importance: Normal
In-Reply-To: <000501c02321$fc520320$6211c5d5@dsfs98>
Reply-To: assembly-83@lists.ticalc.org


Is this with decimals, or just a number without decimals?

-----Oorspronkelijk bericht-----
Van: owner-assembly-83@lists.ticalc.org
[mailto:owner-assembly-83@lists.ticalc.org]Namens Frank Schoep
Verzonden: woensdag 20 september 2000 18:44
Aan: assembly-83@lists.ticalc.org
Onderwerp: A83: Re: RandInt(



Dunno if it's right, but it should work (slowly):

; random number routine (returns de (0 to hl)
; input : hl = maximal result
; output: de = pseudo random number

randnum:
    push hl
    call _random
    pop hl
    call _setxxxxop2
    call _fpmult
    call _convop1
    ret

Just paste this code somewhere in your project and use 'call randnum' to
create a random number in DE with HL as maximal number. I thought Ion
supported some routine, but I don't really wanna know.

Greez,
Frank

References:

A83: Re: RandInt(

From: "Frank Schoep" <dsfs98@concepts.nl>

Prev: A83: Transmission
Next: Re: A83: Re: RandInt(
Index(es):
- Main
- Thread