Version 9 - recognizes div-sections with childs and
without childs: no redundant lines at the end,
- indented.
==========================================================
Converts (Makes HTML Encoding) all files in folder recursively
in <pre>-tag-format.
Adds .htm extensions to all result files names.
Creates index.htm as front page for converted folder.
(Will be displayed in Result tab, and can
be viewed by clicking on "View in Default Browser" button.)
\\
- .bop ..output_text_to_console.f :
..native_separators.false :
"<html><head><title>".=head1 :
"</title></head><body><pre>".=head2 :
"</pre></body></html>".=end :
..indent." " :
..=color."aabbff"
closed,-s
.bof "$color ".=color."bbddff"."x" : 'swap colors
"$color ".=color."aabbff"."bbddff" :
"$color ".=color."x"."aabbff" :
..&list."\l\l<div style=""background-color:#$color ;""><pre>\l\l$Indent $ \l\l" :
>-s :
"$indent ".=Indent."\l".""
-
.bof "$color ".=color."bbddff"."x" : 'swap colors
"$color ".=color."aabbff"."bbddff" :
"$color ".=color."x"."aabbff" :
..&list."\l\l<div style=""background-color:#$color ;""><pre>\l\l$Indent $ \l\l" :
=closed,-s,-s :
"$indent ".=Indent."\l".""
closed,-s 'no extra lines after closing child div:
.eof <2 .=last_folder :
..&list."</pre></div>" :
"$indent ".=Indent."\l".""
- 'with extra lines because no child divs exists:
.eof < .=last_folder :
..&list."\l\l</pre></div>" :
"$indent ".=Indent."\l".""
.bot "$p_rextension .htm".=p_rextension :
"$head1 $file $head2 " :
"$p_local_path /".=folder."\\"."/" :
..&list."$Indent <a href=""$folder $p_rbasic .$p_rextension "">$p_file </a>\l" :
"\h$in " :
"$end " :
.end
- .eop "$head1 $last_folder $head2 \l$list $end ".=out :
..save$out."index.htm"