[Doc_Dynamic] [global env; source [file join $env(MIDASBASE) TclHttpd Html settings.tml]] VME: [set ::V1730PSD::ModuleName]#[set ::V1730PSD::ModuleIndex] Event Readout Buffer @ [global env; set env(ComputerName)]

[set ::V1730PSD::ModuleName]#[set ::V1730PSD::ModuleIndex] Event Readout Buffer @ [set MyInfo] client address is [set ClientIPAddress]

[namespace eval V1730PSD { set len [ReadRegister EventSize] set html "Block Length = $len ([format 0x%x $len])" }] [namespace eval V1730PSD { set html "" for {set i 0} {$i <= 15} {incr i} { append html "" } set k 0 set l 15 set len [ReadRegister EventSize] # incr len ;# for new DPP firmware for {set j 0} {$j <= 255} {incr j} { if {$len < 0} {break} append html "" append html "" for {set i 0} {$i <= 15} {incr i} { if {$len > 0} { set Data [ReadRegister DataItem] # if {[string compare $Data "0"] == 0 || [string compare $Data "0xffffffff"] == 0} { # append html "" # set len -1 # break # } else { append html "" # } } incr len -1 } incr k 16 incr l 16 } set html }]
Offset$i
$keob$Data

Last Updated: [clock format [clock seconds] -format "%B %d, %Y %H:%M:%S"]

[namespace eval V1730PSD { if {$JS != ""} { append JS "\");" set html "" } }] [mypage::contents [list Home ../index.tml]] [mypage::footer]