aboutsummaryrefslogtreecommitdiffstats
path: root/super-mario-theme
diff options
context:
space:
mode:
authorGravatar Christian Hesse <mail@eworm.de>2018-07-05 15:29:26 +0200
committerGravatar Christian Hesse <mail@eworm.de>2018-07-05 15:34:08 +0200
commite1f134ead584c7b2e9ed406f5520d7f1a23294aa (patch)
tree929660280fb0acc183401d7e59a40f1cd7e8992c /super-mario-theme
parent1d99dc38ff1f583d6e46adc5d1ba3455114d53c1 (diff)
downloadrouteros-scripts-e1f134ead584c7b2e9ed406f5520d7f1a23294aa.tar.gz
routeros-scripts-e1f134ead584c7b2e9ed406f5520d7f1a23294aa.tar.zst
add scripts
Diffstat (limited to 'super-mario-theme')
-rw-r--r--super-mario-theme66
1 files changed, 66 insertions, 0 deletions
diff --git a/super-mario-theme b/super-mario-theme
new file mode 100644
index 0000000..d1eda3f
--- /dev/null
+++ b/super-mario-theme
@@ -0,0 +1,66 @@
+# RouterOS script: super-mario-theme
+# Copyright (c) 2013-2018 Christian Hesse <mail@eworm.de>
+#
+# play Super Mario theme
+
+:local beeps {
+ { 660; 100 }; 150; { 660; 100 }; 300; { 660; 100 }; 300;
+ { 510; 100 }; 100; { 660; 100 }; 300; { 770; 100 }; 550;
+ { 380; 100 }; 575; { 510; 100 }; 450; { 380; 100 }; 400;
+ { 320; 100 }; 500; { 440; 100 }; 300; { 480; 80 }; 330;
+ { 450; 100 }; 150; { 430; 100 }; 300; { 380; 100 }; 200;
+ { 660; 80 }; 200; { 760; 50 }; 150; { 860; 100 }; 300;
+ { 700; 80 }; 150; { 760; 50 }; 350; { 660; 80 }; 300;
+ { 520; 80 }; 150; { 580; 80 }; 150; { 480; 80 }; 500;
+ { 510; 100 }; 450; { 380; 100 }; 400; { 320; 100 }; 500;
+ { 440; 100 }; 300; { 480; 80 }; 330; { 450; 100 }; 150;
+ { 430; 100 }; 300; { 380; 100 }; 200; { 660; 80 }; 200;
+ { 760; 50 }; 150; { 860; 100 }; 300; { 700; 80 }; 150;
+ { 760; 50 }; 350; { 660; 80 }; 300; { 520; 80 }; 150;
+ { 580; 80 }; 150; { 480; 80 }; 500; { 500; 100 }; 300;
+ { 760; 100 }; 100; { 720; 100 }; 150; { 680; 100 }; 150;
+ { 620; 150 }; 300; { 650; 150 }; 300; { 380; 100 }; 150;
+ { 430; 100 }; 150; { 500; 100 }; 300; { 430; 100 }; 150;
+ { 500; 100 }; 100; { 570; 100 }; 220; { 500; 100 }; 300;
+ { 760; 100 }; 100; { 720; 100 }; 150; { 680; 100 }; 150;
+ { 620; 150 }; 300; { 650; 200 }; 300; { 1020; 80 }; 300;
+ { 1020; 80 }; 150; { 1020; 80 }; 300; { 380; 100 }; 300;
+ { 500; 100 }; 300; { 760; 100 }; 100; { 720; 100 }; 150;
+ { 680; 100 }; 150; { 620; 150 }; 300; { 650; 150 }; 300;
+ { 380; 100 }; 150; { 430; 100 }; 150; { 500; 100 }; 300;
+ { 430; 100 }; 150; { 500; 100 }; 100; { 570; 100 }; 420;
+ { 585; 100 }; 450; { 550; 100 }; 420; { 500; 100 }; 360;
+ { 380; 100 }; 300; { 500; 100 }; 300; { 500; 100 }; 150;
+ { 500; 100 }; 300; { 500; 100 }; 300; { 760; 100 }; 100;
+ { 720; 100 }; 150; { 680; 100 }; 150; { 620; 150 }; 300;
+ { 650; 150 }; 300; { 380; 100 }; 150; { 430; 100 }; 150;
+ { 500; 100 }; 300; { 430; 100 }; 150; { 500; 100 }; 100;
+ { 570; 100 }; 220; { 500; 100 }; 300; { 760; 100 }; 100;
+ { 720; 100 }; 150; { 680; 100 }; 150; { 620; 150 }; 300;
+ { 650; 200 }; 300; { 1020; 80 }; 300; { 1020; 80 }; 150;
+ { 1020; 80 }; 300; { 380; 100 }; 300; { 500; 100 }; 300;
+ { 760; 100 }; 100; { 720; 100 }; 150; { 680; 100 }; 150;
+ { 620; 150 }; 300; { 650; 150 }; 300; { 380; 100 }; 150;
+ { 430; 100 }; 150; { 500; 100 }; 300; { 430; 100 }; 150;
+ { 500; 100 }; 100; { 570; 100 }; 420; { 585; 100 }; 450;
+ { 550; 100 }; 420; { 500; 100 }; 360; { 380; 100 }; 300;
+ { 500; 100 }; 300; { 500; 100 }; 150; { 500; 100 }; 300;
+ { 500; 60 }; 150; { 500; 80 }; 300; { 500; 60 }; 350;
+ { 500; 80 }; 150; { 580; 80 }; 350; { 660; 80 }; 150;
+ { 500; 80 }; 300; { 430; 80 }; 150; { 380; 80 }; 600;
+ { 500; 60 }; 150; { 500; 80 }; 300; { 500; 60 }; 350;
+ { 500; 80 }; 150; { 580; 80 }; 150; { 660; 80 }; 550;
+ { 870; 80 }; 325; { 760; 80 }; 600; { 500; 60 }; 150;
+ { 500; 80 }; 300; { 500; 60 }; 350; { 500; 80 }; 150;
+ { 580; 80 }; 350; { 660; 80 }; 150; { 500; 80 }; 300;
+ { 430; 80 }; 150; { 380; 80 }; 600; { 660; 100 }; 150;
+ { 660; 100 }; 300; { 660; 100 }; 300; { 510; 100 }; 100;
+ { 660; 100 }; 300; { 770; 100 }; 550; { 380; 100 }; 575 };
+
+:foreach beep in=$beeps do={
+ :if ([ :len $beep ] = 2) do={
+ :beep frequency=[ :pick $beep 0 ] length=([ :pick $beep 1 ] . "ms");
+ } else={
+ :delay ($beep . "ms");
+ }
+}