用计算机弹astronomia,Aardio利用机箱主板蜂鸣器弹奏黑人抬棺舞乐曲

import console;

Beep = ::Kernel32.api("Beep","int(int,int)")

tab = {

l1=262; l2= 294; l3= 330; l4=349; l5= 392; l6= 440; l7= 494;

m0= 37; m1= 523; m2= 587; m3= 659; m4= 698; m5= 784; m6= 880; m7= 988;

h1= 1046; h2= 1175; h3= 1318; h4= 1397; h5= 1568; h6= 1760; h7= 1967

}

//astronomia乐谱

notation_astronomia = {

'm4'; 'm4'; 'm4'; 'm4'; 'm6'; 'm6'; 'm6'; 'm6'; 'm5'; 'm5'; 'm5'; 'm5'; 'h1'; 'h1'; 'h1'; 'h1';

'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'm5'; 'm4'; 'm3'; 'm1'; 'm2'; 'm0'; 'm2'; 'm6';

'm5'; 'm0'; 'm4'; 'm0'; 'm3'; 'm0'; 'm3'; 'm3'; 'm5'; 'm0'; 'm4'; 'm3'; 'm2'; 'm0'; 'm2'; 'h4';

'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'h4'; 'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'm6';

'm5'; 'm0'; 'm4'; 'm0'; 'm3'; 'm0'; 'm3'; 'm3'; 'm5'; 'm0'; 'm4'; 'm3'; 'm2'; 'm0'; 'm2'; 'h4';

'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'h4'; 'h3'; 'h4'; 'h3'; 'h4';

'm4'; 'm4'; 'm4'; 'm4'; 'm6'; 'm6'; 'm6'; 'm6'; 'm5'; 'm5'; 'm5'; 'm5'; 'h1'; 'h1'; 'h1'; 'h1';

'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'h2'; 'm5'; 'm4'; 'm3'; 'm1'; 'm2'; 'm0'; 'm2'; 'm6';

'm5'; 'm0'; 'm4'; 'm0'; 'm3'; 'm0'; 'm3'; 'm3'; 'm5'; 'm0'; 'm4'; 'm3'; 'm2'; 'm0'; 'm2'; 'h4';

'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'h4'; 'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'm6';

'm5'; 'm0'; 'm4'; 'm0'; 'm3'; 'm0'; 'm3'; 'm3'; 'm5'; 'm0'; 'm4'; 'm3'; 'm2'; 'm0'; 'm2'; 'h4';

'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'h4'; 'h3'; 'h4'; 'h3'; 'h4'; 'm2'; 'm0'; 'm2'; 'm6'

}

for(i=1;#notation_astronomia;1){

for(k,v in tab){

if k==notation_astronomia[i]{

console.print(k)

Beep(v,250)

}

}

}

console.pause(true);