打印本文
關閉窗口
相關標簽:
原理解析：
源碼：
?
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'證券代碼:'+STKLABEL),ALIGN4,colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 所屬板塊:'+BLKNAME+'發行價'+NUMTOSTR(FINANCE(51),2)+'元'+'發行量'+NUMTOSTR(FINANCE(52),2)+'萬股'+'\n'+'總股本'+NUMTOSTR(FINANCE(1),0)+'萬股'+'流通A股'+NUMTOSTR(FINANCE(7),0)+'萬股'+'凈資產'+NUMTOSTR(FINANCE(35),2)+'億元'+'每股收益'+NUMTOSTR(FINANCE(33),2)+'元'+'每股未分配'+NUMTOSTR(FINANCE(32),2)+'元'+'市盈率'+NUMTOSTR(DYNAINFO(39),2)+'%'+'投資收益'+NUMTOSTR(FINANCE(24),2)+'元'+'股東總數'+NUMTOSTR(FINANCE(50),0)+'戶'),ALIGN4,,Coloryellow;
E:=(H+L+O+2*C)/5;
zl:=2*E-L;
zc:=2*E-H;
fz:=E-(H-L);
DRAWTEXTEX(C,0,10,15,'上升阻力:' +NUMTOSTR(zl,2)),colorred;
DRAWTEXTEX(C,0,10,35,'下跌支撐:' +NUMTOSTR(zc,2)),COLORGREEN;
DRAWTEXTEX(C,0,10,55,'下跌反轉:' +NUMTOSTR(fz,2)),colorwhite;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(84,RSI) , HIGH,' 快跑 '),COLORYELLOW;
VarA:=REF(CLOSE,1);
VarB:=SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100;
DRAWTEXT(CROSS(75,VarB),HIGH,'☆短出'),Color00FF00 ;
D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(if(CLOSE<D and VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW*0.98,'抄底'),coloryellow;
VAR0:=EMA(EMA(EMA(CLOSE,2),2),2);
MA13:MA(VAR0,13)*0.99,colorff33ff,LINETHICK0;
X1:=(CLOSE+LOW+HIGH)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
STICKLINE(CROSS(X2,X3),OPEN,CLOSE,6,0),COLORyellow;
STICKLINE(CROSS(X3,X2),OPEN,CLOSE,6,0),colorGREEN;
X1:=(C+L+H)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5));
GR2:=EMA(X1,13)>EMA(X1,21) AND EMA(X1,21)>EMA(X1,34)
AND EMA(X1,13)>REF(EMA(X1,13),1);
GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);
GR4:=H=HHV(H,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;
GR8:=GR6 AND GR7;
LC := REF(CLOSE,1);
RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
BIAS5:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
換手:=100*V/CAPITAL;
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;
牛熊:EMA(CLOSE,60),COLOR0090FF,LINETHICK1;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,8);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
DRAWTEXT(IF(B1>0,1,0),L-0.1,'MACD底背'),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
DRAWTEXT(IF(B2>0,1,0),L-0.25,'KDJ底背'),COLORYELLOW;
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;
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L-0.4,'RSI底背'),COLORCYAN;
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(IF(D1>0,1,0),H+0.1,'MACD頂背'),COLORWHITE;
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
DRAWTEXT(IF(D2>0,1,0),H+0.25,'KDJ頂背'),COLORWHITE;
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H+0.4,'RSI頂背'),COLORMAGENTA;
SG:EMA(HHV(H,1),8),COLORGRAY;
H1:EMA(CLOSE,3),COLORyellow,LINETHICK1;
A1AA:=9;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.05),'小心變盤'),COLORFFFFFF;
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,LINETHICK1;
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
LL:=LLV(C,100);
X11:STICKLINE(成本和諧>REF(成本和諧,1) , 成本和諧*0.998,成本和諧*1.002,1,0),COLORRED,LINETHICK1;
X30:=X1<REF(X1,1) AND C<X1;
X31:STICKLINE(SG<REF(SG,1) OR X30, SG*0.998,SG*1.004,1,0),COLORBLUE,LINETHICK1;
X21:STICKLINE(成本和諧<REF(成本和諧,1) , 成本和諧*0.998,成本和諧*1.002,1,0),COLORGRAY,LINETHICK1;
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;
VAR4:=(LOW+HIGH+CLOSE)/3;
操作H2: MA(VAR4,7),LINETHICK3,COLORWHITE;
拉升:HHV(操作H2,13),COLORRED,LINETHICK1;
壓力:HHV(操作H2,60),COLORRED;
買賣:LLV(操作H2,13),LINETHICK2,COLOR00FF00;
底部支撐: LLV(LOW,60)*1.02,COLOR00CCFF;
頂部: HHV(HIGH,60)*0.98,COLORFFFFCC,LINETHICk1;
STICKLINE(操作H2>REF(操作H2,1),操作H2,操作H2+0.018,1,0),COLORwhite,LINETHICK2;
STICKLINE(拉升>REF(拉升,1),拉升,拉升+0.018,1,0),COLORYELLOW,LINETHICK1;
STICKLINE(拉升=REF(拉升,1),拉升,拉升,1,1),COLORRED;
STICKLINE(買賣=REF(買賣,1),買賣,買賣,1,1),COLORRED;
STICKLINE(買賣>REF(買賣,1),買賣,買賣+0.028,1,1),COLORF00FF0,LINETHICK1;
STICKLINE(頂部=REF(頂部,1),頂部,頂部,7,1),COLORRED;
STICKLINE(壓力=REF(壓力,1),壓力,壓力,7,1),COLORRED;
STICKLINE(底部支撐=REF(底部支撐,1),底部支撐,底部支撐,1,1),COLORRED;
e1:=BARSCOUNT(c);
ah:=hhv(h,200);
al:=llv(l,200);
b0:=(ah-al)/40;
kb1:=h+b0;
kb2:=l-b0;
stickline((e1+0)/34=FLOOR((e1+0)/34),kb2,kb2-1*b0,2,0),COLOrWHITE,LINETHICK3;
drawtext((e1+0)/34=FLOOR((e1+0)/34),kb2-2*b0,'時間窗'),COLORwhite;
var31:=hhvbars(zig(3, 19)>ref(zig(3,19),1) and ref(zig(3,19), 1)<ref(zig(3,19), 2),0);
轉折時間:var31+1,pointdot,colorff00ff,LINETHICK0;
時間窗:=0,colorwhite;
stickline(var31=2,l*0.95,l*0.98,8,0),color0000ff;
drawtext(var31=2,l*0.95,'3天'),coloryellow;
stickline(var31=4,h*1.05,h*1.02,8,0),color9966ff;
drawtext(var31=4,h*1.06,'5天'),coloryellow;
stickline(var31=7,l*0.95,l*0.98,8,0),color00ffff;
drawtext(var31=7,l*0.95,'8天'),coloryellow;
stickline(var31=12,h*1.05,h*1.02,8,0),colorff33ff;
drawtext(var31=12,h*1.06,'13天'),coloryellow;
stickline(var31=20,l*0.95,l*0.98,8,0),color0066ff;
drawtext(var31=20,l*0.95,'21天'),coloryellow;
stickline(var31=33,h*1.05,h*1.02,8,0),colorffff00;
drawtext(var31=33,h*1.06,'34天'),coloryellow;
stickline(var31=54,l*0.95,l*0.98,8,0),color006600;
drawtext(var31=54,l*0.95,'55天'),coloryellow;
stickline(var31=88,h*1.05,h*1.02,8,0),color00ff00;
drawtext(var31=88,h*1.06,'89天'),coloryellow;
stickline(var31=143,l*0.95,l*0.98,8,0),colorccffff;
drawtext(var31=143,l*0.95,'144天'),coloryellow;
stickline(var31=232 ,h*1.05,h*1.02,8,0),colorff0033;
drawtext(var31=232,h*1.06,'233天'),coloryellow;
stickline(var31=376,l*0.95,l*0.98,8,0),colorff9966;
drawtext(var31=376,l*0.95,'377天'),coloryellow;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
UPR:=BBI+3*STD(BBI,10);
DWN:=BBI-3*STD(BBI,10);
VAR55:=(UPR-DWN)/UPR<0.03;
VAR56:=(UPR-DWN)/UPR>0.18;
VAR57:=(MA(CLOSE,60)-MA(CLOSE,5))/MA(CLOSE,60)>0.15;
VAR58:=(MA(CLOSE,5)-MA(CLOSE,60))/MA(CLOSE,5)>0.15;
EXPLAIN(VAR55,'布林線收窄可能變盤;'),colorFF00FF;
EXPLAIN(VAR57 AND VAR56 AND CLOSE>OPEN,'布林上下乖離太大可能反彈;'),colorFF00FF;
EXPLAIN(VAR58 AND VAR56 AND CLOSE<OPEN,'布林上下乖離太大可能回落;'),colorFF00;
EXPLAIN(CROSS(CLOSE,"SAR") AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向上突破提示買入
;'),colorFF;
EXPLAIN(CROSS("SAR",CLOSE) AND (ABS(CLOSE-"SAR"))/CLOSE>=0.01,'SAR向下突破提示賣出
;'),colorFF00;
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
EXPLAIN(CCI<-100,'CCI指標底位,買入機會。'),colorFF;
EXPLAIN(CCI>100,'CCI指標高位,賣出機會。'),colorFF00;
EXPLAIN(VOL/CAPITAL>0.075,'換手過大,小心主力出逃,短期頭部。'),colorFFFF;
WR:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
EXPLAIN(WR>-20,'W&R超買,即將見頂,應及時賣出。'),colorFF00;
EXPLAIN(WR<-80,'W&R超賣,即將見底,應伺機買進。'),colorFF;
MTM:=CLOSE-REF(CLOSE,6);
MTMMA:=MA(MTM,6);
EXPLAIN(CROSS(MTM,MTMMA),'MTM從下向上突破MTMMA,買入信號。'),colorFF;
EXPLAIN(CROSS(MTMMA,MTM),'MTM從上向下跌破MTMMA,賣出信號。'),colorFF00;
EXPLAIN("ARBR.AR"<50,'ARBR人氣指標超賣,屬買入信號。'),colorFF;
EXPLAIN("ARBR.AR">200,'ARBR人氣指標超買,屬賣出信號。'),colorFF00;
EXPLAIN((HHV("ARBR.AR",10)-"ARBR.AR")/HHV("ARBR.AR",10)>=0.5,'ARBR人氣指標異常,若股價從高價
下跌,屬買入信號。'),colorFF;
EXPLAIN(("ARBR.AR"-LLV("ARBR.AR",10))/LLV("ARBR.AR",10)>=0.5,'ARBR人氣指標異常,若股價從低價
上升,屬賣出信號。'),colorFF00;
EXPLAIN("ARBR.BR"<50,'ARBR意愿指標顯示股價隨時反彈考慮買入。'),colorFF;
EXPLAIN("ARBR.BR">300,'ARBR意愿指標顯示股價隨時下挫考慮賣出。'),colorFF00FF;
EXPLAIN(CROSS("ARBR.AR","ARBR.BR") AND ("ARBR.AR"<50 OR "ARBR.BR"<50),'ARBR人氣意愿指標金叉,
屬買入信號。'),colorFF;
EXPLAIN(CROSS("ARBR.BR","ARBR.AR") AND ("ARBR.AR">180 OR "ARBR.BR">300),'ARBR人氣意愿指標死
叉,屬賣出信號。'),colorFF00;
EXPLAIN((COUNT(CLOSE<REF(CLOSE,1),30))>18 AND (COUNT(CLOSE<REF(CLOSE,1),3))=3 AND
(COUNT("OBV.OBV">REF("OBV.OBV",1),30))>18 AND (COUNT("OBV.OBV">REF("OBV.OBV",1),3))=3 AND
(COUNT(VOL>REF(VOL,1),30))>3 AND VOL/CAPITAL<=10/100,'OBV能量潮顯示買盤較強屬買入信號。
'),colorFF;
EXPLAIN((COUNT(CLOSE>REF(CLOSE,1),30))>18 AND (COUNT(CLOSE>REF(CLOSE,1),3))=3 AND
(COUNT("OBV.OBV">REF("OBV.OBV",1),30))>18 AND (COUNT("OBV.OBV">REF("OBV.OBV",1),3))=3 AND
(COUNT(VOL>REF(VOL,1),30))>3 AND VOL/CAPITAL<=10/100,'OBV能量潮顯示買盤逐漸加強屬買入信號。
'),colorFF;
EXPLAIN((COUNT(CLOSE>REF(CLOSE,1),30))>18 AND (COUNT(CLOSE>REF(CLOSE,1),3))=3 AND
((COUNT("OBV.OBV"<REF("OBV.OBV",1),30))>18 OR (COUNT("OBV.OBV"<REF("OBV.OBV",1),3))=3),'OBV
能量潮顯示買盤無力屬賣出信號。 '),colorFF00;
EXPLAIN(CROSS("OBV.OBV",0) AND (COUNT(REF("OBV.OBV",1)<0,3))=3,'OBV能量潮由負轉正屬買入信號
。'),colorFF;
EXPLAIN(CROSS(0,"OBV.OBV") AND (COUNT(REF("OBV.OBV",1)>0,3))=3,'OBV能量潮由正轉負屬賣出信號
。'),colorFF00;
EXPLAIN(HHV(HIGH,20)=HIGH AND NOT(HHV("OBV.OBV",20)="OBV.OBV"),'OBV能量潮頂背離屬賣出信號。
'),colorFF00;
EXPLAIN(LLV(LOW,20)=LOW AND NOT(LLV("OBV.OBV",20)="OBV.OBV"),'OBV能量潮底背離屬買入信號。
'),colorFF;
EXPLAIN((ABS("OBV.OBV"-REF("OBV.OBV",1)))/ABS(MA("OBV.OBV",5))>0.07 AND
"OBV.OBV">REF("OBV.OBV",1),'OBV能量潮異常。若股價在高位屬賣出信號，若OBV能量線在低位長時間橫
向整理后出現,屬買入信號。'),colorFF00FF;
EXPLAIN("CR.CR"<40,'CR能量指標超賣,提示股價形成底部,屬買入信號。'),colorFF;
EXPLAIN("CR.CR"<=400 AND "CR.CR">=300,'CR能量指標超買,屬賣出信號。'),colorFF00;
EXPLAIN(LLV(LOW,20)=LOW AND NOT(LLV("CR.CR",20)="CR.CR"),'CR能量指標底背離,屬買入信號。
'),colorFF;
EXPLAIN(HHV(HIGH,20)=HIGH AND NOT(HHV("CR.CR",20)="CR.CR"),'CR能量指標頂背離,屬賣出信號。
'),colorFF00;
EXPLAIN(ABS("CR.MA1"-"CR.MA2")<5 AND ABS("CR.MA1"-"CR.MA3")<5 AND ABS("CR.MA2"-"CR.MA3")<5
OR ABS("CR.MA1"-"CR.CR")<5 AND ABS("CR.MA1"-"CR.MA3")<5 AND ABS("CR.CR"-"CR.MA3")<5,'CR能量
指標異常,一波或長或短的上升或下跌行情即將展開。'),colorFF00FF;
EXPLAIN("PSY"<10,'PSY心理線指標低位超賣區,屬買入信號。'),colorFF;
EXPLAIN(BETWEEN("PSY","PSY">10,"PSY"<25),'PSY心理線指標超賣,屬買入信號。'),colorFF;
EXPLAIN("PSY">75,'PSY心理線指標超買,屬賣出信號。'),colorFF00;
EXPLAIN(CROSS("ROC.ROC",0),'ROC變動速率指標向上突破,屬買入信號。'),colorFF;
EXPLAIN(CROSS(0,"ROC.ROC"),'ROC變動速率指標向下突破,屬賣出信號。'),colorFF00;
EXPLAIN(LLV(LOW,20)=LOW AND NOT((COUNT("ROC.ROC"<REF("ROC.ROC",1),30))>18 AND
(COUNT("ROC.ROC"<REF("ROC.ROC",1),3))=3),'ROC變動速率指標,顯示下跌動力減弱,屬買入信號。
'),colorFF;
EXPLAIN(HHV(HIGH,20)=HIGH AND NOT((COUNT("ROC.ROC">REF("ROC.ROC",1),30))>18 AND
(COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3),'ROC變動速率指標,顯示上漲動力減弱,屬賣出信號。
'),colorFF00;
EXPLAIN((COUNT(CLOSE>REF(CLOSE,1),30))>18 AND (COUNT(CLOSE>REF(CLOSE,1),3))=3 AND
(COUNT("ROC.ROC">REF("ROC.ROC",1),30))>18 AND (COUNT("ROC.ROC">REF("ROC.ROC",1),3))=3,'ROC變
動速率指標顯示短期反彈有望,屬買入信號。 '),colorFF;
EXPLAIN((COUNT(CLOSE<REF(CLOSE,1),30))>18 AND (COUNT(CLOSE<REF(CLOSE,1),3))=3 AND
(COUNT("ROC.ROC"<REF("ROC.ROC",1),30))>18 AND (COUNT("ROC.ROC"<REF("ROC.ROC",1),3))=3,'ROC變
動速率指標顯示短期警惕回落,屬賣出信號。 '),colorFF00;
EXPLAIN("VR"<20,'VR容量比率指標顯示股價即將漲升,建議積極買入。'),colorFF;
EXPLAIN("VR">400,'VR容量比率指標顯示后續資金枯竭,股價將可能高位下跌,屬賣出信號。
'),colorFF00;
EXPLAIN(("VR"/REF("VR",1)>=2 OR "VR"/REF("VR",2)>=2) AND
(COUNT(CLOSE<=REF(CLOSE,1),5))>=3,'VR容量比率指標異常,顯示股價即將漲升,屬買入信號。
'),colorFF;
EXPLAIN("VR">300 AND (COUNT("VR"<REF("VR",1),5))>=3 AND (COUNT(CLOSE>REF(CLOSE,1),5))>=3,'VR
容量比率指標顯示漲勢耗盡,建議賣出。 '),colorFF00;
VV6:=(2*CLOSE+HIGH+LOW)/4;
VV7:=LLV(LOW,27);
VV8:=HHV(HIGH,27);
攀:=EMA((VV6-VV7)/(VV8-VV7)*100,13)-50;
金:=EMA(0.618*REF(攀,1)+0.382*攀,3);
起攀:=CROSS(攀,金) AND CLOSE>OPEN;
EXPLAIN(CROSS(攀,金) AND CLOSE>OPEN,'起攀指標發出起攀買入信號。'),colorFF;
EXPLAIN(1=1,' 【均線系統分析】'),colorFFFF;
MA5:=MA(CLOSE,5);
MA10:=MA(CLOSE,10);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
MA125:=MA(CLOSE,125);
MA250:=MA(CLOSE,250);
EXPLAIN(MA5>MA10 AND MA10>MA30 AND MA5>MA30,'短期均線多頭排列;'),colorFF;
EXPLAIN(MA5<MA10 AND MA10<MA30 AND MA5<MA30,'短期均線空頭排列;'),colorFF00;
EXPLAIN(MA30>MA60 AND MA30>MA125 AND MA60>MA125,'中期均線多頭排列;'),colorFF;
EXPLAIN(MA30<MA60 AND MA30<MA125 AND MA60<MA125,'中期均線空頭列排;'),colorFF00;
EXPLAIN(MA60>MA125 AND MA125>MA250 AND MA60>MA250,'長期均線多頭排列;'),colorFF;
EXPLAIN(MA60<MA125 AND MA125<MA250 AND MA60<MA250,'長期均線空頭排列;'),colorFF00;
EXPLAIN(CROSS(MA5,MA10),'短期5日10日均線金叉;'),colorFF;
EXPLAIN(CROSS(MA10,MA5),'短期5日10日均線死叉;'),colorFF00;
EXPLAIN(CROSS(CLOSE,MA125),'今日股價上穿半年線;'),colorFF00FF;
EXPLAIN(CROSS(MA125,CLOSE),'今日股價跌破半年線;'),colorFF00;
EXPLAIN(CROSS(CLOSE,MA250),'今日股價上穿一年線;'),colorFF00FF;
EXPLAIN(CROSS(MA250,CLOSE),'今日股價跌破一年線;'),colorFF00;
EXPLAIN(CROSS(CLOSE,MA60) AND CROSS(CLOSE,MA125) AND CROSS(CLOSE,MA250),'股價一陽穿三線
;'),colorFF;
EXPLAIN(MA30>REF(MA30,1),'30日均線趨勢向上;'),colorFF;
EXPLAIN(MA30>REF(MA30,1) AND MA30<REF(MA30,1)*1.001,'30日均線趨勢走平;'),colorFFCC66;
EXPLAIN(MA30<REF(MA30,1),'30日均線趨勢向下;'),colorFF00;
EXPLAIN(MA5>REF(MA5,1)*1.015,'5日均線強勁向上;'),colorFF;
EXPLAIN(MA5>REF(MA5,1) AND MA5<REF(MA5,1)*1.005,'5日均線方向不明;'),colorFFFF;
EXPLAIN(MA5<REF(MA5,1)*0.985,'5日均線快速向下;'),colorFF00;
EXPLAIN(1=1,' 【形態分析】'),colorFFFF;
早晨之星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND
(ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND
CLOSE>REF(CLOSE,2);
黃昏之星:=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);
長十字:=CLOSE=OPEN AND HIGH/LOW>1.03;
垂死十字:=CLOSE=OPEN AND CLOSE=LOW AND CLOSE<>HIGH;
早晨十字星:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND
REF(OPEN,1)=REF(CLOSE,1) AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2);
黃昏十字星:=REF(CLOSE,2)/REF(OPEN,2)>1.05 AND REF(OPEN,1)>REF(CLOSE,2) AND
REF(OPEN,1)=REF(CLOSE,1) AND CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2);
射擊之星:=MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE>MA(CLOSE,5);
倒轉錘頭:=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)) AND CLOSE>MA(CLOSE,5);
穿頭破腳:=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);
烏云蓋頂:=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);
身懷六甲:=(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));
十字胎:=(ABS(REF(CLOSE,1)-REF(OPEN,1)))/REF(CLOSE,1)>0.04 AND CLOSE=OPEN AND
CLOSE<MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE>MIN(REF(CLOSE,1),REF(OPEN,1));
平頂:=(ABS(HIGH-REF(HIGH,1)))/HIGH<0.001;
平底:=(ABS(LOW-REF(LOW,1)))/LOW<0.001 AND (ABS(REF(LOW,1)-REF(LOW,2)))/REF(LOW,1)<=0.001;
大陽燭:=CLOSE/OPEN>1.05 AND HIGH/LOW<CLOSE/OPEN+0.018;
三個白武士:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN AND
REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1);
雙飛烏鴉:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND CLOSE/OPEN<0.98;
孕育線:=REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND
REF(OPEN,1)>=REF(CLOSE,1) AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND
REF(OPEN,1)<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND CLOSE>=OPEN AND
(CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) AND
(MAX(CLOSE,REF(CLOSE,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<=1/100;
多方炮:=REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN;
出水芙蓉:=(OPEN<EMA(CLOSE,20) OR OPEN<EMA(CLOSE,40) OR OPEN<EMA(CLOSE,60)) AND
CLOSE>MAX(EMA(CLOSE,20),MAX(EMA(CLOSE,40),EMA(CLOSE,60))) AND VOL/MA(VOL,30)>1.2 AND
CLOSE/REF(CLOSE,1)>1.049;
上升三部曲:=REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<REF(OPEN,3) AND
REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND
REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND
REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND
CLOSE>REF(CLOSE,4);
下跌三部曲:=REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)>REF(OPEN,3) AND
REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND REF(LOW,4)<REF(LOW,3) AND
REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND
REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND
CLOSE<REF(CLOSE,4);
跳空缺口:=HIGH<REF(LOW,1) OR LOW>REF(HIGH,1);
三只烏鴉:=REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN AND
REF(CLOSE,1)<REF(CLOSE,2) AND CLOSE<REF(CLOSE,1);
光腳陰線:=LOW=CLOSE AND HIGH<>LOW;
光頭陽線:=HIGH=CLOSE AND HIGH<>LOW;
分離:=OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)-REF(OPEN,1))<0;
長下影:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667;
長上影:=(HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667;
十字星:=CLOSE=OPEN AND HIGH<>LOW;
大陰燭:=OPEN/CLOSE>1.05 AND HIGH/LOW<OPEN/CLOSE+0.018;
好友反攻:=REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002
OR REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002;
傾盆大雨:=REF(CLOSE,1)/REF(OPEN,1)>=1.03 AND OPEN<REF(CLOSE,1) AND OPEN>REF(OPEN,1) AND
CLOSE<REF(OPEN,1);
EXPLAIN(傾盆大雨,'傾盆大雨,見頂信號;'),colorFFFF00;
EXPLAIN(大陰燭,'大陰燭,后市向淡,發生逆轉;'),colorFFFF00;
EXPLAIN(好友反攻,'好友反攻,跌勢已盡,要展開一段反彈行情;'),colorFF;
EXPLAIN(跳空缺口,'跳空缺口,突破長期盤整,向上跳空,上漲行情開始;向下跳空,下跌行情開始
;'),colorFFFFFF;
EXPLAIN(光腳陰線,'光腳陰線,下跌信號;'),colorFFFF00;
EXPLAIN(光頭陽線,'光頭陽線,多方積極上攻態勢,后市看漲;'),colorFF;
EXPLAIN(三只烏鴉,'三只烏鴉站枝頭,可能見頂回落;'),colorFFFF00;
EXPLAIN(分離,'分離,注意看漲分離和看跌分離;'),colorFFFFFF;
EXPLAIN(長下影,'長下影,持續下跌后出現,有可能止跌回升;在升勢末期出現,須多加留意;'),colorFF;
EXPLAIN(長上影,'長上影,表明行情上檔壓力沉重,升勢受阻;'),colorFFFF00;
EXPLAIN(下跌三部曲,'下跌三部曲,下跌信號;'),colorFF;
EXPLAIN(上升三部曲,'上升三部曲,上漲信號;'),colorFFFF00;
EXPLAIN(早晨之星,'早晨之星,見底回升;'),colorFF;
EXPLAIN(黃昏之星,'黃昏之星,見頂回落;'),colorFFFF00;
EXPLAIN(十字星,'十字星,重要的警告信號,原趨勢停頓或反轉;'),colorFFFFFF;
EXPLAIN(長十字,'長十字,重要的警告信號,原趨勢停頓或反轉;'),colorFFFFFF;
EXPLAIN(垂死十字,'垂死十字,下跌信號；'),colorFFFF00;
EXPLAIN(早晨十字星,'早晨十字星,上漲信號,見底回升；'),colorFF;
EXPLAIN(黃昏十字星,'黃昏十字星,趨勢停頓或反轉,下跌信號,見頂回落;'),colorFFFF00;
EXPLAIN(射擊之星,'射擊之星,出現在短期的上升趨勢,表明市場頂部就在眼前,可能見頂回落,可靠性低
;'),colorFFFF00;
EXPLAIN(倒轉錘頭,'倒轉錘頭構成一個看漲信號,可能見底回升;'),colorFF;
EXPLAIN(錘頭,'錘頭,可能見底回升,如有量配合,信號強烈;'),colorFF;
EXPLAIN(吊頸,'吊頸,上升行情中見頂回落,頂部出現,見頂信號;'),colorFFFF00;
EXPLAIN(平頂,'平頂,意味行情摸高見頂,股價行將反轉。但反轉下跌力度較小;'),colorFFFF00;
EXPLAIN(穿頭破腳,'穿頭破腳,頂部出現,見頂回落信號;'),colorFFFF00;
EXPLAIN(烏云蓋頂,'烏云蓋頂,見頂回落信號;'),colorFFFF00;
EXPLAIN(曙光初現,'曙光初現,行情將演化為V型反轉或止跌橫盤趨勢。后市見底回升;'),colorFF;
EXPLAIN(身懷六甲,'身懷六甲,出現在底部,是見底回升信號;出現在頂部,是見頂回落信號;'),colorFF;
EXPLAIN(十字胎,'十字胎;'),colorFF;
EXPLAIN(平底,'平底,行情探低見底,股價行將反轉上升,但力度較小;'),colorFF;
EXPLAIN(大陽燭,'大陽燭,在上升行情中出現,則意味著行情劇烈地向上攀升。在下跌行情中出現,則意味
著行情劇烈地向上反彈;'),colorFF;
EXPLAIN(三個白武士,'三個白武士,每日收盤價上移,表示可能見底回升;'),colorFF;
EXPLAIN(雙飛烏鴉,'雙飛烏鴉,行情開始疲軟將見頂回落;'),colorFFFF00;
EXPLAIN(孕育線,'孕育線,注意股價位置；'),colorFFFFFF;
EXPLAIN(多方炮,'多方炮,在底部出現有上漲可能,在中間出現有可能是上漲中繼,頂部出現是復合見頂信
號;'),colorFF;
EXPLAIN(出水芙蓉,'出水芙蓉,陽線穿過20、40、60日季均線,上攻勢頭初現;'),colorFF;
EXPLAIN(1=1,' 【資金面分析】'),colorFFFF;
VAR11:=MA(VOL/(HIGH-LOW),4);
VAR33:=ABS(CLOSE-OPEN);
VAR44:=VOL/(HIGH-LOW);
EXPLAIN(VAR44<VAR11 AND VAR33<MA(VAR33,4),'資金無入場意愿,萎縮中;'),colorFF00;
EXPLAIN(VAR44<VAR11 AND VAR33>MA(VAR33,4),'場內資金運作行為;'),colorFFCC66;
EXPLAIN(VAR44>VAR11 AND VAR33<MA(VAR33,4),'多空雙方激烈爭奪中;'),colorFF00FF;
EXPLAIN(VAR44>VAR11 AND VAR33>MA(VAR33,4),'場外資金介入(或出局)意愿強烈;'),colorFF;
EXPLAINEX(1=1,'該股五日換手%=',SUM(VOL/CAPITAL*100,5),2,0);顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 0.191)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'19.1%↑'),colorFFFF;
顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 0.382)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'38.2%↑'),colorFFFF;
顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 0.5)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'50%↑'),colorFFFF;
顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 0.618)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'61.8%↑'),colorFFFF;
顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 0.809)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'80.9%↑'),colorFFFF;
顯示文字((有效值周期數(收盤價) = 系統參數(2)),向前引用((最低 + ((最高 - 最低) * 1)),上一次條件成立位置((有效值周期數(收盤價) = 系統參數(2)))),'100%↑'),colorFFFF;
跳空:=HIGH<REF(LOW,1);
STICKLINE(跳空,HIGH,REF(LOW,1),12,0),COLOR44AAFF;
DRAWTEXT(跳空,REF(LOW,1),'跳\n空'),PXUP50,COLOR44AAFF;
跳空跌實體頂:=IF(CLOSE>OPEN,CLOSE,OPEN);
跳空跌機會出現:=BARSLAST(跳空)>0 AND REF(CLOSE,1)>REF(跳空跌實體頂,BARSLAST(跳空)) AND REF(CLOSE,2)>REF(跳空跌實體頂,BARSLAST(跳空));
STICKLINE(跳空跌機會出現=0,REF(跳空跌實體頂,BARSLAST(跳空)),REF(跳空跌實體頂,BARSLAST(跳空)),8,0),COLORYELLOW;<!--++ plugin_code qcomic begin--><!--++ plugin_code qcomic end-->{程序化交易 www.weiqiv.net.cn }
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?