!PROGRAM guictl.sdf,1.0 (100)
!VEDIT = 100

! Name: guictl.sdf
! Description: GUI Control related includes
! Author: Stephen Funkhouser
! Date: 10-28-2011
!
!----------------------------------------------------------------------------------------------------------------
!{history}
! 10-28-2011 --- 100 --- Stephen Funkhouser
! Created
!
!----------------------------------------------------------------------------------------------------------------

!----------------------------------------------------------------------------------------------------------------

++IFNDEF INCLUDE_GUICTL_SDF

DEFINE INCLUDE_GUICTL_SDF   = 1

DEFSTRUCT AUI_STRUCT
!MAP1 aui'struct'temp                                                          ! use in editor to see structure
    MAP2 ctlid$     ,s,32
    MAP2 ctlid      ,b,4
    MAP2 ctext$     ,s,64
    MAP2 cstate     ,b,4
    MAP2 ctype      ,b,4
    MAP2 cmd$       ,s,64
    MAP2 exitcode   ,f,8    !added to cmd$ if (cmd$ = "") and (exitcode # 0)
    MAP2 srow       ,f,8
    MAP2 scol       ,f,8
    MAP2 erow       ,f,8
    MAP2 ecol       ,f,8
    MAP2 fgc        ,i,1,-2
    MAP2 bgc        ,i,1,-2
    MAP2 fontattr   ,b,4
    MAP2 fontscale  ,f,6
    MAP2 fontface   ,s,32
    MAP2 tooltip$   ,s,64
    MAP2 pid        ,b,4,-1
    MAP2 winclass   ,s,32
    MAP2 winstyle   ,b,4
    MAP2 winstylex  ,b,4
    MAP2 ctype2     ,b,4
ENDSTRUCT

!entry$     [in/out]    - will be handled by an instance of a string variable
!exitcode   [out]       - will be handled by an instance of a float variable
!setdef$    [in]        - is defined separately because it can be vary large
!               and it's more effiecient to only create the variables needed

DEFSTRUCT INFLD_STRUCT
!MAP1 infld'struct'temp                                                        ! use in editor to see structure
    MAP2 row        ,f,6
    MAP2 col        ,f,6
    MAP2 xmax       ,b,3
    MAP2 xmin       ,b,3
    MAP2 type       ,s,64
    MAP2 inx        ,f,6
    MAP2 pid        ,b,4
    MAP2 pid$       ,s,32
    MAP2 op         ,b,4
    MAP2 timer      ,f,6
    MAP2 cmdflg     ,f,6
    MAP2 defpt      ,f,6
    MAP2 maxpt      ,f,6
    MAP2 funmap     ,f,6
    MAP2 infclr     ,f,6
    MAP2 hlpidx$    ,s,256
    MAP2 maxchrs    ,f,6
ENDSTRUCT

++ENDIF
