/* returns UINT16 datatype or converts input to uint16 */
castuint16(s)
{
        if (argc < 1)
        {
                /* unsigned byte */
                return(UINT16);
        }
        else
        {
                /* convert to unsigned byte */
                return(castbyte({s}, UINT16));
        }
}