;----- Window Demo by Libra / The ValidatoR ------------------------------

;-------------------------------------------------------------------------
		include	'df1:s/initlibra'
;-------------------------------------------------------------------------
	OpenWindow	1,NewWindow,0
	OpenWindow	2,NewWindow1,0
	InitGfx

	Grlocate	0,#40,#40	
	Print		0,#5,#Tekst
	PrepearWindow	1
	Grlocate	0,#40,#40	
	Print		0,#5,#Tekst
	SRmb
	CloseWindow	1
	CloseWindow	2
End	Edit


NewWindow:
	dc.w	0,0,380,210
	dc.b	1,2
	dc.l	$700,$100C,0,0,TitleW,0,0
	dc.w	30,40,320,256,1

NewWindow1:
	dc.w	390,0,180,110
	dc.b	1,2
	dc.l	$700,$100C,0,0,Nazwa,0,0
	dc.w	30,40,320,256,1

Nazwa:	Ztxt	'Window1'
Titlew:	Ztxt	'Window2'
Tekst:	Ztxt	'Tekst'

;----------------------------------------------------------------------------
	section	rr,Code_C
	inclink	'ram:Libra.library'