include("WBInclusions")        # Quora [1|9] Quora[nn]
global version = "v007"

global QuoraFile = "Quora12.html"

if length(ARGS) != 2 || (ARGS[2] * ".html" != QuoraFile)
    println("Wrong!")
    exit(16)
end

if "1" == ARGS[1]

    global a = RRead(QuoraFile, "asis")
    b = findall(">&para;<", a)
    lenb = length(b)

    println(version, "  1: ", lenb)
    for i = 1 : lenb
        ii = lenb + 1 - i
        aii = b[ii]
        global a = a[1:aii.start - 1] * " id=\"z" * string(ii) * "\">&para;<" * a[aii.stop + 1:length(a)]
    end
    z = open("QT1", "w")
    write(z, a)
    close(z)
    exit(0)
end

if "9" != ARGS[1]
    return(0)
end

global a = RRead(QuoraFile, "asis")
global toc = ""

global b = findall(r"<p class=\"q1.+?</p>", a)
global bshit = findall(r"<p class=\"q1.+?(</p>|\n)", a)

for i = 1 : min(length(b), length(bshit))
    if b[i] != bshit[i]
        println("\n **", a[b[i]], "**\n\n **", a[bshit[i]], "**\n")
        exit(16)
    end
end

global lenb = length(b)
println(version, "  9: ", lenb)

for i = 1 : lenb
    c = a[b[i]]
    d = replace(c, "<span class=\"q2" => 
                "<a class=\"q2")
    d= replace(d," id=\"z" => " href=\"#z", count = 1)
    d = replace(d, "&para;</span>" => "&para;</a>")
    d = replace(d, "<p" => "<span")
    d = replace(d, "</p>" => "</span><br>\n")
    global toc *= d
end

z = open("QT9", "w")
write(z, toc)
close(z)