Example Global $nTempo=0.8 Global $iTone=-1 _Beep(8,4,100) _Beep(7,4,100) _Beep(8,4,100) _Beep(9,4,100) _Beep(8,4,100,100) _Beep(1,5,100,100) Func _Beep($iNote,$iOctave=4,$iDuration=200,$iPause=0) $iFrequency=440*2^(($iNote+$iTone)/12+$iOctave+1/6-4) Beep($iFrequency, $iDuration/$nTempo) If $iPause<>0 Then Sleep($iPause/$nTempo) EndFunc$nTempo={0.1 , 0.2 , 1 , 1.1 , 1.7 ...} default=1 $iTone={-12,-11,...,-1,0,1,...,11,12} default=0 440 - 440Hz, note A Downloads_NEW - (550kb