求林龙软件决策曲线指数源代码，函电版。为了股东的利益，请踊跃发帖。
MA02:=MA(CLOSE，8)；
P01:=IF(CROSS(MA01，MA02)，1，0)；
P02:=IF(CROSS(MA02，MA01)，-1，0)；
P0:= p 01+P02；
MA11:=MA(CLOSE，8)；
MA12:=MA(收盘，21)；
p 11:= IF(CROSS(ma 11，MA12)，1，0)；
P12:=IF(CROSS(MA12，MA11)，-1，0)；
p 1:= p 11+p 12；
RSV:=(CLOSE-LLV(低，6))/(HHV(高，6)-LLV(低，6))* 100；
K:=SMA(RSV，12，1)；
D:=SMA(K，24，1)；
j:= 3 * K-2 * D；
P21:=IF(CROSS(K，D)AND D & lt；20,1,0);
P22:=IF(CROSS(D，K)AND K & gt；80,-1,0);
P23:=IF(CROSS(J，0)，0.5，0)；
P24:=IF(CROSS(100，J)，-0.5，0)；
P2:= p 21+P22+P23+P24；
DIFF:= EMA(收盘，12) - EMA(收盘，26)；
DEA:=EMA(DIFF，9)；
MACD:= 2 *(DIFF-DEA)；
P31:=IF(CROSS(DIFF，DEA)AND DEA & lt；0,1,0);
P32:=IF(CROSS(DEA，DIFF)AND DIFF & gt；0,-1,0);
P3:= p 31+P32；
WR1:=100*(HHV(高，13)-收盘)/(HHV(高，13)-LLV(低，113))；
p 41:= IF(wr 1 & gt；80,1,0);
p42:= IF(wr 1 & lt；20,-1,0);
P4:= p 41+P42；
OB:= SUM(IF(CLOSE & gt；REF(CLOSE，1)，VOL，IF(CLOSE & lt；REF(CLOSE，1)，-VOL，0))，0)；
p 51:= IF(OBV & gt；REF(EMA(OBV，24)，1)，1.5，0)；
p52:= IF(OBV & lt；REF(EMA(OBV，24)，1)，-1.5，0)；
P5:= p 51+P52；
BR:=SUM(MAX(0，HIGH-REF(CLOSE，1))，26)/SUM(MAX(0，REF(CLOSE，1)-LOW)，26)* 100；
AR:=SUM(高开，26)/SUM(低开，26)* 100；
p 61:= IF(BR & gt；350,3,0);
p62:= IF(BR & lt；45,-3,0);
p63:= IF(AR & gt；180,3,0);
p64:= IF(AR & lt；45,-3,0);
P6:= p 61+P62+P63+P64；
TH:= SUM(IF(CLOSE & gt；REF(CLOSE，1)，VOL，0)，26)；
TL:= SUM(IF(CLOSE & lt；REF(CLOSE，1)，VOL，0)，26)；
TQ:=SUM(IF(CLOSE=REF(CLOSE，1)，VOL，0)，26)；
VR:= 100 *(TH * 2+TQ)/(TL * 2+TQ)；
p 71:= IF(VR & gt；350,3,0);
p72:= IF(VR & lt；45,-3,0);
p7:= p 71+P72；
MASS:=SUM(MA(高低，9)/MA(MA(高低，9)，9)，25)；
MAMASS:=MA(质量，6)；
p 81:= IF(MASS & lt；27和十字(质量，26.5)，2，0)；
p82:= IF(MASS & gt；27和十字(质量，26.5)，-2，0)；
P8:= p 81+P82；
WVAD:=SUM((收盘-开盘)/(高低)*VOL，24)/10000；
maw VAD:=马(，6)；
p 91:= IF(WVAD & gt；0,1,0);
p92:= IF(WVAD & lt；0,-1,0);
P9:= p 91+P92；
成交量:=MA(VOL，10)/VOL；
MID:=100*(高+低-REF(高+低，1))/(高+低)；
EMV:=MA(中*量*(高-低)/MA(高-低，14)，14)；
q 11:= IF(EMV & gt；0,1.5,0);
q 12:= IF(EMV & lt；0,-1.5,0);
q 1:= q 11+q 12；
TR0:=EMA(EMA(EMA(收盘，13)，13)，13)；
TRIX:=(TR0-REF(TR0，1))/REF(TR0，1)* 100；
Q21:=IF( CROSS(TRIX，TR0)，1.5，0)；
Q22:=IF( CROSS(TR0，TRIX)，-1.5，0)；
Q2:= q 21+Q22；
LC:=REF(收盘，1)；
RSI:=SMA(MAX(CLOSE-LC，0)，13，1)/SMA(ABS(CLOSE-LC)，13，1)* 100；
q 31:= IF(RSI & gt；80,1,0);
q32:= IF(RSI & lt；20,-1,0);
Q3:= q 31+Q32；
OSC:=100*(CLOSE-MA(CLOSE，20))；
MAOSC:=EXPMEMA(OSC，6)；
Q41:=IF(CROSS(OSC，MAOSC)，1，0)；
Q42:=IF(CROSS(MAOSC，OSC)，-1，0)；
Q4:= q 41+Q42；
TYP:=(高+低+近)/3；
CCI:=(TYP-马(TYP，13))/(0.015 * AVEDEV(TYP，13))；
q 51:= IF(CCI & gt；180,2,0);
q52:= IF(CCI & lt；-180,-2,0);
q5:= q 51+Q52；
TR1:=EXPMEMA(MAX(MAX(高-低，ABS(高-REF(CLOSE，1)))，ABS(REF(CLOSE，1)-低)，14)；
HD :=HIGH-REF(高，1)；
LD :=REF(LOW，1)-低；
DMP:= exp mema(IF(HD & gt；0 & amp& ampHD & gtLD，HD，0)，14)；
DMM:= exp mema(IF(LD & gt；0 & amp& ampLD & gtHD，LD，0)，14)；
PDI:= DMP * 100/tr 1；
MDI:= DMM * 100/tr 1；
ADX:=EXPMEMA(ABS(计量吸入器-PDI)/(计量吸入器+PDI)*100，6)；
ADXR:=EXPMEMA(ADX，6)；
Q61:=IF(CROSS(PDI，MDI)，2，0)；
Q62:=IF(CROSS(DMI，PDI)，-2，0)；
q6:= q 61+Q62；
DPO:=CLOSE-REF(MA(CLOSE，21)，21/2+1)；
马多波:=马(，6)；
q 71:= IF(DPO & gt；0,1,0);
q72:= IF(DPO & lt；0,-1,0);
Q7:= q 71+Q72；
MTM:CLOSE-REF(CLOSE，12)；
MAMTM:=MA(MTM，6)；
Q81:=IF(CROSS(MTM，马姆)，1，0)；
Q82:=IF(CROSS(MAMTM，MTM)，-1，0)；
q8:= q 81+Q82；
mid 1:= SUM(VOL *(2 *收盘-盘高-盘低)/(高+低)，0)；
CHO:=MA(MID，10)-MA(MID，20)；
猛男:=马(CHO，6)；
q 91:= IF((CLOSE & gt；MA(收盘，90))和CROSS(收盘，0)，1.5，0)；
q92:= IF((CLOSE & lt；MA(收盘，90))和CROSS(0，收盘)，-1.5，0)；
q9:= q 91+Q92；
PSY:= COUNT(CLOSE & gt；REF(CLOSE，1)，12)/12 * 100；
PSYMA:=MA(，6)；
r 11:= IF(PSY & gt；75,1.5,0);
r 12:= IF(PSY & lt；25,-1.5,0);
r 1:= r 11+r 12；
MID2 := MA(接近，20)；
UPPER:= MID2+2*STD(CLOSE，20)；
LOWER:= MID2-2*STD(CLOSE，20)；
R21:=IF(CROSS(CLOSE，LOWER)，2，0)；
R22:=IF(交叉(上，收盘)，-2，0)；
R2:= r 21+R22；
TYP1 :=(高+低+收盘)/3；
v 1:= SUM(IF(typ 1 & gt；REF(TYP1，1)，TYP1*VOL，0)，14)/SUM(IF(typ 1 & lt；REF(类型1，1)，
TYP1*VOL，0)，14)；
MFI:= 100-(100/(1+v 1))；
r 31:= IF(MFI & gt；80,1,0);
R32:= IF(MFI & lt；20,-1,0);
R3:= r 31+R32；
瓦拉:= r 1+R2+R3+q 1+Q2+Q3+Q4+Q5+Q6+Q7+Q8+Q9+P0+p 1+P2+P3+P4+P5+P6+P7+P8+P9；
决策曲线:VARA