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;

Hits

<- Back To Home