Wikia

CHDK Wiki

UBASIC/Scripts: Easy Zoom & MF while Video Recording

Talk0
570pages on
this wiki

< UBASIC

Revision as of 16:00, September 3, 2008 by 137.164.143.36 (Talk)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

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

Around Wikia's network

Random Wiki