The RNDI() function returns a pseudo-random 16-bit signed number, between -32,768 and 32,767.
RNDI()
DECLARE FUNCTION RNDI AS INT () SHARED STATIC INLINE
' Display a sequence of 10 random numbers RANDOMIZE TI() FOR i AS BYTE = 1 TO 10 PRINT RNDI() NEXT