Mine

from Tkinter import *
from hal import *


class pyvcp_number(Label):
     " (indicator) shows a float as text "
     def __init__(self,master,pycomp,halpin="text",format="2.1f",**kw):
          self.v = StringVar()
          self.format=format
          Label.__init__(self,master,textvariable=self.v,**kw)
          self.halpin=halpin
          pycomp.newpin(halpin, HAL_FLOAT, HAL_IN)

     def update(self,pycomp):    
          dummy = "%(b)"+self.format
          self.v.set( str( dummy  % {'b':pycomp[self.halpin]} ) )

  

# -------------------------------------------

class pyvcp_bar(Canvas):
     " (indicator) a bar-indicator "
     def __init__(self,master,pycomp,
              fillcolor="green",bgcolor="grey",
               halpin="bar",startval=0.0,endval=100.0,**kw):
          self.cw=200    # canvas width
          self.ch=50     # canvas height
          self.bh=30     # bar height
          self.bw=150    # bar width
          self.pad=((self.cw-self.bw)/2)

          Canvas.__init__(self,master,width=self.cw,height=self.ch)
          self.halpin=halpin
          self.endval=endval
          self.startval=startval
          pycomp.newpin(halpin, HAL_FLOAT, HAL_IN)

          # the border
          border=self.create_rectangle(self.pad,1,self.pad+self.bw,self.bh)
          self.itemconfig(border,fill=bgcolor)

          # the bar
          self.bar=self.create_rectangle(self.pad+1,2,self.pad+self.bw,self.bh-1)
          self.itemconfig(self.bar,fill=fillcolor)
          self.value=0.0 # some dummy value to start with     

          # start text
          start_text=self.create_text(self.pad,self.bh+10,text=str(startval) )

          #end text
          end_text=self.create_text(self.pad+self.bw,self.bh+10,text=str(endval) )
          # value text
          self.val_text=self.create_text(self.pad+self.bw/2,
                                   self.bh/2,text=str(self.value) )
          
     def update(self,pycomp):
          # update value
          self.value=pycomp[self.halpin]
          percent=self.value/(self.endval-self.startval)
          if percent < 0.0:
               percent = 0
          elif percent > 1.0:
               percent = 1.0
               
          # set value text
          valtext = str( "%(b)3.1f" % {'b':self.value} )
          self.itemconfig(self.val_text,text=valtext)
          # set bar size
          self.coords(self.bar, self.pad+1, 2, self.pad+self.bw*percent, self.bh-1)






# -------------------------------------------




class pyvcp_led(Canvas):
     " (indicator) a LED "
     " color is on_color when halpin is 1, off_color when halpin is 0 "

     def __init__(self,master,pycomp,
                    halpin="led",off_color="red",on_color="green",size=20,**kw):
          Canvas.__init__(self,master,width=size,height=size,bd=0)
          self.off_color=off_color
          self.on_color=on_color
          self.oh=self.create_oval(1,1,size,size)
          self.itemconfig(self.oh,fill=off_color)
          self.halpin=halpin
          pycomp.newpin(halpin, HAL_BIT, HAL_IN)

     def update(self,pycomp):
          if pycomp[self.halpin] == 1:
              self.itemconfig(self.oh,fill=self.on_color)
          else:
              self.itemconfig(self.oh,fill=self.off_color) 






# -------------------------------------------






class pyvcp_checkbutton(Checkbutton):
     " (control) a check button "
     " halpin is 1 when button checked, 0 otherwise "

     def __init__(self,master,pycomp,halpin="chbutton",**kw):
          self.v = BooleanVar(master)
          Checkbutton.__init__(self,master,variable=self.v,onvalue=1, offvalue=0,**kw)
          self.halpin=halpin
          pycomp.newpin(halpin, HAL_BIT, HAL_OUT)

     def update(self,pycomp):
          pycomp[self.halpin]=self.v.get()





# -------------------------------------------






class pyvcp_button(Button):
     " (control) a button "
     " halpin is 1 when button pressed, 0 otherwise "
     def __init__(self,master,pycomp,halpin="button",**kw):
          Button.__init__(self,master,**kw)
          self.halpin=halpin
          #p = component("test2");
          pycomp.newpin(halpin, HAL_BIT, HAL_OUT)
          self.state=0;
          self.bind("<ButtonPress>", self.pressed)
          self.bind("<ButtonRelease>", self.released)     

     def pressed(self,event):
          # "the button was pressed"
          self.state=1     

     def released(self,event):
          # the button was released
          self.state=0

     def update(self,pycomp):
          # what to do here ??
          # pycomp.halpin = XXX  does not work!
          pycomp[self.halpin]=self.state





# -------------------------------------------




class pyvcp_scale(Scale):
     " (control) a slider "
     " halpin-i is integer output "
     " halpin-f is float output "
     
     def __init__(self,master,pycomp,halpin="scale",**kw):
          Scale.__init__(self,master,**kw)
          self.halpin=halpin
          #self.h = component(halpin)
          pycomp.newpin(halpin+"-i", HAL_S32, HAL_OUT)
          pycomp.newpin(halpin+"-f", HAL_FLOAT, HAL_OUT)

     def update(self,pycomp):
          pycomp[self.halpin+"-f"]=self.get()
          pycomp[self.halpin+"-i"]=int(self.get())