kilka skryptów w 1
popełniłem następny skrypt
docelowo chciałem połączyć kilka skryptów w 1 ale niestety na razie jest ograniczenie do definiowanych parametrów na ekranie LCD od "a" do "j" tylko
w skrypcie można ustawić sobie:
parametr a i b -opóźnienie do startu robienia fotek lub pierwszego cyklu braketingu
parametr c -ilość zdjęć lub cykli braketingu
parametr d i e -przerwa od 1 zdjęcia lub cyklu braketingu do następnego
parametr f -możliwość włączenia RAW-a
parametr g -włączanie braketingu
parametr h -krok w braketingu ,1 to 1/3 EV
parametr i i j -przerwa od 1 zdjęcia w braketingu do następnego
jeżeli włączymy braketing to aparat zrobi nam 3 fotki co zadany krok
1 fotkę w minus
2 fotkę 0 EV
3 fotkę w plus
np:
jak krok damy 3 (3/3EV) to zrobi 3 fotki
-1EV,0EV i +1EV
jeżeli ustawimy czas w którymś z parametrów w malutkim okienku skryptu pojawi się timer i będzie odliczał czas
rem Written for A710IS
rem Should be okay on others
rem Raw on/off (Fingalo's builds only)
rem braketing make 3 shots - 0 +
@title D-delay I-interval N-nr
@param a D Shot/Braket cycl (Mins)
@default a 0
@param b D Shot/Braket cycl (Secs)
@default b 0
@param c N Shots/Bracket cycl
@default c 1
@param d I Shot/Braket cycl (Mins)
@default d 0
@param e I Shot/Braket cycl (Secs)
@default e 0
@param f Enable RAW (0-no,1-yes)
@default f 0
@param g Braketing (0-off,1-on)
@default g 0
@param h Braketing Step (h/3)
@default h 1
@param i I Braket Shots (Mins)
@default i 0
@param j I Braket Shots (Secs)
@default j 0
set_raw f
if c<0 then c=1
if c=1 then z=0
if h<0 then h=1
z=(d*60)+e
n=(a*60)+b
k=(i*60)+j
if n>0 then gosub "delay"
for p=1 to c
print "Shots/Bracket cycl", p, "of", c
if g=1 then gosub "braketing" else shoot
if p=c then goto "end"
sleep z
if z>0 then gosub "interval"
next p
end
:interval
for r=1 to z
x=z-r
print "Next Shot/Braket", x/60; "min" x%60+1; "sec"
sleep 1000
cls
next r
return
:delay
for m=0 to n-1
q=n-m
print "Start Shot/Braket", q/60; "min" q%60; "sec"
sleep 1000
cls
next m
return
:pbraket
for r=0 to k-1
t=k-r
print "Braket:Next Shot", t/60; "min" t%60; "sec"
sleep 1000
cls
next r
return
:braketing
click "erase"
print "Preparing..."
for n=1 to h
click "left"
next n
print "braket: Shoot 1 of", 2+1
shoot
if k>0 then gosub "pbraket"
for s=1 to 2
for n=1 to h
click "right"
next n
print "braket: Shoot", s+1, "of", 2+1
shoot
if k>0 then gosub "pbraket"
next s
print "Finalizing..."
for n=1 to h
click "left"
next n
return
:end
if f=1 then set_raw 0
end
Odpowiedz z cytatem
