// tkCreaseToggle
// simple 3 stage edge creasing toggle hotkey for all 3 components.
// crease 2 (max), crease 1 (half), remove crease (value becomes -1, or 0 if done via crease tool)
proc tkPerformCrease(){
float $mySel[] = `polyCrease -q -v`;

		if ( $mySel[0] == -1 || $mySel[0] == 0 ){
		polyCrease -op 0 -v 2;
		}
		if ( $mySel[0] == 2 ){
		polyCrease -op 0 -v 1;
		}
		if ( $mySel[0] == 1 ){
		polyCrease -op 1;
		}
}

global proc tkCreaseToggle(){

//	if (( size(`filterExpand -sm 34`) > 0 ) || ( size(`filterExpand -sm 31`) > 0)){
	if ( size(`filterExpand -sm 34`) > 0  ||  size(`filterExpand -sm 31`) > 0){
		ConvertSelectionToEdgePerimeter;
		tkPerformCrease;
		}
	else {
		tkPerformCrease;
		}
}