#-*- coding: utf-8-unix mode: ctp -*- # # media-index-button.txt # zt:ftp-docs # # tests: # .(addflag-from-fileparameter) .(copy-infile) # # #— ;;.(defparameter dbgsaved dbg) ;;.(defparameter dbg 2)
.– set flag .(addflag button1) .(addflag text1 text2)
.(addflag im-register) ;.(addflag im-list) ; ;.(addflag imlist-0) ;.(addflag imlist-1)
.(addflag im) ;- .(addflag im-0) .(addflag im-1)
.(addflag-from-fileparameter :defaultparameter v0)
.(copy-infile v 0 1 :type ln) ;; :type symlink :type cp
.(vartblock button1 button2) .– button referring to page
;; definition of font size, color… see ctp/_/gawk/libctp-def-pointformat
; header-ref-a .llp /? .(button co:cov1 .fl .skyblue test button text) .dp ;.(button-pref :format .fl .b :suffix __ ) ;.(button-pref :format .fl .b :suffix _ :sep .z .. ) .(button-pref :format .fl .b :suffix _ :sep .fm , ) ; ok .(button-pref :format .fl :suffix *** :sep .fm , :type stamp) ; ok .(button-pref :format .fl :suffix » :sep .fm , :type stamp) ; ok .(button-pref :format .fl .b :suffix _ :sep ) ; ok .(button co:cov1 .flx .green .b Cob .z .fl .green cley fiber & Co) .(button co:cov1 .fl .skyblue chemtrail) .(button co:cov1 .flx .brown Building) .(button co:cov1 .flx .red Rocket stove) .(button co:cov1 .i About us) ;.(button co:cov1 .z About us) ; .z do-not/ .(button co:cov1 Contact .white -blank-in-gui-browser-.).dp end. .(vartblock-end)
.(vartblock button2) header-ref-b .llp .(button-pref :format .flx .b) .(button co:cov1 .red Corona) .(button co:cov1 .flx C2) .(button co:cov1 .flxx About) .(button co:cov1 .blu Contact) .dp .(vartblock-end) .(vartblock )
.(vartblock text1) .(def-aliaspf .x1 .fss .red) .(formatblockdef a .gold) ; .(formatblock-def a .brown) ;; == braun de
.(formatblock a) .— test format block
.. USER-START www-data-START – .. USER-HOME www-data-HOME .lp .. USER www-data .lp .. USER-HOME-DIR www-data-HOME-DIR .lp .fsxx format block a .llp .x1 aliaspf fss red ⇐ .llp .x1 aliaspf \.x1 ⇐ escaped x1 not printed, .z .i Error. ⇐ .llp ;/=oct11 /=error .fl large text block format a ? .red rot .z .black black .lp
.(vartblock text2) .— text2 ;; — DokuWiki Administrator 2022/09/14 05:09 ;; Sans-serif
;;.cursive text in cursive .dp ;do-not/ .fsxx format block a .(formatblock-end a) end. .llp linebreak llp ok. .lp .(vartblock im-register) .– include directories to find images ; .– note an argument :xx is confusing with a parameter keyword. but ; it is parsed here as first mandatary argument. Therefore I prefer to ; write xx which is taken as :xx .(includepath z:a) ;; include path (/var/lib/dokuwikifarm/a.arean.net/data/pages/z/a) do not exist, ignored. .(includepath z) .(includepath co) ;; alias .(includepath @wiki-pages/co) ;;.(includepath z:t1:short) .– find and register media files ; function see _/src/ctp/gawk/mod/cfile/ ; ; images see a.arean.net/data/media/zi ; image retrieve see _/q/civ-foto which origin is: /civ/foto_/cc_ ; .(defparameter verbsaved verb) .(defparameter verb 3) .(register-mediafile) .(defparameter verb verbsaved) .(vartblock) .— use of media files .(vartblock im) .— testing image .(defvarx size@a 120×80) ; .– the keyword arguments of search-pref will be passed to the consequent functions image eg. .(search-pref :pattern-underlay 05100$) .(search-pref :patterna dsc) .(search-pref :limitnumber 1) .(vartblock im-1) ; comment .(image 14-t$) regexp 14-t$ ok. .dp lehmbau in Afrika test1 .lp .(image 136$) regex 136$ ok. .lp .(image 136) regex 136 ok. .lp .rule .(image 5*36$) the regex 5*36$ - match also .flx xxx-15-16.jpg eg. .lp .rule ; comment-end .(image 205$ :size 50) regex 205$ ok. .dp ; :size do not/=oct14 .rule
.(image 136 :size @a :fileparameter c) regex 136 :fileparameter c ok. .lp ; comment-end
.b issue using % in filename (image 136%c) eg .llp ;.(image 136%xxx) regex 136%xxx seam that dokuwiki is interfering ? → @@@@@@@@@@@@@@@@@ .dp ; comment-end
;(image 136-c :size @a) .llp .(image 136-c :size @a) regex 136-c ok. .dp
.dp ; comment-end
.(vartblock im-2) lehmbau in Afrika test2 .(image 514$ :size 200×100) .dp
.(vartblock im-3) lehmbau in Afrika test3 .(image 514$ :size 50×30) .dp
.green .i Smog .(image winter-smog* winter-smog nord italy :size @a) .dp .(vartblock)
.(vartblock im-list) .– image-list .rule
;.(image-list 3960-64$ 3966-69$ Basse construction of cooking stove) ; .(image-list 5203-11$ resto garage) im-list1 .(image-list 5203-11$ resto garage im-list1) im-list2 .(image-list 5203-11$ resto garage im-list2) inside vart block “im-list”
.(vartblock-end) .fsxx after end of vart block.
%comment # KM4 Analyse des Krisenmanagements (Kurzfassung) .(pref .:de1:km4-analyse:km4-analyse KM4 Analyse des Krisenmanagements (Kurzfassung))
.(pref .:de1:km4-analyse:km4-analyse KM4 Analyse… :imgref winter-smog* :size @a) # found file: winter-smog-norditaly-2020feb.jpg
.(pref .:de1:km4-analyse:km4-analyse KM4 Analyse des Krisenmanagements (Kurzfassung))
.(pref .:de1:km4-analyse:km4-analyse KM4 Analyse… :imgref winter-smog* :align left :size 50×70) # winter-smog-norditaly-2020feb.jpg