DIN 45631-1991 Procedure for calculating loudness level and loudness《响度级和响度的计算程序》.pdf

1、PT a 1- e + a LT e ; c c - a U a c c E t e c a r C - r a C z a C 5 E a a 45dB, im Bereich II: LT +AL = (78- 15) dB=63dB 55 dB, im Bereich III: LT +AL=(78-14)dB=64dBT=LC dB 69 65 67 77 68 58 45 30 - - Fr die Zusammenfassung dieserTerzPegel kann folgendes Verfahren verwendet werden: Man bildet die Dif

2、ferenz zweier zusammenzufassender Pegelwerte und sucht im unten abgebildeten Nomogramm den zugeordneten Hilfswert,den man zum greren der bei- den Pegelwerte addiert. Das Ergebnis wird wie ein einziger Pegelwert behandelt, wenn weitere Pegelwerte zusammen- gefat werden sollen (sieheTabelle 3). Pegeld

3、ifferenz d B O 1 2 3 4 5 6 7 8910 1520 dB zum greren Pegel addieren Anmerkung: Dieses Nomogramm beruht auf folgendem mathematischen Zusammenhang: ri L,=lOlog E1O0?IdB (4) r=l Die Lautheitsverteilung wird nach Abschnitt 4 gezeichnet (siehe Bild 1) Wie man sieht,werden dieTerzPegel mit den Mittenfrequ

4、enzen 315 Hz, 500 Hz, 630 Hz, 6,3 kHz. 8 kHz, 10 kHz und 12,5 kHz lautheitsmaig verdeckt Tabelle 3 Bewerteter Terzpegel Nach dem Planimetrieren der Lautheitsflche wird die Hhe des flchengleichen Rechtecks eingetragen und der berechnete Lautstrkepegel LNGF zu 103 phon (GF), die berechnete Lautheit NG

5、F zu 79sone (GF) bestimmt. Das Rechenprogramm in Anhang A liefert die Werte 103,8 phon und 83,3 sone. Das Lautheitsdiagramm weist zwei Gebiete besonders groer Teillautheit auf, ein tieferes um 200 Hz, ein hheres um 5000 Hz. Fr dieses Gerusch wurden mit dem Schallpegelmesser Werte fr den Schallpegel

