IMAGE hello2

EXTERNAL olib
EXTERNAL hwim

INCLUDE hwimman.g

CLASS   hellows   wserv
window server active object
    {
    REPLACE ws_dyn_init
    }

CLASS   hellobw   bwin
bordered window
    {
    REPLACE wn_init
    REPLACE wn_draw
    REPLACE wn_set
    PROPERTY
        {
        UWORD isbye;
        }
    }

CLASS hellocm comman
command manager
    {
    ADD com_hello
    ADD com_bye
    }