|
DataMuseum.dkPresents historical artifacts from the history of: Commodore CBM-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Commodore CBM-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 722 (0x2d2)
Types: TextFile
Notes: UNIX file
Names: »jl20.c«
└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
└─⟦2d53db1df⟧ UNIX Filesystem
└─ ⟦this⟧ »hr/src/jlib/jl20.c«
#include <jlib.h>
extern int myfd;
extern struct jqueue sendq,
runq,
s_replyq;
char jtick;
int G_Point(wid, pt)
int wid;
POINT pt;
{
MsgReceiver = SMGR;
MsgCmd = SM_POINT;
MsgWid = wid;
MsgPt = pt;
sendmess( );
return(0);
}
int G_ToPoint(wid, pt)
int wid;
POINT pt;
{
MsgReceiver = SMGR;
MsgCmd = SM_TOPOINT;
MsgWid = wid;
MsgPt = pt;
sendmess( );
return(0);
}
int G_Move(wid, pt)
int wid;
POINT pt;
{
MsgReceiver = SMGR;
MsgCmd = SM_MOVE;
/*
MsgWid = wid;
*/
MsgData0 = (wid << 8) + ( jtick++ & 0xff);
MsgPt = pt;
sendmess( );
return(0);
}
int G_ToMove(wid, pt)
int wid;
POINT pt;
{
MsgReceiver = SMGR;
MsgCmd = SM_TOMOVE;
MsgWid = wid;
MsgPt = pt;
sendmess( );
return(0);
}