G4C - AutoIcon

;not realy an icon just a small appwindow with an icon backdrop
;but it saves having to select files then click it if it was an
;appicon

WINBIG 800 600 55 45 ''
WinType 00001000

xOnLoad
GuiOpen AutoIcon
GuiLoad :Rt.g

xAppWindow rtn_var
GoSub Rt.g ViewFile

xIcon 0 0 :icons/back

