TI-83/TI-84 Port Calculator Program

[bcarpenterfhl 10+ year member]

the first version works fine, but there was a minor flaw with the slot port displacement calculator. I also fixed the round port displacement calculator to take into account the thickness of typical PVC. all displacement calculators assume 0.75 in. mdf. someone put this program on http://www.realmofexcursion.com, and i will see if i can get the updated version to them. But for now, heres what you write in your calculator:

:ClrHome

:Menu("WUT U WANT?", "PORT LENGTH",1,"FREQUENCY",2,"VOLUME",3,"SLOT DISP.",4,"ROUND DISP.",5,"QUIT",6)

:ClrHome

:Lbl 1

:Input "FREQUENCY:",F

:Input "PORT AREA:",A

:Input "VOLUME:",V

:

//content.invisioncic.com/y282845/emoticons/frown.gif.a3531fa0534503350665a1e957861287.gif((5.65*10^6*A)/((V*1728)*F^2))-(A^0.5))/1.22sto>L

:

:ClrHome

isp L

:Stop

:Lbl 2

:Input "PORT AREA:",A

:Input "VOLUME:",V

:Input "PORT LENGTH:",L

:

:0.159*(((A)*(1.84*10^8))/((V*1728)*(L+0.823*(A)^0.5)))^0.5sto>F

:

:ClrHome

isp F

:Stop

:Lbl 3

:Input "FREQUENCY:",F

:Input "PORT AREA:",A

:Input "PORT LENGTH:",L

:

//content.invisioncic.com/y282845/emoticons/frown.gif.a3531fa0534503350665a1e957861287.gif((5.65*10^6)*(A))/((F^2)*(A^0.5+1.22*(L))))/1728sto>V

:

:ClrHome

isp V

:Stop

:Lbl 4

:Input "PORT WIDTH:", W

:Input "PORT HEIGHT:",H

:Input "PORT LENGTH:",L

:Input "EXT, DEPTH:",E

:Input "INT. DEPTH:",I

:

//content.invisioncic.com/y282845/emoticons/frown.gif.a3531fa0534503350665a1e957861287.gif((I+0.75)H(W+0.75))+((L-E)H(W+0.75)))/1728sto>D

:

:ClrHome

isp D

:Stop

:

:Lbl 5

:Input "DIAMETER:",D

:Input "PORT LENGTH:",L

:

pi(D/2+0.125)^2)(L-0.75)/1728sto>D

:

:ClrHome

isp D

:Stop

:

:Lbl 6

:Stop

Click to read more...

 

[XtrmAudioCncpts 10+ year member]

nice

 

[bcarpenterfhl 10+ year member]

ps, the slot port calculator is for your typical "L" port shares the boxes sides as a port wall.

 

[Beat_Dominator 5,000+ posts]

What units are we in here? Inches cu. ft.?

I just programmed it today.

 

[bcarpenterfhl 10+ year member]

for port area, square inches

for vb, cubic feet

 

[95Eclipse 10+ year member]

Neat program... I have always used a book called "the oracle of OZ" same principal... just in book form...

WTG on the programing though...

 

[XtrmAudioCncpts 10+ year member]

so it does do slot ports?

 

[TL-Focal25 10+ year member]

Will it work with sealed box?

 

[ss3079 5,000+ posts]

Will it work with sealed box?

Do sealed enclosures have ports? //content.invisioncic.com/y282845/emoticons/wink.gif.608e3ea05f1a9f98611af0861652f8fb.gif

 

[XtrmAudioCncpts 10+ year member]

**** im stupid i meant slot ported?

 

[bcarpenterfhl 10+ year member]

do you really need a calculator for a sealed box? come on now.

just for reference:

[external H - 2(wood thickness)] x [external W - 2(wood thickness)] x [external D - 2(wood thickness)] / 1728

 

[XtrmAudioCncpts 10+ year member]

do you really need a calculator for a sealed box? come on now.
just for reference:

[external H - 2(wood thickness)] x [external W - 2(wood thickness)] x [external D - 2(wood thickness)] / 1728

no im retarded //content.invisioncic.com/y282845/emoticons/uhoh.gif.c07307dd22ee7e63e22fc8e9c614d1fd.gif i meant slot ported not sealed ive made plenty of sealed boxes

 

[Beat_Dominator 5,000+ posts]

I noticed you did it for 3/4 mdf right?

Let's test it out to see if we get similar answers......

port length:

freq. 33hz

port area: 4x10 (40sq. in.)

Vol: 5.0 cu. ft.

I got 14.5?

 

[TL-Focal25 10+ year member]

Sorry for that stupid post. I got excited about the calculator thing and acted a lil dumb

 

[Beat_Dominator 5,000+ posts]

Don't hurt yourself.