chdk interval

--Interval shooting script
--[[
@title A480 Interval shooting
@param a Interval (Minutes)
@default a 0
@param b Interval (Seconds)
@default b 10
@param c Powerdown on finish
@default c 0
]]

function presets()
     set_iso_mode(0)     -- Auto
     set_prop(218,0)     -- Picture Size (0=maxinum)
     set_prop(6,3)       -- Focus mode to infinity (3)
end

function aflock()
     press("shoot_half")
     sleep(2000)
     set_aflock(1)
     release("shoot_half")
end

-- Start script

pwrdown = c
delay=a*60000+b*1000
if delay<5000 then
     delay=5000
end

presets()
print("Presets done")
aflock()
print("Focus locked")
count = 0
print("Taking shots")
tstart=get_tick_count()
repeat
     shoot()
     if count>1 then
         poke(0x6404,1000,4)
     else
         poke(0x6404,4000,4)
         count=count+1
     end

     sleep( delay-(get_tick_count()-tstart) )
     tstart=get_tick_count()
until get_free_disk_space()/1024 < 5

print("Finishing")
if pwrdown > 0 then
     shut_down()
end