+ ' "$w_refuri"
+}
+
+w_advsearch(){
+ local n lbid tag category filter f t
+ filter="$(HTML "${FILTER}^" |sed 's;~\;;~;g; s;^\;;^;g; s;|\;;|;g; s;:\;;:;g;')"
+
+ printf '[form #advsearch action=?a=advsearch method=POST
+ [a href="#" Hide]
+ [p .help Select multiple tags from each category by holding down the [strong Ctrl] key on your keyboard.[br]
+ Refine the search further by setting additional search tags using the [strong "+and"] button.]'
+
+ for n in 1 2 3 4 5 6 7 8 9 10; do
+ f="${filter%%^*}"; filter="${filter#*^}"
+
+ t=''; [ "$f" -a ! "${f%%~*}" ] && t=" "
+
+ lbid="cat_${n}_(none)"
+ printf '[input .and type=checkbox name=and id="and_%i" %s][label for="and_%i" +and
+ ][fieldset .select
+ [radio "pol_%i" "pos" .pol %s #pol_pos_%i"][label for=pol_pos_%i Any]
+ [radio "pol_%i" "neg" .pol %s #pol_neg_%i"][label for=pol_neg_%i None]
+ [label .head Category:]' \
+ $n "${f:+checked}" $n \
+ $n "${t:-checked}" $n $n \
+ $n "${t:+checked}" $n $n
+
+ f="|${f#~}|"
+ printf '*\n%s\n' "$w_tagcategories" \
+ | while read -r category; do
+ lbid="cat_${n}_${category}"
+
+ t=''
+ [ "$category" = '*' -a "${f%%|${category}:*}" ] && t=checked
+ [ "$category" != '*' -a ! "${f%%|${category}:*}" ] && t=checked
+
+ printf '[radio "cat_%i" "%s" .cat %s id="%s"][label for="%s" %s]
+ [select name=tag_%s size=10 multiple' \
+ $n "$category" "$t" "$lbid" "$lbid" "$category" $n
+
+ printf '%s\n' "$w_tags" \
+ | { [ "$category" = '*' ] && grep -vF ':' |grep -vxF '' || grep -wF "${category}"; } \
+ | while read -r tag; do
+ t=''; [ ! "${f%%*|${tag}|*}" ] && t=checked
+ printf '[option %s value="%s"\n%s]' "$t" "$tag" "${tag#*:}"
+ done
+ printf '\n]'
+ done
+ printf ']'
+ done
+
+ printf '[fieldset .submit [select name=order
+ [option disabled=disabled Order By]
+ [option value=Name %s Name]
+ [option value=Date %s Date]
+ [option value=Length %s Length]
+ ][button type=submit Apply Filter]]
+ ]' \
+ "$w_coname" \
+ "$w_codate" \
+ "$w_colength"