EK̲߳.css
ȫ⽻б׮̼߳ӳGCȱ١׮߳̿Գߡ
ḲTƫPƫǣHƸ̣߳G׮̡߳
KTPL
K+T*cos(P)VL
If V80Then 33.605J47.184Y9800.195R2.3612E3.047FGoto 1IfEndL
If V162.891Then 129J50.091Y2388.372R3.047E.209FGoto 1IfEndL
Lbl 1Prog GC
If K0Then -.05A.05BGoto 2IfEndL
If K40Then -.05+(V-0)*(-.01)/(40)A.05+(V-0)*(.01)/(40)BGoto 2IfEndL
If K123.105Then -.06A.06BGoto 2IfEndL
If K162.891Then -.06+(V-123.105)*(.03985)/(39.786)A.06+(V-123.105)*(-.03985)/(39.786)BGoto 2IfEndL
Lbl 2If T0Then AIElse BIIfEndL
H-IAbsTsinP-0GG=G
