A Bit of Sounds - Mikrotik Script RouterOS

Part One: SQUAWK
The scripts below are based on SQUAWK program (C) 1987 Merlin R. Null.

# SQUAWK Chang
 :for j from=1 to=4 step=1 do={
   :for i from=2000 to=50 step=-400 do={
     :beep frequency=$i length=11ms;
     :delay 11ms;
   }
   :for i from=800 to=2000 step=400 do={
     :beep frequency=$i length=11ms;
     :delay 11ms;
   }
 }
  # SQUAWK Coo
 :for i from=0 to=150 step=10 do={
   :beep frequency=(1295 - i) length=22ms;
   :delay 22ms;
   :beep frequency=(1095 + i) length=22ms;
   :delay 22ms;
 }
  # SQUAWK Oh!
 :for i from=800 to=2000 step=100 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }
 :for i from=2000 to=50 step=-100 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }
  # SQUAWK Phone 1
 :for i from=1 to=10 step=1 do={
   :beep frequency=1195 length=22ms;
   :delay 22ms;
   :beep frequency=2571 length=22ms;
   :delay 22ms;
 }
 # SQUAWK Siren
 :for i from=1 to=3 step=1 do={
   :beep frequency=550 length=494ms;
   :delay 494ms;
   :beep frequency=400 length=494ms;
   :delay 494ms;
 }
  # SQUAWK Space 1
 :for i from=1000 to=40 step=-20 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }
 # SQUAWK Space 2
 :for i from=10000 to=500 step=-500 do={
   :beep frequency=$i length=11ms;
   :delay 11ms;
 }
  # Phone Call

 :for i from=1 to=10 do={
   /system script run "SQUAWK Phone 1";
   :delay 400ms;
   /system script run "SQUAWK Phone 1";
   :delay 2000ms;
 }
Part Two: Adams
The scripts below are based on the code from Lee Adams' book "Grafik, Animation, Simulation fur Personalcomputer" (ISBN 3890905722, Markt&Technik, 1989).

# Adams Fanfare
 :for t from=1200 to=350 step=-50 do={
   :beep frequency=$t length=33ms;
   :delay 33ms;
 }
  # Adams Larm
 :for t1 from=1 to=10 step=1 do={
   :for t2 from=300 to=1800 step=40 do={
     :beep frequency=$t2 length=11ms;
     :delay 11ms;
   }
 }
  # Adams Maschinengewehr
 :for t from=1 to=20 step=1 do={
   :beep frequency=40 length=33ms;
   :delay 33ms;
   :delay 55ms;
 }
 # Adams Telefone
 :for t1 from=1 to=4 step=1 do={
   :for t2 from=1 to=25 step=1 do={
     :beep frequency=540 length=33ms;
     :delay 33ms;
     :beep frequency=650 length=27ms;
     :delay 27ms;
   }
   :delay 2000ms;
 }
 # Adams Tonarkade
 :for t1 from=1 to=8 step=1 do={
     :for t2 from=600 to=750 step=8 do={
     :beep frequency=$t2 length=11ms;
     :delay 11ms;
   }
 }
 # Adams Tonarkade 2
 :for t from=1250 to=600 step=-8 do={
   :beep frequency=$t length=11ms;
   :delay 11ms;
 }
Part Three: Miklavcic
The scripts below are based on the code from http://snipplr.com/view/9220/simple-tic-tac-toe/

# Miklavcic Sad
 :beep frequency=784 length=500ms;
 :delay 500ms;
 
 :beep frequency=738 length=500ms;
 :delay 500ms;
 
 :beep frequency=684 length=500ms;
 :delay 500ms;
 
 :beep frequency=644 length=1000ms;
 :delay 1000ms;
# Miklavcic Victory
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=659 length=700ms;
 :delay 700ms;
 
 :beep frequency=784 length=500ms;
 :delay 500ms;
 
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=523 length=200ms;
 :delay 1000ms;
 
 :beep frequency=659 length=700ms;
 :delay 700ms;
 
 :beep frequency=784 length=500ms;
 :delay 800ms;
 
 :beep frequency=784 length=400ms;
 :delay 400ms;
 
 :beep frequency=884 length=200ms;
 :delay 200ms;
 
 :beep frequency=784 length=200ms;
 :delay 200ms;
 
 :beep frequency=687 length=200ms;
 :delay 200ms;
 
 :beep frequency=659 length=200ms;
 :delay 200ms;
 
 :beep frequency=579 length=200ms;
 :delay 200ms;
 
 :beep frequency=519 length=400ms;
 :delay 400ms;
 # Part Z: Assorted Sounds
# Sound 1

 :beep frequency=600 length=165ms;
 :delay 165ms;
 
 :beep frequency=50 length=83ms;
 :delay 83ms;
 
 :beep frequency=600 length=165ms;
 :delay 165ms;
 
 :beep frequency=50 length=83ms;
 :delay 83ms;
 
 :beep frequency=650 length=165ms;
 :delay 165ms;
 
 :beep frequency=600 length=165ms;
 :delay 165ms;
 
 :beep frequency=50 length=83ms;
 :delay 83ms;
 
 :beep frequency=600 length=165ms;
 :delay 165ms;
 
 :beep frequency=700 length=275ms;
 :delay 275ms;
 
 :beep frequency=800 length=275ms;
 :delay 275ms;
 
 :beep frequency=900 length=110ms;
 :delay 110ms;
 Credit: https://wiki.mikrotik.com/wiki/A_Bit_of_Sounds