Welcome to SmallBASIC
Featured sample program: Turns.bas
'#sec:Main
'' turns.bas
'' 13/02/2002
cls
input"TAS";tas
input"Bank Angle";aob
rateone=57.3*atan(tas/362.1)
feet=tas^2/(11.23*tan(.01745*aob))
metres=feet*2.54*12/100
rate=96.7*tas/feet
acc=1/cos(aob/(180/pi))
nmile=round(metres*.539612/1000,1)
rateone=round(rateone)
feet=round(feet)
metres=round(metres)
rate=round(rate,1)
rateone=round(rateone,1)
acc=round(acc,1)
cls
locate 3,1
?"TAS"
?"Bank Angle"
?"Rate One "
?"Diame
