源码
DRAWGBK((CLOSE > 0),COLORRGB(136,300,200),COLORRGB(10,10,10),1);
VERTLINE((HHV(HIGH,5) >= REF(HHV(HIGH,5),1))),POINTDOT,color808080;
半年线:=EMA(CLOSE,148);
年线:=EMA(CLOSE,250);
EXPLAIN((CLOSE >= 半年线),'股价在半年线之上'),colorFFFF;
EXPLAIN((CLOSE >= 年线),'股价在年线之上
EXPLAIN((CLOSE < 半年线),'股价在半年线之下
EXPLAIN((CLOSE < 年线),'股价在年线之下
EXPLAIN((半年线 >= REF(半年线,1)),'半年线趋势向上'),colorFFFF;
EXPLAIN((年线 >= REF(年线,1)),'年线趋势向上
EXPLAIN((半年线 < REF(半年线,1)),'半年线趋势向下
EXPLAIN((年线 < REF(年线,1)),'年线趋势向下
股道卖出价预测:=(((CLOSE * 2.5) / 100) + CLOSE);
股道买入价预测:=(CLOSE - ((CLOSE * 2.5) / 100));
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),colorFFFF;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),colorFF;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),colorFF;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),colorFFFF;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),colorFFFF;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),colorFFFF;
EXPLAINEX(股道卖出价预测,'股道卖出价预测:',股道卖出价预测,2,0),color99FF;
EXPLAINEX(股道买入价预测,'股道买入价预测:',股道买入价预测,2,0),color99FF;
EXPLAINEX(1,'获利盘比例=',(WINNER(CLOSE) * 100),2,0),colorFF;
EXPLAINEX(1,'套牢盘比例=',(100 - (WINNER(CLOSE) * 100)),2,0),colorFFFF00;
多空1:=MA((VOL / (HIGH - LOW)),4);
多空2:=ABS((CLOSE - OPEN));
多空3:=(VOL / (HIGH - LOW));
EXPLAIN(((多空3 < 多空1) AND (多空2 < MA(多空2,4))),'资金无入场意愿，萎缩中'),colorFFFF00;
EXPLAIN(((多空3 < 多空1) AND (多空2 > MA(多空2,4))),'场内资金有运作行为'),colorFFFF;
EXPLAIN(((多空3 > 多空1) AND (多空2 < MA(多空2,4))),'多空双方激烈争夺中'),colorFFFF;
EXPLAIN(((多空3 > 多空1) AND (多空2 > MA(多空2,4))),'场外资金介入（或出局）意愿强烈'),color99FF;
TR:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),14);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),14);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),14);
PDI:=((DMP * 100) / TR);
MDI:=((DMM * 100) / TR);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),6);
ADXR:=((ADX + REF(ADX,6)) / 2);
EXPLAIN(CROSS(PDI,MDI),'PDI线从下向上突破MDI线，显示有新多头进场，为买进信号'),colorFF00;
EXPLAIN(CROSS(MDI,PDI),'PDI线从上向下跌破MDI线，显示有新空头进场，为卖出信号'),colorFFFF00;
EXPLAIN((ADX > REF(ADX,1)),'ADX值持续高于前一日，行情将维持原趋势'),colorFFFF;
EXPLAIN(((ADX < REF(ADX,1)) AND (ADX < 20)),'ADX值递减，降到20以下，且横向行进时，市场气氛为盘整'),color99FF;
EXPLAIN(((((ADX < REF(ADX,1)) AND (REF(ADX,1) < REF(ADX,2))) AND (REF(ADX,2) > REF(ADX,3))) AND (REF(ADX,3) > REF(ADX,4))),'ADX值从上升倾向转为下降时，表明行情即将反转'),colorFFFF;
TYP:=(((HIGH + LOW) + CLOSE) / 3);
CCI:=((TYP - MA(TYP,14)) / (0.015 * AVEDEV(TYP,14)));
EXPLAIN((CCI < (0 - 180)),'CCI指标底位，买入机会'),colorFF00;
EXPLAIN((CCI > 180),'CCI指标高位，卖出机会'),colorFFFF00;
EXPLAIN(((VOL / CAPITAL) > 0.075),'换手过大，小心主力出逃，短期头部'),colorFFFF00;
WR:=(0 - ((100 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
EXPLAIN((WR > (0 - 20)),'W&R超买，短线即将见顶，应及时卖出'),colorFFFF00;
EXPLAIN((WR < (0 - 80)),'W&R超卖，短线即将见底，应伺机买进'),colorFF00;
MTM:=(CLOSE - REF(CLOSE,6));
MTMMA:=MA(MTM,6);
EXPLAIN((CROSS(MTM,MTMMA) AND (MTMMA < (0 - 0.8))),'MTM从下向上突破MTMMA，买入信号'),colorFF00;
EXPLAIN((CROSS(MTMMA,MTM) AND (MTMMA > 0.8)),'MTM从上向下跌破MTMMA，卖出信号'),colorFFFF00;
LC:=REF(CLOSE,1);
RSI1:=((SMA(MAX((CLOSE - LC),0),6,1) / SMA(ABS((CLOSE - LC)),6,1)) * 100);
RSI2:=((SMA(MAX((CLOSE - LC),0),12,1) / SMA(ABS((CLOSE - LC)),12,1)) * 100);
EXPLAIN((RSI1 > 85),'6日RSI超买,防止回挡'),colorFFFF00;
EXPLAIN((RSI1 > 80),'6日RSI向上突破85，超买,考虑卖出'),colorFFFF00;
EXPLAIN((RSI1 < 15),'6日RSI超卖,随时有可能反弹'),colorFFFF;
EXPLAIN((RSI1 < 15),'6日RSI向下跌破15，超卖，考虑买入'),colorFFFF;
EXPLAIN(CROSS(RSI1,15),'6日RSI向上突破15，买进信号'),colorFF00;
EXPLAIN(CROSS(RSI1,85),'6日RSI向下跌破85，卖出信号'),colorFFFF00;
PSY:=((COUNT((CLOSE > REF(CLOSE,1)),12) / 12) * 100);
布林1:=((((MA(CLOSE,3) + MA(CLOSE,6)) + MA(CLOSE,12)) + MA(CLOSE,24)) / 4);
布林2:=(布林1 + (3 * STD(布林1,10)));
布林3:=(布林1 - (3 * STD(布林1,10)));
布林4:=(((布林2 - 布林3) / 布林2) < 0.03);
布林5:=(((布林2 - 布林3) / 布林2) > 0.18);
布林6:=(((MA(CLOSE,60) - MA(CLOSE,5)) / MA(CLOSE,60)) > 0.15);
布林7:=(((MA(CLOSE,5) - MA(CLOSE,60)) / MA(CLOSE,5)) > 0.15);
EXPLAIN(布林4,'多空布林收敛中，有变盘的可能，上下自己分析'),colorFFFF;
EXPLAIN(((布林6 AND 布林5) AND (CLOSE > OPEN)),'布林上下乖离太大，有反弹的可能'),colorFF00;
EXPLAIN(((布林7 AND 布林5) AND (CLOSE < OPEN)),'布林上下乖离太大，有回落的可能'),colorFFFF00;
顶部区域:=((CLOSE > (MA(CLOSE,54.16) + (2 * STD(CLOSE,170)))) * 130);
STICKLINE((顶部区域 >= 20),111,115,6,0),colorD6A6FF;
VAR201:=(VOL / FINANCE(7));
VAR211:=(100 * WINNER(CLOSE));
VAR221:=MA(VAR211,3);
VAR231:=MA(VAR201,34);
VAR241:=((VAR221 < (VAR231 * 100)) AND (VAR211 < VAR201));
VAR251:=SUM(IF((CLOSE > REF(CLOSE,1)),1,0),0);
VAR261:=SUMBARS(VOL,CAPITAL);
VAR271:=(IF((CLOSE > LLV(CLOSE,VAR261)),1,(0 - 1)) * IF((VAR251 > LLV(VAR251,VAR261)),1,(0 - 1)));
VAR281:=(COUNT((IF((VAR271 = (0 - 1)),1,0) = 1),8) > 2);
VAR291:=((((CLOSE - DMA((((((3 * HIGH) + LOW) + OPEN) + (2 * CLOSE)) / 7),(VOL / ((SUM(AMOUNT,13) / ((AMOUNT / VOL) / 100)) / 100)))) / DMA((((((3 * HIGH) + LOW) + OPEN) + (2 * CLOSE)) / 7),(VOL / ((SUM(AMOUNT,13) / ((AMOUNT / VOL) / 100)) / 100)))) * 100) < (0 - 18));
VAR2A1:=(((CLOSE - MIN((REF(CLOSE,5) * 0.865),(REF(CLOSE,21) * 0.772))) / CLOSE) < 0.01);
VAR2B1:=((VAR281 AND VAR291) AND VAR2A1);
VAR2C1:=((((VOL / CAPITAL) >= 0.02) AND ((VOL / CAPITAL) <= 0.2)) AND (OPEN = 1.105));
VAR2D1:=(VAR2C1 AND (COUNT(VAR2C1,5) = 1));
VAR2E1:=(VAR2B1 OR VAR2C1);
VAR2F1:=REF(CLOSE,1);
VAR301:=((SMA(MAX((CLOSE - VAR2F1),0),7,1) / SMA(ABS((CLOSE - VAR2F1)),7,1)) * 100);
VAR311:=((SMA(MAX((CLOSE - VAR2F1),0),13,1) / SMA(ABS((CLOSE - VAR2F1)),13,1)) * 100);
VAR321:=((VAR301 < 20) AND (VAR311 < 25));
VAR341:=SUM(IF((CLOSE > REF(CLOSE,1)),VOL,IF((CLOSE < REF(CLOSE,1)),(0 - VOL),0)),0);
VAR351:=IF((CLOSE > LLV(CLOSE,VAR261)),1,(0 - 1));
VAR361:=IF((VAR341 > LLV(VAR341,VAR261)),1,(0 - 1));
VAR371:=(VAR351 * VAR361);
VAR381:=IF((VAR371 = (0 - 1)),1,0);
VAR391:=((VAR381 AND (CLOSE = LLV(CLOSE,120))) AND (VAR211 < VAR201));
STICKLINE(IF((((VAR241 AND VAR2E1) AND VAR321) OR (VAR321 AND VAR391)),34,0),0,(MA(CLOSE,194.16) * 1),6,0),colorD6A6FF;
清仓:=IF(((EMA(((100 * (CLOSE - LLV(LOW,34))) / (HHV(HIGH,34) - LLV(LOW,34))),3) / 1) > 92),(EMA(((100 * (CLOSE - LLV(LOW,34))) / (HHV(HIGH,34) - LLV(LOW,34))),3) / 1),0);
STICKLINE((清仓 >= 70),112,114,6,0),colorFF;
MN:=MA(((((((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100) + (((2 * (CLOSE - MA(CLOSE,12))) / MA(CLOSE,12)) * 100)) + (((3 * (CLOSE - MA(CLOSE,24))) / MA(CLOSE,24)) * 100)) / 6),3);
抄底:=MA(((((((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100) + (((2 * (CLOSE - MA(CLOSE,12))) / MA(CLOSE,12)) * 100)) + (((3 * (CLOSE - MA(CLOSE,24))) / MA(CLOSE,24)) * 100)) / 6),3);
STICKLINE((抄底 < (0 - 6)),(0 - 17),(0 - 21),6,0),colorFFFF;
STICKLINE((MN < (0 - 9)),(0 - 18),(0 - 20),6,0),colorFFCC66;
STICKLINE((MN < (0 - 12)),(0 - 18),(0 - 20),6,0),color66FF;
SK:EMA((((((((2 * CLOSE) + HIGH) + LOW) / 4) - LLV(LOW,21)) / (HHV(HIGH,21) - LLV(LOW,21))) * 100),8),LINETHICK1,color44BBFF;
SD:EMA(((0.667 * REF(SK,1)) + (0.333 * SK)),1),LINETHICK1,colorFFFF00;
VAR1K:=(((LOW + HIGH) + (2 * CLOSE)) / 4);
VAR2K:=REF(VAR1K,1);
VAR3K:=((SMA((VAR1K - VAR2K),5,1) / SMA(ABS((VAR1K - VAR2K)),5,1)) * 100);
MMS:=(MA(VAR3K,1) + 50);
STICKLINE((MMS >= 100),110,108,4,0);
WWW:=(MMS < 20);
WWW1:=(MMS > 90);
G:=IF(WWW,(0 - 22),10);
G1:=IF(WWW1,116,90);
PARTLINE((G >= REF(G,1)),G),LINETHICK1,colorFF00;
PARTLINE((G <= REF(G,1)),G),LINETHICK1,colorFF00;
PARTLINE((G1 >= REF(G1,1)),G1),LINETHICK1,colorD6A6FF;
PARTLINE((G1 <= REF(G1,1)),G1),LINETHICK1,colorD6A6FF;
STICKLINE((CLOSE > 0),50,50,5,0),colorFFFF;
STICKLINE((MMS >= 100),109,107,6,0),colorFFFFFF;
操盘线:(((CLOSE - LLV(CLOSE,10)) / (HHV(CLOSE,10) - LLV(CLOSE,10))) * 100),LINETHICK1,colorA40CFE;
操盘线1:=(((CLOSE - LLV(CLOSE,5)) / (HHV(CLOSE,5) - LLV(CLOSE,5))) * 100);
DRAWICON(CROSS(操盘线1,12),15,8);
选股5:(CROSS(操盘线1,12) = 1);
动力线:((SMA(MAX((CLOSE - REF(CLOSE,1)),0),5,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),5,1)) * 109),LINETHICK1,PRECISION2,colorFFFFFF;
K:=SMA((((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100),3,1);
D:=SMA(K,3,1);
J:=((3 * K) - (2 * D));
趋势线:"KDJ.J"(22,3,3),LINETHICK0;
PARTLINE((趋势线 > REF(趋势线,1)),趋势线),POINTDOT,LINETHICK1,colorFFFF;
PARTLINE((趋势线 < REF(趋势线,1)),趋势线),POINTDOT,LINETHICK1,colorFFFF;
DRAWICON(IF((((SMA(MAX((CLOSE - REF(CLOSE,2)),0),7,1) / SMA(ABS((CLOSE - REF(CLOSE,2))),7,1)) * 100) < 15),15,0),(0 - 12),12);
VAR02:=((((CLOSE - LLV(CLOSE,10)) / (HHV(CLOSE,10) - LLV(CLOSE,10))) * 100) = 0);
VAR03:=((((CLOSE - LLV(CLOSE,10)) / (HHV(CLOSE,10) - LLV(CLOSE,10))) * 100) = 100);
STICKLINE((VAR02 > 0),(0 - 3),(0 - 6),6,0),colorFF;
STICKLINE((VAR03 > 0),103,106,6,0),colorFF00;
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5));
GR2:=(((EMA(CLOSE,13) > EMA(CLOSE,34)) AND (EMA(CLOSE,34) > EMA(CLOSE,55))) AND (EMA(CLOSE,13) > REF(EMA(CLOSE,13),1)));
GR3:=COUNT((("BIAS.BIAS2"(6,13,24) > 10) AND (HIGH = HHV(HIGH,GR1))),GR1);
GR4:=(HIGH = HHV(HIGH,GR1));
GR5:=("MACD.MACD"(12,26,9) < REF("MACD.MACD"(12,26,9),1));
GR6:=((GR2 AND GR3) AND GR4);
GR7:=(((GR2 AND GR3) AND GR4) AND GR5);
XL:=(GR6 AND GR7);
DRAWICON(XL,120,5);
DRAWICON(CROSS(动力线,70),70,11);
DRAWICON(CROSS(动力线,71),71,11);
DRAWICON(CROSS(动力线,72),72,11);
DRAWICON(CROSS(动力线,73),73,11);
DRAWICON(CROSS(动力线,73.5),73.5,11);
DRAWICON(CROSS(动力线,74),74,11);
DRAWICON(CROSS(动力线,74.5),74.5,11);
DRAWICON(CROSS(动力线,75),75,11);
DRAWICON(CROSS(动力线,75.5),75.5,11);
DRAWICON(CROSS(动力线,76),76,11);
DRAWICON(CROSS(动力线,76.5),76.5,11);
DRAWICON(CROSS(动力线,77),77,11);
DRAWICON(CROSS(动力线,77.5),77.5,11);
DRAWICON(CROSS(动力线,78),78,11);
DRAWICON(CROSS(动力线,78.5),78.5,11);
DRAWICON(CROSS(动力线,79),79,11);
DRAWICON(CROSS(动力线,79.5),79.5,11);
DRAWICON(CROSS(动力线,80),80,11);
DRAWICON(CROSS(动力线,81),81,12);
DRAWICON(CROSS(动力线,82),82,12);
DRAWICON(CROSS(动力线,83),83,12);
DRAWICON(CROSS(动力线,84),84,12);
DRAWICON(CROSS(动力线,84.5),84.5,12);
DRAWICON(CROSS(动力线,85),85,12);
DRAWICON(CROSS(动力线,86),86,12);
DRAWICON(CROSS(动力线,87),87,12);
DRAWICON(CROSS(动力线,88),88,12);
DRAWICON(CROSS(动力线,89),89,12);
DRAWICON(CROSS(动力线,90),90,12);
DRAWICON(CROSS(动力线,91),91,10);
DRAWICON(CROSS(动力线,92),92,10);
DRAWICON(CROSS(动力线,93),93,10);
DRAWICON(CROSS(动力线,93.5),93.5,10);
DRAWICON(CROSS(动力线,94),94,10);
DRAWICON(CROSS(动力线,95),95,10);
DRAWICON(CROSS(动力线,96),96,10);
DRAWICON(CROSS(动力线,97),97,10);
DRAWICON(CROSS(动力线,98),98,10);
DRAWICON(CROSS(动力线,99),99,10);
DRAWICON(CROSS(动力线,100),100,10);
DRAWICON(CROSS(动力线,100.5),100.5,10);
DRAWICON(CROSS(动力线,101),101,10);
DRAWICON(CROSS(动力线,101.5),101.5,10);
DRAWICON(CROSS(动力线,102),102,10);
DRAWICON(CROSS(动力线,102.5),102.5,10);
DRAWICON(CROSS(动力线,103),103,10);
DRAWICON(CROSS(动力线,103.5),103.5,10);
DRAWICON(CROSS(动力线,104),104,10);
DRAWICON(CROSS(动力线,104.2),104.2,10);
DRAWICON(CROSS(动力线,104.5),104.5,10);
DRAWICON(CROSS(动力线,104.8),104.8,10);
DRAWICON(CROSS(动力线,105),105,10);
DRAWICON(CROSS(动力线,105.5),105.5,10);
DRAWICON(CROSS(动力线,106),106,10);
DRAWICON(CROSS(动力线,106.5),106.5,10);
DRAWICON(CROSS(动力线,107),107,10);
DRAWICON(CROSS(动力线,107.5),107.5,10);
DRAWICON(CROSS(动力线,108),108,10);
XL1:=(MA(LOW,2) * 0.96);
XL2:=(MA(LOW,26) * 0.85);
XL3:=(((REF(XL1,1) < XL2) AND (REF(XL1,1) < XL1)) AND (REF(XL1,1) < REF(XL1,2)));
STICKLINE(XL3,0,(SMA(((((HHV(CLOSE,10) - CLOSE) / (HHV(CLOSE,10) - LLV(CLOSE,10))) * 100) - 10),13,8) * 0.06),4,1),LINETHICK3,colorFF;
DRAWICON(XL3,8,12);
选股:(XL3 = 1);
CCI:="CCI"(21);
A:=REF(CLOSE,2);
RSI:=((SMA(MAX((CLOSE - A),0),5,1) / SMA(ABS((CLOSE - A)),5,1)) * 100);
A1:=((CLOSE - ((MA(CLOSE,5) / MA(CLOSE,5)) * 100)) < 1);
A2:=((CLOSE - ((MA(CLOSE,13) / MA(CLOSE,13)) * 100)) < (0 - 10));
A3:=((CLOSE - ((MA(CLOSE,34) / MA(CLOSE,34)) * 100)) < (0 - 15));
A4:=(RSI < 21);
A5:=(CCI < (0 - 144));
XL4:=((((A1 AND A2) AND A3) AND A4) AND A5);
DRAWICON(XL4,(0 - 7),10),colorFFFFFF;
选股1:(XL4 = 1);
LD:=REF(CLOSE,1);
RSI1:=((SMA(MAX((CLOSE - LD),0),6,1) / SMA(ABS((CLOSE - LD)),6,1)) * 100);
RBL:=IF(((((CLOSE < REF(CLOSE,1)) AND (CLOSE = LLV(CLOSE,15))) AND (RSI1 < 30)) AND (RSI1 > LLV(RSI1,15))),1,0);
精英抄底王:=(MA(((1 / WINNER(CLOSE)) * 100),3) / 10000);
SS:=(精英抄底王 > 0.5);
XL5:=(RBL AND SS);
DRAWICON(XL5,5,4),colorFF;
选股2:(XL5 = 1);
CC:=CLOSE;
XX:=UBOUND(CC);
C1:=CC[XX];
C2:=CC[(XX - 1)];
GM:=STKNAME;
ST:=((STRLEFT(GM,2) = 'ST') OR (STRLEFT(GM,3) = '*ST'));
N:=IF(ST,20,110);
昨收:=REF(CC,1);
ZTJ:=(昨收 * N);
涨停价:=ROUND(ZTJ);
今收:=CLOSE;
今日涨停:=(ROUND((C1 * 100)) = ROUND((C2 * N)));
涨停:=(ROUND((今收 * 100)) = 涨停价);
涨停次数:=COUNT(涨停,IF((XX > 1),1,0));
TJ1:=IF((今日涨停 AND (涨停次数 = 20)),20,1);
TJ2:=(涨停次数 > 0);
近期涨停:=(TJ2 AND TJ1);
DRAWICON(涨停,5,6);
选股3:(涨停 = 1);
DQ:=DMA(EMA(MA(CLOSE,1),2),3);
DB:=FILTER(CROSS(DQ,REF(DQ,1)),8);
选股4:(DB = 1);
DRAWICON(DB,8,11);
