自用战神主图源码 主图 通达信 贴图

GJ:=(C+H+L+O)/4;

明日阻力:=L+(GJ-L)+(C-L);

明日支撑:=L+(C-GJ);

下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

RRRSV:=SMA(下档线,3,1);

KKK:=SMA(RRRSV,3,1);

DDDDD:=((3 * RRRSV) - (2 * KKK));

JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);

RSV24:=SMA(JJ12,3,1);

K24:=SMA(RSV24,3,1);

D24:=((3 * RSV24) - (2 * K24));

压力2:=IF(CROSS(D24,DDDDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDDDD)))),COLORFFFFFF;

底部:=LLV(HIGH,30),COLOR00FF00;

阻力:REF(明日阻力 , 1),NODRAW;

支撑:REF(明日支撑 , 1),NODRAW;

压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW;

底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW;

PMA:MA(C,5),COLORWHITE,LINETHICK2;

IF(PMA>REF(PMA,1),PMA,DRAWNULL),COLORRED,LINETHICK2;

IF(PMA<REF(PMA,1),PMA,DRAWNULL),COLORGREEN,LINETHICK2;

X:=(3*C+L+O+H)/6;

多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)

+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)

+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+

REF(X,20))/210,COLORFF00FF,LINETHICK2;

{用法：黄托底买进,蓝压顶卖出。}

DD:=多空线<REF(多空线,1);

IF(DD,多空线,DRAWNULL),COLOR00FFFF,LINETHICK2;

A:=(PMA>多空线);

IF(A,多空线,DRAWNULL),COLOR33FF33,POINTDOT,LINETHICK4;

VAR3:=LLV(HIGH,240);

VAR4:=100*(CLOSE-VAR3)/VAR3;

VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;

VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;

VAR7:=0;{股票指标网}

VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;

VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);

VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);

VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);

VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);

VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);

VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);

买１:=VAR10;

买２:=(VAR11+VAR13+VAR15+VAR17);

卖１:=(VAR12+VAR14+VAR16+VAR18);

B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;

DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'买'),COLORRED;

S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;

DRAWTEXT(卖１>0,HIGH*1.02,'卖'),COLORGREEN;

DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;

DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);

ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;

VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);

K:=EMA(VAR7,5)*2, , COLORFF00FF;

D:=EMA(K,5), , COLORWHITE;

J:=K*3-D*2, ,COLORYELLOW;

VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;

HS:=VOL/CAPITAL*100, , COLORGREEN;

VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);

DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'机构进场'),LINETHICK1,COLORFF00FF;

VAR1A:=IF(VARE>0,VARE,0);

VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;

VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;

DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,'大顶（底）') COLORWHITE;

AA1:=AMOUNT/V; 

BB1:=L<AA1*0.9; 

CC1:=(C-REF(C,1))/REF(C,1)*100>1.2; 

DD1:=L<MA(C,5)*0.921; 

EE1:=V<MA(V,5)*1.5; 

FF1:=BB1 AND CC1 AND DD1 AND EE1; 

DRAWTEXT(FF1,(LOW* 0.97),'老鼠仓'),COLOR4080FF;

 

原理解析：
GJ赋值:(C+H+L+O)/4


明日阻力赋值:L+(GJ-L)+(C-L)


明日支撑赋值:L+(C-GJ)


下档线赋值:(((收盘价 - 13日内最低价最低值) / (13日内最高价最高值 - 13日内最低价最低值)) * 100)
下档线的3日[1日权重]移动平均
RRRSV的3日[1日权重]移动平均


DDDDD赋值:((3 * RRRSV) - (2 * KKK))


JJ12赋值:(((收盘价 - 55日内最低价最低值) / (55日内最高价最高值 - 55日内最低价最低值)) * 100)
JJ12的3日[1日权重]移动平均
RSV24的3日[1日权重]移动平均


D24赋值:((3 * RSV24) - (2 * K24))


压力2赋值:IF(D24上穿DDDDD,最高价,REF(最高价,上次D24上穿DDDDD距今天数)),COLORFFFFFF


底部赋值:30日内最高价最低值,COLOR00FF00
输出

阻力: 1日前的明日阻力 ,NODRAW
输出

支撑: 1日前的明日支撑 ,NODRAW
如果ISLASTBAR返回压力2否则返回DRAWNULL
如果ISLASTBAR返回底部否则返回DRAWNULL
输出

