home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
617b.lha
/
PublicService
/
PublicService.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-02-01
|
5KB
|
193 lines
/*
This is a program to show a small clock on the workbench screen telling
you what to do during the day.
This is totally public domain; do as you wish with the source and
executable. Would you pay money for it?
*/
struct NewWindow newwin = {
100,30, /* window XY origin relative to TopLeft of screen */
460,11, /* window width and height */
0,1, /* detail and block pens */
CLOSEWINDOW+ACTIVEWINDOW+INACTIVEWINDOW, /* IDCMP flags */
WINDOWCLOSE+RMBTRAP+WINDOWDRAG
+NOCAREREFRESH+SMART_REFRESH, /* other window flags */
NULL, /* first gadget in gadget list */
NULL, /* custom CHECKMARK imagery */
NULL, /* window title */
NULL, /* custom screen pointer */
NULL, /* custom bitmap */
5,5, /* minimum width and height */
640,256, /* maximum width and height */
WBENCHSCREEN /* destination screen type */
};
struct MsgPort *timeport;
struct timerequest timereq;
void *IntuitionBase, *GfxBase;
struct IntuiMessage *msg;
struct Window *window;
struct RastPort *rp;
ULONG class;
struct { int min,stop; } start,mtea,lunch,atea,quit;
main()
{
readfile();
IntuitionBase = OpenLibrary("intuition.library",0);
GfxBase = OpenLibrary("graphics.library",0);
window = OpenWindow(&newwin); rp = window->RPort;
SetWindowTitles(window,(void *)-1,"The Public Servant's Clock V1.0 by Michael Warner");
SetDrMd(rp,JAM1);
drawtime();
timeport = CreatePort("clk_timeport",0);
OpenDevice("timer.device",0,&timereq,0);
timereq.tr_node.io_Message.mn_ReplyPort = timeport;
timereq.tr_node.io_Command=TR_ADDREQUEST;
timereq.tr_node.io_Flags=0; timereq.tr_node.io_Error=0;
timereq.tr_time.tv_secs = 60; timereq.tr_time.tv_micro = 0;
SendIO(&timereq);
FOREVER {
Wait(1<<window->UserPort->mp_SigBit|1<<timeport->mp_SigBit);
if (msg=GetMsg(window->UserPort)) {
class=msg->Class; ReplyMsg(msg);
switch (class) {
case ACTIVEWINDOW:
case INACTIVEWINDOW: drawtime(); break;
case CLOSEWINDOW: die("bye"); break;
}
}
else {
WaitIO(&timereq);
drawtime();
timereq.tr_time.tv_secs = 60;
timereq.tr_time.tv_micro = 0;
SendIO(&timereq);
}
}
}
die(str)
char *str;
{
if (strlen(str)) puts(str);
if (timeport) {
if (!CheckIO(&timereq)) {
AbortIO(&timereq); WaitIO(&timereq);
}
CloseDevice(&timereq);
DeletePort(timeport);
}
if (window) CloseWindow(window);
exit(0);
}
readfile()
{
FILE *file;
int p1,p2,p3,p4;
char ch,str[80];
file = fopen("s:PublicService.dat","r");
if (!file) die("Couldn't find s:PublicService.dat");
while (!feof(file)) {
fgets(str,80,file);
sscanf(str,"%s %d.%d %d.%d\n",&ch,&p1,&p2,&p3,&p4);
p1 = p1*60+p2; p2 = p3*60+p4; /* convert to minutes */
switch (ch) {
case 'S': start.min=p1;break;
case 'M': mtea.min=p1; mtea.stop=p2; break;
case 'L': lunch.min=p1; lunch.stop=p2; break;
case 'A': atea.min=p1; atea.stop=p2; break;
case 'Q': quit.min=p1; break;
}
}
fclose(file);
}
drawtime() /* draw time in window */
{
int min;
static struct DateStamp ds;
static char str[160];
DateStamp((long *)&ds); min = ds.ds_Minute;
str[0]=0;
if (min<start.min) { drawstring("Are you here ALREADY?"); return(0); }
if (min<mtea.min) {
interval(str,mtea.min-min); strcat(str," until morning tea");
drawstring(str); return(0);
}
if (min<mtea.stop) { drawstring("You should be at morning tea!"); return(0); }
if (min<lunch.min) {
interval(str,lunch.min-min); strcat(str," until lunch");
drawstring(str); return(0);
}
if (min<lunch.stop) { drawstring("You should be at lunch!"); return(0); }
if (min<atea.min) {
interval(str,atea.min-min); strcat(str," until afternoon tea");
drawstring(str); return(0);
}
if (min<atea.stop) { drawstring("You should be at afternoon tea!"); return(0); }
if (min<quit.min) {
interval(str,quit.min-min); strcat(str," until knockoff time");
drawstring(str); return(0);
}
drawstring("Don't you have a home to go to?"); return(0);
}
drawstring(str)
char *str;
{
register int i;
SetRast(rp,1); SetAPen(rp,0);
Move(rp,4,7); Text(rp,str,strlen(str));
}
char *units[20] = {" ","one","two","three","four","five",
"six","seven","eight","nine","ten","eleven",
"twelve","thirteen","fourteen","fifteen",
"sixteen","seventeen","eighteen","nineteen"};
char *tens[6] = {" "," ","twenty","thirty","forty","fifty"};
interval(str,minutes)
char *str; int minutes;
{
register int hr,min;
hr = minutes/60; min = minutes%60;
if (hr) {
strcpy(str,units[hr]);
strcat(str," hour"); if (hr>1) strcat(str,"s");
}
if (min) {
if (hr) strcat(str," and ");
if (min<20) {
strcat(str,units[min]);
}
else {
strcat(str,tens[min/10]);
if (min%10) {
strcat(str,"-"); strcat(str,units[min%10]);
}
}
strcat(str," minute"); if (min>1) strcat(str,"s");
}
}