【大智慧】解盤主圖指標公式
攻城獅 2015.11.18 09:02
N:=20;
DRAWTEXTABS(10,10,STKLABEL+’ ‘+STKNAME+’ ‘+BKNAME),COLORGREEN;
均價:=(3*C+H+L+O)/6;
VAR1:=(8*均價+7*REF(均價,1)+6*REF(均價,2)+5*REF(均價,3)+4*REF(均價,4)+3*REF(均價,5)+2*REF(均價,6)+REF(均價,8))/36;
VAR2:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
SZ1:=REF(VAR1,1)=REF(VAR2,1) AND VAR1>VAR2 AND CLOSE>VAR1;
SZ2:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND H/VAR1<1.1 AND L>VAR2 AND CLOSE>VAR1;
SZ3:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>=REF(VAR2,1) AND H/VAR1>1.1;
SZ4:=VAR1>VAR2 AND VAR1>REF(VAR1,1) AND VAR2>REF(VAR2,1) AND CLOSE>VAR2 AND CLOSESZ5:=(VAR1>VAR2 AND VAR2>REF(VAR2,1) AND VAR1<>REF(VAR1,1) AND CLOSE VAR2 AND VAR1 SZ6:=REF(VAR1,1)>REF(VAR2,1) AND VAR1=VAR2 AND CLOSE XD1:=VAR1=VAR2 AND CLOSE XD2:=VAR1=VAR2 AND CLOSE>VAR1;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N));
量能飽和度:=IF(SAT>1,1,SAT)*100;
IF BARSTATUS=2 AND SZ1 THEN BEGIN
DRAWTEXTABS(320,25,’調(diào)整結(jié)束短線介入’),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ2 THEN BEGIN
DRAWTEXTABS(320,25,’上升通道走勢良好’),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ3 THEN BEGIN
DRAWTEXTABS(320,25,’股價偏離注意調(diào)整’),COLORRED;
END
ELSE
IF BARSTATUS=2 AND SZ4 THEN BEGIN
DRAWTEXTABS(320,25,’上升通道調(diào)整洗盤’),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND SZ5 THEN BEGIN
DRAWTEXTABS(320,25,’轉(zhuǎn)向特征注意離場’),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND SZ6 THEN BEGIN
DRAWTEXTABS(320,25,’通道改變堅決離場’),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND XD1 THEN BEGIN
DRAWTEXTABS(320,25,’下跌通道只宜觀望’),COLORGREEN;
END
ELSE
IF BARSTATUS=2 AND XD2 THEN BEGIN
DRAWTEXTABS(320,25,’短期底部準備進入’),COLORYELLOW;
END;
AB1:=COST(0.33);
AB2:=COST(5);
AB3:=COST(15);
AB4:=COST(55);
AB5:=COST(97);
AA1:=COST(90);
AA2:=COST(70);
AA3:=COST(30);
AA4:=COST(10);
獲利:=WINNER(CLOSE)*100;
套牢:=100-WINNER(CLOSE)*100;
DRAWTEXTABS(15,25,’量能飽和度:’+NUMTOSTRN(量能飽和度,2)+’%’),COLOR00FFFF;
DRAWTEXTABS(15,40,’90成本:’+NUMTOSTRN(AA1,2)),COLOR00FFFF;
DRAWTEXTABS(15,55,’70成本:’+NUMTOSTRN(AA2,2)),COLOR00FFFF;
DRAWTEXTABS(15,70,’30成本:’+NUMTOSTRN(AA3,2)),COLOR00FFFF;
DRAWTEXTABS(15,85,’10成本:’+NUMTOSTRN(AA4,2)),COLOR00FFFF;
DRAWTEXTABS(15,100,’底出擊:’+NUMTOSTRN(AB1,2)),COLOR00FFFF;
DRAWTEXTABS(520,25,’建倉:’+NUMTOSTRN(AB2,2)),COLOR00FFFF;
DRAWTEXTABS(600,25,’整固:’+NUMTOSTRN(AB3,2)),COLOR00FFFF;
DRAWTEXTABS(675,25,’升浪:’+NUMTOSTRN(AB4,2)),COLOR00FFFF;
DRAWTEXTABS(520,40,’獲利:’+NUMTOSTRN(獲利,2)+’%’),COLOR00FFFF;
DRAWTEXTABS(600,40,’套牢:’+NUMTOSTRN(套牢,2)+’%’),COLOR00FFFF;
DRAWTEXTABS(675,40,’預(yù)測:’+NUMTOSTRN(AB5,2)),COLOR00FFFF;
AAA:=量能飽和度<=10;
BBB:=量能飽和度>10 AND 量能飽和度<=20;
CCC:=量能飽和度>20 AND 量能飽和度<=30;
DDD:=量能飽和度>30 AND 量能飽和度<=50;
EEE:=量能飽和度>50 AND 量能飽和度<=70;
FFF:=量能飽和度>70 AND 量能飽和度<=80;
GGG:=量能飽和度>80 AND 量能飽和度<=90;
HHH:=量能飽和度>90;
IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(0,350,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0));
END;
RSI1預(yù)設(shè):=5000;
RSI2預(yù)設(shè):=5000;
RSI3預(yù)設(shè):=5000;
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;
RSI3:=SMA(MAX(CLOSE-LC,0),24,1)/SMA(ABS(CLOSE-LC),24,1)*100;
A:=SMA(MAX(CLOSE-LC,0),24,1);
B:=SMA(ABS(CLOSE-LC),24,1);
A1:=SMA(MAX(CLOSE-LC,0),6,1);
B1:=SMA(ABS(CLOSE-LC),6,1);
YCJ1:IF(C>LC,(REF(A1,1)*5-REF(B1,1)*5*RSI1預(yù)設(shè)/10000)/(RSI1預(yù)設(shè)/10000-1)+LC,LC+REF(B1,1)*5-REF(A1,1)*5/(RSI1預(yù)設(shè)/10000));
A2:=SMA(MAX(CLOSE-LC,0),12,1);
B2:=SMA(ABS(CLOSE-LC),12,1);
YCJ2:IF(C>LC,(REF(A2,1)*11-REF(B2,1)*11*RSI2預(yù)設(shè)/10000)/(RSI1預(yù)設(shè)/10000-1)+LC,LC+REF(B2,1)*11-REF(A2,1)*11/(RSI1預(yù)設(shè)/10000));
YCJ3:IF(C>LC,(REF(A,1)*23-REF(B,1)*23*RSI3預(yù)設(shè)/10000)/(RSI3預(yù)設(shè)/10000-1)+LC,LC+REF(B,1)*23-REF(A,1)*23/(RSI3預(yù)設(shè)/10000));
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 – 10)) + IF(A76,10,(0 – 10))) + IF(A77,10,(0 – 10))) + IF(A78,10,(0 – 10))) + IF(A79,10,(0 – 10))) + IF(A711,10,(0 – 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;
T := BARSLAST(DISPSTATUS=1)+1;
HHg := HHV(H, T);
ddg := LLV(L, T);
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’的量能理想,有明顯走強跡象,可以考慮中線進場參與,倉位在2/3左右。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’雖然走勢趨強,但量能還顯不足,可以考慮短線進場,倉位在1/2左右。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’量價配合良好,但相對其它股票并沒有明顯走強,可以考慮短線進場,倉位1/2左右。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’形態(tài)尚可,但量能不足,股票也未完全走強,可以短線參與,倉位1/3左右。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’形態(tài)變壞,但走勢相對其它股票尚可,重倉者減持大半,清倉者可以觀望。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’隨大盤一起下跌,程明顯縮量走勢,考慮到大盤風(fēng)險,減持或清倉。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’放量下跌,走勢明顯偏弱,離場觀望。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’縮量下跌,走勢偏弱,離場觀望。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’形態(tài)良好,強勢明顯,量能充足,可以繼續(xù)持有。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’上行趨勢不變,強勢依然,但量能開始轉(zhuǎn)弱,注意風(fēng)險。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’仍然具備上漲潛力,但股性偏弱,可考慮減倉。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’走勢趨弱,量能不足,減持大部分籌碼。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’形態(tài)不佳,注意成交量的變化,但目前不適合參與。 ‘),COLOR00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTREL(360,960,’趨勢不明,股價偏弱,注意量能變化,目前不宜參與。 ‘),COLOR00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’有走強跡象,但量能不足,趨勢不明,不適合操作。 ‘),COLOR00FF00,LINETHICK1;
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTREL(360,960,’走勢太弱,沒有參與價值。 ‘),COLOR00FF00,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,’大盤量能理想,有明顯走強跡象,可以考慮中線進場參與,倉位在2/3左右, ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,’如前期經(jīng)過一輪下跌,此時為最佳買點,但如果前期有過一段漲幅則介入需謹慎。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,’大盤雖然走勢趨強,但量能還顯不足,如果前期經(jīng)過一輪下跌, ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,’可以考慮短線進場,倉位在1/2左右,一旦量能放大可以加倉買入。 ‘),color0000FF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,’大盤形態(tài)走壞,重倉者可以減去大部分倉位。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c>200 and (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,’大盤縮量調(diào)整,注意風(fēng)險,短線清倉觀望。 ‘),color00FF00,LINETHICK1;
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,’大盤走勢良好,量能理想,可以繼續(xù)持有強勢股。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,’大盤形態(tài)良好,但量能稍顯不足,隨時準備減倉。 ‘),color00FFFF,LINETHICK1;
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTREL(360,960,’大盤趨勢不明,注意成交量變化,目前不適宜進場。 ‘),COLOR00FF00,LINETHICK1;
IF BARSTATUS=2 and c>200 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTREL(360,960,’大盤趨勢向下,量能萎縮,不適合進場。 ‘),COLOR00FF00,LINETHICK1;
E:=(HIGH+LOW+OPEN+2*CLOSE)/5;
明日阻力:=2*E-LOW;
明日支撐:=2*E-HIGH;
明日突破:=E+(HIGH-LOW);
明日反轉(zhuǎn):=E-(HIGH-LOW);
今日阻力:=REF(明日阻力 , 1);
今日支撐:=REF(明日支撐 , 1);
DRAWTEXTREL(100,100,’今日阻力=:’+NUMTOSTRN(今日阻力,2 )+”),Color00FFFF;
DRAWTEXTREL(100,140,’今日支撐=:’+NUMTOSTRN(今日支撐,2 )+”),Color00FF00;
DRAWTEXTREL(100,180,’明日突破=:’+NUMTOSTRN(明日突破,2 )),ColorFF00FF;
DRAWTEXTREL(100,220,’明日阻力=:’+NUMTOSTRN(明日阻力,2 )),ColorFFFF00;
DRAWTEXTREL(100,260,’明日支撐=:’+NUMTOSTRN(明日支撐,2 )),COLORRED;
DRAWTEXTREL(100,300,’明日反轉(zhuǎn)=:’+NUMTOSTRN(明日反轉(zhuǎn),2 )),COLORGREEN;
申明:本文為作者投稿或轉(zhuǎn)載,在概念股網(wǎng) http://lakewaygifts.com/ 上發(fā)表,為其獨立觀點。不代表本網(wǎng)立場,不代表本網(wǎng)贊同其觀點,亦不對其真實性負責(zé),投資決策請建立在獨立思考之上。