6、LA mit 87dB,frLB mit 92 dB und ZAC mit 94 dB gemessen. Seite 4 N DIN1 DIN 45631 91 2794442 0073307 352 W DIN 45 631 h Y L3 Y e e DIN1 DIN 45631 93 2794442 0073308 299 DIN 45631 Seite 5 r I Seite 6 DIN 45 631 DIN3 DIN 4.5633 93 2794442 0073309 325 9 -c I 8 8 Co (D a : 8 d d N (I Ln 2 al G v c DIN1 DI

7、N 45b3L 91 2794442 0073330 947 m DIN 45 631 Seite 7 E T- 8 7 DIN3 DIN 45633 93 2794442 0073333 883 te 8 DIN 45631 K O Q O $1 E m .- DIN1 DIN 45631 91 E 2794442 0073312 7LT I DIN 45 631 Seite 9 DIN1 DIN 45631 91 = 2794442 0073313 656 Seite 10 DIN 45631 c O z 8 b e 8 8s 10 n -1 I 1 I I I I I I I I l l

8、 l 1 I I I n In W T J I 1 I I I I I I 1 I I I I I I I I I I II IIliIiiiiI I I m 0 v N I C C U N c N 2 L .c ; a a DINL DIN 45633 91 2794442 0073334 592 DIN 45 631 Seite 11 DIN1 DIN 45633 91 2794442 0073335 429 W Seite 12 DIN 45631 Lo a- O! N I Co O m (D T- r- 8 8 8 8 2 Lo d 2 Cu Lo c O L UY a 21 n v)

9、 .- e n a 0 a a a DIN1 DIN 45b3L 91 2794442 00733Lb 3b5 DIN 45631 Seite 13 DIN3 DIN 45b33 93 W 2794442 0073337 2TL m Seite 14 DIN 45 631 ANHANG A Rechenprogramm zur Lautheitsberechnung 10 20 I* * 30 I* LAUTHEITSBERECHNUNG NACH DIN 45631 (IS0 5328) * 40 I* * 50 I* * 60 I* Technische Universitt Mnchen

10、 * 70 I* Institut fur Elektroakustik * 80 I* * go i* 100 I* * 120 I* * 130 i*f*f* 110 I* Programniersprache: Quick-BASIC 4.0 (MS-DOS) * 140 I* 150 I* 160 I* 170 I* 180 I* 190 I* 200 I* 210 I* 220 I* 230 I* 240 I* 250 I* 260 I* 270 I* 280 * 290 I* 300 I* 310 * 320 I* 330 I* 340 I* 350 I* 360 I* 370 I

11、* 380 I* 390 I* 400 I* 410 I* 420 I* 430 I* 440 I* 450 I* 460 I* 470 I* 480 I* 490 I* 500 * 510 I* 520 I* 530 I* Programnbeschreibung: Das Program berechnet aus 28 Terzpegeln die Lautheit und den Lautstrkepegel eines Schalles Eingabe Parameter: LT Feld von 28 Elementen, welche die Terz- pegel in dB

12、von 25 Hz bis 12,5 kHz Mittenfrequenz reprsentieren M$ Zeichenvariable zur Unterscheidung des Schallfeldtyps (frei/diffus) Ausgabe Parmeter : N Lautheit in sone G LN Lautstrkepegel in phon G NS Daten fr Grafikausgabe Variablen : FR Terzmittenfrequenzen RAP Terzpegelbereiche fr Korrektur bei niedrige

13、n Frequenzen entsprechend den Kurven gleicher Lautstarke DLL Pegelabsenkung bei niedrigen Frequenzen gemaB den Kurven gleicher Lautstarke LTQ Frequenzgruppenpegel an der Ruhehr- schwel le ohne Bercksichtigung der ber- tragungscharakteristik des Ohres AO Pegel korrektur gem der bertragungs- Charakter

14、istik des Ohres DDF Pegeldifferenz zwischen freiem und diffusem Schallfeld * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * DIN3 DIN 45631 91 m 2794442 0073338 338 M 590 600 610 620 630 640 650 660 670 680 690 700 710 720 730 DIN 45 631 Seite 15 i* I* * I* ZUP Obere Gr

15、enzen der angenherten Frequenz- * I* gruppen im Tonheitsma6 * I* RNS Wertebereich der spezifischen Lautheit, * i* ken im spezifischen Lautheits-Tonheits- * I* Muster festlegt * I* USL Flankensteilheiten der oberen Flanken * I* im spezifischen Lautheits-Tonheits-Muster * I* * I* der die Flankensteilh

16、eit der oberen Flan- * I* * I* * I* I 760 770 780 790 800 810 820 830 840 850 860 870 880 890 CLS LOCATE 3, 8 PRINT SR1$; SR1$ LOCATE 4, 8: PRINT LOCATE 4, 71: PRINT LOCATE 5, 8: PRINT LOCATE 5, 71: PRINT LOCATE 5, 17: PRINT “Lautheitsberechnung nach DIN 45631 (IS0 532 ,)I1 LOCATE 6, 8: PRINT LOCATE

17、 6, 71: PRINT I* LOCATE 7, 8: PRINT SR1$; SR1$ LOCATE 10, 16 PRINT “Dieses Program berechnet analog zum graphischen“ SRI$ = *tfX*t*fu I I 900 LOCATE 11, 16 910 PRINT “Verfahren nach Zwicker (DIN 45631) die Lautheit NI1 920 I 930 LOCATE 12, 16 940 PRINT Ilsowie den Lautstrkepegel LN aus den Terzpegel

18、n II 950 I 960 LOCATE 13. 16 970 PRINT “eines Gerusches. a 980 I II - 990 LOCATE 15, 16 1000 PRINT IlGeben Sie zur Berechnung die einzelnen Terzpegel II 1010 I 1020 LOCATE 16, 16 1030 PRINT Ilin dB ein und besttigen Sie jede Eingabe mit RETURN.“ 1040 I 1050 LOCATE 23, 30 1060 PRINT I Weiter mit II 1

19、070 I 1080 GOSUB 4360 Tastaturspeicher leeren 1090 I 1100 I- Tastenabfrage - 1110 I 1120 LOCATE 23, 70: RE$ = INPUT$(l) 1130 IF RE$ = CHR$(13) THEN GOSUB 4360 ELSE 1050 1140 CLS 1150 I 1160 I o DIN1 DIN 45633 91 m 2794442 O073319 074 m Seite 16 DIN 45631 1170 if*k*ff*f*f*f*ff* 1180 I 1190 I TAB ELL

20、EN 1200 1210 I 1220 I Terzmittenfrequenzen (FR) 1230 I 1240 DATA 25, 31.5,40 ,50 ,63 ,80 ,100,125 ,160,200 1250 DATA 250, 315 ,400,500,630,800,1.0,1.25,1.6,2 1260 DATA 2.5, 3.15,4 ,5 ,6.3,8 ,10 ,12.5 1270 I 1280 I 1290 I Terzpegelbereiche fr Korrektur bei niedrigen Frequenzen 1300 I entsprechend den

21、 Kurven gleicher Lautstarke (RAP) 1310 I 1320 DATA 45,55,65,71,80,90,100,120 1330 I 1340 I 1350 I Terzpegelabsenkung bei niedrigen Frequenzen gem den 1360 I Kurven gleicher Lautstarke in den acht durch RAP de- 1370 l finierten Bereichen (DLL) 1380 I 1390 DATA -32,-24,-16,-10,-5,0, -7,-3,0, -2,O 1400

22、 DATA -29,-22,-15,-10,-4,0, -7,-2,0, -2,O 1410 DATA -27,-19,-14,- 9,-4,0, -6,-2,0, -2,O 1420 DATA -25,-17,-12, -9,-3,0, -5,-2,0, -2,O 1430 DATA -23,-16,-11, -7,-3,0, -4,-l,O, -1,O 1440 DATA -20,-14,-10, -6,-3,0, -4,-l,O, -1,O 1450 DATA -18,-12, -9, -6,-2,0, -3,-1,0, -1,0 1460 DATA -15,-10, -8, -4,-2

23、,0, -3,-l,O, -1,0 1470 I 1480 I 1490 I Frequenzgruppenpegel an der Ruhehrschwelle ohne 1500 I Bercksichtigung der Ubertragungscharakteristik des 1510 I Ohres (LTQ) 1520 1530 DATA 30,18,12, 8, 7, 6, 5, 4 1540 DATA 3, 3, 3, 3, 3, 3, 3, 3 1550 DATA 3, 3, 3, 3 1560 I 1570 I 1580 1590 I des Ohres (AO) 16

24、00 I 1610 DATA 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0 Pegel korrektur gem der bertragungscharakteri sti k 1620 DATA 0.0, 0.0,-0.5,-1.6,-3.2,-5.4,-5.6,-4.0 1630 DATA -1.5, 2.0, 5.0,12.0 1640 1650 I 1660 I Pegeldifferenz zwischen freiem und diffusem Schall- 1670 feld (DDF) 1680 1690 DATA 0.0,0.0,0.5,

25、0.9, 1.2, 1.6, 2.3,2.8 1710 DATA 3.0,4.0,4.3,4.0 1720 I 1730 I 1700 DATA 3.0,20y00,-1.4,-20,-19,-10,05 e e e DIN1 DIN 45b31 91 m 2794442 0073320 896 m DIN 45 631 Seite 17 1740 I Anpassung der Terzpegel an die zugehrigen Frequenz- 1750 I gruppenpegel aufgrund unterschied1 icher Bandbreite (DCB) 1760

26、1780 DATA 1.5, 1.7, 1.8, 1.8, 1.7, 1.6,1.4,1.2 1800 I 1810 I 1820 I Obere Grenzen der angenherten Frequenzgruppen im 1830 I Tonheitsma (ZUP) 1840 I 1850 DATA 0.9, 1.8, 2.8, 3.5, 4.4, 5.4, 6.6, 7.9 1860 DATA 9.2,10.6,12.3,13.8,15.2,16.7,18.1,19.3 1870 DATA 20.6,21.8,22.7,23.6,24.0 1880 I 1890 I 1900

27、I Wertebereich der spezifischen Lautheit, der die Flanken- 1910 I Steilheit der oberen Flanken im spezifischen Lautheits- 1920 I Tonheits-Muster festlegt (RNS) 1930 I 1940 DATA 21.5,18.0,15.1,11.5, 9.0, 6.1, 4.4,3.1 1950 DATA 2.13,1.36,0.82,0.42,0.30,0.22,0.15,0.10 1960 DATA 0.035,O.O 1970 1980 I 19

28、90 I Flankensteilheiten der oberen Flanken im spezifischen 2000 I Lautheits-Tonheits-Muster fur die Wertebereiche RNS als 2010 I Funktion der Numner der Frequenzgruppe (USL) 2020 2030 DATA 13.00 ,8.20 ,6.30 ,5.50 ,5.50 ,5.50 ,5.50 ,5.50 2040 DATA 9.00 ,7.50 ,6.00 ,5.10 ,4.50 ,4.50 ,4.50 ,4.50 2050 D

29、ATA 7.80 ,6.70 ,5.60 ,4.90 ,4.40 ,3.90 ,3.90 ,3.90 2060 DATA 6.20 ,5.40 ,4.60 ,4.00 ,3.50 ,3.20 ,3.20 ,3.20 2070 DATA 4.50 ,3.80 ,3.60 ,3.20 ,2.90 ,2.70 ,2.70 ,2.70 2080 DATA 3.70 ,3.00 ,2.80 ,2.35 ,2.20 ,2.20 ,2.20 ,2.20 2090 DATA 2.90 ,2.30 ,2.10 ,1.90 ,1.80 ,1.70 ,1.70 ,1.70 2100 DATA 2.40 ,1.70

30、,1.50 ,1.35 ,1.30 ,1.30 ,1.30 ,1.30 2110 DATA 1.95 ,1.45 ,1.30 ,1.15 ,1.10 ,1.10 ,1.10 ,1.10 2120 DATA 1.50 ,1.20 ,0.94 ,0.86 ,0.82 ,0.82 ,0.82 ,0.82 2130 DATA 0.72 ,0.67 ,0.64 ,0.63 ,0.62 ,0.62 ,0.62 ,0.62 2140 DATA 0.59 ,0.53 ,0.51 ,0.50 ,0.42 ,0.42 ,0.42 ,0.42 2150 DATA 0.40 ,0.33 ,0.26 ,0.24 ,0.

31、22 ,0.22 ,0.22 ,0.22 2160 DATA 0.27 ,0.21 ,0.20 ,D.18 ,0.17 ,0.17 ,0.17 ,0.17 2170 DATA 0.16 ,0.15 ,0.14 ,0.12 ,O.ll ,O.ll ,O.ll ,O.ll 2180 DATA 0.12 ,O.ll ,0.10 ,0.08 ,0.08 ,0.08 ,0.08 ,0.08 2190 DATA 0.09 ,0.08 ,0.07 ,0.06 ,0.06 ,0.06 ,0.06 ,0.05 2200 DATA 0.06 ,0.05 ,0.03 ,O.OZ ,0.02 ,0.02 ,O.OZ

32、,0.02 2210 I 2220 I 1770 DATA -.25,-0.6,-0.8,-08,-05,00,05,11 1790 DATA 0.8, 0.5, O.O,-O.5 I DIN1 DIN 45631 91 W 2794442 O073321 722 I Seite 18 DIN 45631 I 2230 *ff*ff* 2240 I 2250 I- Dimensionierung und Belegen der Variablen - 2260 I 2270 OPTION BASE 1 Feldindizes beginnen mit 1 2280 I 2290 DIM LT(

33、28), FR(28), CLT(28), CFR(28), GI (3), LTQ(20) , LE(21) 2300 DIM LCB(3), NM(21), RAP(8), NS(240), DLL(11, 8), AO(20) 2310 DIM DCB(20), DDF(ZO), ZUP(21), RNS( 18), USL(18, 8) 2320 DIM TI(11), KOMM$(80), XP(lO), XB(10), XX(10) 2330 I 2340 RESTORE 1240 2350 FOR I = 1 TO 28 2360 READ FR(1) 2370 NEXT I 2

34、380 FOR I = 1 TO 8 2390 READ RAP(1) 2400 NEXT I 2410 FOR J = 1 TO 8 2420 FOR I = 1 TO 11 2430 READ DLL(1, J) 2440 NEXT I 2450 NEXT J 2460 FOR I = 1 TO 20 2470 READ LTQ( I) 2480 NEXT I 2490 FOR I = 1 TO 20 2500 READ AO( I) 2510 NEXT I 2520 FOR I = 1 TO 20 2530 READ DDF(1) 2540 NEXT I 2550 FOR I = 1 T

35、O 20 2560 READ DCB(1) 2570 NEXT I 2580 FOR I = 1 TO 21 2590 READ ZUP(1) 2600 NEXT I 2610 FOR I = 1 TO 18 2620 READ RNS(1) 2630 NEXT I 2640 FOR I = 1 TO 18 2650 FOR J = 1 TO 8 2660 READ USL(1, J) 2670 NEXT J 2680 NEXT I 2690 I 2700 i*f* DIN1 DIN 45633 71 2774442 0073322 667 DIN 45 631 Seite 19 2820 2

36、830 2840 2850 2860 2870 2880 2890 2900 0 2910 - 2920 2930 2940 2950 2960 2970 2980 2990 3000 3010 3020 3030 3040 3050 3060 3070 3080 x=x+1 IF X = 20 THEN CLS : X = 5 LOCATE 1, 1 PRINT “Geben Sie bitte die Terzpegel (Format: *.*) ein!“ PRINT “Besttigen Sie mit RETURN oder ENTER!“ LOCATE X, 20 IF I 12

37、0 THEN 2980 ELSE 3040 LOCATE 23, 1 PRINT “Achtung! Das Program verarbeitet nur Terzpegel I LOCATE 23, 49 PRINT “zwischen -60 dB und 120 dB !I: BEEP LOCATE X, 48: PRINT SPACE$(20) GOTO 2940 LOCATE X, 49: PRINT USING “#.#“; LT(1): LOCATE X, 56: PRINT II dB II GOSUB 4360 I Tastaturspeicher leeren I I 3

38、090 NEXT I a 3100 I 3110 I- Schallfeldtyp (frei/diffus) auswhlen - 3120 I 3130 GOSUB 4360 I Tastaturspeicher leeren 3140 CLS 3150 LOCATE 11, 1 3160 PRINT “Angabe des Schallfeldtyps:“ 3170 LOCATE 15, 1 3180 PRINT “Geben Sie bitte den gewnschten Kennbuchstaben ein!“ 3190 LOCATE 13, 1 3200 PRINT “Sind

39、die Terzpegel gltig fr Freies (F) II 3210 LOCATE 13, 43 3220 PRINT “oder Diffuses (D) Schallfeld? 9 3230 I 3240 M$ = INPUT$(l) 3250 I 3260 IF M$ = “F“ OR M$ = “f“ THEN 3270 M$ = )I F II II . DIN1 DIN 45633 91 2794442 0073323 5T5 Seite 20 DIN 45631 3280 GOTO 3340 3290 END IF 3300 IF M$ = “D“ OR M$ =

40、“d“ THEN 3320 ELSE GOTO 3130 3330 END IF 3340 I 3350 3360 CLS I Lautheitsberechnung aufrufen 3370 LOCATE 12, 30: 3380 PRINT “Berechnung lauft.“ 3390 GOSUB 4500 3400 I 3410 I 3420 I- Programabschluss - Ergebnisausgabe auf Bildschirm/Drucker - 3430 I 3450 LOCATE 5, 9: 3460 PRINT SR1$; SR1$ 3470 LOCATE

41、 6, 9: PRINT . LOCATE 6, 72: PRINT “*“ 3480 LOCATE 7, 9: PRINT LOCATE 7, 23: 3500 IF N 16 THEN PRINT USING “#.#“; N; : PRINT II li; 3520 PRINT II sone GI; M$ 3530 LOCATE 7, 72: PRINT “*“ 3540 LOCATE 8, 9: PRINT LOCATE 8, 23: 3550 PRINT “Lautstarkepegel LN = I; : PRINT USING “#.#“; LN; 3560 PRINT II

42、phon GI; M$ 3570 LOCATE 8, 72: PRINT “*“ 3580 LOCATE 9, 9: PRINT LOCATE 9, 72: PRINT “*“ 3590 LOCATE 10, 9: 3600 PRINT SR1$; SRI$ 3610 3620 GOSUB 4360 Tastaturspeicher leeren 3630 I 3640 LOCATE 17, 25: PRINT “Obige Tabelle ausdrucken? (j/n)ll 3650 PR$ = INPUT$(l) 3660 I 3670 I- Tastenabfrage 3680 I

43、3690 IF PR$ = “j“ OR PR$ = IIJ“ THEN 3700 GOSUB 3940 Druckausgabe 3710 END IF 3720 I 3730 I- Programende 3740 I 3750 CLS : GOSUB 4360 Tastaturspeicher leeren 3760 I 3770 LOCATE 12, 10 3780 PRINT II Neue Eingabe von Terzpegeln (j) oder PROGRAMMENDE (n) ? I 3800 I 3810 IF NE$ = tljtl OR NE$ = “J“ THEN

44、 2730 3820 IF NE$ = “n“ OR NE$ = “N“ THEN 3830 3830 CLS 3840 SCREEN O 3850 LOCATE 12, 34: PRINT llProgramendell 3860 I 3870 LOCATE 23, 1 3880 END 3310 M$ = “D“ 3440 CLS . 3490 PRINT “Lauthei t N = 11. 3790 NE$ = INPUT$(I) DINI DIN 45b3I 91 2794442 0073324 431 DIN 45631 Seite 21 3940 I* Unterprogram

45、zur Ausgabe des Rechenergebnisses auf Drucker * 3950 i*f*f* 3960 I 3970 LOCATE 17, 1: PRINT SPACE$(79) Zeile lschen 3980 I 3990 LOCATE 17, 20 4000 PRINT “Drucker an ? - Papier eingelegt ? II 4010 LOCATE 19, 20 4020 PRINT “wenn bereit, dann beliebige Taste drcken“ 4030 I 4040 GOSUB 4360: GOSUB 6380 T

46、astenabf rage 4050 ON ERROR GOT0 6250 Fehlerbehandlung 4060 I bei Geratefehler 4070 CLS 4080 I 4100 DT2$ = LEFT$(DATE$, 2) 4110 DT3$ = RIGHT$(DATE$, 2) 4120 DT$ = DT1$ + II.“ + DT2$ + II.“ + DT3$ 4130 I 4140 LPRINT 4150 LPRINT SPACE$( 10) ; li* DIN - LAUTHEITSBERECHNUNG *li 4160 LPRINT 4170 LPRINT S

47、PACE$(10) ; 4180 LPRINT “DATUM:“; I I; DT$; I I; “ZEIT:“; II I; TIME$ 4190 LPRINT 4200 LPRINT SPACE$(10) ; 4210 LPRINT “N = II* 4220 IF N 16 THEN LPRINT USING “#.#“; N; : LPRINT I I; 4240 LPRINT II sone GI; M$ 4250 LPRINT SPACE$ (10) ; 4270 LPRINT II 0 4280 LPRINT 4290 RETURN 4300 I 4310 I 4090 DTI$ = MID$(DATE$, 4, 2) 4260 LPRINT “LN = I; : LPRINT USING “#.#“; LN; phon GI; M$ DIN1 DIN 45b3L 91 m 2794442 0073325 378 R Seite 22 DIN 45631 4490 I 4500 FOR