append abs_location "http://" $webenv(HTTP_HOST) "/neowebscript"
set standard_procs "/neowebscript/include.nws"
load_virtual $standard_procs
emit_full_header "Available Counter Fonts"
Fonts available for display_graphic_num
Select any name or image to view all 10 digits for that set.
load_response
set last_set 38
if ![info exists response(font)] {set response(font) set0}
html -n
html -n ""
html -n "$response(font)" "td align=right" b
html -n [display_graphic_num -font $response(font) -value 0123456789] td
html -n
\n\n
html -n "
"
loop x 0 10 1 {
html -n "\t"
loop y 0 40 10 {
if {($x + $y) > $last_set} continue
set font set[expr $x + $y]
html -n $font "td align=right valign=top" "b" "a href=$webenv(DOCUMENT_NAME)?font=$font"
html -n [display_graphic_num -font $font -value 1] "td align=left valign=top" "a href=$webenv(DOCUMENT_NAME)?font=$font"
}
html -n "\t
"
}
html -n
NOTE: These fonts are not owned by NeoSoft. They are public domain fonts, found and compiled by Richard Finn and Damon Coutney.
emit_full_footer