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

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

[namespace eval V1740 { set size [ReadRegister EventSize] set fifo [ReadRegister Output_Buffer] set rc [first $fifo] set len [second $fifo] set fifo [lreplace $fifo 0 1] set html "Event size = $size ([format 0x%x $size]);   rc = $rc;   data count = $len ([format 0x%x $len])" }] [namespace eval V1740 { set html "" for {set i 0} {$i <= 15} {incr i} { append html "" } set k 0 set l 15 set m 0 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 [lindex $fifo $m] incr m append html "" } incr len -1 } incr k 16 incr l 16 } set html }]
Offset$i
$k$Data

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

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