#pragma rtGlobals=3		// Use modern global access method and strict wave access.

Macro CheckBoxTest()

Variable/G check = 0, radio = 0
Variable/G stat = 0

Dowindow/k CheckBoxTest
NewPanel /W = (0,0,90,50)
CheckBox    check, 		pos = {20, 20},	mode = 0,title = "F",   value = root:check
CheckBox    radio, 		pos = {70, 20},	mode = 1,title = "2F",	value = root:radio, proc = checkAction1

EndMacro

Function checkAction1(CB_Struct) : CheckBoxControl
	STRUCT WMCheckboxAction &CB_Struct
	NVAR radio = root:radio
	if ( CB_Struct.checked == 1)
		radio = 0
	endif
End