xcom!!!
ZXNet echo conference «code.zx»
From 812/08.16 → To Paul Falcon 21 October 1997
Glad to welcome you, Paul!
You might be interested to see how it is in my textwriter
the window is described:
===================================================================================
;Main Window
db x,y,len,hgt,"window name:",0
dw OK ;if the user pressed Enter
dw CANCEL ;if the user pressed Escape
;then there are various control structures; they can be installed in any
sequences
db LocalWindow ;structure code(name)
db x,y,len,hgt,"local name 1",0
db x,y,len,hgt,"local name 2",0
db x,y,len,hgt,"local name 3",0
db #FF ; end of structure marker
db PushButton
db x,y,len
dw CallAddress1 ; if the user "clicked", execute the subroutine
db "OK",0 ; button text
db x,y,len
dw CallAddress2 ; if the user "clicked", execute the subroutine
db "Cancel",0 ; button text
db #FF
db RadioButtons
dw SOUND ; address of the variable that stores the state of the buttons
db x,y,"Off",0
db x,y,"Beeper",0
db x,y,"AY-8910",0
db #FF
db CheckBox
dw BRIGHT ; variable address
db x,y,"Bright",0
dw EMODE ; variable address
db x,y,"Text Mode",0
db #FF
db #FF
===================================================================================
Best regards, Denis.
-+- ZX WORD