|
Revision 73, 438 bytes
(checked in by GrAnd, 2 years ago)
|
+ Script: Reimplemented 'print' command
|
| Line | |
|---|
| 1 |
rem Interval shooting |
|---|
| 2 |
|
|---|
| 3 |
@title Interval shooting |
|---|
| 4 |
@param a Shoot count |
|---|
| 5 |
@default a 10 |
|---|
| 6 |
@param b Interval (Minutes) |
|---|
| 7 |
@default b 0 |
|---|
| 8 |
@param c Interval (Seconds) |
|---|
| 9 |
@default c 10 |
|---|
| 10 |
|
|---|
| 11 |
t=b*60000+c*1000 |
|---|
| 12 |
if a<2 then let a=10 |
|---|
| 13 |
if t<1000 then let t=1000 |
|---|
| 14 |
|
|---|
| 15 |
print "Total time:", t*a/60000; "min", t*a%60000/1000; "sec" |
|---|
| 16 |
|
|---|
| 17 |
sleep 1000 |
|---|
| 18 |
|
|---|
| 19 |
print "Shoot 1 of", a |
|---|
| 20 |
shoot |
|---|
| 21 |
for n=2 to a |
|---|
| 22 |
sleep t |
|---|
| 23 |
print "Shoot", n, "of", a |
|---|
| 24 |
shoot |
|---|
| 25 |
next n |
|---|
| 26 |
|
|---|
| 27 |
end |
|---|
