#!/usr/local/bin/wish -f
wm geometry . +0+915
#wm iconify .
#wm iconname . "pfk's"
#wm iconbitmap . questhead

label .pfktitre1 -background gold -padx 0 -pady 0
label .pfktitre2 -background gold -padx 0 -pady 0
label .pfk1 -background palegoldenrod -padx 0 -pady 0
label .pfk2 -background palegoldenrod -padx 0 -pady 0
label .pfk3 -background palegoldenrod -padx 0 -pady 0
label .pfk4 -background palegoldenrod -padx 0 -pady 0
label .pfk5 -background palegoldenrod -padx 0 -pady 0
label .pfk6 -background palegoldenrod -padx 0 -pady 0
label .pfk7 -background palegoldenrod -padx 0 -pady 0
label .pfk8 -background palegoldenrod -padx 0 -pady 0
label .pfk9 -background palegoldenrod -padx 0 -pady 0
label .pfk10 -background palegoldenrod -padx 0 -pady 0
label .pfk11 -background palegoldenrod -padx 0 -pady 0
label .pfk12 -background palegoldenrod -padx 0 -pady 0

button .titre1 -text "" -relief flat -background gold -padx 0 -pady 0 -highlightbackground gold
button .titre2 -text "" -relief flat -background gold -padx 0 -pady 0 -highlightbackground gold
button .titre3 -text "1" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre4 -text "2" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre5 -text "3" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre6 -text "4" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre7 -text "5" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre8 -text "6" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre9 -text "7" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre10 -text "8" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre11 -text "9" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre12 -text "10" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre13 -text "11" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .titre14 -text "12" -background goldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .boutona -text "PFK's"  -background orange -padx 0 -pady 0  -highlightbackground gold
button .boutona1 -text "PFK's" -background orange -padx 0 -pady 0  -highlightbackground gold
button .boutona2 -text "PFK's"  -background orange -padx 0 -pady 0  -highlightbackground gold
button .boutonb -text " Alt"  -background orange -padx 0 -pady 0  -highlightbackground gold
button .boutonc -text "Ctrl"  -background orange -padx 0 -pady 0  -highlightbackground gold
button .boutond -text "" -relief flat -background gold -padx 0 -pady 0  -highlightbackground gold
button .bouton1 -text "cd ..." -background palegoldenrod -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton2 -text "" -relief flat -background palegoldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton3 -text "sv4" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton4 -text "print"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton5 -text "avant plan" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton6 -text "sp2" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton7 -text "dsmadmc" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton8 -text "arriere plan"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton9 -text "pythie" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton10 -text "export PS1" -background palegoldenrod -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton11 -text "fermeture" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton12 -text "sv2"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton13 -text "export PS1" -background darkolivegreen -foreground palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton14 -text "restauration"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton15 -text "sv3" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton16 -text "kill fonds" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton17 -text "" -relief flat  -background palegoldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton18 -text "boree" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton19 -text "kill montage" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton20 -text "deplacement" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton21 -text "orkestra" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton22 -text "| more" -background palegoldenrod   -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton23 -text "modif taille" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton24 -text "pollux" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton25 -text "VISUAL=vi" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton26 -text "icone" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton27 -text "cnudns" -background palegoldenrod -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton28 -text "xterm exit"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton29 -text "agrandissement" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton30 -text "tx7053" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton31 -text "history" -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton32 -text "" -relief flat -background palegoldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton34 -text "DISPLAY="  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton33 -text "carene"  -background palegoldenrod  -activebackground orange -activeforeground yellow -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton35 -text "" -relief flat -background palegoldenrod -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10
button .bouton36 -text "EXIT" -background palegoldenrod  -activebackground red -activeforeground yellow -command "destroy ." -padx 0 -pady 0 -highlightbackground palegoldenrod -font rom10

pack .pfktitre1 -anchor nw -side left -expand 1 -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfktitre2 -side left -expand 1 -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk1 -side left -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk2 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk3 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk4 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk5 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk6 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk7 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk8 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk9 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk10 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk11 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0
pack .pfk12 -side left -expand 1  -padx 0 -pady 0 -fill both -ipadx 0 -ipady 0

pack .titre1 .boutond .boutonb .boutonc -in .pfktitre1 -side top -padx 0 -pady 0
pack .titre2 .boutona .boutona1 .boutona2 -in .pfktitre2 -padx 0 -pady 0
pack .titre3 .bouton1 .bouton2 .bouton3 -in .pfk1 -expand 1 -fill both -padx 0 -pady 0
pack .titre4 .bouton4 .bouton5 .bouton6 -in .pfk2 -expand 1 -fill both -padx 0 -pady 0
pack .titre5 .bouton7 .bouton8 .bouton9 -in .pfk3 -expand 1 -fill both -padx 0 -pady 0
pack .titre6 .bouton10 .bouton11 .bouton12 -in .pfk4 -expand 1 -fill both -padx 0 -pady 0
pack .titre7 .bouton13 .bouton14 .bouton15 -in .pfk5 -expand 1 -fill both -padx 0 -pady 0
pack .titre8 .bouton16 .bouton17 .bouton18 -in .pfk6 -expand 1 -fill both -padx 0 -pady 0
pack .titre9 .bouton19 .bouton20 .bouton21 -in .pfk7 -expand 1 -fill both -padx 0 -pady 0
pack .titre10 .bouton22 .bouton23 .bouton24 -in .pfk8 -expand 1 -fill both -padx 0 -pady 0
pack .titre11 .bouton25 .bouton26 .bouton27 -in .pfk9 -expand 1 -fill both -padx 0 -pady 0
pack .titre12 .bouton28 .bouton29 .bouton30 -in .pfk10 -expand 1 -fill both -padx 0 -pady 0
pack .titre13 .bouton31 .bouton32 .bouton33 -in .pfk11 -expand 1 -fill both -padx 0 -pady 0
pack .titre14 .bouton34 .bouton35 .bouton36 -in .pfk12 -expand 1 -fill both -padx 0 -pady 0

bind .bouton2 <1> {set adresse [.bouton1 configure];puts $adresse}
bind .bouton13 <1> {exec who;destroy .}