|
Revision 966, 0.9 kB
(checked in by alpt, 2 years ago)
|
Initial revision
|
- Property svn:eol-style set to
native
- Property svn:executable set to
*
- Property svn:keywords set to
Author Date Id Revision
|
| Line | |
|---|
| 1 |
cat <<wishes > /tmp/auguri-chan.m4 && sed -e \ |
|---|
| 2 |
's/pallotron/elibus/g' /tmp/auguri-chan.m4 | grep -v 'tomak-' > \ |
|---|
| 3 |
/tmp/ri-chan.m4 && cat <<eli > /tmp/eli-chan.m4 && \ |
|---|
| 4 |
m4 < /tmp/eli-chan.m4& m4 < /tmp/auguri-chan.m4& |
|---|
| 5 |
changequote([,]) |
|---|
| 6 |
define([_], [auguri]) |
|---|
| 7 |
define([pallotron], 25) |
|---|
| 8 |
define([chan], [[chan], tomak-[chan]]) |
|---|
| 9 |
define([forloop], |
|---|
| 10 |
[pushdef([\$1], [\$2])_forloop([\$1], [\$2], [\$3], [\$4])popdef([\$1])]) |
|---|
| 11 |
define([_forloop], |
|---|
| 12 |
[\$4[]ifelse(\$1, [\$3], , |
|---|
| 13 |
[define([\$1], incr(\$1))_forloop([\$1], [\$2], [\$3], [\$4])])]) |
|---|
| 14 |
|
|---|
| 15 |
define([loop], [forloop([i], 1, pallotron, [[pallotron]-chan _ |
|---|
| 16 |
]) |
|---|
| 17 |
syscmd([sleep $((60*60*24*30*12))]) |
|---|
| 18 |
define([pallotron], incr(pallotron)) |
|---|
| 19 |
loop]) |
|---|
| 20 |
loop |
|---|
| 21 |
wishes |
|---|
| 22 |
changequote({,}) |
|---|
| 23 |
syscmd({sleep $((60*60*24))}) |
|---|
| 24 |
include({/tmp/ri-chan.m4}) |
|---|
| 25 |
eli |
|---|
