rem orig. Johan Van Barel 02-04-2008 @title Bewegungserkennung @param a Spalten @default a 6 @param b Reihen @default b 4 rem Schwellwert: 10=Blitz, 12=sonnig, 24=wolkig, 36=dunstig rem Der Schwellwert ist die Epfindlichkeit der Bewegungserkennung rem Blitz steht für Gewitterfotografie @param c Schwellwert(0-255) @default c 24 @param d Interval (mSek.) @default d 1 rem Verzögerung: 0=sehr schnell(Blitz), 16=normal, 32=langsam @param e Verzögerung(.1 Sek.) @default e 0 @param f Blockgröße @default f 8 rem Modus U bzw.V=chroma Y=luma rem Messmethode @param g Modus(U=0,Y=1,V=2) @default g 1 @param h Anfangsverzögerung (Sek.) @default h 1 if a<1 then a=1 if b<1 then b=1 if c<0 then c=0 if e<0 then e=0 if f<1 then f=1 if g<0 then g=0 if g>5 then g=5 if r<0 then r=0 if h<0 then h=0 e=e*100 rem Startzeit in ms x=5000 sleep h*1000 i=0 while 1 t=0 if e=0 then press "shoot_half" do rem Digic II 205 Digic III 206 get_prop 206 p until p=1 endif md_detect_motion a, b, g, x, d, c, 1, t, 0, 1, 1, a, b, 0, f, e if t>0 then click "shoot_full" i=i+1 print "Bild", i, "(Blocks="; t; ")" if e=0 then do rem Digic II 205 Digic III 206 get_prop 206 p until p<>1 endif endif wend