; high light the clicked peak
;

set ss = $scolor

@find_att

exit

set pic = $returned
set l = $att[$pic]
dialogbox ("Peak";$pic) \
   ("Current experiment :"; $cur_exp) message \
   ("ppm in F1 :";(head($l))) message \
   ("ppm in F2 :"; (head(tail($l)))) message \
   ("Peak name :"; (head(tail(tail($l))))) message \
   ("System name :"; (head(tail(tail(tail($l)))))) message \
   *
show_att $pic





