Re: A86: Re: Creating distinct random-integer lists using ASM or BASIC


[Prev][Next][Index][Thread]

Re: A86: Re: Creating distinct random-integer lists using ASM or BASIC





Hey, sorry!  I sent that to the wrong list :-)


>
>Hey, thanks!  I must have had something else wrong though as well, because
>it seems to have permanently crashed.  Maybe that jmp instead of jsr / rts?
>
>Anyhow, what do you do when you've taken out all five batteries and the
calc
>still won't turn back on?  (it's important, it's my roomate's calculator)
>
>
>>
>>In a message dated 98-10-02 20:02:29 EDT, you write:
>>
>><< ;For a list of 10 #'s randomly placed in a list
>> :10 -> dimL List
>> :Fill(0,List
>> :For(A,1,10
>> :Lbl A
>> :randInt(1,10)->C
>> :If List(C)(is not equal to)0:Goto A
>> :A->List(C)
>> :End
>>
>> I'm pretty sure this will work. It is probably the fastest possible in
>> Basic.
>>
>> -InFuZeD " The Basic Guru "
>>  >>
>>
>>
>>Wow. thanks.. that worked pretty well.. It's not THAT slow... exactly what
>i
>>was looking for...
>