DIR : /home/kozerus/public_html/cropex/js/wz/wz.sh
/home/kozerus/public_html/cropex/js/wz
# /js/wz/wz.sh 20230207_0810
progid=$0
dttm=`date +"%Y%m%d_%H%M%S"`
html="wzs.html";
p0=""
fdir="/Volumes/ka1tbr2/ht/byrdbellvjk/imgs"
tdir="/Volumes/ka1tbr2/ht/byrdbellvjk/imgs"
if [ $# -eq 0 ]; then
printf "$progid $dttm html=$html\n";
printf "pqpqpqpqpqpqpqpqpqpqpqpqpqpqpqpq\n";
printf "./$progid.sh html # create $html\n";
printf "./$progid.sh imgs2page <$fdir> <$tdir> # create \n";
printf "bdbdbdbdbdbdbdbdbdbdbdbdbdbdbdbd\n";
exit;
fi
if [ "$1" == "go" ] || [ "$1" == "html" ]; then
printf "$progid $dttm GO html=$html\n"
printf "" > $html
printf "<html>\n" >> $html
printf "<head>\n" >> $html
printf " <title>$progid.html $dttm</title>\n" >> $html
cat wz_scripts.js >> $html
cat ../../ko/ko_toggles.html >> $html
printf " </head>\n" >> $html
printf "<body btcolor=linen>\n" >> $html
>> $html
printf "<script type="text/javascript" src="/js/wz/wz_dragdrop.js"></script>\n" >> $html
printf "<img name=\"chameleon\" src=/js/wz/wz_ddcham.jpg alt=\"JavaScript, DHTML: Drag&Drop Images\" style=\"visibility: hidden;\" width=155 height=95 align=left>\n" >> $html
printf "<hr color=black\n" >> $html
printf "<hr color=white\n" >> $html
printf "<img id=img_wz name=img_wz src=/imgs/btn/koeye.png onclick=\"toggle('div_wz','');return false\" height=20 border=0>wz\n" >> $html
printf "<div id=div_wz>\n" >> $html
printf " <h1>div_wz</h1>\n" >> $html
>> $html
# cat wz_tooltip.html >> $html
# cat wz_dragdrop.html >> $html
# cat wz_graphics.html >> $html
printf " </div id=div_wz_end>\n" >> $html
printf "<hr color=black>\n" >> $html
printf "<hr color=white>\n" >> $html
d="";
dhtml="/imgs/btn/koeye_handhither.gif";
dhtmls="
/imgs/btn/ko.png
/imgs/btn/ok.png
/imgs/btn/koeye.png
/imgs/btn/koeyeb.png
/imgs/btn/koeyew.png
/imgs./btn/brd.png
/imgs/btn/brdb.png
/imgs/btn/brdw.png
/imgs/btn/tn_leds.png
/imgs/keys/keys00_hole.png
"
printf "<a id=href_dhtml$d name=href_dhtml$d href=$dhtml target=_blank>\n" >> $html
printf "<img id=img_dhtml$d name=img_dhtml$d src=$dhtml \n" >> $html
printf " height=100 width=100 border=0>\n" >> $html
printf " </a>$dhtml\n" >> $html
printf "<hr color=goldenrod>\n" >> $html
j=0; k=0; i=0; d=0; set_dhtml=""
for dhtml in dhtmls; do
let d=d+1
printf "<a id=href_dhtml$d name=href_dhtml$d href=$dhtml target=_blank>\n" >> $html
printf "<img id=img_dhtml$d name=img_dhtml$d src=$dhtml \n" >> $html
printf " height=100 width=100 border=0>\n" >> $html
printf " </a>$dhtml\n" >> $html
set_dhtml="$set_dhtml,'href_dhtml$d','img_dhtml$d',"
done
set_dhtml="$dhtml_list'href_dtml','img_dhtml'"
printf "<br>\n" >> $html
printf "<hr color=black\n" >> $html
printf "<hr color=white\n" >> $html
printf "<!-- \n" >> $html
printf "SET_DHTML( $set_dhtml );\n" >> $html
# printf "SET_DHTML'img_dhtml','img_dhtml1','img_dhtml2'" >> $html
printf "//-->\n" >> $html
printf " </body>\n" >> $html
printf " </html>\n" >> $html
# index.html
# wz_body.html
# wz_bugs.html
# wz_calc.html
# wz_dragdrop_e.html
# wz_grapher.html
# wz_head.html
# wz_into.html
# wz_intro.html
# wz_scripts.html
# wz_test.html
# wz_tooltip2.html
exit
fi
fdir="/byrdbellvjk/imgs";
tdir="/byrdbellvjk";
pg0=0;
if [ "$1" == "imgs2page" ] || [ "$1" == "imgs2page" ]; then
fdir=$2;
tdir=$3
pg0=$4
imgtxt="$tdir/imgs.txt"
if [ ! -f $imgtxt ]; then
printf "$progid $dttm MKFILE imgtxt=$imgtxt\n";
find $tdir -type f -maxdepth 1 -name "*.jpg" >> $imgtxt
find $tdir -type f -maxdepth 1 -name "*.png" >> $imgtxt
find $tdir -type f -maxdepth 1 -name "*.gif" >> $imgtxt
fi
if [ ! d $fdir ]; then printf "$progid $dttm NOTFOUND fdir=$fdir\n"; exit; fi
if [ ! d $tdir ]; then printf "$progid $dttm NOTFOUND tdir=$tdir\n"; exit; fi
if [ ! d $tdir/pages ]; then
printf "$progid $dttm NOTFOUND tdir/pages=$tdir/pages\n";
mkdir $tdir/pages
exit;
fi
if [ ! d $tdir/pages/zn ]; then
printf "$progid $dttm NOTFOUND tdir/pages/zn=$tdir/pages/zn\n";
mkdir $tdir/pages/zn
exit;
fi
if [ ! d $tdir/pages/tn ]; then
printf "$progid $dttm NOTFOUND tdir/pages/tn=$tdir/pages/tn\n";
mkdir $tdir/pages/tn
exit;
fi
pg0=`ls $tdir/pages/*.jpg | sed -e "s:.jpg$::" | sort | head -1`
printf "$progid $dttm IMGS2PAGE fdir=$fdir tdir=$tdir pg0=$pg0\n";
vi $imgtxt
p=p0
for img in $imgs; do
let i=i+1
let p=p+1
dirname=`dirname $img`
basename=`basename $img`
pg="$dirname/$p.jpg"
zn="$dirname/zn/zn_$p.jpg"
tn="$dirname/tn/tn_$p.png"
printf "$progid $dttm IMG i=$i p=$p img=$img\n";
if [ ! -f $zn ]; then
printf "convert $img -resize 1100x $zn\n";
# convert $img -resize 1100x $zn
fi
if [ ! -f $zn ]; then
printf "convert $img -resize 650x $pg\n";
# convert $img -resize 650x $pg
fi
if [ ! -f $zn ]; then
printf "convert $img -resize 400x $tn\n";
# convert $img -resize 400x $tn
fi
done
//
koh5_pano
Drag mouse to navigate.
Navigation
- Left/Right Mouse drag: Changes camera heading.
- Up/Sown Mouse drag: Changes camera pitch.
- Scroll wheel: Changes camera field of view.
- I-Key: Displays Info panel with canvas size, image size and FPS.
17.Aug.2010, Martin Wengenmayer