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