Re: Swoop framework example three

Sorry, I lost you here. I can add these,

> First, modify APPWIN.F at the definition of OnCreate thusly:
>
> : OnCreate ( -- res )
> mHWND PANE ATTACH mHWND STAT ATTACH
> mHWND 99 500 0 :: SetTimer DROP
> /BORDERS RESIZED 0 ;
>
> WM_TIMER MESSAGE: ( --res)
> @TIME (TIME) 0 PANE-TYPE 0 ;
>
> We set a timer to tick every 500 ms; the timer message will read
> time from the system, format it, and display it on pane 0 of the
> status bar. Check your work here, making sure everything still
> works and that the clock shows up as planned.
>

But, this code with the TMODE comes up with:

TMODE ?
      TMODE IF @TIME (TIME) ELSE COUNTER (.) THEN
At line 88 in C:\ForthInc\SwiftForth\Lib\Samples\Four\APPWIN.F

> Now, lets add code to let the time display in either of two modes:
>
> WM_TIMER MESSAGE: ( --res)
> TMODE IF @TIME (TIME) ELSE COUNTER (.) THEN
> 0 PANE-TYPE 0 ;

I tried the debugging code but I am still lost.
Jodell

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.346 / Virus Database: 194 - Release Date: 4/10/2002
----------------------------------------------------------------------
sftalk_at_forth.com      The SwiftForth programming discussion email list
To unsubscribe,  send subject "unsubscribe sftalk" to listar_at_forth.com
For help with listar commands, send subject "help" to listar_at_forth.com
Archives are located at http://www.forth.com/sftalk -- check them out!
Search the archives!    Visit http://www.forth.com/search for details.