--[[ @title Intervall universal @param a Intervall [s] @default a 4 @param b Anzahl [Bilder] @default b 5 @param c Disp.aus ab[Nr][0=nie] @default c 0 @param s opt.Sucher[0=ja][1=nein] @default s 1 @param e Fokus[0=auto][1=fix] @default e 1 @param f Tv[0=auto][1=fix] @default f 1 @param h Größe[0,1,2,3,4,6,8] @default h 0 @param i Log[-1=aus][x=Nr.] @default i 0 ]] function get_value() press("shoot_half") repeat until get_shooting() == true Fokus = get_focus() Tv = get_tv96() release("shoot_half") end function fastshoot() press("shoot_half") repeat sleep(1) until get_shooting() == true press("shoot_full") release("shoot_full") release("shoot_half") repeat sleep(1) until get_shooting() ~= true end function shooting() if f==1 then set_tv96_direct(Tv) end fastshoot() end function get_display_mode() if get_propset() == 1 then dm=get_prop(181) else dm=get_prop(105) end return dm end function disp_off() while get_display_mode() < 2 do click "display" end end function disp_on() while get_display_mode() ~= dispState do click "display" sleep(200) end end function get_resolution() if get_propset() == 1 then size=get_prop(24) else size=get_prop(218) end end function set_resolution(set_size) if get_propset() == 1 then set_prop(24,set_size) else set_prop(218,set_size) end end function get_size_name() size_name = {"L","M1","M2","M3","S","","Postcard","","Wide"} print("Format: "..size_name[h+1]) end function restore() if s==0 and c>0 then disp_on() end set_aflock(0) set_backlight(1) if size ~= h then set_resolution(size) end if i>-1 then print_screen(false) end end --start script if a<2 then a=2 end if b<2 then b=2 end if c<0 then c=0 end if s<0 or s>1 then s=1 end if e<0 or e>1 then e=0 end if f<0 or f>1 then f=0 end if h<0 then h=0 end if h==5 then h=6 end if h==7 then h=8 end if h>8 then h=8 end get_resolution() if size ~= h then set_resolution(h) end if f==1 or e==1 then get_value() end if e==1 then set_aflock(1) end dispState=get_display_mode() z=0 t1=os.time()+a if i>-1 then print_screen(200+i) end print("akt. Zeit:",os.date("%X")) get_size_name() repeat if os.difftime(os.time(),t1)==0 then t1=os.time()+a cls() z=z+1 print("Bild-Nr:",z,"von",b) print("akt. Zeit: "..os.date("%X")) t1_shoot = get_tick_count() shooting() t2_shoot = get_tick_count() timeout = t2_shoot - t1_shoot print("Auslösedauer:",timeout,"ms") if timeout / 1000 >= a then if x==1 and s==0 then disp_on() end set_backlight(1) print("Intervallabstand zu klein") z=b end if s==0 then if z==c then if s==0 then disp_off() x=1 end end else if z>=c then sleep(500) set_backlight(0) end end if z==b-1 then if s==0 then disp_on() else set_backlight(1) end end end until z==b restore()