pro Graff_set_vals, pdefs, set_only=set_only
;+
; GRAFF_SET_VALS
; Setup the values of the graffer widgets
;
; Usage:
; graff_set_vals, pdefs
;
; Argument:
; pdefs struct input The graffer control structure
;
; Keyword:
; set_only input If set, then only do those values
; which change with the current data set
;
; History:
; Original: 18.8.95; SJT
;-
common Psym_maps, psym_bm, psym_nos
if (not keyword_set(set_only)) then begin
widget_control, pdefs.ids.graffer, tlb_set_title = $
string(pdefs.version, pdefs.dir, pdefs.name, $
format = "('Graffer V',I0,'.',I2.2,': ',2A)")
widget_control, pdefs.ids.name, set_value = pdefs.name
widget_control, pdefs.ids.dir, set_value = pdefs.dir
widget_control, pdefs.ids.title, set_value = pdefs.title
widget_control, pdefs.ids.subtitle, set_value = pdefs.subtitle
widget_control, pdefs.ids.charsize, set_value = pdefs.charsize
widget_control, pdefs.ids.axthick, set_value = pdefs.axthick
widget_control, pdefs.ids.xtitle, set_value = pdefs.xtitle
widget_control, pdefs.ids.xmin, set_value = pdefs.xrange(0)
widget_control, pdefs.ids.xmax, set_value = pdefs.xrange(1)
widget_control, pdefs.ids.xlog, set_value = pdefs.xtype
widget_control, pdefs.ids.ytitle, set_value = pdefs.ytitle
widget_control, pdefs.ids.ymin, set_value = pdefs.yrange(0)
widget_control, pdefs.ids.ymax, set_value = pdefs.yrange(1)
widget_control, pdefs.ids.ylog, set_value = pdefs.ytype
endif
; The remainder depend on pdefs.cset and handles must be extracted
handle_value, pdefs.data, data, /no_copy
locs = where(psym_nos eq data(pdefs.cset).psym)
widget_control, pdefs.ids.psym, set_value = locs(0)
widget_control, pdefs.ids.symsize, set_value = data(pdefs.cset).symsize
widget_control, pdefs.ids.line, set_value = data(pdefs.cset).line
widget_control, pdefs.ids.colour, set_value = data(pdefs.cset).colour
widget_control, pdefs.ids.thick, set_value = data(pdefs.cset).thick
widget_control, pdefs.ids.sort, set_value = data(pdefs.cset).sort
if (data(pdefs.cset).descript ne '') then $
widget_control, pdefs.ids.cset, set_value = data(pdefs.cset).descript $
else widget_control, pdefs.ids.cset, set_value = string(pdefs.cset+1)
handle_value, pdefs.data, data, /no_copy, /set
; Clear the message box
widget_control, pdefs.ids.message, set_value = ''
plot_object, pdefs
end
If you can't feed a hundred people, then feed just one.
('Ê'ù'Ü''L'q'Ý&È''t'e''m'g'a'Ã'à''((æ'(à'V(^(ß(ž(à(Ó(š(ð(Œ(×(ò(({(3((8(((Ü'û'5'š&S&&%% $$F# #I"ž!p @1âÛ8ÁxqbVvEAE5}TB?:cSh]lu^§Òe
@"#ž#F$$
$U%¹%Õ%I&U&·%
&&&å&$'"'E'''ò&Ý'¯'B'Ò'(ó'ë'J''É'q''d')'ì&µ'!'Þ&Û&'¿&Ý&1'Ç&'''w'M'`'7'K'''2'r'')(9(F( (Ó()È(@)Ÿ(Ã(®((r((
(Ã'<(''Z'û&X&%l%+%Á$å#z#"F"r!Ä KHò3¬óŠOaMbR<4`<`DdLxmeÚ3Êv""Ú#
$[$$%%Ñ%×%x&&c&á&º&&Ç&&s&í&×&'4''''J'l'z'5'c'ý&'E'
'å&²&·&à&Å&&c&&b&&*&\&H&Ÿ&ò&ž&''7'ú&Ê&Ñ&Ê&W'U''?(((z((Œ(((ó(Ò(¯(~(-(j(:(/(B('`'À&&;&Ë%5%§$ä#C#Ï""H!Ç
2jB]šp}n\-LBŠ@MasVYe}{zå, D"ŒG"á"
#$$R$$I%×%¯%U&ú%3&v&&&&Î&5'±&&&Ä& &Ä&ª&&&ý&¿&Ë&¯&&u&x&&&v&ó%&$&_&ì%Ë%ç%Ï%%z%Ã%<&v&T&~& &&n&&&& &ì&''s''j'(n((P(z(((}(D(S(÷'l((d(w'Þ'''Â&0&ò%±%È$$q#ã"«""]! ¬ÐUPõs|}W\_Z[Qm\fadw¢}ë
¿Á¢"#q#$z$œ$ô$%8% %>&H&F&è%Ó%)&±&&y&&&D& &s&!&û%Ð%Z&
&U&B&(l%Ç%=&U&ÿ%ç%$&ç%Ö%%·%%
%k%s%t%~%€%%V%Ì%&*&+&/&4&;&5& '~&æ&Û&i'-'Þ'}'(@(ú'(¥((d(((X({(
(z(@(Ô'o' 'ß&k&%&%Ø$ß#`#0"L"¹!0! ³AÇS7zxR_R¥?_[OYis°
ÍW¿F"
#2#ÿ#$î$:%%%.&%&X&5&&$&&&I&P&P&|&&ã%&¥%
%&Á%á%Þ%Ã% %h%b%%p%¡%V%)%K%?%å$%»$3%/%/%M%%ê%9%^%w%%&ù%?&&&t&L&)&&ö&Ð&Ý&'f'.'¥'Å''(ì'W(·(Q(=(A(2(Ð'5(Å'³'û';'Î&w&&{%%:$#]""Š!!5 Ä)+"Ú&ð î€tx^VZiagu\«ÞÀÊz"$##ê#3$¡$%%m%æ%=&-&%&ë%&Q&d&ü%^&·%±%%µ%Ä%Ö%Æ%|%Q%{%c%?%¥%}%%ª%%%ë$Ù$Œ$µ$$$Ì$±$¿$€$H$þ$¯$Õ$ù$)%%N%%%v%º%&Ä%&±%ý%[&s&å&»&è&œ&6'~'h'á'Ö'¡'®'(((a('(H(((Å'à'¥''¶&]&E&®%$G$#Ä"!!× & +¥®pWmUnxxmmµüo@
Å!«"6#å#)$$»$A%Ï%%Ê%
&&.&'&à%å%A&ú%µ%{%š%P%T%%%$%Û$Ç$'%'%Ý$$Ã$j$³$÷$m$]$`$$
$E$§$u$N$1$1$5$F$$$Û$¬$Ø$Ô$% %Ó$E%+%q%ñ%±%&&&W&&v&œ&
&ã&']''i'³'](
(((
( (©'(Ö'y'7'"'&{&2&$&%ý$ú#$#c! º + NËÊŸÁU¹¡zi¬XuUengÌ?Ÿ L÷ »!Ë"7#,$¥$%8%%U%©%{%a%R%³%&&¡%Ü%%%%1%$%%%$Å$
$$$u$Z$o$$$E$9$
$A$$I$ë#ñ#ò#Ê#é#!$7$.$ã#S$$H$$|$Ž$%%÷$%K%w%a%&-%6%Ô%û%&&&&r&€&°&2'È&§'¥'ú'ñ'((f(h( (1('¡'œ'L'H'€&V&ì%S%Ú$%$¿#;#\"O!!J u¥sXik¿[ia[yÊ<ÎDÄ ×!X"Â"¡#$°$õ$j%%ü%>%Í$V$Î$o%%-&%%c%!%6%ª$š$Å$$$
$[$*$q$ò#S%ë#($ã#Ù#Ä##ò#L#º##A##³#Û#í#Ï#®#$€#ì#€#I$2$($%$m$7$þ$«$%%ý$K%H%%Ž%²%9& %ç%D&7&X&Š&''ž''w'ñ'ò'Š'\(
(((©'U'£' '&&&%$Y$¿#Ñ"7"©!p * itZTn`šKSj|®kœF° A"
#|#Â#?$Â$$%S%á%%¿%î$$ý#g$L%%z%X%)%Õ$à$$S$&$L$è#b$æ#5$ó#Å#s##±#Ù#è##¥#W#.#<#Æ"á")#ò"g#:#ª##s#`#
#ã#Ò#²#õ#$$M$<$$$f$±$º$î$O%ÿ$c%|%%
%u%í%Ù%b&K&€&,'Æ&Ž&>'K'»'2(á'ä'Ý'-("(Á'N'®&ä&&8&&3%û$Ð##¿"j"¬! Òú© ߺ>ad·éÿy ["B#9#'$k$Ç$š$@%%Þ%#&Ç%É$c$E$Ÿ$*%%|$è$ñ$/$J$j$9$$Ý#È#u#Ý#È#q#°#Y#.##^#Í#7# #*#Þ"º""á"È"¿"Õ"ý"A#_##2###Á#y#¹#ð#$¶#è#Ë#s$6$Y$$w$·$É$%%ô$ž%P%%ì%A&&l&Ì&&J&k&%'»&Þ'¶'ê'2((ý'Ø'Ÿ(Ü'ø&&&&%%$ê##Â"!C!Ð ñ2Š ~9°flž!ÙŠ "ß"L#$$$ù$&%µ%ë%%&ê%w%X%£$x$Ï$-%&%W"c$Ö$D$Ñ#æ#Å#u#·#U######â"î"ë",#"Ú"u"Ô"s"v"#""k""µ"2##ý"####º###o##î#Ò#Ø#·#î#ù#Z$A$Œ$u$ì$j%3%þ$G%È%¥%%&2&&ù%¥%C&Õ&š''(ù'(#(*(ú'ø'ž'Ö&á&&&\%Ð$$##ì"¹!!É ¥#9s:ž¹ož$!å"##E$$Ä$/%%ÿ%!& &N&Ÿ%E%m%ú$ó$Ö$$$:$$ $ß##§#Ò#s#-#ö"à"Ã"#ã"t"Õ""È""i"ö!w"U"b"5""W"c"["œ"Š"""Æ"Á"N#ï"##F#S#Ï#j#{#Ò#$$÷#$($B$3$*$|$±$%ù$û$°%y%Í% &k&&k&¥&'|''(×'/(ü'ò'ó'Ç'b'W'À&Œ&&Ñ%@%|$z$ü#²#â"þ!X! ¿;âÚ0
Äì3ÆkÒf"P##0$$"%%%%Í%
&/&÷%£%%1%r%d%Õ$`$î#ð#©#w##@###î"#è""Ù"S""]""s"B"""""Ì!Ú!Ÿ!ÿ!û!""]"q""h"Þ"Ó"Ê"Õ"à"=#w##D#£#L##Ë#Ï#÷#v##ž#Ú#$%$Z$$$Ã$%%-%%®%ñ%
&O&&Õ&ì&W'~'±'Í'°'é'(ð'^'_'K'ñ&¿&C&§%N%É$ë#Ô#8#
"!M! ²£ÞÌgÎr²0qÖÛ4"Ñ"y#â#Æ$%D%%%¢%œ%í%ÿ%&%×%w%E%%±$¡$Y$V$Å###!##Q#Ö"ü"©"³"7""b""="!"ð!ä!³!ß!°!Š!"!"""Û!["0""5"h"ä"Ñ"Ø"#ï"##%#Ñ"E###0#<#t#§#Y#Ü##±#Ô#$Ö#v$x$É$+%
%g%m%Ê%^&&<&'Ô&`'3'²''Ö'È''ú'¹'¡'ë&&
& &Á%ù$¶$$³#L#Y"ü!ù >#t
Íu§ RÝ!"J#ü#9$¡$ %~%%è%è%*&4&&É%g%i%,%Û$$ñ#v#
"##R#÷"Ó"Ì"Ó"º"É"§"w"1" "Í!Ý!ö!"ü!Ü!¥!Ô!P!Ä!Ö! !Ì!"þ!ü!'"Ê!<""ª"Š""R"Î""š"§"î"#,#?#4#9#O#[#%#°#}#Z#n#ã#Â#ù#k$$×$»$%Y%d%Ó%ý%R&e&€&Þ&ã&B'Û'Î'ê'é'é'£'['e'ì&Ð&ï&&à%%Ú$*$á#O#"
!° šîÇ
Ö¹sà
R}~"#Ã#E$ %÷$Ì%}%Ì%&g&%&ç%%ú%%@%%$$÷#,$#©#g##ð"Ö"©""Ö!ö!""Ú!Æ!%"Ë!!Å!o!
!V!O!g!}!i!À!C!|!!Ÿ! "ã!""X"k"o""»"s"ž""""Ñ"ä"#Ö"y"é"U#J##4##°##ê#þ#|$É$ô$ñ$ %%T%â%&&}&& '4'.'''u'§''ô'â' 'O'Ë&_& &%C%%q$î#Ñ""g!? ÙªHÓçÃ)iDK"#e#7$$ð$%l%ð%&]&ô%&Ã%m%©%$%ß$¥$[$]$$Ä#>#R##æ"Ù"Ø"¡"C"9"$"É!Ø!Ž!Ö!D! !!U!@!!!! !!,!H!Œ!!!!!|!ç!Í!4")"2"t"("_"~"k"°""
"|"ã"#ž""u"æ"œ"Õ"1#/#í"2#»#ù#è#r$$Ú$Ò$'%a%%&&&º&Ž&&U'þ&F''Ï'(À'õ'¬''G'°&7&Ä%f%(%$ë#\#"¥! ! 8p<âü|Šs% ¬"#¹#.$Ü$V%ð%¬% &$&&B&4&«%€%%$¢$Ô$[$$Ö##Q###Ã"Ð"â"J"ÿ!U"Ê!!C!|!|!9!!!M!!ô !!%! !Y!x!?!&!!=!!Í!!ý!"""1"G"ô!I""\"o"y"h"5"u"»"9"ó"J"ª"¹" "ò"#D#m#T#£#o#2$n$o$$Ø$ò$E%%ù%;&Ö%w&&ã&'E'Þ''Ñ'
(¹'®'6'''Z&ò%Ì%%ú$U$¥#Ä"G"! ¶©"Ts"#Ð#$$â$N%%Þ%ö%)&:&0&,&&·%a%%÷$Œ$5$?$/$H#.####¶"o#Ž" "ë!Ã!§!!Æ!!!d!l!g!ã !ö !Î '!h!/!H!!~!r![!o!!Ã!Ý!¬!" "Û!ã!@"V"u"{"Ê"p"§"c"0"1"j"c"€"J""¬",#6#a#g# #
$¿#"$x$Ê$%é$%N%%ø%&'á&é&'''Ù'þ'((¯'ú')'ä&Å&»&ì%Ï%A%c$#C#e"h! ð.=wüf} ž"#$Ž$ž$C$%,&&& &e&»%ê%Â%v%%â$J$ô#¬#Å#¡#Z#,##â"»"y""Ä!ä!î!}!o!U!]!+!!
!Ã !ñ Ê × þ å
!!!!O!~!æ!l!!!r!ã!ü!à!.""["U"
"a"6"l"Z"I""""ø!U"ª"º"®"â"ø"#1#+#p#»#$õ#³$Ï$%¬$^%å%ó%
&Å&Ž&ó&ø&l'''i'n'
(ã''G')'Š&V&/&%¥$D$#Ô"ä!ò Úý>îzN"¹"Ž#{#Ù$%¥%K&€%v&{&B&T&Ü%i%e%8%Û$×$ð$=$µ###N##"H"}"£!Ü!"œ!ž!H!d!o!2! è Ê Ã À Ü Þ ï à Æ !p!ú !d!!Ÿ!¡!ž!¥!"!Á!&"N">"ì!"*"]"ý!H"ó!"g"'"&".">"e"#¯""#:#~#Í#Û# $D$°$%%%µ%¯%\&+&f&Š&í&p'1''V'D'Þ'8(($('c'&a&%%ö$#$Å"<"?!| Î<È¢ e Ò""#$$>%&ø%C&
&E&À&¥&$&&°%%$%Þ$h$$M$¹#f#±#L#Œ"Ã"d"\"/"â!!ù!²!!y! !ü Ô !Ô Ã ¹ p à ² !F!
!ë +!ø !!
!]!!!Ž!m!!ø!Ò!ó!7"Ñ!"""Ó!!ÿ!T""þ!,"I"-"6"b"e"¥"°"Ë"þ"c#¯#$ú#$ó$%P%k%%D&u&V&À'1']'º'
(Þ'5((X(»''ð&&è%]% $ $)#¥"Š!!¬ i«¥NZ"-#ð#$ù$i%(&2&|&&'ï&·&3&Ö%Ã%%S%ë$o$8$$a#T#0##
#Í""Y"Ô!"ï!!¡!T!P!,!?!!È ä × Ä § ç î !!Í ó !ú !ÿ .!|!S!l!!@!Ÿ!t!N!w!!`!¶!å!ï!;"Ç!ú!c!æ!ê!""R""î!"x"ì""Ñ"#œ###$]$ä$$%å$%Ž%&&E&š&ä&Â&,''k'ò'È'j(Y(W(ë'Â'á&ª&l&%T%³$§#ê"ñ!1!Æ a
> è"¿#U$%%õ%$&7&Ð&Ø&¶&ß&E+H&&%^%ò$ž$Â$$6$
#j#p#É"#"±"9""Ì!³!Ã!!N!,!-!j!!.! !ë Ù Ô Ý ü Í å Õ ü ò Û (!S![!8!1!P!¥!Ô }!,!~!T!!!¡!!!«!Ù!à!W!!I"Ò!!"1"î!="="""Œ"ó".#g##$`$$©$©$%È%Î%ã%°&&Ù&''ð'1(Í'(R(@(€'»'T'ï&³&'&Å%Œ$$I#E"}!D!@ ;ZÝ!#ê#~$]%µ%;&&&â&í&ø&Þ&='j&Ð%^%a%è$í$|$($#{#9##,#²"~"E"8""Ÿ!Ÿ! !Ð!V!e!B!c!
!Ò ô » !û
! !!Û Ù ± !!
!Ø í !,!y!'!X!:!*!d!!!!C!~!!ä!È!Î!}!Î!T!Ö!Ž!Ö!È!""ù!E"`""ñ"#Y##ã#$a$$§$ù$r%%S&&º&à&È&l''Ø'ü'S(((b(ÿ'š'K'¬&w&î%%W$n#Ž""~! "Ó#Œ$œ$-%Ž%A&Ê&Ô&í&Î&''Â&_&Ÿ%0%f%%€$~$($÷#£##:##v""ð!P""!¢!w!Î!Œ!J!l!ï '!$!ã ¯ ä ¥ Ž ž á ÷ Ú ø Å 2!ô Ú Ú 3!$!M!!Ý &!S!y!!J!ä!©!«!r!Ü!ó!{!i!!!Ê!¹!!x!D""4""B"z"É"Ø"6#`#ü# $f$h$$<%M%Ñ%&&&Ã&6'9'Ã'Ú'()(`(i(
(µ'G('>'V'&6%:%§#(#i"!Ã `â Ž"³#¯$3%Ü%R&'á&5'''ô&&|&&ê%%v%ï$»$t$H$
$#Ÿ#
##Ô""}"ö! "Î!Â!l!Ÿ!Ã!"M!G!