Triangle Tool

@echo off




:chooseangle

SET anglea=a
SET angleb=b
SET anglec=90
SET sidea=A
SET sideb=B
SET sidec=C
call :draw



pause

set /P angle=What angle to work with?
if %angle%==a (
goto aa
)

if %angle%==b (
goto bb
)

goto chooseangle

:aa
cls
call :draw
echo Must be a number 1-89
set /P anglea=Value of angle a=
set /A angleb=90 - %anglea%
if %anglea% geq 90 (goto aa)
if %anglea% leq 0 (goto aa)
goto chooseside

:bb
cls
call :draw
echo Must be a number 1-89
set /P angleb=Value of angle b=
set /A anglea=90 - %angleb%
if %angleb% geq 90 (goto bb)
if %angleb% leq 0 (goto bb)
goto chooseside



:chooseside
cls
call :draw
echo A/B/C (Case-Sensitive)
set /P side=What side to work with?

if side==A (
:sa
cls
call :draw
echo Must be a positive number
set /P sidea=Enter Value for side A:
if sidea leq 0 (goto sa)

if angle==a (
set /A sidec = sidea/cos(anglea)
set /A sideb = sqrt(sidec^2 - sidea^2)
)

if angle==b (
set /A sidec = sidea/sin(angleb)
set /A sideb = sqrt(sidec^2 - sidea^2)
)

)

if side==B (
:sb
cls
call :draw
echo Must be a positive number
set /P sideb=Enter Value for side B:
if sideb leq 0 (goto sb)

if angle==a (
set /A sidec = sideb/sin(anglea)
set /A sidea = sqrt(sidec^2 - sideb^2)
)

if angle==b )(
set /A sidec = sideb/cos(angleb)
set /A sidea = sqrt(sidec^2 - sideb^2)
)

)

if side==C (
:sc
cls
call :draw
echo Must be a positive number
set /P sidec=Enter Value for side C:
if sidec leq 0 (goto sc)

if angle==a (
set /A sideb = sidec * sin(anglea)
set /A sidea = sqrt(sidec^2 - sideb^2)
)

if angle==b (
set /A sideb = sidec * cos(angleb)
set /A sidea = sqrt(sidec^2 - sideb^2)
)

)

goto chooseside










:draw
echo   ^|\
echo   ^|%anglea%\
echo   ^|  \
echo   ^|   \
echo   ^|    \ %sidec%
echo  %sidea%^|     \
echo   ^|      \
echo   ^|       \
echo   ^|%anglec%     %angleb%\
echo   ^|---------\
echo        %sideb%
GOTO:EOF

pause