通达信价量时空选股指标公式源码

通达信价量时空选股指标公式源码

源码正文：

k线个数:=60;J1:=-49{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=3*K-2*D,COLORFF00FF,NODRAW{XG51};
K1:=1/3*RSV+REF(K,1)/3*2{XG51};
D1:=1/3*K+REF(D,1)/3*2{XG51};
JJ:=3*K1-2*D1{XG51};
J11:=J{XG51};
J昨:=REF(JJ,1){XG51};
JX:=IF(J1=-50,J11,IF(J1=-49,J昨,J1)){XG51};
J拐头价验证:=((9/7*JX-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9){XG51};
J底部上穿此价买:=IF(J拐头价验证<REF(J拐头价验证,1),J拐头价验证,DRAWNULL),COLOR80FFFF,NODRAW{XG51};
J从顶下穿此价卖:=IF(J拐头价验证>REF(J拐头价验证,1),J拐头价验证,DRAWNULL),COLORFFFF00,NODRAW{XG51};
J100%价:=CONst(((9/7*100-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9)){XG51};
J80%价:=CONST(((9/7*80-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9)){XG51};
J50%价:=CONST(((9/7*50-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9)){XG51};
J20%价:=CONST(((9/7*20-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9)){XG51};
J0%价:=CONST(((9/7*0-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9)){XG51};
STICKLINE(1,J0%价,J0%价,80,-1),COLOR606060{XG51};
今日拐头价:CONST(J拐头价验证),COLOR80FFFF{XG51};
J%:J,COLORFF00FF,NODRAW{XG51};
对应股价:((9/7*J-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9),COLORFF0080,NODRAW{XG51};
RSVD:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*(J100%价-J0%价)+J0%价{XG51};
KK:=SMA(RSVD,3,1),COLORCC9999{XG51};
DD:=SMA(KK,3,1),COLOR0080FF{XG51};
股价反推J值:=3*KK-2*DD,COLORFF0080{XG51};
TMP:=LARGEINTRDvol-LARGEOUTTRDVOL{XG51};
DDY动因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0){XG51};
L2有效显示数据:=IF(DDY动因>0 OR DDY动因<0 OR TMP>0 OR TMP<0,DDY动因,DRAWNULL),NODRAW{XG51};
涨跌动因%:IF(L2有效显示数据=DRAWNULL,DRAWNULL,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM),COLOR0080FF,NODRAW{XG51};
买卖力度%:IF(L2有效显示数据=DRAWNULL,DRAWNULL,(LARGEINTRDVOL-LARGEOUTTRDVOL)*100/VOL),COLOR0000FF,NODRAW{XG51};
动因柱:=IF(L2有效显示数据=DRAWNULL,DRAWNULL,(TRADEOUTNUM-TRADEINNUM)*(J100%价-J0%价)/TRADENUM),COLOR00CCFF,NODRAW{XG51};
力度柱:=IF(L2有效显示数据=DRAWNULL,DRAWNULL,(LARGEINTRDVOL-LARGEOUTTRDVOL)*(J100%价-J0%价)/VOL),COLOR0000FF,NODRAW{XG51};
RSVM:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*(J100%价-J0%价)+J0%价{XG51};
％K:=MA(RSVM,3){XG51};
％D:=MA(％K,3),COLORAA00DD{XG51};
GG:=DRAWBAND(％K,RGB(102,32,51),％D,RGB(0,64,16)){XG51};

STICKLINE(1,J100%价,J100%价,80,-1),COLOR606060{XG51};
STICKLINE(1,J80%价,J80%价,80,-1),COLOR606060{XG51};
STICKLINE(1,J50%价,J50%价,80,-1),COLOR606060{XG51};
STICKLINE(1,J20%价,J20%价,80,-1),COLOR606060{XG51};
STICKLINE(动因柱>0 AND V>0,J50%价,动因柱+J50%价,2.3,0),COLOR005A66{XG51};
STICKLINE(动因柱>0 AND V>0,J50%价,动因柱+J50%价,1.7,0),COLOR006A88{XG51};
STICKLINE(动因柱>0 AND V>0,J50%价,动因柱+J50%价,1.0,0),COLOR007AAA{XG51};
STICKLINE(动因柱>0 AND V>0,J50%价,动因柱+J50%价,0.33,0),COLOR008acC{XG51};
STICKLINE(动因柱<0 AND V>0,J50%价,动因柱+J50%价,2.3,0),COLOR003300{XG51};
STICKLINE(动因柱<0 AND V>0,J50%价,动因柱+J50%价,1.7,0),COLOR004400{XG51};
STICKLINE(动因柱<0 AND V>0,J50%价,动因柱+J50%价,1.0,0),COLOR005500{XG51};
STICKLINE(动因柱<0 AND V>0,J50%价,动因柱+J50%价,0.33,0),COLOR006000{XG51};
DRAWTEXT(CURRBARSCOUNT=K线个数,J100%价,'↖100％'),COLORA0A0A0{XG51};
DRAWTEXT(CURRBARSCOUNT=K线个数,J80%价,'  ↖80％'),COLORA0A0A0{XG51};
DRAWTEXT(CURRBARSCOUNT=K线个数,J50%价,'  ↖50％'),COLORA0A0A0{XG51};
DRAWTEXT(CURRBARSCOUNT=K线个数,J20%价,'  ↖20％'),COLORA0A0A0{XG51};
DRAWTEXT(CURRBARSCOUNT=K线个数,J0%价,'    ↖0％'),COLORA0A0A0{XG51};
DRAWBAND(股价反推J值,RGB(204,0,255),股价反推J值,RGB(255,255,255)){XG51};
DRAWBAND(KK,RGB(153,153,204),KK,RGB(255,255,255)){XG51};
DRAWBAND(DD,RGB(128,128,0),DD,RGB(255,255,255)){XG51};
B1:=REF(C,1);B2:=REF(C,2){XG51};
SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) AND REF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) AND REF(C,2)>REF(C,1),2,IF(C<REF(C,2) AND REF(C,2)<REF(C,1),-2,0)))){XG51};
SM:=IF(REF(SS,1)!=0,REF(SS,1),IF(REF(SS,2)!=0,REF(SS,2),IF(REF(SS,3)!=0,REF(SS,3),IF(REF(SS,5)!=0,REF(SS,5),IF(REF(SS,6)!=0,REF(SS,6),IF(REF(SS,7)!=0,REF(SS,7),0)))))){XG51};
金底:=(SS=1 OR SS=2) AND SM<0{XG51};
绿顶:=(SS=-1 OR SS=-2) AND SM>0{XG51};
AA:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) AND REF(CLOSE,1)<REF(CLOSE,3) AND IF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE,1)<REF(CLOSE,4) OR (REF(CLOSE,2)<REF(CLOSE,4) AND REF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE,6)<REF(CLOSE,7)))){XG51};
BB:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) AND REF(CLOSE,1)>REF(CLOSE,3) AND IF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE,1)>REF(CLOSE,4) OR (REF(CLOSE,2)>REF(CLOSE,4) AND REF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE,6)>REF(CLOSE,7)))){XG51};
三平底:=AA AND CLOSE>REF(OPEN,2){XG51};
三平顶:=BB AND CLOSE<REF(CLOSE,2){XG51};
C_D1:=(3*C+2*O+L+H)/7;      
WMA5:=(5*C_D1+4*REF(C_D1 ,1 )+3*REF(C_D1 ,2 )+2*REF(C_D1 ,3 )+REF(C_D1 ,4 ))/15 COLORBLUE{XG51};
C_D2:=REVERSE(C_D1)+2*WMA5 COLORCYAN;  
WMA5金叉:=crOSS(WMA5,C_D2*0.997){XG51};
WMA5死叉:=CROSS(C_D2,WMA5*0.997){XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
主力:=EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,COLOR0000FF{XG51};
散户:=EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,COLOR00FF00{XG51};
DRAWICON(CROSS(主力,散户) AND 主力<-10 AND 散户>REF(散户,1) OR (CROSS(主力,散户) AND 散户<-35),J20%价,1){XG51};
DRAWTEXT(CROSS(主力,散户) AND 主力<-10 AND (WMA5金叉 OR 金底 OR 三平底),J20%价,8){XG51};
DRAWTEXT(CROSS(RSI1,25) AND (WMA5金叉 OR 金底 OR 三平底),J0%价,9){XG51};
DRAWTEXT(CROSS(85,RSI1),股价反推J值,10){XG51};
STICKLINE(力度柱>0,J50%价,力度柱+J50%价,0,0),COLOR0000CC{XG51};
STICKLINE(力度柱<0,J50%价,力度柱+J50%价,0,0),COLOR009940{XG51};
STICKLINE(1,J50%价,J50%价,80,-1),COLOR606060{XG51};
{X+G*5*1+C+N+{};