Syntax: [ Download ] [ Verstecken ]
Benutze uBasic Syntax Highlighting
rem Interval with max. tv for Canon D10 only
rem param t 1-13 = max. tv 1/ 1600,1250,1000,800,640,500,400,320,250,200,160,125,100
rem (many thx 2 gehtnix + msl)
@title Interval Int_mtv2
@param j Number of Pics (x 100)
@default j 10
@param k Number of Pics (x 10)
@default k 0
@param l Number of Pics (x 1)
@default l 0
@param c Interval (Sec)
@default c 0
@param d Initial Delay (Sec)
@default d 1
@param t max.TV (1-13)
@default t 10
@param f Fokus-Distanz 65535 (1/0)
@default f 1
@param n ND-Filter OUT (1/0)
@default n 0
m = j*100+k*10+l
if m<2 then let m=2
if c<0 then let c=0
if d<0 then let d=0
if f<0 then let f=0
if f>1 then let f=1
if n<0 then let n=0
if n>1 then let n=1
if t<1 then let t=1
if t>13 then let t=13
rem covert t (eg. 1 to 1024, 13 to 640)
t = 1056 - (32 * t)
rem ND Filter OUT
if n=1 then
set_nd_filter 2
endif
if f=1 then
set_focus 65535
sleep 500
set_aflock 1
endif
print "Pics:"; a
print "Delay",d;"Sec"
sleep d*1000
for a=1 to m
print "Interval",c;"Sec"
print "Pic", a, "of", m
press "shoot_half"
do
until get_shooting=1
rem get timer value
S=get_tv96
release "shoot_half"
rem check + set max. tv limit
if S<t then
set_tv96 t
press "shoot_half"
rem get brightness + aperture values
B=get_bv96
A=get_av96
release "shoot_half"
rem calculate + set_sv96
rem sv96=av96+tv96-bv96
C=t+A-B
rem limit range to sv96 371-975 (ISO 80-1600)
if C<371 then let C=371
if C>795 then let C=795
set_sv96 C
endif
print "TV get/set:", S;"/";t
sleep c*1000
press "shoot_full"
release "shoot_full"
release "shoot_half"
next a
end
rem param t 1-13 = max. tv 1/ 1600,1250,1000,800,640,500,400,320,250,200,160,125,100
rem (many thx 2 gehtnix + msl)
@title Interval Int_mtv2
@param j Number of Pics (x 100)
@default j 10
@param k Number of Pics (x 10)
@default k 0
@param l Number of Pics (x 1)
@default l 0
@param c Interval (Sec)
@default c 0
@param d Initial Delay (Sec)
@default d 1
@param t max.TV (1-13)
@default t 10
@param f Fokus-Distanz 65535 (1/0)
@default f 1
@param n ND-Filter OUT (1/0)
@default n 0
m = j*100+k*10+l
if m<2 then let m=2
if c<0 then let c=0
if d<0 then let d=0
if f<0 then let f=0
if f>1 then let f=1
if n<0 then let n=0
if n>1 then let n=1
if t<1 then let t=1
if t>13 then let t=13
rem covert t (eg. 1 to 1024, 13 to 640)
t = 1056 - (32 * t)
rem ND Filter OUT
if n=1 then
set_nd_filter 2
endif
if f=1 then
set_focus 65535
sleep 500
set_aflock 1
endif
print "Pics:"; a
print "Delay",d;"Sec"
sleep d*1000
for a=1 to m
print "Interval",c;"Sec"
print "Pic", a, "of", m
press "shoot_half"
do
until get_shooting=1
rem get timer value
S=get_tv96
release "shoot_half"
rem check + set max. tv limit
if S<t then
set_tv96 t
press "shoot_half"
rem get brightness + aperture values
B=get_bv96
A=get_av96
release "shoot_half"
rem calculate + set_sv96
rem sv96=av96+tv96-bv96
C=t+A-B
rem limit range to sv96 371-975 (ISO 80-1600)
if C<371 then let C=371
if C>795 then let C=795
set_sv96 C
endif
print "TV get/set:", S;"/";t
sleep c*1000
press "shoot_full"
release "shoot_full"
release "shoot_half"
next a
end
Erstellt in 0.015 Sekunden, mit GeSHi 1.0.8.9
..., eingestellt auf 10 Pics und Limit 8 bzw. 1/320 Sec. ohne ND, die D10 auf "P" ISO Auto wird wie folgt belichtet:
(1)
"Wohnzimmertest" vor dem PC, Cam-Fahrt ausgehend von einer mäßig ausgeleuchteten Stelle langsam zu grellem Licht (Spot auf weißem Papier)
- Code: Alles auswählen
6 Fotos
Nr Sec ISO F
01 1/320 1600 2.8
02 1/ 40 400 2.8
03 1/320 1600 2.8
04 1/ 60 160 2.8
05 1/500 80 2.8
06 1/640 80 2.8
(2)
... nur auf mäßig ausgeleuchtete Stelle gerichtet
- Code: Alles auswählen
4 Fotos
Nr Sec ISO F
01 1/320 1600 2.8
02 1/ 25 400 2.8
03 1/320 1600 2.8
04 1/ 25 400 2.8
(3)
... dann nochmals dunkel bis hell etwa wie (2), aber deutlich langsamer
- Code: Alles auswählen
4 Fotos
Nr Sec ISO F
01 1/ 20 400 2.8
02 1/ 40 400 2.8
03 1/ 30 400 2.8
04 1/320 80 2.8
(4)
1. Foto dunkel, dann gleich auf hell
- Code: Alles auswählen
8 Fotos
Nr Sec ISO F
01 1/320 1600 2.8
02 1/500 80 2.8
03 1/500 80 2.8
04 1/500 80 2.8
05 1/500 80 2.8
06 1/500 80 2.8
07 1/400 80 2.8
08 1/500 80 2.8
Bin schon etwas ermattet heute und werde wohl bald das Kopfkissen nieder halten, jedenfalls sieht das für mich etwa so aus:
- Beim set_tv+sv - Regeln werden generell mehrere Loop-Schritte verbraucht (1),(2)
- Auch bei nicht - Regelung fehlt was vom Loop (4)
- Unter Umständen springt der Regler nicht gleich an (3)
(Die Schritte waren nicht 100% lückenlos hintereinander, (3) also nicht nach (2) ... glaube ich.)
Insgesamt kein Problem, aber komisch eigentlich.