diff options
| author | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
|---|---|---|
| committer | Joe Hunkeler <jhunkeler@gmail.com> | 2015-08-11 16:51:37 -0400 |
| commit | 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 (patch) | |
| tree | 4464880c571602d54f6ae114729bf62a89518057 /pkg/images/tv/iis/blink.cl | |
| download | iraf-osx-40e5a5811c6ffce9b0974e93cdd927cbcf60c157.tar.gz | |
Repatch (from linux) of OSX IRAF
Diffstat (limited to 'pkg/images/tv/iis/blink.cl')
| -rw-r--r-- | pkg/images/tv/iis/blink.cl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/pkg/images/tv/iis/blink.cl b/pkg/images/tv/iis/blink.cl new file mode 100644 index 00000000..5cc437e5 --- /dev/null +++ b/pkg/images/tv/iis/blink.cl @@ -0,0 +1,19 @@ +#{ BLINK -- Blink 2, 3, or 4 frames. + +# frame1,i,a,,,,Frame1 +# frame2,i,a,,,,Frame2 +# frame3,i,a,,,,Frame3 +# frame4,i,a,,,,Frame4 +# rate,r,h,1.,,,Blink rate (sec per frame) + +{ + if ($nargs == 3) { + _dcontrol (alternate = frame1 // " " // frame2 // " " // + frame3, blink+, rate=rate) + } else if ($nargs == 4) { + _dcontrol (alternate = frame1 // " " // frame2 // " " // + frame3 // " " // frame4, blink+, rate=rate) + } else { + _dcontrol (alternate = frame1 // " " // frame2, blink+, rate=rate) + } +} |