Wikia

CHDK Wiki

UBASIC/Scripts: Zoom-Video

Talk3
571pages on
this wiki

< UBASIC

Revision as of 15:49, October 14, 2007 by GrAnd (Talk | contribs)

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

Zoom-VideoEdit

Written for/on: Powershot A610
Also works on: A-series

Using zoom-rocker to control zoom during video recording. (Required build #129 or later)

rem Author GrAnd
rem Enables zoom during video recording on A-series

@title Video with zoom

print "Half-press shoot button"
print "to stop video recording"
print ""

get_zoom z

click "shoot_full"

:loop
  wait_click

  is_key k "zoom_in"
    if k=1 then set_zoom_rel +1
  is_key k "zoom_out"
    if k=1 then set_zoom_rel -1
  is_key k "shoot_half"
    if k=1 then goto "end"
goto "loop"

:end
click "shoot_full"
sleep 2000
set_zoom z

end

--GrAnd

Around Wikia's network

Random Wiki