CHDK/uBASIC/Scripts/CanonA640: Interval Video

Interval Video

 * Written for/on: Canon A640
 * Also works on: Other Canon AXXX (Not tested)

Interval Video by Johan Van Barel (http://www.vanbarel.com)

This script takes a number of videos of a given length (Min, Sec) at a given interval (Min, Sec).

Documentation/Help (save as a small IntervalVideo.txt" file to your /CHDK/SCRIPTS/ folder)

Select Movie mode on your Canon A640

Parameters:


 * Number of Videos (Default=2)
 * Video Length (Min) (Default=0)
 * Video Length (Sec) (Default=10)
 * Interval (Min) (Default=0)
 * Interval (Sec) (Default=10)

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

rem Johan Van Barel 07-07-2007 rem Interval-Video for Canon A640

@title Interval Video @param a Number of Videos @default a 2

@param b Video length (Min) @default b 0 @param c Video length (Sec) @default c 10

@param d Interval (Min) @default d 0 @param e Interval (Sec) @default e 10

t=60000*b+1000*c i=60000*d+1000*e

if a<2 then let a=2 if t<1000 then let t=1000 if i<2000 then let i=2000

sleep 1000

print "Video 1 of", a click "shoot_full" click "shoot_full" sleep t click "shoot_full"

for s=2 to a   print "Wait",d;"Min",e;"Sec" sleep i

print "Video", s, "of", a   click "shoot_full" sleep t   click "shoot_full" next s

end