Canon CHDK - sunset time lapse script

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|624\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Basic Basement -> Canon CHDK - sunset time lapse script
Fri, 22 Mar 2013, 07:21
waroffice	This is the script, if you are not aware of the CHDK project it is a custom firmware (sort of) for Canon point and shoot cameras that unlocks the potential of the image processor. have a look if you have a Canon camera knocking about, doesn't void warranties. chdk.wikia.com/wiki/CHDK feel free to tinker @title Sunset5 rem Script to shoot time-lapse videos of sunsets rem v. 4.1, Fbonomi apr 30th 2008 rem v. 5.0, Update by doghousedean 12/09/2012 - added turning off of LCD backlight with options rem Released under GPL @param g Backlight Enabled (0=off 1=on) @default g 0 @param a Delay (sec) @default a 10 @param b Limit Tv @default b -414 rem (-414=20 sec; -384=15 sec; -320=10 sec; -224=5 sec.) @param c Default Sv @default c 480 rem (480=160) @param d Limit Sv @default d 776 rem (776=1250 ISO; 960=5000) @param e Guess mode limit @default e -200 @param f Slope in guess mode @default f 5 print_screen 1 print "Sunset Time Lapse" rem test for backlight enabled/disabled if g=0 then print "Turning Off backlight in 3 seconds" sleep 3000 set_backlight 0 else print "Leaving backlight on" endif rem initialize guess mode value x=e rem get start Tv get_tv96 T rem picture counter p=1 :loop set_backlight g rem measure luminance and aperture press "shoot_half" sleep 500 release "shoot_half" get_bv96 B get_av96 A rem release "shoot_half" print "Measured: ",B ,A rem resulting Tv would be: T=B-A T=T+c print "Calculated T: ", T rem check Tv Values if T>e then rem normal mode, shoot with calculated Tv and default Sc X=T Y=c print "Mode: Standard" else rem Guess mode, every shot will be 5/96th steps longer x=x-f if x>b then rem we are in dark, but exposure is not too long rem normal mode, shoot with guessed Tv and default Sc X=x Y=c print "Mode: Guess" else rem we are in very dark area, we want to avoid too long exposures rem shoot with maximum allowed time (b) and rem adjust Sv accordingly X=b Y=c+b-x rem BUT check we don't go in too high ISO! if Y>d then Y=d endif print "Mode: Guess with High ISO" endif endif rem we can now shoot sleep 100 set_sv96 Y set_tv96_direct X sleep 100 shoot sleep 100 print "SHOOT ",p,X,Y p=p+1 if g=0 then print "Turning Off backlight in 1 seconds" sleep 1000 set_backlight 0 else print "Leaving backlight on" endif sleep (a-1)*1000 goto "loop" --v