; This GUI will run itself with out outside comands since it uses gadget
; interconnection
; we build a file defining the GUI to send to the pipe

; define a window modify is on to be able to set up interconnection
echo >t:fonttoytemp "*"Font Toy*" defg m v a"

; a readonly textfield gadget used to display chosen font
echo >>t:fonttoytemp "textfield ro minh 100 weih 150 gt *"     Font viewing done EASY !**n**n1234567890 ****@$#!%^&()-=+:;<>,.?/{}[]**nabcdefghijklmnopqurstuwxyz**nABCDEFGHIJKLMNOPQURSTUWXYZ*" "

; a font gadget to choose a font  with
echo >>t:fonttoytemp "getfont weih 0 minw 350 style"

; nested layouts for the gadgets to look pretty
echo >>t:fonttoytemp "layout b 0 weih 50"

; a pallette requester for text color
echo >>t:fonttoytemp "layout v gt *"Text Color*""
echo >>t:fonttoytemp "palette s 1 maxn 16"
echo >>t:fonttoytemp "le "

; a pallette requester for background color
echo >>t:fonttoytemp "layout v gt *"Background Color*""
echo >>t:fonttoytemp "palette maxn 16"
echo >>t:fonttoytemp "le "
echo >>t:fonttoytemp "le "

; a menu to add a little info, its all disabled so realy does nothing
echo >>t:fonttoytemp "menu gt *"Project  |About  |$!Font Viewer using|$!  GUI by AWNPipe:|Author|$!William H.M. Parker|$! <bill@amitrix.com>*""

; open the window and enter modify mode
echo >>t:fonttoytemp "open"

; setup the interconnections
echo >>t:fonttoytemp "id 2 target 1 tags 85040001|8400000D|85040016|8400000E|0"
echo >>t:fonttoytemp "id 5 target 1 tags 85004001|84000015|0"
echo >>t:fonttoytemp "id 7 target 1 tags 85004001|84000014|0"

; trun modify off this lets the GUI run from now on with outside control
echo >>t:fonttoytemp "m"

; copy the file to the pipe then delete the file
copy t:fonttoytemp awnpipe:fonttoy/xc
delete t:fonttoytemp >nil:

; the GUI does its thing unattended until the user closes it