z:test:img:img-collection:img-collection []

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.
#-*- coding: utf-8-unix mode: ctp -*-   

# img-collection.txt
# 
#---

%text
=== collection of images and pdf docs ===

can be used for flyers...

v: 2021jul07

%code
dbgsaved=dbg
#dbg=2

# OUTFILE verbosity
overb=2


# .-- read doclist
#
prepare_doclist(":zlr")
  # returns: Doc_merged[]

#dbg=dbgsaved


# .-- define images and ev other docs that contain images 
#
#dbg=3  # ////
list_a="""
# titel             : short titel : search list   : description           ;
                    
mobile 5G             : : morti mobile [2345]G :;
corona influenza    : : corona influenza casi risultat positivo negativo :;
vacino e morte      : : vacin tamponi morti   @exclude yyy :;
immun               : : imm?un  :;
massnahmen           : : massnahmen misure mesure:;

Denuce          :: Denuce:;
Dispenz         :: Dispenz dispenz:;
Abschaffen   :: Abschaffen :;

"""
%comment
corona influenza    : : corona influenza casi risultat[oi] positivo negativo
%comment-end

# .-- setup selection list
#
#dbg=3
  setup_selection_a(list_a,Selectionlist_a)  
  # init_doca_work()
  # init_stats()
  # returns: Selectionlist_a[], basedir_page

dbg=1
if (dbg>=1) showArray("Selectionlist_a")
dbg=dbgsaved


# .-- image files asked with selection

#see list_a

# args used in print_selection_img_page()
sizemontage=1 
sizeimg="100"

for (pi in Selectionlist_a) {
    search=Selectionlist_a[pi][i_search]
    title=Selectionlist_a[pi][i_title]
    titleshort=Selectionlist_a[pi][i_titleshort]

    text=Selectionlist_a[pi][i_text]
#dbg=3    
    if (dbg>=3) printf "pi=%d title=%s,  titleshort=%s,  search=%s,\n text=%s,\n", pi,title,titleshort,search,text

#dbg=3
    doc_search(search)
      # returns: Doc_match[]

    print_selection_img_entry(title,titleshort,Doc_match)
      # returns: detail_page, subdir, f_detail_page

    print_selection_img_page(Doc_match,title,text,sizemontage,sizeimg)

    if (dbg>=3) printf "pi=%d, end for (pi in )\n",pi
dbg=dbgsaved
} 





# .-- print not previously asked image files
# .-- print not previously asked image files ///TODO

printf "total %d not selected files\n",xxx

#dbg=3

search="unselected images" #///?
title="unselected images"
titleshort=title



%comment
print_page_paragraph(search,title,titleshort)
      # returns: detail_page, subdir, f_detail_page

doc_un_used("@mov")
  # returns: Doc_match[]

print_detailpage(Doc_match,title,text)
%comment-end    

dbg=dbgsaved


# .-- statistical data

doc_nr=length(Doc_merged)
sel_nr=length(Selectionlist_a)

if (overb>1) {
    printf "\nDocuments read %d, matched %d, in %d selection category.\n\n",\
    doc_nr,total_match_nr,sel_nr > OUTFILE

    #Synchronization incomplete at 17:31:12  (3 items transferred, 5 skipped, 3 failed)
}

%text
#%mverb-2
%include jpg-pdf-kw.txt