Re: TIB: Windows for the 92


[Prev][Next][Index][Thread]

Re: TIB: Windows for the 92






On Wed, 18 Feb 1998 TurboSoft@aol.com wrote:

> 
> In a message dated 98-02-18 10:11:35 EST, you write:
> 
> << All my programs use the same program to get key input. The program that
>  gets the key input checks the list of programs to run for the next time
>  scheduled. It increments the system time and checks whether it exceeds the
>  next run time. If it does, it returns a number to the program signalling
>  that it must exit. (This is also done for keys that start system events,
>  such as moving a window.) The system then starts the other program that
>  wanted to run.
>  
>  I think this will give you a much better idea of what really happens.
>  
>  Josh Gioja >>
> 
> l'm not familiar with the 92, does it have a clock or do you just say "when
> A==5000....run program ABC"?
> 
Here's what I do:

:getchar()
:prgm
:loop
: time + 1 -> time
: if time >= timemat[1,1]
:  return -1
: getKey() -> inkey
: if inkey <> 0
:  return inkey
:endloop
:endprgm

timemat[1,1] is the time the next program wants to be run.
When this program returns -1 to the program calling it, that program must
exit so the interrupting program can be run.

JMG


References: