
class guiObject {
    variable state 1
    protected variable subject
    protected variable frame
    method setSubject { newSubject  } { set subject $newSubject }
    method sync {}
    method enable {}
    method disable {}
    method queryState {}
}

