@title stepss=0while 1 wait_click 1 if is_key "up" then gosub "zoomplus" if is_key "down" then gosub "zoomminus" if is_key "right" then gosub "avplus" if is_key "left" then gosub "avminus"rem if is_key "remote" then gosub "remoteshoot"wend:zoomminusa=0if a=0 and s=10 then a=1 s=0endifif a=0 and s=25 then a=1 s=10endifif a=0 and s=45 then a=1 s=25endifif a=0 and s=70 then a=1 s=45endifif a=0 and s=93 then a=1 s=70endifif a=0 and s=100 then a=1 s=93endifrem print s, "x"gosub "zoomvalue"if a=1 then set_zoom s sleep 800endifreturn:zoomplusa=0if a=0 and s=0 then a=1 s=10endifif a=0 and s=10 then a=1 s=25endifif a=0 and s=25 then a=1 s=45endifif a=0 and s=45 then a=1 s=70endifif a=0 and s=70 then a=1 s=93endifif a=0 and s=93 then a=1 s=100endifrem print s, "x"gosub "zoomvalue"if a=1 then set_zoom s sleep 800endifreturn:avminusset_av_rel 0-1sleep 600gosub "avvalue" return:avplusset_av_rel 1sleep 600gosub "avvalue" return:zoomvalueif s=0 then print "zoom: ", s, "x, ", "4.5mm"if s=10 then print "zoom: ", s, "x, ", "6.5mm"if s=25 then print "zoom: ", s, "x, ", "10.9mm"if s=45 then print "zoom: ", s, "x, ", "18.7mm"if s=70 then print "zoom: ", s, "x, ", "33.6mm"if s=93 then print "zoom: ", s, "x, ", "65.6mm"if s=100 then print "zoom: ", s, "x, ", "90.0mm"return:avvaluea=get_user_av96if a=288 then print "av:", "2.8"if a=320 then print "av:", "3.2"if a=352 then print "av:", "3.5"if a=384 then print "av:", "4.0"if a=416 then print "av:", "4.5"if a=448 then print "av:", "5.0"if a=480 then print "av:", "5.6"if a=512 then print "av:", "6.3"if a=544 then print "av:", "7.1"if a=576 then print "av:", "8.0"return
Started by pshute General Help and Assistance on using CHDK stable releases
Started by chdk4ever General Discussion and Assistance
Started by rogdias General Help and Assistance on using CHDK stable releases
Started by waterwingz « 1 2 ... 5 6 » General Discussion and Assistance
Started by der-graf-von-foto Feature Requests