07.偏心計算
lprint type"dc"'------------- 偏心計算 ------------defdbl A-H,M,O,P,R-Z:defstr K,N,Q:defint I,JEET=1/10000000000#:EES=1.0027379#:EEE=0.006719218798677#PI=3.141592653589793#RAA=180#/PI:RRA=PI/180#dim S1(5),N1$(5),B1(5),N2$(5),B2(5),S2(5),BB…
lprint type"dc"'------------- 偏心計算 ------------defdbl A-H,M,O,P,R-Z:defstr K,N,Q:defint I,JEET=1/10000000000#:EES=1.0027379#:EEE=0.006719218798677#PI=3.141592653589793#RAA=180#/PI:RRA=PI/180#dim S1(5),N1$(5),B1(5),N2$(5),B2(5),S2(5),BB…