Files

49 lines
1.1 KiB
C
Raw Permalink Normal View History

2026-07-06 18:01:36 +01:00
/*
THWIF.C
Started by DavidW, 6/12/91
Time text extension to h layer of hwif
*/
#include <hwif.g>
#include <htime.g>
#include <hwif.h>
GLDEF_C VOID *hTTOpen(VOID)
{
return(uCheckHandle(p_new(CAT_HWIF_HWIM,C_HTIME)));
}
GLDEF_C INT hTTSetTime(VOID *handle,INT type,VOID *data)
{
return(p_send4(handle,O_TO_SET,type,data));
}
GLDEF_C INT hTTSenseString(VOID *handle,INT type,TEXT *buf)
{
return(p_send4(handle,O_TO_SENSE,type,buf));
}
#define TIME_DEFAULTS (PR_TIME_NO_SECS|PR_TIME_DAY_NAME|PR_TIME_SUFFIX_NAME|PR_TIME_MONTH_NAME|PR_TIME_FORCE_UPDATE_FORMAT)
GLDEF_C VOID hTTSetFormat(VOID *handle,INT values)
{
p_send3(handle,O_TO_SET_FORMAT,NULL);
((PR_TIME *)handle)->time.f.flags&=(~TIME_DEFAULTS);
((PR_TIME *)handle)->time.f.flags|=values;
}
GLDEF_C VOID hTTSetAbbreviations(VOID *handle,INT dayabb,INT monabb)
{
p_send4(handle,O_TO_SET_ABBREVIATIONS,dayabb,monabb);
((PR_TIME *)handle)->time.f.flags|=PR_TIME_ABBREVIATE;
}
GLDEF_C VOID hTTClose(VOID *handle)
{
p_send2(handle,O_DESTROY);
}