build: add the SIBO SDK

This commit is contained in:
2026-07-06 18:01:36 +01:00
parent d76326729c
commit 64e484448c
757 changed files with 97167 additions and 0 deletions
+72
View File
@@ -0,0 +1,72 @@
/*
O_TIMER
*/
#include <hwimman.g>
#include <timer.g>
#include <timer.rsg>
#include <hwim.h>
GLREF_D WSERV_SPEC *wserv_channel;
GLREF_D VOID *w_am;
GLDEF_C VOID main(VOID)
{
IN_HWIMMAN app;
IN_WSERV ws;
p_linklib(0);
app.flags=FLG_APPMAN_RSCFILE|FLG_APPMAN_CLEAN|FLG_APPMAN_SRSCFILE;
app.wserv_cat=p_getlibh(CAT_TIMER_TIMER);
ws.com_cat=p_getlibh(CAT_TIMER_HWIM);
app.wserv_class=C_TIMERWS;
ws.com_class=C_COMMAN;
p_send4(p_new(CAT_TIMER_HWIM,C_HWIMMAN),O_AM_INIT,&app,&ws);
}
#pragma METHOD_CALL
METHOD VOID timerws_ws_dyn_init(PR_TIMERWS *self)
{
self->wserv.cli=f_new(CAT_TIMER_TIMER,C_TIMERBW);
p_send2(self->wserv.cli,O_WN_INIT);
f_newsend(CAT_TIMER_TIMER,C_MYTIMER,O_AO_INIT,"TIM:",-1);
}
METHOD VOID timerbw_wn_init(PR_TIMERBW *self)
{
W_WINDATA wd;
wd.extent.tl.x=0;
wd.extent.tl.y=0;
wd.extent.width=wserv_channel->conn.info.pixels.x;
wd.extent.height=wserv_channel->conn.info.pixels.y;
p_send5(self,O_WN_CONNECT,NULL,W_WIN_EXTENT,&wd);
p_send3(self,O_WN_VISIBLE,WV_INITVIS);
p_send3(self,O_WN_EMPHASISE,TRUE);
}
METHOD VOID mytimer_ao_init(PR_MYTIMER *self,TEXT *devname,INT mode)
{
p_supersend4(self,O_AO_INIT,devname,mode);
self->active.priority=PRIORITY_ACTIVE_REPEATER;
p_send3(w_am,O_AM_ADD_TASK,self);
p_send2(self,O_AO_QUEUE);
}
METHOD VOID mytimer_ao_queue(PR_MYTIMER *self)
{
LONG delay;
delay=20;
p_ioc4(self->active.pcb,P_FREAD,&self->active.stat,&delay);
self->active.isactive=TRUE;
}
METHOD INT mytimer_ao_run(PR_MYTIMER *self)
{
self->mytimer.count+=1;
hInfoPrint(TIMER_INFO,self->mytimer.count);
p_send2(self,O_AO_QUEUE);
return(RUN_ACTIVE_USED);
}