PMA:C的5日简单移动平均,画白色, 线宽为2


IF(PMA>1日前的PMA,PMA,DRAWNULL),画红色, 线宽为2


IF(PMA<1日前的PMA,PMA,DRAWNULL),画绿色, 线宽为2


X赋值:(3*C+L+O+H)/6
输出

多空线:(20*X+19*1日前的X+18*2日前的X+17*3日前的X+16*4日前的X+15*5日前的X+14*6日前的X

+13*7日前的X+12*8日前的X+11*9日前的X+10*10日前的X+9*11日前的X+8*12日前的X

+7*13日前的X+6*14日前的X+5*15日前的X+4*16日前的X+3*17日前的X+2*18日前的X+

20日前的X)/210,COLORFF00FF, 线宽为2


{用法：黄托底买进,蓝压顶卖出。}

DD赋值:多空线<1日前的多空线
如果DD返回多空线否则返回DRAWNULL


A赋值:(PMA>多空线)
如果A返回多空线否则返回DRAWNULL


VAR3赋值:240日内最高价最低值


VAR4赋值:100*(收盘价-VAR3)/VAR3


VAR5赋值:(收盘价-528日内最低价最低值)/(528日内最高价最高值-528日内最低价最低值)*100


VAR6赋值:(收盘价-530日内收盘价最低值)/(530日内收盘价最高值-530日内收盘价最低值)*100


VAR7赋值:0
{股票指标网}

VAR8赋值:SMA(收盘价-1日前的收盘价和0较大值,34,1)/SMA(收盘价-1日前的收盘价的绝对值,7,1)*100


VAR9赋值:SMA(收盘价-1日前的收盘价和0较大值,13,1)/SMA(收盘价-1日前的收盘价的绝对值,13,1)*100


VAR10赋值:IF(TROUGHBARS(3,16,1)=0 AND 最高价>最低价+0.04,4,0)


VAR11赋值:ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3)


VAR12赋值:ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3)


VAR13赋值:ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3)


VAR14赋值:ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3)


VAR15赋值:ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3)


VAR16赋值:ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3)


VAR17赋值:ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3)


VAR18赋值:ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3)


VAR19赋值:收盘价的2日指数移动平均-收盘价的150日指数移动平均


买１赋值:VAR10


买２赋值:(VAR11+VAR13+VAR15+VAR17)


卖１赋值:(VAR12+VAR14+VAR16+VAR18)
如果买１>0 OR 买２>0返回最低价*0.99否则返回DRAWNULL
当满足条件买１>0 OR 买２>0时,在最低价*0.99和'买'位置书写文字
如果卖１>0返回最高价*1.01否则返回DRAWNULL
当满足条件卖１>0时,在最高价*1.02和'卖'位置书写文字


DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),最低价*0.98,1)


DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),最高价*1.01,2)


ZB赋值:VAR3的5日指数移动平均,5)*3, COLORSTICK


VARA赋值:IF(VAR9 AND CROSS(收盘价的3日简单移动平均,收盘价的5日简单移动平均),20,0)


K赋值:VAR7的5日指数移动平均*2, , COLORFF00FF


D赋值:K的5日指数移动平均, , 画白色


J赋值:K*3-D*2, ,画黄色


VARB赋值:BETWEEN(收盘价,收盘价的3日简单移动平均,收盘价的5日简单移动平均) AND J>10


HS赋值:成交量/当前流通股本*100, , 画绿色


VARE赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20


VARF赋值:100-3*SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)


DRAWTEXT(VAR11 AND 统计30日满足VAR11的天数=1,最低价*0.95,'机构进场'),LINETHICK1,COLORFF00FF
如果VARE>0返回VARE否则返回0


VAR1B赋值:IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60


VAR1C赋值:VAR1A>48 AND VAR1B>60 AND VAR19<100


DRAWTEXT(VAR1C AND 统计30日满足VAR1C的天数=1,最低价*0.95,'大顶（底）') 画白色


AA1:=成交额/V


BB1:=L

CC1赋值:(C-1日前的C)/1日前的C*100>1.2


DD1:=L

EE1赋值:V

FF1赋值:BB1 AND CC1 AND DD1 AND EE1


DRAWTEXT(FF1,(最低价* 0.97),'老鼠仓'),COLOR4080FF