1.?问题问题电影fm源码??⹫ʽԴ??
2.通达信系统公式xlpl的源码？

???⹫ʽԴ??

       { 波段线}

       VAR2:=(HIGH+LOW+CLOSE*2)/4;

       VAR3:=EMA(VAR2,);

       VAR4:=STD(VAR2,);

       VAR5:=((VAR2-VAR3)/VAR4*+)/4;

       VAR6:=(EMA(VAR5,5)-)*1.;

       { AK: EMA(VAR6,2)*1.;

       AD1: EMA(AK,2);

       AJ: 3*AK-2*AD1;

       DRAWTEXT(CROSS(AK,AD1),AK,'*'),COLORRED;

       DRAWTEXT(CROSS(AD1,AK),AK,'*'),COLORWHITE;}

       { 金手指}

       RA:=LLV(LOW,);

       RB:=HHV(HIGH,);

       RC:=EMA((CLOSE-RA)/(RB-RA)*4,4)*;

       近日均价:=MA(CLOSE,5),COLORYELLOW,LINETHICK2;

       DRAWICON(RC<6 AND *(HHV(HIGH,)-CLOSE)/(HHV(HIGH,)-LLV(LOW,))>,,);

       LC:=REF(CLOSE,1);

       RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*;

       ZL:=EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*,2)*5;

       SH:=EMA( (CLOSE-MA(CLOSE,))/MA(CLOSE,)*,7)*5;

       BT1:=CROSS(RSI1,);

       BT2:=CROSS(ZL,SH) AND ZL<-;

       BT:=FILTER(COUNT(BT1 OR BT2,3)>=2,3);

       BIAS:=(CLOSE-MA(CLOSE,))/MA(CLOSE,)*;

       VARC:=LOW;

       VARD:=REF(LOW,1);

       VARE:=SMA(ABS(VARC-VARD),3,1)/SMA(MAX(VARC-VARD,0),3,1)*;

       VARF:=MA(VARE/,3);

       VAR:=LLV(LOW,);

       VAR:=HHV(VARF,);

       MA(IF(LOW<=VAR,(VARF+VAR*2)/5,0),3);

       VAR1B:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

       VAR2B:=SMA(ABS(LOW-VAR1B),,1)/SMA(MAX(LOW-VAR1B,0),,1);

       VAR3B:=EMA(VAR2B,);

       VAR4B:=LLV(LOW,);

       VAR5B:=EMA(IF(LOW<=VAR4B,VAR3B,0),3);

       { 主力进场:IF(VAR5B>REF(VAR5B,1),VAR5B,0),COLORRED;}

       STICKLINE(VAR5B>REF(VAR5B,1),0,VAR5B*2,2,0 ),COLORYELLOW;

       洗盘:IF(VAR5B<REF(VAR5B,1),VAR5B,0),COLORLIGREEN;

       VARR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

       VARR2:=SMA(ABS(LOW-VARR1),,1)/SMA(MAX(LOW-VARR1,0),,1);

       VARR3:=EMA(VARR2,);

       VARR4:=LLV(LOW,);

       VARR5:=EMA(IF(LOW<=VARR4,VARR3,0),3);

       STICKLINE(VARR5>REF(VARR5,1),0,VARR5,2,0 ),COLORGREEN;

       STICKLINE(VARR5<REF(VARR5,1),0,VARR5*2,2,0),COLORRED;

       找主力吸筹提款:VARR5>REF(VARR5,4) { AND C>REF(C,1)},COLORMAGENTA;

       VAR2C:=(HIGH+LOW+CLOSE*2)/4;

       VAR3C:=EMA(VAR2C,7);

       VAR4C:=STD(VAR2C,7);

       VAR5C:=(VAR2C-VAR3C)*/VAR4;

       VAR6C:=EMA(VAR5C,3);

       { WW:(EMA(VAR6C,5)+)/2-3,COLORFFFF;

       MM:HHV(WW,3),COLORFF;}

       AAA:=AMOUNT/VOL/;

       主力进场:IF(VAR5B>REF(VAR5B,1),VAR5B*1.5,0),COLORRED,LINETHICK2;

       { 吸筹}

       VAR2Q:=REF(LOW,1);

       VAR3Q:=SMA(ABS(LOW-VAR2Q),3,1)/SMA(MAX(LOW-VAR2Q,0),3,1)*;

       VAR4Q:=EMA(IF(CLOSE*1.3,VAR3Q*,VAR3Q/),3);

       VAR5Q:=LLV(LOW,);

       VAR6Q:=HHV(VAR4Q,);

       VAR7Q:=IF(MA(CLOSE,),1,0);

       VAR8Q:=EMA(IF(LOW<=VAR5Q,(VAR4Q+VAR6Q*2)/2,0),3)/*VAR7Q;

       VAR9Q:=IF(VAR8Q>,,VAR8Q);

       吸筹:STICKLINE(VAR9Q>-,0,VAR9Q,6,1),COLORRED;

       VARY2:=REF(LOW,1);

       VARY3:=SMA(ABS(LOW-VARY2),3,1)/SMA(MAX(LOW-VARY2,0),3,1)*;

       VARY4:=EMA(IF(CLOSE*1.3,VARY3*,VARY3/),3);

       VARY5:=LLV(LOW,);

       VARY6:=HHV(VARY4,);

       VARY7:=IF(MA(CLOSE,),1,0);

       VARY8:=EMA(IF(LOW<=VARY5,(VARY4+VARY6*2)/2,0),3)/*VARY7;

       VARY9:=IF(VARY8>,,VARY8);

       吸筹2:STICKLINE(VARY9>-,0,VARY9/3,2,1),COLORMAGENTA;

       LCC:=REF(CLOSE,1);

       RSI:=SMA(MAX(CLOSE-LCC,0),4.1,1)/SMA(ABS(CLOSE-LCC),4.1,1)*,COLORYELLOW,LINETHICK1;

       黄买:FILTER((REF(CLOSE,2)<CLOSE AND RSI<),7),COLORYELLOW;

       STICKLINE(黄买,0,-,,1),COLORYELLOW;

       黄卖:=FILTER((REF(CLOSE,2)>CLOSE AND RSI>),7);

       STICKLINE(黄卖,,,,0),COLORBLUE;

       红买:FILTER(CROSS(RSI,),7),COLORRED;

       STICKLINE(红买,0,-,6,0),COLORRED;

       红卖:=FILTER(CROSS(,RSI),7);

       STICKLINE(红卖,,,8,0),COLORCYAN;

       绿买:FILTER(CROSS(RSI,),7),COLORFF;

       STICKLINE(绿买,0,-,6,0),COLORMAGENTA;

       绿卖:=FILTER(CROSS(,RSI),7);

       STICKLINE(绿卖,,,6,0),COLORFF;

       ★遵守纪律★:,COLORRED;

       ★交易之魂★:,COLORRED;

       ZLC:= EMA((WINNER(CLOSE) * ),3);

       SHC:= EMA(((WINNER((CLOSE * 1.1)) - WINNER((CLOSE * 0.9))) * ),3);

       主力控盘: ((ZLC / (ZLC+ SHC)) * ),COLORFFFF,LINETHICK2;

       上限: HHV(主力控盘,),COLORGREEN,LINETHICK2;

       下限: LLV(主力控盘,),COLORRED,LINETHICK2;

       中线:(上限 + 下限)/2,COLORYELLOW,POINTDOT,LINETHICK2;

       { ,LINETHICK4,POINTDOT,COLORYELLOW;}

       { ,LINETHICK4,POINTDOT,COLORFFFF;}

       VAR:=(CLOSE-LLV(LOW,))/(HHV(HIGH,)-LLV(LOW,))*;

       VAR:=SMA(SMA(VAR,3,1),3,1)/.;

       VAR:=EMA(VAR,5);

       操盘:=3*VAR-2*VAR;

       A1:=CROSS(操盘,VAR) AND VAR<2.1 AND C>O;

       STICKLINE(A1,,0,4,0),COLOR;

       STICKLINE(A1,,0,3,0),COLOR;

       STICKLINE(A1,,0,2,0),COLORBBBB;

       STICKLINE(A1,,0,1,0),COLORWHITE;

       STICKLINE(A1,,0,0.3,0),COLORFFFF;

       DRAWTEXT(A1,,'满仓'),COLORRED;

       DRAWTEXT(A1,,'满仓'),COLORRED;

       AK: EMA(VAR6,2)*1.;

       AD1: EMA(AK,2);

       AJ: 3*AK-2*AD1;

       DRAWTEXT(CROSS(AK,AD1),AK,'*'),COLORRED;

       DRAWTEXT(CROSS(AD1,AK),AK,'*'),COLORWHITE;

       WW:(EMA(VAR6C,5)+)/2-3,COLORFFFF;

       MM:HHV(WW,3),COLORFF;

       DRAWTEXT(BT1,0,'□'),COLORYELLOW;

       DRAWTEXT(BT,0,'■'),COLORYELLOW;

       DRAWICON(CROSS(,RSI1),,);{ 饭跑跑}

       DRAWICON(CROSS(RSI1,),,);{ 金钻}

       DRAWICON(CROSS(ZL,SH) AND ZL<-,,);{ 蓝钻}

       DRAWICON(CROSS(BIAS,-),-,);{ BIAS买点};

通达信系统公式xlpl的源码？

       M1 := EMA(EMA( CLOSE, 5 ),5);

       M2 := EMA(EMA( CLOSE, ),5);

       MD : M1 - M2, COLORWHITE, LINETHICK3;

       MM := EMA( MD, 3 );

       吸 : IF( MD >= MM AND MD < 0, MD, DRAWNULL ), COLORLIRED, LINETHICK3;

       拉 : IF( MD >= MM AND MD >= 0, MD, DRAWNULL ), COLORRED, LINETHICK3;

       派 : IF( MD < MM AND MD >= 0, MD, DRAWNULL ), COLORGREEN, LINETHICK3;

       落 : IF( MD < MM AND MD < 0, MD, DRAWNULL ), COLORWHITE, LINETHICK3;