[Doc_Dynamic] [global env; source [file join $env(MIDASBASE) TclHttpd Html settings.tml]] VME: [set ::V1720::ModuleName]#[set ::V1720::ModuleIndex] PLL Configure @ [global env; set env(ComputerName)]

[set ::V1720::ModuleName]#[set ::V1720::ModuleIndex] PLL Configure @ [set MyInfo] client address is [set ClientIPAddress]

Settings From File [set ::V1720::ModuleName]#[set ::V1720::ModuleIndex].PLLtxt [namespace eval V1720 { set html "" for {set i 0} {$i <= 15} {incr i} { append html "" } catch {unset PLLData} set PLLData [GetPLLConfig] set len [llength $PLLData] set k 0 for {set j 0} {$j <= 5} {incr j} { if {$len < 0} {break} append html "" append html "" for {set i 0} {$i <= 15} {incr i} { if {$len < 0} { append html "" } else { set Offset [first [lindex $PLLData $k]] if {[expr ($j * 16) + $i] == $Offset} { set Data [second [lindex $PLLData $k]] append html "" incr k incr len -1 } else { append html "" } } } } set html }]
Offset[format "0x%02x" $i]
[format "0x%02x" [expr 16*$j]] $Data 

Contents from Module Flash [namespace eval V1720 { set html "" for {set i 0} {$i <= 15} {incr i} { append html "" } catch {unset PLLData} foreach item [PLLReadFlash] { set Offset [first $item] if {$Offset == 0xff} {continue} set Data [second $item] set PLLData($Offset) $Data if {$Offset >= 0x5a} {break} } set k 0 for {set j 0} {$j <= 5} {incr j} { append html "" append html "" for {set i 0} {$i <= 15} {incr i} { set Offset [format "0x%02x" [expr ($j * 16) + $i]] if {![info exists PLLData($Offset)]} { append html "" } else { set Data [set PLLData($Offset)] append html "" } } } set html }]
Offset[format "0x%02x" $i]
[format "0x%02x" [expr 16*$j]] $Data

Clock Output Enable:   Clock Output Delay Enable:   Clock Output Delay (nsec):  

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

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