32 lines
430 B
Plaintext
32 lines
430 B
Plaintext
|
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
|
||
|
|
}
|