回 帖 发 新 帖 刷新版面

主题:请教OPTION ANGLE degrees什么意思??

DEF FPa1(T,Dj,G1,Nm,Sa1,Sa2,X,Y)
        OPTION ANGLE degrees
!        LET W1=4*Sa2+4*Sa1*(1-COS(X/2)*COS(Y/2)+Dj/4)
!        LET W2=8*Sa1+4*Sa2*(1-COS(X/2)*COS(Y/2))
        LET Nms=Nm*(2*Sa1+Sa2)/3
        LET COM=COS(X/2)*COS(Y/2)
        LET W1=4*Sa2+4*Sa1*(1-COM+G1*Dj/4)-Nms
        LET W2=8*Sa1+4*Sa2*(1-COM)-Nms
        LET W3=Sqr((W1-W2)^2+8*4*Sa1*Sa2*(COS(X/2)+COS(Y/2))^2)
        LET Wp=0.5*(W1+W2+W3)
        LET Wm=0.5*(W1+W2-W3)
        LET A1=(W1-Wm)/W3
        LET A2=(Wp-W1)/W3
LET FPa1=0.5*(1/(exp(W1/T)-1)+A1/(exp(Wp/T)-1)+A2/(exp(Wm/T)-1))
         
    END DEF
这是用true basic 编写的一个函数,请问大侠第二行OPTION ANGLE degrees语句是什么意思,十分感谢!![em2]

回复列表 (共1个回复)

沙发

freeBASIC中也有这样的语句
大概是编译参数吧
不要问我,我不知道,我问谁!!!!!!!!!!!!

我来回复

您尚未登录,请登录后再回复。点此登录或注册