含未来函数（介意勿下载）
与系统源码完全一致。
主要的是一段不含未来函数的源码，但显示的是断续的曲线，再加上一段含未来函数的源码就成了完整曲线。并且和通达信系统加密的XLPL完全一致。看来通达信XLPL就是含未来函数的，由于加了密，系统并未提示“用到未来函数”。
{吸拉派落 XLPL}
N:=5;
M:=13;
VAR1:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80;
B:=SMA(VAR1,N,1);
VAR2:=SMA(B,M,1);
绝路航标:IF(CROSS(B,VAR2) AND B<40,50,0);
STICKLINE(绝路航标=50,0,50,3,0),COLORRED;
DRAWTEXT(绝路航标=50,45,'航'),COLORRED;
DRAWTEXT(绝路航标=50,25,'标'),COLORRED;
VAR3:=EMA(CLOSE,5)-EMA(CLOSE,34);
VAR4:=EMA(VAR3,5);
主力资金:VAR3,COLORSTICK;
空头资金:IF(VAR3<=VAR4,VAR4,VAR3),COLORFFB6C1;
操盘资金:IF(VAR3>=VAR4,VAR4,VAR3),COLORCYAN;
趋势资金:3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),COLORRED;
见顶信号:IF(趋势资金>90 AND 趋势资金<REF(趋势资金,1),100,0);
STICKLINE(见顶信号=100,100,80,5,0),COLORGREEN;
DRAWTEXT(见顶信号=100,85,'顶'),COLORGREEN;
DRAWTEXT(见顶信号=100,65,'部'),COLORGREEN;
VAR5:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR6:=EMA(VAR5,9);
VAR7:=2*(VAR5-VAR6);
主力吸筹:IF(VAR7>=0,VAR7,0),COLOR0000FF;
STICKLINE(主力吸筹>0,0,主力吸筹,3,0),COLOR0000FF;
主力派发:IF(VAR7<=0,VAR7,0),COLORFFFF00;
STICKLINE(主力派发<0,0,主力派发,3,0),COLORFFFF00;
VAR8:=MA(CLOSE,30);
VAR9:=(CLOSE-VAR8)/VAR8*100;
VARA:=MA(VAR9,3);
VARB:=BARSLAST(CROSS(-10,VARA)=1);
VARC:=BARSLAST(CROSS(VARA,10)=1);
VARD:=VARA<-10 AND VARB>3;
VARE:=VARA>10 AND VARC>3;
VARF:=IF(VARD,VARA,0);
VAR10:=IF(VARE,VARA,0);
VAR11:=MA(VOL,5);
VAR12:=MA(VOL,10);
VAR13:=VAR11>VAR12*1.5;
VAR14:=VAR13 AND CLOSE>REF(CLOSE,1)*1.03;
VAR15:=VAR14 AND VOL>REF(VOL,1)*1.5;
STICKLINE(VAR15,0,80,3,0),COLORFF00FF;
DRAWTEXT(VAR15,75,'拉'),COLORFF00FF;
DRAWTEXT(VAR15,55,'升'),COLORFF00FF;
VAR16:=VAR13 AND CLOSE<REF(CLOSE,1)*0.97;
VAR17:=VAR16 AND VOL>REF(VOL,1)*1.5;
STICKLINE(VAR17,0,80,3,0),COLOR00FF00;
DRAWTEXT(VAR17,75,'派'),COLOR00FF00;
DRAWTEXT(VAR17,55,'发'),COLOR00FF00;
VAR18:=VAR11<VAR12*0.8;
VAR19:=VAR18 AND CLOSE<REF(CLOSE,1)*0.97;
VAR20:=VAR19 AND VOL<REF(VOL,1)*0.8;
STICKLINE(VAR20,0,80,3,0),COLORFF8000;
DRAWTEXT(VAR20,75,'落'),COLORFF8000;
DRAWTEXT(VAR20,55,'幕'),COLORFF8000;
