#-*- coding: utf-8-unix mode: ctp -*- # # media-div-type.txt # zt:media # #===

.(addflag m-register) .(addflag m)

.(vartblock m-register) .– include directories to find media

; .– 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 ymt) .(includepath yfa)

.– 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)

.(vartblock m) .— testing media retrieve

.(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) .(media-pref :align mid)

.rule

.(image 14-t$) regexp 14-t$ ok. .dp

- audio .llp .(audio 002$ :linkonly t) .dp

%comment - video .lp .(video fake-vid :linkonly t) .dp .rule

- portable format .lp .(pf kollektor) .dp

- text .lp .(text hallo) .dp

- hyper text .lp .(ht Gedchntis xxxx) .dp