Define Device (
	Manufacturer "Test"
	Device "Test"
	CharSet (
		az2AZ
		Disable (
			' !   #   %   &   (   )   :   ;   ?   @   [   ]   ^   ` {|}~
			$21 $23 $25 $26 $28 $29 $3A $3B $3F $40 $5B $5D $5E $60 $7B-$7E
		)
		Remap (
			$3C to $28 ' < (
			$3E to $29 ' > )
		)
	)
	NoteRange 20 50
)

Define Usage (
	"Important usage information"
	"can be defined as well!"
	"------------------------------------"
	"It's a great way to remind yourself"
	"about things you need to remember"
	"about each module!"
)

Define Font "Topaz2" (
	Name "Topaz2.font"
	Size 8
)

Define Font "Garnet" (
	Name "Garnet.font"
	Size 16
	Style ( BOLD )
)

Define Font "Numbers" (
	Name "Topaz2N.font"
	Size 8
)

Define Font "Helvetica" (
	Name "Helvetica.font"
	Size 9
)

Define Font "Topaz2p" (
	Name "Topaz2p.font"
	Size 8
)

'Set Font "Topaz2"

Define Window "Main" (
	Position 0 11
	Size 340 200
	Border
)

Define Window "Second" (
	Position 340 11
	Size 250 250
)

Define Window "Draggable" (
	Position 340 300
	Size 300 100
	DragBar
)

Define Link "SliderTextTest" (
	Type Texts (
		Font "Helvetica"
		Position 0 19
		Size 100 8
		Data (
			"1"
			"Neeto!"
			"Special Gadget"
			"Sting"
			"5"
			"Perfect for me"
		)
	)
)

Define Link "EQ_Gain" (
	Type Numbers (
		Font "Helvetica"
		Position 0 -12
		Size 100 8
		MinValue -12
		Skip .1
		LevelText "dB"
	)
)

Define Link "Note" (
	Type Note (
		Font "Numbers"
		Position 0 -12
		Size 100 8
	)
)

Define Link "Auto-E" (
	Type ARexx (
		File "modules/Test/Test.rexx"
	)
)

'Define Link "Auto-Int"
'	Type ARexx (
'		String "SetGad 1 50"
'	)
')


Window "Main" (
	Border (
		Position 10 10
		Size 320 180
		Frame 3D-Recess
	)

	Border (
		Position 233 20
		Size 38 26
		Fill 1
		Frame None
	)
	Border (
		Position 271 20
		Size 38 26
		Fill 3
		Frame None
	)

	Text "ABCDEFGHIJK" (
		Position 240 35
		Font "Numbers"
		Color 2
	)

	Gadget "1" (
		Position 20 60
		Font "Numbers"
		Type Slider (
			Range 0 127
			Default 5
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
		)
	)

	Gadget "2" (
		Position 20 72
		Font "Numbers"
		Type Slider (
			Range 0 127
			Default 110
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
		)
	)

	Gadget "3" (
		Position 20 84
		Font "Numbers"
		Type Slider (
			Range 0 127
			Default 42
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
		)
	)

	Gadget "4" (
		Position 20 96
		Font "Numbers"
		Type Slider (
			Range 0 127
			Default 10
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
		)
	)

	Gadget "5" (
		Position 20 108
		Font "Numbers"
		Type Slider (
			Range 0 127
			Default 127
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
		)
	)

	Gadget "ARexxTest1" (
		Position 20 45
		Type Button (
			Label "Automate"
			Size 100 12
			Link "Auto-E"
		)
	)

	Gadget "TextTest" (
		Position 180 80
		Type Slider (
			Range 0 4
			Size 100 15
			Direction HORIZONTAL
			Default 2
			Link "SliderTextTest"
		)
	)

	Gadget "A" (
		Position 180 140
		Font "Numbers"
		Type Slider (
			Range 0 200
			Default 51
			Size 100 10
			Direction HORIZONTAL
			Link "EQ_Gain"
		)
	)
)

Window "Second" (
	Border (
		Position 20 10
		Size 150 150
		Fill 3
	)

	Gadget "Borna" (
		Position 200 60
		Font "Numbers"
		Type Slider (
			Range 10 99
			Size 15 100
			Direction VERTICAL
			LevelPlace BELOW
			LevelText "goombas"
		)
	)

	Gadget "Cycla" (
		Position 80 60
		Type Cycle (
			Width 3
			Data (
				"OFF"
				"ON"
				"YES"
			)
		)
	)

	Gadget "Cyclab" (
		Position 80 80
		Type Cycle (
			Width 3
			Data (
				"One"
				"Two"
				"Three"
			)
			DataValues (
				3 7 $12
			)
		)
	)

	Gadget "Name" (
		Position 40 115
		Font "Topaz2"
		Type String (
			MaxChars 10
		)
	)

	Text DEVICE (
		Position 40 35
		Font "Garnet"
	)
)

Window "Draggable" (
	Text "Drag me!" (
		Position 20 35
		Font "Garnet"
		Color 2
		Shadow
	)

	Gadget "6" (
		Position 20 80
		Font "Topaz2"
		Type Slider (
			Range 0 200
			Size 160 12
			Direction HORIZONTAL
			LevelPlace RIGHT
			LevelText "ms"
			Default 40
		)
	)

	Gadget "MX" (
		Position 180 16
		Font "Topaz2p"
		Type MX (
			Data (
				"Mutually"
				"Exclusive"
				"Gadget"
				"Type"
			)
			Spacing 2
			LabelPlace RIGHT
		)
	)

	Gadget "Note" (
		Position 79 62
'		Font "Topaz2p"
		Type Slider (
			Range 0 127
			Size 100 12
			Direction HORIZONTAL
			LevelPlace RIGHT
			Default 40
			Link "Note"
		)
	)
)