Fandom

CHDK Wiki

UBASIC/Scripts: Easy Zoom & MF while Video Recording

< UBASIC

598pages on
this wiki
Add New Page
Talk0 Share

Ad blocker interference detected!


Wikia is a free-to-use site that makes money from advertising. We have a modified experience for viewers using ad blockers

Wikia is not accessible if you’ve made further modifications. Remove the custom ad blocker rule(s) and the page will load as expected.

Easy Zoom & MF while Video Recording Edit

Fixed bug (zoom works even at beginning)
Written for/on: A710IS
Also works on: All Canon camers with edition of zoom steps and MF params (see below), without edit on A700,A720, and maybe A6x0 (14 zoom steps)
Required CHDK build: I don't now, uses get_prop and set_zoom_rel
Usage:
Run script. Video recording will start.
Controls:
  • shoot half: change zoom step: 1->3(default)->5->7->1->...
  • zoom in and out: zooming by set step
  • MENU: Stop recording
  • left/right: min/max zoom
  • ERASE->UP->SET->DOWN->DISP: change focus: near->far

Note: very loud whirring/buzzing sounds recorded in video on most cameras.

Adaptation for other models:
  • for changing mf steps edit these five lines
f is_key "..." then set_focus ...
  • for change zoom boundaries edit:
if is_key "left" then set_zoom_rel -<<<zoom steps of your camera( 99 will be universal?)>>>
  • also here zoom steps-1
if z>13 then z=13

Script Code (save as "ZoomVdeo.bas" to your /CHDK/SCRIPTS/ folder)

rem mart22, based on kamil
@title Zoom and Focus video

s=3
z=s

get_prop 12 q
if q=0 then set_prop 12 1

press "shoot_half"
sleep 800
click "shoot_full"

:loop
wait_click
if is_key "zoom_in" then goto "in"
if is_key "zoom_out" then goto "out"

if is_key "erase" then set_focus 59
if is_key "up" then  set_focus 120
if is_key "set" then set_focus 600
if is_key "down" then set_focus 2000 
if is_key "display" then set_focus 65535

if is_key "left" then set_zoom_rel -15
if is_key "right" then set_zoom_rel 15

if is_key "shoot_half" then goto "changestep"
if is_key "shoot_full" then goto "xend"
if is_key "menu" then goto "xend"
goto "loop"

:changestep
if s=7 then s=1 else s=s+2
z=s
print "step ",z
goto "loop"


:in
if z<0 then z=1
if z>13 then z=13
set_zoom_rel z
get_zoom r
print "zoom ", r
goto "loop"

:out
if z<0 then z=1
if z>13 then z=13
set_zoom_rel -z
get_zoom r
print "zoom ", r
goto "loop"



:xend
click "shoot_full"
set_prop 12 q
end


--88.102.189.164

Also on Fandom

Random Wiki