Number of Wires.bas

Rem W is the diameter of the wire in mm
Rem W = 0.35
Input “Diameter of wire in mm”,W

Rem H is the diameter of the hole in mm
Rem H = 8
Input “Diameter of hole in mm”,H

Input “Length per winding in mm”,L

Print “Winding calculator by Dr Liew”
Print “March 7th, 2021”
Print

Print “Diameter of wire = “;W;”mm”
Print
Print “Diameter of hole = “;H;”mm”
Print
Print “Length per winding = “;L;”mm”
Print

Rem t is the height of triangle
t = W/2

Rem A is the area of the hexagon
A = 2*sqrt(3)*(t^2)

Print “Area of hexagon = “; A;”mm²”
Print

Rem B is the area of the hole
B = 3.14159265354*((H/2)^2)

Print “Area of hole = “; B;”mm²”
Print

Print “Number of wires = “; int(B/A)
Print

Print “Length of wire required = “; int(B/A)*L;”mm”

Leave a Reply

Blog at WordPress.com.

%d bloggers like this: