BLISERNUM / BLISERNUMBAS
------------------------------------------------------------------------------

  Function : Get burned in serial number

  Syntax   : cValue = BLISERNUM()

  Return   : Serial number character string

  This function is used to examine a serial number and other information
  of up to 50 characters encrypted into the executable file at link time.

  The information encrypted in the executable file can be used to hide a
  serial number and licensee number in the .EXE file as a form of copy
  protection.

  The information is stored as a string of up to 50 characters in length,
  which is copied directly into the .EXE file and returned in exactly the
  same format at runtime.

  For example, to encrypt a program with a serial number of 00100001, a 5
  user license and a licensee name of Blink, Inc. use the following
  command:

  BLINKER EXECUTABLE SERIAL 00100001 5 Blink, Inc.

  At program runtime these values can be examined by assigning the serial
  number to a string and then manipulating it using a substring function,
  for example:

  TMPSERNUM = BLISERNUM()
  ? "Serial number:", SUBSTR(TMPSERNUM,1,8)
  ? "No. of Users :", VAL(SUBSTR (TMPSERNUM,10,1))
  ? "Licensed to  :", SUBSTR(TMPSERNUM,12,20)