Showing posts with label antennas. Show all posts
Showing posts with label antennas. Show all posts

Saturday, April 25, 2026

TI-84 Plus CE: Beam Pattern for Uniform Array

TI-84 Plus CE: Beam Pattern for Uniform Array




Introduction



The following formula calculates an antenna’s normalized beam response in decibels given the following:



* the number of sensors of an antenna

* the wavelength of the beam pattern

* the angle incident of the wavelength from the ground, in degrees.

* the steering angle of the array, in degrees; which is measured from the zenith, starting directly upwards with the angle going downwards.



The program calculates the response in from a range of incident angles.



R(ΘI) = [ sin(180 * n * d * (sin(ΘI) – sin(ΘS) ÷ λ ] ÷ [ n * sin(180 * d * (sin(ΘI) – sin(ΘS) ÷ λ ]

If the denominator is 0, then the response is 0 dB.



Variables:

n = number of sensors

d = spacing between sensors

λ = wavelength

ΘI = incident angle

ΘS = steering angle



TI-84 Plus CE Code: BEAMPTN



ClrHome

Degree

Disp “BEAM PATTERN”, “BY STEPHEN A HERTZ”, “(HP 67 ANTENNAS)”

Input “NO. SENSORS? “, N

Input “INTERIOR SPACING? “, D

Input “WAVELENGTH? “, L

Input “STEERING Θ°? “, S

Input “STARTING ΘI? “, I

Input “NO. PTS? “, K

Input “CHG Θ°? “, J

For(Θ, I, I+K*J, J)

180 * D / L → A

sin(Θ) – sin(S) → B

N * sin(A * B) → R

If R=0

0 → R

Else

sin(N * A * B) / R → R

20 * log(abs(R)) → R

End

ClrHome

Disp “ΘI=”, Θ, “R (DB)=”, R

Pause

End



Example



Input:

n = 6

d = 36 ft

λ = 100 ft

ΘS = 0° (steering angle)

Range: ΘI = starting at 0°, 5 calculations, in increments of 5°



Results:

K =

ΘI =

R(ΘI) =

0

0

0

1

5

-0.4983317822

2

10

-2.056358346

3

15

-4.9617921711

4

20

-9.809670689



The negative response signifies that there is a reduction of signal strength.



Source



Hertz, Stephen A. “Beam Pattern for Uniform Array” HP-67/HP-97: Users’ Library Solutions: Antennas. Hewlett Packard. Corvallis, OR. Rev. D. April 1979. pp. 24-27




Eddie


All original content copyright, © 2011-2026. Edward Shore. Unauthorized use and/or unauthorized distribution for commercial purposes without express and written permission from the author is strictly prohibited. This blog entry may be distributed for noncommercial purposes, provided that full credit is given to the author.

Saturday, March 28, 2026

Casio fx-4000P: Antennas

Casio fx-4000P: Antennas



Vertical and Horizontal Bandwidth


Given the height (h) and length (l) of an antenna plate, along with wavelength (λ) given from the antenna, the vertical and horizontal bandwidth, in degrees is calculated as:


Vertical Bandwidth:

ßv = (k * λ * 180) ÷ (h * π)


Horizontal Bandwidth:

ßh = (k * λ * 180) ÷ (l * π) = h * ßv ÷ l


The constant k is the antenna taper factor, which in the original program assigned the constant as k = 1.4.


Casio fx-4000P Program Code (Prog 0)


“HEIGHT” : ? → H :

“LENGTH” : ? → L :

“WAVE. L.” : ? → W :

“VERT-BAND=” ◢

252 × W ÷ H ÷ π → V ◢

“HOR-BAND=” ◢

H × V ÷ L → Z


Example 1:

Input: H: 2.4 ft (height), W: 12.4 ft (width), λ: 0.18 ft (wavelength)

Results:

Vertical Bandwidth: 6.016056849°

Horizontal Bandwidth: 1.1643981°


Example 2:

Input: H: 3.8 ft (height), W: 3.6 ft (width), λ: 0.05 ft (wavelength)

Results:

Vertical Bandwidth: 1.05544857°

Horizontal Bandwidth: 1.114084602°



Convert from Frequency to Wavelength


This program converts frequency (Hz) to wavelength (ft).


λ = c ÷ f


Using c as the speed of light in a vacuum (299,792,458 m/s), a conversion is required (1 m ≈ 3.28084 ft).


Casio fx-4000P Program Code (Prog 1)


“FREQ” : ? → F :

“WAVE L.=” ◢

299792458 ÷ F × 3.28084



Example 1:

Input: freq = 6200 MHz (6200E6)

Results: 0.158640498 ft



Example 2:

Input: freq = 8500



Equivalent Antenna Area



The equivalent area given the gain of the antenna in decibels (dB):



Ae = (λ² * 10^(G ÷ 10)) ÷ (4 * π)



Casio fx-4000P Program Code (Prog 2)



“GAIN” : ? → G :

“WAVE L.” : ? → W :

“AREA=” ◢ W² × 10^(G ÷ 10) ÷ 4 ÷ π → A



Example 1:

Input: gain = 28 dB, λ = 0.12 ft

Results: 0.7230238578 ft²



Example 2:

Input: gain = 49 dB, λ = 0.19 ft

Results: 228.1903833 ft²



Source


Hewlett Packard. HP-67/HP-97: Users’ Library Solutions: Antennas. Rev. D April 1979. pp. 32 – 26.



Eddie


All original content copyright, © 2011-2026. Edward Shore. Unauthorized use and/or unauthorized distribution for commercial purposes without express and written permission from the author is strictly prohibited. This blog entry may be distributed for noncommercial purposes, provided that full credit is given to the author.

Python – Earth’s Radius and Gravity in US Units

Python – Earth’s Radius and Gravity in US Units Introduction The following script, gravus2.py, estimates the Earth’s gravity i...