通达信『锁仓抄底』主图+副图+选股指标，源码分享

DRAWGBK(CLOSE>0,RGB(155,100,150),RGB(20,50,100),0,2,0);

GSPT02:=REF(EMA((HIGH+LOW+CLOSE)/3,10),1);

GSPT04:=EMA(LLV(LOW,10),3);

WEKR:EMA(GSPT02*2-GSPT04,5),COLORMAGENTA,LINETHICK9;

IF(CLOSE>WEKR,WEKR,DRAWNULL),COLORMAGENTA,LINETHICK9;

IF(CLOSE< WEKR,WEKR,DRAWNULL),COLORBLUE,LINETHICK9;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

CAEA05:=DATE< 1390720;

CAFA06:=(REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*100>=10;

STICKLINE(CAFA06,CLOSE,OPEN,2,0),COLORGREEN;

CAGA07:=DMA(CLOSE,VOL/CAPITAL);

CAHA08:=(CLOSE/REF(CLOSE,1)-1)*100>7;

CAIA09:=(CLOSE/REF(CLOSE,1)-1)*100<=(-3);

CAJA10:=OPEN< WEKR AND CLOSE>WEKR AND CAEA05 AND CAHA08;

STICKLINE(CAJA10,OPEN,CLOSE,4,0),COLORYELLOW;

DRAWTEXT(CAJA10,H*1.02,'抄底锁仓'),COLORYELLOW;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>=6.98,CLOSE,CLOSE*1,0.05,0),COLOR00F3FF;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,0,0),COLOR00AACC;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,0,0),COLOR11FFFF;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,3.5,0),COLOR0055AA;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,3.4,0),COLOR0066AA;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,2.5,0),COLOR00CCCC;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,2.1,0),COLOR00CCDD;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,1.7,0),COLOR00DDDD;

STICKLINE((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.99,OPEN,OPEN*1,1.2,0),COLOR00DDEE;

gspt1:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));

成交:=VOL;

买盘:=IF((CLOSE > OPEN),(gspt1 * (HIGH - LOW)),IF((CLOSE < OPEN),(gspt1 * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));

卖盘:=IF((CLOSE > OPEN),(0 - (gspt1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (gspt1 * (HIGH - LOW))),(0 - (VOL / 2))));

买卖差:=(买盘 + 卖盘);

STICKLINE((VOL > 0),VOL,0,2.5,1),COLORFFFFFF;

STICKLINE((买卖差 > 0),0,买卖差,2.5,0),COLOR0000FF;

STICKLINE((买卖差 < 0),0,买卖差,2.5,0),LINETHICK3,COLOR33FF33;

量比1:=(VOL / MA(VOL,5));

gspt10:=买盘;

gspt20:=卖盘;

JX1:=BARSSINCE(买盘);

JY1:=IF(((121 > JX1) AND (JX1 > 0)),JX1,120);

JY2:=IF(((4 > JX1) AND (JX1 > 0)),JX1,3);

gspt30:=MA(VOL,JY2);

动神:=买盘;

鬼力:=gspt20;

神比:=(动神 / gspt30);

鬼比:=(鬼力 / gspt30);

gspt2:=(HIGH - LOW);

gspt3:=ABS((OPEN - CLOSE));

gspt4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));

gspt5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);

gspt6:=((gspt3 / gspt2) * VOL);

gspt7:=((gspt4 / gspt2) * VOL);

gspt8:=((gspt5 / gspt2) * VOL);

gspt9:=IF(((VOL / CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) * 100)))));

gsptA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);

gsptB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));

gsptC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));

gsptD:=REF(CLOSE,1);

gsptE:=((SMA(MAX((CLOSE - gsptD),0),6,1) / SMA(ABS((CLOSE - gsptD)),6,1)) * 100);

gspt40:=((IF((((gspt6 >= gspt7) AND (gspt6 >= gspt8)) AND (CLOSE > OPEN)),gspt6,动神) + 动神) / 2);

gspt41:=((IF(((gspt7 > gspt6) AND (gspt7 > gspt8)),gspt7,动神) + 动神) / 2);

gspt42:=((IF(((gspt8 > gspt6) AND (gspt8 > gspt7)),gspt8,动神) + 动神) / 2);

gspt50:=((IF((((gspt6 >= gspt7) AND (gspt6 >= gspt8)) AND (CLOSE < OPEN)),gspt6,鬼力) + 鬼力) / 2);

三日上攻:=MA((((gspt40 + gspt41) + gspt42) / 3),JY2);

三日下攻:=MA(gspt50,JY2);

DD:=CLOSE > MA(CLOSE,30);

多头:STICKLINE(DD,0,VOL,2.5,1),COLOR0000FF;

KK:=CLOSE < MA(CLOSE,30);

空头:STICKLINE(KK,0,VOL,2.5,1),COLOR00FF00;

STICKLINE((鬼力 > 0),鬼力,0,2.5,0),COLORFF3399;

JJ:=gspt6 >= gspt7 AND gspt6 >= gspt8 AND CLOSE > OPEN;

加仓:STICKLINE(JJ,0,gspt6,2.5,0),COLOR00FFFF;

QQ:=gspt6 >= gspt7 AND gspt6 >= gspt8 AND CLOSE < OPEN;

减仓:STICKLINE(QQ,0,gspt6,2.5,0),COLORFF0000;

XX:=gspt8 > gspt6 AND gspt8 > gspt7;

洗盘:STICKLINE(XX,0,gspt8,2.5,0),COLORFFFFFF;

MM:=gspt7 > gspt6 AND gspt7 > gspt8;

高卖:STICKLINE(MM,0,gspt7,2.5,0),COLORFF00FF;

相对地量:=STICKLINE(((gspt9 > 2) AND (VOL < (MA(VOL,5) / 2))),6,VOL,1,0);

MMM:=KK AND QQ;

JJJ:=DD AND QQ;

AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

主动买盘:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE< OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),NODRAW;

主动卖盘:IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,AA*(HIGH-LOW),VOL/2)),NODRAW;

买卖比:主动买盘/主动卖盘;

WJ:=(HIGH+LOW+CLOSE)/3;

VD1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));

VD2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-WJ);

VD3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);

VD4:=IF(HIGH=LOW,1,WJ-MIN(CLOSE,OPEN));

VD5:=VOL/IF(HIGH=LOW,4,HIGH-LOW);

VD6:=(VD1*VD5);

VD7:=(VD2*VD5);

VD8:=(VD3*VD5);

VD9:=(VD4*VD5);

买入量:=(VD9+VD8);

卖出量:=(VD6+VD7);

买入资金:买入量*CLOSE/100;

卖出资金:卖出量*CLOSE/100;

gspt02:=REF(EMA((HIGH+LOW+CLOSE)/3,10),1);

gspt04:=EMA(LLV(LOW,10),3);

WEKR:=EMA(gspt02*2-gspt04,5),COLORMAGENTA,LINETHICK9;

CAEA05:=DATE<1390720;

CAHA08:=(CLOSE/REF(CLOSE,1)-1)*100>7;

CAJA10:OPEN<WEKR AND CLOSE>WEKR AND CAEA05 AND CAHA08;