Important Notice

The pages on this site contain documentation for very old MS-DOS software, purely for historical purposes. If you're looking for up-to-date documentation, particularly for programming, you should not rely on the information found here, as it will be woefully out of date.

                       ◄Example►                 ◄Contents►  ◄Index►  ◄Back►
──────────────────────────────────────────────────────────────────────────────
'This example uses the ASC function to calculate a hash value--an
'index value for a table or file--from a string.
 
CONST HASHTABSIZE = 101
CLS                             'Clear the screen.
INPUT "Enter a name: ",Nm$      'Prompt for input.
TmpVal = 0
FOR I=1 TO LEN(Nm$)
    'Convert the string to a number by summing the values
    'of individual letters.
    TmpVal = TmpVal + ASC(MID$(Nm$,I,1))
NEXT I
    'Divide the sum by the size of the table.
    HashValue = TmpVal MOD HASHTABSIZE
PRINT "The hash value is "; HashValue
 
'Sample Output
'
'Enter a name: Bafflegab
'The hash value is  66