SET WINDOW TYPE TO 113
CREATE WINDOW "WINDOW 1" FROM 1,2 TO 5,24
@ 1,0 SAY "Window Type 1"
@ 2,0 SAY "Has scroll bars"
@ 3,0 SAY "and other styles"
SET WINDOW TYPE TO 2
CREATE WINDOW "WINDOW 2" FROM 1,28 TO 5,50
@ 1,0 SAY "Window Type 2"
@ 2,0 SAY "With caption"
SET WINDOW TYPE TO 1041
CREATE WINDOW "WINDOW 3" FROM 1,54 TO 5,76
@ 1,0 SAY "Window Type 1"
@ 2,0 SAY "No caption,"
@ 3,0 SAY "resizeable border"
SET WINDOW TYPE TO 4
CREATE WINDOW "WINDOW 4" FROM 9,2 TO 14,24
@ 1,0 SAY "Window Type 4"
@ 2,0 SAY "Dialog frame"
SET WINDOW TYPE TO 1028
CREATE WINDOW "WINDOW 5" FROM 9,28 TO 14,50
@ 1,0 SAY "Window Type 4"
@ 2,0 SAY "With title"
SET WINDOW TYPE TO 5
CREATE WINDOW "WINDOW 6" FROM 9,54 TO 14,76
@ 1,0 SAY "Window Type 5"
@ 2,0 SAY "Has a border"
SET WINDOW TYPE TO 6
CREATE WINDOW "WINDOW 7" FROM 18,2 TO 23,24
@ 1,0 SAY "Window Type 6"
@ 2,0 SAY "Has no border"
SET WINDOW TYPE TO 260
CREATE WINDOW "WINDOW 8" FROM 18,28 TO 23,50
@ 1,0 SAY "Window Type 4"
@ 2,0 SAY "With a shadow"
SET WINDOW TYPE TO 261
CREATE WINDOW "WINDOW 9" FROM 18,54 TO 23,76
@ 1,0 SAY "Window Type 5"
@ 2,0 SAY "With a shadow"
SELECT WINDOW "CONSOLE"
WAIT ""








