股指佛手箱指標公式源碼 通達信 飛狐 大智慧通用指標

相關標簽: 飛狐薛斯通道指標源碼 、 飛狐海龜交易系統源碼 、 飛狐全推驅動源碼 、 股票飛狐公式源碼 、 飛狐怎么安裝源碼 、 飛狐 p2p 驅動 源碼 、 飛狐 p2p 源碼 、 股指預測軟件源碼 、 佛手的功效與作用 、

股指佛手箱指標公式源碼

飛狐的源碼：

【H】:HHV(HIGH,14),LINETHICK3,COLORWHITE;
【L】:LLV(LOW,14),LINETHICK3,COLORWHITE;
T:(【H】+【L】)/2 ,LINETHICK1,COLORWHITE;

STICKLINE(C>=COST(50)AND C<=COST(58)AND C>O,O,C,2,0),COLORRED;
STICKLINE(C>=COST(97)AND C<=COST(100)AND C>O,O,C,2,0),COLORWHITE;
DRAWTEXT(C>=COST(97)AND C<=COST(100) AND C>O,C,'--獲利大于97%'),COLORRED;
DRAWTEXT(C>=COST(50)AND C<=COST(58) AND C>O,C,'--獲利50%'),COLORYELLOW;
JJ:=(H+L+3*C)/5;
VAR21:=EMA(JJ,5);VAR22:=EMA(JJ,13);VAR23:=EMA(JJ,21);VAR24:=EMA(JJ,34);H1A:=(VAR21+VAR22+VAR23+VAR24)/4;
成本和諧:MA(H1A,5),COLORRED,LINETHICK0;
LL:=LLV(C,100);
TJ:=IF((C-ref(C,1))/ref(C,1)>0.025,1,0);
STICKLINE(C>ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),10,0),COLORGREEN,LINETHICK1;
黃昏之星:=((((((ref(CLOSE,2) / ref(OPEN,2)) > 1.03) AND (ref(OPEN,1) >
ref(CLOSE,2))) AND ((ABS((ref(OPEN,1) - ref(CLOSE,1))) /
ref(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <ref(CLOSE,2)));
射擊之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *
(MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));
錘頭:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));
吊頸:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))));
穿頭破腳:=((((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)
< 0.96)) AND (CLOSE < ref(OPEN,1))) AND (OPEN > ref(CLOSE,1))) OR
(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.04)) AND (CLOSE > ref(OPEN,1))) AND (OPEN < ref(CLOSE,1))));
身懷六甲:=(((((ABS((ref(CLOSE,1) - ref(OPEN,1))) / ref(CLOSE,1)) > 0.04)
AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <
MAX(ref(CLOSE,1),ref(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(ref(CLOSE,1),ref(OPEN,1))));
烏云蓋頂:=(((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <
0.97)) AND (OPEN > ref(CLOSE,1))) AND (CLOSE < ref(CLOSE,1)));
曙光初現:=(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.03)) AND (OPEN < ref(CLOSE,1))) AND (CLOSE > ref(CLOSE,1)));
傾盆雨:=(((((ref(CLOSE,1) / ref(OPEN,1)) >= 1.03) AND (OPEN <
ref(CLOSE,1))) AND (OPEN > ref(OPEN,1))) AND (CLOSE < ref(OPEN,1)));
DRAWTEXT(傾盆雨,H*1.03,'傾盆大雨'),COLORCYAN;
DRAWTEXT(黃昏之星,H*1.02,'黃昏之星'),COLORCYAN;
DRAWTEXT(射擊之星,H*1.03,'射擊之星高位見頂'),COLORCYAN;
DRAWTEXT(錘頭,L-L*0.02,'錘頭低位見底'),COLORGREEN;
DRAWTEXT(吊頸,H*1.03,'吊頸高位見頂'),COLORCYAN;
DRAWTEXT(穿頭破腳,H*1.05,'穿頭破腳'),COLORCYAN;
DRAWTEXT(烏云蓋頂,H*1.03,'烏云蓋頂'),COLORCYAN;
DRAWTEXT(曙光初現,L-L*0.02,'曙光初現(放量見漲)'),COLORGREEN;
DRAWTEXT(身懷六甲,L-L*0.02,'身懷六甲,底升頂落'),COLORGREEN;
陽長下影線:=(O-L)/O>0.06 AND C>O;
陰長下影線:=(C-L)/C>0.06 AND C<O;
陽長上影線:=(H-C)/C>0.06 AND C>O;
陰長上影線:=(H-O)/O>0.06 AND C<O;
光頭陽長下影線:=C=H AND (O-L)/O>0.06 AND C>O;
光腳陰長上影線:=C=L AND (H-O)/O>0.06 AND C<O;
白色十字星:=C=O AND H>C AND C>L;
DRAWTEXT(陽長下影線,H*1.01,'陽長下影線'),COLORCYAN; {文章來至程序化交易網 cxh99.com}
DRAWTEXT(陰長下影線,H*1.04,'陰長下影線'),COLORWHITE;
DRAWTEXT(陽長上影線,H*1.06,'陽長上影線'),COLORRED;
DRAWTEXT(光頭陽長下影線,H*1.07,'光頭陽長下影線'),COLORCYAN;
DRAWTEXT(光腳陰長上影線,H*1.08,'光腳陰長上影線'),COLORYELLOW;
DRAWTEXT(白色十字星,H*1.02,'白色十字星'),COLORWHITE;
S下:=HHV(MA(HIGH,2),2),COLORGREEN,LINETHICK0;
S上:=LLV(MA(HIGH,2),1),COLORRED,LINETHICK0;
SPPP:=-(S上-S下)/ref(C,1)*100;
SPTEM1:=(MIN(O,C)-L)/(H-L)*100;
SPTEM2:=(H-MAX(O,C))/(H-L)*100;
SPTEM3:=(C-O)/(H-L)*100;
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);
SKJ3:=(SPTEM3<=20 AND SPTEM3>-20 AND SPTEM1>1.2*SPTEM2);
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (SPPP>2 OR ref(SPPP,1)>2 );
短買:=IF(SUM(SPPP>0,5)=5 AND SUM(SKJ>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*SKJ),COLORRED;
DRAWTEXT(短買,L,'短買'),COLORWHITE;
X1:=(C+L+H)/3; {本文來至程序化交易網 cxh99.com}
BB13:=ATAN(EMA(X1,13)-ref(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>ref(EMA(X1,8),1),10),
EMA8,'∠45'),COLORWHITE;
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,5,1);
J:=3*K-2*D;
X:=ref(J,1)<10 AND H>ref(H,1) AND C>ref(C,1) AND C>ref(O,1) AND L>ref(L,1);
STICKLINE(X,L ,L,2,0),COLOR008888;
STICKLINE(X,L ,H,0,0),COLORFF00FF;
STICKLINE(X,C ,O,2,0),COLORFF00FF;
天量:=VOL=HHV(VOL,0);
DRAWTEXT(天量,C,'-------高位天量賣'),COLORYELLOW;
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖離:=MA(BIAS,3);
DRAWTEXT(CROSS(BIAS,乖離) AND 乖離<-9,C,'---------二次BIAS乖離底買'),COLORGREEN;
COST(50),COLORGREEN,CIRCLEDOT;
TY:=C;
HD:=FILTER(BACKSET(FILTER(ref(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(ref(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=ref(C,BARSLAST(HD)); {內容來至程序化交易網 CXH99.COM}
B:=ref(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪頂:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK1;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK1;

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
大智慧L2源碼：
{股指佛手箱}

【H】:HHV(HIGH,14),LINETHICK3,COLORWHITE;
【L】:LLV(LOW,14),LINETHICK3,COLORWHITE;
T:(【H】+【L】)/2 ,LINETHICK1,COLORWHITE;

STICKLINE(C>=COST(50)AND C<=COST(58)AND C>O,O,C,2,0),COLORRED;
STICKLINE(C>=COST(97)AND C<=COST(100)AND C>O,O,C,2,0),COLORWHITE;
DRAWTEXT(C>=COST(97)AND C<=COST(100) AND C>O,C,'--獲利大于97%'),COLORRED;
DRAWTEXT(C>=COST(50)AND C<=COST(58) AND C>O,C,'--獲利50%'),COLORYELLOW;
JJ:=(H+L+3*C)/5;
VAR21:=EMA(JJ,5);VAR22:=EMA(JJ,13);VAR23:=EMA(JJ,21);VAR24:=EMA(JJ,34);H1A:=(VAR21+VAR22+VAR23+VAR24)/4;
成本和諧:MA(H1A,5),COLORRED,LINETHICK0;
LL:=LLV(C,100);
TJ:=IF((C-ref(C,1))/ref(C,1)>0.025,1,0);
STICKLINE(C>ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),10,0),COLORGREEN,LINETHICK1;
黃昏之星:=((((((ref(CLOSE,2) / ref(OPEN,2)) > 1.03) AND (ref(OPEN,1) >
ref(CLOSE,2))) AND ((ABS((ref(OPEN,1) - ref(CLOSE,1))) /
ref(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <ref(CLOSE,2)));
射擊之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *
(MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));
錘頭:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));
吊頸:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))));
穿頭破腳:=((((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)
< 0.96)) AND (CLOSE < ref(OPEN,1))) AND (OPEN > ref(CLOSE,1))) OR
(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.04)) AND (CLOSE > ref(OPEN,1))) AND (OPEN < ref(CLOSE,1))));
身懷六甲:=(((((ABS((ref(CLOSE,1) - ref(OPEN,1))) / ref(CLOSE,1)) > 0.04)
AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <
MAX(ref(CLOSE,1),ref(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(ref(CLOSE,1),ref(OPEN,1))));
烏云蓋頂:=(((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <
0.97)) AND (OPEN > ref(CLOSE,1))) AND (CLOSE < ref(CLOSE,1)));
曙光初現:=(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.03)) AND (OPEN < ref(CLOSE,1))) AND (CLOSE > ref(CLOSE,1)));
傾盆雨:=(((((ref(CLOSE,1) / ref(OPEN,1)) >= 1.03) AND (OPEN <
ref(CLOSE,1))) AND (OPEN > ref(OPEN,1))) AND (CLOSE < ref(OPEN,1)));
DRAWTEXT(傾盆雨,H*1.03,'傾盆大雨'),COLORCYAN;
DRAWTEXT(黃昏之星,H*1.02,'黃昏之星'),COLORCYAN;
DRAWTEXT(射擊之星,H*1.03,'射擊之星高位見頂'),COLORCYAN;
DRAWTEXT(錘頭,L-L*0.02,'錘頭低位見底'),COLORGREEN;
DRAWTEXT(吊頸,H*1.03,'吊頸高位見頂'),COLORCYAN;
DRAWTEXT(穿頭破腳,H*1.05,'穿頭破腳'),COLORCYAN;
DRAWTEXT(烏云蓋頂,H*1.03,'烏云蓋頂'),COLORCYAN;
DRAWTEXT(曙光初現,L-L*0.02,'曙光初現(放量見漲)'),COLORGREEN;
DRAWTEXT(身懷六甲,L-L*0.02,'身懷六甲,底升頂落'),COLORGREEN;
陽長下影線:=(O-L)/O>0.06 AND C>O;
陰長下影線:=(C-L)/C>0.06 AND C<O;
陽長上影線:=(H-C)/C>0.06 AND C>O;
陰長上影線:=(H-O)/O>0.06 AND C<O;
光頭陽長下影線:=C=H AND (O-L)/O>0.06 AND C>O;
光腳陰長上影線:=C=L AND (H-O)/O>0.06 AND C<O;
白色十字星:=C=O AND H>C AND C>L;
DRAWTEXT(陽長下影線,H*1.01,'陽長下影線'),COLORCYAN;
DRAWTEXT(陰長下影線,H*1.04,'陰長下影線'),COLORWHITE;
DRAWTEXT(陽長上影線,H*1.06,'陽長上影線'),COLORRED;
DRAWTEXT(光頭陽長下影線,H*1.07,'光頭陽長下影線'),COLORCYAN;
DRAWTEXT(光腳陰長上影線,H*1.08,'光腳陰長上影線'),COLORYELLOW;
DRAWTEXT(白色十字星,H*1.02,'白色十字星'),COLORWHITE;
S下:=HHV(MA(HIGH,2),2);
S上:=LLV(MA(HIGH,2),1);
SPPP:=-(S上-S下)/ref(C,1)*100;
SPTEM1:=(MIN(O,C)-L)/(H-L)*100;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=2 OR CXH=7));
SPTEM2:=(H-MAX(O,C))/(H-L)*100;
SPTEM3:=(C-O)/(H-L)*100;
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);
SKJ3:=(SPTEM3<=20 AND SPTEM3>-20 AND SPTEM1>1.2*SPTEM2);
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (SPPP>2 OR ref(SPPP,1)>2 );
短買:=IF(SUM(SPPP>0,5)=5 AND SUM(SKJ>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*SKJ);
DRAWTEXT(短買,L,'短買'),COLORWHITE;
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-ref(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>ref(EMA(X1,8),1),10),
EMA8,'∠45'),COLORWHITE;
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,5,1);
J:=3*K-2*D;
X:=ref(J,1)<10 AND H>ref(H,1) AND C>ref(C,1) AND C>ref(O,1) AND L>ref(L,1);
STICKLINE(X,L ,L,2,0),COLOR008888;
STICKLINE(X,L ,H,0,0),COLORFF00FF;
STICKLINE(X,C ,O,2,0),COLORFF00FF;
天量:=VOL=HHV(VOL,0);
DRAWTEXT(天量,C,'-------高位天量賣'),COLORYELLOW;
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖離:=MA(BIAS,3);
DRAWTEXT(CROSS(BIAS,乖離) AND 乖離<-9,C,'---------二次BIAS乖離底買'),COLORGREEN;
COST(50),COLORGREEN,CIRCLEDOT;
TY:=C;
HD:=FILTER(BACKSET(FILTER(ref(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(ref(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=ref(C,BARSLAST(HD));
B:=ref(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪頂:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK1;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK1; {本文來至程序化交易網 cxh99.com}

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

通達信源碼：

【H】:HHV(HIGH,14),LINETHICK3,COLORWHITE;
【L】:LLV(LOW,14),LINETHICK3,COLORWHITE;
T:(【H】+【L】)/2 ,LINETHICK1,COLORWHITE;

STICKLINE(C>=COST(50)AND C<=COST(58)AND C>O,O,C,2,0),COLORRED;
STICKLINE(C>=COST(97)AND C<=COST(100)AND C>O,O,C,2,0),COLORWHITE;
DRAWTEXT(C>=COST(97)AND C<=COST(100) AND C>O,C,'--獲利大于97%'),COLORRED;
DRAWTEXT(C>=COST(50)AND C<=COST(58) AND C>O,C,'--獲利50%'),COLORYELLOW;
JJ:=(H+L+3*C)/5;
VAR21:=EMA(JJ,5);VAR22:=EMA(JJ,13);VAR23:=EMA(JJ,21);VAR24:=EMA(JJ,34);H1A:=(VAR21+VAR22+VAR23+VAR24)/4;
成本和諧:MA(H1A,5),COLORRED,LINETHICK0;
LL:=LLV(C,100);
TJ:=IF((C-ref(C,1))/ref(C,1)>0.025,1,0);
STICKLINE(C>ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),ref(O,BARSLAST(TJ =1)),10,0),COLORGREEN,LINETHICK1;
黃昏之星:=((((((ref(CLOSE,2) / ref(OPEN,2)) > 1.03) AND (ref(OPEN,1) >
ref(CLOSE,2))) AND ((ABS((ref(OPEN,1) - ref(CLOSE,1))) /
ref(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <ref(CLOSE,2)));
射擊之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *
(MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));
錘頭:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));
吊頸:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
MIN(OPEN,CLOSE))))));
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
穿頭破腳:=((((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)
< 0.96)) AND (CLOSE < ref(OPEN,1))) AND (OPEN > ref(CLOSE,1))) OR
(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.04)) AND (CLOSE > ref(OPEN,1))) AND (OPEN < ref(CLOSE,1))));
身懷六甲:=(((((ABS((ref(CLOSE,1) - ref(OPEN,1))) / ref(CLOSE,1)) > 0.04)
AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <
MAX(ref(CLOSE,1),ref(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(ref(CLOSE,1),ref(OPEN,1))));
烏云蓋頂:=(((((ref(CLOSE,1) / ref(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <
0.97)) AND (OPEN > ref(CLOSE,1))) AND (CLOSE < ref(CLOSE,1)));
曙光初現:=(((((ref(CLOSE,1) / ref(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
1.03)) AND (OPEN < ref(CLOSE,1))) AND (CLOSE > ref(CLOSE,1))); {本文來至CXH99.COM}
傾盆雨:=(((((ref(CLOSE,1) / ref(OPEN,1)) >= 1.03) AND (OPEN <
ref(CLOSE,1))) AND (OPEN > ref(OPEN,1))) AND (CLOSE < ref(OPEN,1)));
DRAWTEXT(傾盆雨,H*1.03,'傾盆大雨'),COLORCYAN;
DRAWTEXT(黃昏之星,H*1.02,'黃昏之星'),COLORCYAN;
DRAWTEXT(射擊之星,H*1.03,'射擊之星高位見頂'),COLORCYAN;
DRAWTEXT(錘頭,L-L*0.02,'錘頭低位見底'),COLORGREEN;
DRAWTEXT(吊頸,H*1.03,'吊頸高位見頂'),COLORCYAN;
DRAWTEXT(穿頭破腳,H*1.05,'穿頭破腳'),COLORCYAN;
DRAWTEXT(烏云蓋頂,H*1.03,'烏云蓋頂'),COLORCYAN;
DRAWTEXT(曙光初現,L-L*0.02,'曙光初現(放量見漲)'),COLORGREEN;
DRAWTEXT(身懷六甲,L-L*0.02,'身懷六甲,底升頂落'),COLORGREEN;
陽長下影線:=(O-L)/O>0.06 AND C>O;
陰長下影線:=(C-L)/C>0.06 AND C<O;
陽長上影線:=(H-C)/C>0.06 AND C>O;
陰長上影線:=(H-O)/O>0.06 AND C<O;
光頭陽長下影線:=C=H AND (O-L)/O>0.06 AND C>O;
光腳陰長上影線:=C=L AND (H-O)/O>0.06 AND C<O;
白色十字星:=C=O AND H>C AND C>L;
DRAWTEXT(陽長下影線,H*1.01,'陽長下影線'),COLORCYAN;
DRAWTEXT(陰長下影線,H*1.04,'陰長下影線'),COLORWHITE;
DRAWTEXT(陽長上影線,H*1.06,'陽長上影線'),COLORRED;
DRAWTEXT(光頭陽長下影線,H*1.07,'光頭陽長下影線'),COLORCYAN;
DRAWTEXT(光腳陰長上影線,H*1.08,'光腳陰長上影線'),COLORYELLOW;
DRAWTEXT(白色十字星,H*1.02,'白色十字星'),COLORWHITE;
S下:=HHV(MA(HIGH,2),2);
S上:=LLV(MA(HIGH,2),1);
SPPP:=-(S上-S下)/ref(C,1)*100;
SPTEM1:=(MIN(O,C)-L)/(H-L)*100;
SPTEM2:=(H-MAX(O,C))/(H-L)*100;
SPTEM3:=(C-O)/(H-L)*100;
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);
SKJ3:=(SPTEM3<=20 AND SPTEM3>-20 AND SPTEM1>1.2*SPTEM2);
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (SPPP>2 OR ref(SPPP,1)>2 );
短買:=IF(SUM(SPPP>0,5)=5 AND SUM(SKJ>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*SKJ);
DRAWTEXT(短買,L,'短買'),COLORWHITE;
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-ref(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>ref(EMA(X1,8),1),10),
EMA8,'∠45'),COLORWHITE;
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,5,1);
J:=3*K-2*D;
X:=ref(J,1)<10 AND H>ref(H,1) AND C>ref(C,1) AND C>ref(O,1) AND L>ref(L,1);
STICKLINE(X,L ,L,2,0),COLOR008888;
STICKLINE(X,L ,H,0,0),COLORFF00FF;
STICKLINE(X,C ,O,2,0),COLORFF00FF;
天量:=VOL=HHV(VOL,0);
DRAWTEXT(天量,C,'-------高位天量賣'),COLORYELLOW;
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖離:=MA(BIAS,3);
DRAWTEXT(CROSS(BIAS,乖離) AND 乖離<-9,C,'---------二次BIAS乖離底買'),COLORGREEN;
COST(50),COLORGREEN,CIRCLEDOT;
TY:=C;
HD:=FILTER(BACKSET(FILTER(ref(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(ref(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=ref(C,BARSLAST(HD));
B:=ref(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ; {內容來至程序化交易網 CXH99.COM}
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪頂:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK1;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK1;