# This is the module register Acquisition Control 0x8100 variable AcqCtrl 0 variable AcqCtrl.B3 0 variable AcqCtrl.B2 0 proc GetAcqCtrl {} { variable AcqCtrl variable AcqCtrl.B3 variable AcqCtrl.B2 set AcqCtrl [ReadRegister AcqControl] set AcqCtrl.B2 [expr ($AcqCtrl >> 2) & 1] set AcqCtrl.B3 [expr ($AcqCtrl >> 3) & 1] } proc SetAcqCtrl {} { variable AcqCtrl variable AcqCtrl.B3 variable AcqCtrl.B2 set AcqCtrl [expr 0x20 | ([set AcqCtrl.B3] << 3) | ([set AcqCtrl.B2] << 2) ] WriteRegister AcqControl $AcqCtrl } proc DrawAcqCtrl {} { set html "" append html "
" append html "
| Trigger Mode | " append html "Acquisition | " append html "
| " append html "" append html " | " # Bit 2 append html "" append html "" append html " | " append html "