# smartnotebook application defaults file
#

#-------------------------------------------------------------------
# Define some colors, fonts and general window attributes

    set snbVar(colors) [ list white yellow pink red green blue steelblue \
	        grey slategrey purple midnightblue black ]

    set snbVar(fonts) [ list bookman chicago courier helvetica monaco \
	        sans-serif times 6x9 8x13 9x15 10x20 12x24]

    set snbVar(fixedFonts) [list courier 6x9 8x13 9x15 10x20 12x24] 
    set snbVar(fontSizes) [list 6 8 9 10 12 14 18 24 "default" ] 

	# Default fonts for text and screen widgets
    set snbVar(window,fontFamily)                9x15
    set snbVar(window,fontSize)                  "default"
    set snbVar(window,fontBold)                  9x15bold 
    set snbVar(text,fontFamily)                  9x15 
    set snbVar(text,fontSize)                    "default" 

	# cursor types
    set snbVar(snbwin,defaultCursor)             arrow
    set snbVar(snbwin,insertCursor)              xterm

	# padding necessary for buttons
    set snbVar(snbwin,padx)                     15

#-------------------------------------------------------------------
# Attributes common for all toplevel snb windows 

	foreach w "snbmain snbinit snbmsg orb xalign" {
		option add *$w*font                     $snbVar(window,fontFamily)
    	option add *$w*foreground               white
    	option add *$w*background               steelblue
        option add *$w*highlightBackground      steelblue
    	option add *$w*insertBackground         white
    	option add *$w*Button.background        grey40
    	option add *$w*Radiobutton.selectColor  red
    	option add *$w*Entry.background         grey20
        option add *$w*Entry.disabledBackground grey20
		option add *$w*Text.background          grey20
		option add *$w*listing.background       grey20
	    option add *$w*activeBackground         pink
		option add *$w*okButton.text            "Ok"
		option add *$w*quitButton.text          "Dismiss"
		option add *$w*intro.width              600
		option add *$w*intro.padX               30
		option add *$w*intro.padY               10
		option add *$w*boldLabel*Font           $snbVar(window,fontBold)
		option add *$w*titleLabel*Font 		    $snbVar(window,fontBold)
    	option add *$w*titleLabel.padY          20
	}

#-------------------------------------------------------------------
# main window settings 

	set snbVar(snbmain,geometry) 483x550-565+226

	# menubar options
    option add *snbmain*menubar*borderWidth      1
    option add *snbmain*menubar*padX             9
    option add *snbmain*menubar*padY             5
    option add *snbmain*menubar*underline        0

    # Connections panel attributes
    option add *snbmain*pConnect*listing.height  7
    option add *snbmain*pConnect*listing.width   31
    set snbVar(snbmain,pConnect,padx)            5

    # Chains panel attributes 
    option add *snbmain*pChain*listing.height    7
    option add *snbmain*pChain*listing.width     14
    set snbVar(snbmain,pChain,padx)              5

	# Command buttons
    set snbVar(snbmain,command,width)            20

    # The number of residues in one row of the sequence panel
    set snbVar(snbmain,colMax)                   20

    # Sequence panel spacing around each amino acid letter
    option add *snbmain*nassign*padX             4
    option add *snbmain*nassign*padY             0
    option add *snbmain*nassign*bd               2

    # Sequence panel spacing surrounding the entire tableau
    option add *snbmain*seq.borderWidth          2

	# Sequence panel colors
    # non-assigned residues color
    set snbVar(snbmain,unAssign,bgColor)         red
    set snbVar(snbmain,unAssign,fgColor)         white
    # Possible to assign residues color
    set snbVar(snbmain,posAssign,bgColor)        purple
    set snbVar(snbmain,posAssign,fgColor)        white
    # Possible to assign residue at the start of a chain color
    set snbVar(snbmain,pos1Assign,bgColor)       blue
    set snbVar(snbmain,pos1Assign,fgColor)       white
    # Assigned residues (current chain only) color
    set snbVar(snbmain,assignCur,bgColor)        white
    set snbVar(snbmain,assignCur,fgColor)        black
    # Assigned residues (excluding the current chain) color
    set snbVar(snbmain,assign,bgColor)           black
    set snbVar(snbmain,assign,fgColor)           white

#-------------------------------------------------------------------
# (snbinit) 'init smartnotebook' window settings 

	set snbVar(snbinit,geometry) 742x321+25+25
    set snbVar(snbinit,maxSpec)                  7

#-------------------------------------------------------------------
# (snbmsg) general message window 

    set snbVar(snbmsg,geometry)                 +200+200

#-------------------------------------------------------------------
# (orb) create shifts file from homologies window 
# For example:
#   option add *orb*background             grey80
#	option add *orb*selectColor            PaleVioletRed

#-------------------------------------------------------------------
# (xalign) align homologous sequences window 
# For example:
#	option add *xalign*Menu.tearOff           0


#-------------------------------------------------------------------
# The following are windows which are children of main snb window
# These are settings different or in addition to the main window settings
#-------------------------------------------------------------------

#-------------------------------------------------------------------
# (search) search button window

    option add *search*scale.from                0.1
    option add *search*scale.to                  10
    option add *search*scale.resolution          0.1

#-------------------------------------------------------------------
# (bestfit) show best possible assignment and shift ranges

    set snbVar(bestfit,sdevTerm)                 3.0
    option add *bestfit*scale.from               0.1
    option add *bestfit*scale.to                 10
    option add *bestfit*scale.resolution         0.05
    option add *bestfit*scale.length             320
    option add *bestfit*listing.height           16
    option add *bestfit*listing.width            60

#-------------------------------------------------------------------
# (fold1 fold2 fold3) folded peaks window settings from Options menu

    option add *fold1*listing.width              84
    option add *fold1*listing.height             10
    option add *fold3*listing.width              84
    option add *fold3*listing.height             12

#-------------------------------------------------------------------
# (reinit) Configure/Update window from Options menu 

#-------------------------------------------------------------------
# (peaklabel) Peaklabel window from Options menu 

#-------------------------------------------------------------------
# (vscale) vertical scale window from Options menu 

    set snbVar(vscale,from)                     0.01
    set snbVar(vscale,to)                       1.00
    set snbVar(vscale,res)                      0.01
    set snbVar(vscale,len)                      200

#-------------------------------------------------------------------
# (submit1 submit2) create connections window 

    set snbVar(submit1,geometry)                 +25+25
    option add *submit1*title.padY               20
    option add *submit1*listing.width            10
    option add *submit1*listing.height           5
    option add *submit2*listing.width            50
    option add *submit2*listing.height           10

#-------------------------------------------------------------------
# (dialog) utility window to ask user a question 

#-------------------------------------------------------------------
# (showfile) utility window for displaying a file 

	set mySpectra(hsqc,geometry) 436x200-565+25
	set mySpectra(strips,geometry) 550x740-0+25