build: add the SIBO SDK

2026-07-06 18:01:36 +01:00
parent d76326729c
commit 64e484448c
757 changed files with 97167 additions and 0 deletions
@@ -0,0 +1,31 @@
+#include <dat.g>
+#include <dat.rg>
+#include <date.h>
+
+GLREF_D PR_DATWSERV * const w_ws;
+
+#pragma METHOD_CALL
+
+METHOD VOID *datedlg_dl_item_new(PR_DATEDLG *self,AD_DLGBOX *par)
+    {
+    return(f_new(CAT_DAT_DAT,par->class));
+    }
+
+METHOD VOID datedlg_dl_dyn_init(PR_DATEDLG *self)
+    {
+    P_DAYSEC ds;
+
+    p_send4(((PR_DATWIN *)w_ws->wserv.cli)->datwin.time,O_TO_SENSE,SENSE_TIME_DAYSEC,&ds);
+    p_send4(self,O_WN_SET,1,&ds.day);
+    }
+
+METHOD INT datedlg_dl_key(PR_DATEDLG *self,INT index,INT keycode)
+    {
+    P_DAYSEC ds;
+    
+    p_send4(self,O_WN_SENSE,1,&ds.day);
+    ds.sec=0;
+    f_leave(p_send4(((PR_DATWIN *)w_ws->wserv.cli)->datwin.time,O_TO_SET,SET_TIME_DAYSEC,&ds));
+    return(WN_KEY_CHANGED);
+    }
+