HI                    Exchange Lo and Hi Bytes of Word               pp 143

 Syntax:  Hi (IntVar) ;

 Type:    Integer

 Form:    Function

 Purpose: Hi order byte of argument becomes lo order byte of result.
          The hi order byte of result is zero.  The result is type Integer.

 Usage:
       VAR
          IntVar : Integer      ;        { Integer argument value       }
          Result : Integer      ;        { Integer result               }

       BEGIN
          IntVar := $F000       ;        { Set the hi order of argument }
          Result := Hi (IntVar) ;        { Result = $000F               }
       END.