大智慧預(yù)測(cè)明日股價(jià)指標(biāo)公式
2020/11/13 18:30:03
N:=(27);
開盤價(jià):open,linethick0;
開盤價(jià)1:=REF(open,1);
最高價(jià):high,linethick0;
最高價(jià)1:=REF(high,1);
最低價(jià):low,linethick0;
最低價(jià)1:=REF(low,1);
收盤價(jià):CLOSE,linethick0;
收盤價(jià)1:=REF(CLOSE,1);
{預(yù)測(cè)高低指標(biāo)1}
A1:=REF(開盤價(jià),1);
A2:=ABS((REF(收盤價(jià),1)-A1)/A1);
A3:=ABS((REF(最高價(jià),1)-A1)/A1);
A4:=ABS((REF(最低價(jià),1)-A1)/A1);
B1:=ABS((A2+A3+A4)/3);
B2:=開盤價(jià)*B1;
{預(yù)測(cè)指標(biāo)2}
AA:=最高價(jià)1;
BB:=最低價(jià)1;
CC:=開盤價(jià)1;
DD:=收盤價(jià)1;
EE:=(AA+BB+CC+2*DD)/5;
AAA:=EE+(AA-BB);
BBB:=2*EE-BB;
CCC:=2*EE-AA;
DDD:=EE-(AA-BB);
上升突破價(jià):=AAA;
上升阻力價(jià):=BBB;
下跌支撐價(jià):=CCC;
下跌反轉(zhuǎn)價(jià):=DDD;
EEE:=(EE+上升突破價(jià)+上升阻力價(jià)+下跌支撐價(jià)+下跌反轉(zhuǎn)價(jià))/5;{心理價(jià)}
FFF:=(EEE+開盤價(jià))/2;
{顯示預(yù)測(cè)價(jià)}
預(yù)測(cè)低一:開盤價(jià)-B2,linethick0;
預(yù)測(cè)低二:(預(yù)測(cè)低一+FFF)/2,linethick0;
預(yù)測(cè)高一:開盤價(jià)+B2,linethick0;
{預(yù)測(cè)今日最高價(jià)指標(biāo)}
預(yù)測(cè)高二:MA(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1),linethick0;
差額一:=預(yù)測(cè)低一-low;
差額二:=預(yù)測(cè)低二-low;
差比一:=(差額一/low)*100;
差比二:=(差額二/low)*100;
{T + 0 操作數(shù)據(jù)}
pp:=0.0115;{可調(diào)整}
成本價(jià):=預(yù)測(cè)低二*1.006;{也是買回價(jià)}
賣出價(jià):成本價(jià)*(1+pp),linethick0;
高低差一:=預(yù)測(cè)高一-預(yù)測(cè)低二;
高低差二:=預(yù)測(cè)高二-預(yù)測(cè)低二;
差價(jià)比一:=賣出價(jià)/預(yù)測(cè)高一*100;
差價(jià)比二:=賣出價(jià)/預(yù)測(cè)高二*100;
今日高低比:=(最高價(jià)-最低價(jià))/最高價(jià)*100;
昨日高低比:=(最高價(jià)1-最低價(jià)1)/最高價(jià)1*100;
{bankruptcyebook.com 看股吧_大智慧股票指標(biāo)公式}
DRAWTEXTREL(10,60,' ★ 股票買入操作數(shù)據(jù) ★' ),coloryellow,linethick1;
DRAWTEXTREL(420,60,' ★T + 0 操作數(shù)據(jù)★ 目前純利設(shè)定為:'+NUMTOSTRN(ref(pp*100,0),2)+'%'+' 股價(jià)高低比: '+NUMTOSTRN(ref(今日高低比,0),2)+'%'),coloryellow,linethick1;
DRAWTEXTREL(10,60,'最低價(jià):'+NUMTOSTRN(ref(最低價(jià),0),2) ),colorffffff,linethick2;
DRAWTEXTREL(320,60,' 最高價(jià):'+NUMTOSTRN(ref(最高價(jià),0),2)),colorffffff,linethick2;
DRAWTEXTREL(10,200,'買入價(jià)預(yù)測(cè) 預(yù)測(cè)價(jià) 目前差價(jià) 目前差比'),COLORD3A9FF,linethick1;
DRAWTEXTREL(10,350,' 預(yù)測(cè)低一 '+NUMTOSTRN(ref(預(yù)測(cè)低一,0),2)+'元 '+ NUMTOSTRN(ref(差額一,0),2)+'元 '+ NUMTOSTRN(ref(差比一,0),2)+'%'),colorffffff,linethick1;
DRAWTEXTREL(10,470,' 預(yù)測(cè)低二 '+NUMTOSTRN(ref(預(yù)測(cè)低二,0),2)+'元 '+ NUMTOSTRN(ref(差額二,0),2)+'元 '+ NUMTOSTRN(ref(差比二,0),2)+'%'),colorffffff,linethick1;
DRAWTEXTREL(330,200,'賣出價(jià)預(yù)測(cè) 預(yù)測(cè)格 目前高低差 目前高低比 ★ 操作價(jià)格'),COLORD3A9FF,linethick1;
DRAWTEXTREL(330,350,' 預(yù)測(cè)高一 '+NUMTOSTRN(ref(預(yù)測(cè)高一,0),2)+'元 '+ NUMTOSTRN(ref(高低差一,0),2)+'元 '+ NUMTOSTRN(ref(差價(jià)比一,0),2)+'%'),colorffffff,linethick1;
DRAWTEXTREL(330,470,' 預(yù)測(cè)高二 '+NUMTOSTRN(ref(預(yù)測(cè)高二,0),2)+'元 '+ NUMTOSTRN(ref(高低差二,0),2)+'元 '+ NUMTOSTRN(ref(差價(jià)比二,0),2)+'%'),colorffffff,linethick1;
DRAWTEXTREL(600,350,' 賣出價(jià): '+NUMTOSTRN(ref(賣出價(jià),0),2)+'元'),coloryellow,linethick1;
DRAWTEXTREL(600,470,' 買回價(jià): '+NUMTOSTRN(ref(預(yù)測(cè)低二,0),2)+'元'),coloryellow,linethick1;
{DRAWTEXTREL(750,470,' 昨日高低比: '+NUMTOSTRN(ref(昨日高低比,0),2)+'%'),colorffffff,linethick1;}
ssu1:=賣出價(jià)<預(yù)測(cè)高二 or 賣出價(jià)=預(yù)測(cè)高二;
ssu2:=賣出價(jià)>預(yù)測(cè)高二;;
IF BARSTATUS=2 AND ssu1 THEN BEGIN
DRAWTEXTREL(750,250,' ★ 設(shè)定成功'),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND ssu2 THEN BEGIN
DRAWTEXTREL(750,250,' ● 設(shè)定失敗'),COLORgreen,linethick1;
END
su1:=預(yù)測(cè)低二>low and 賣出價(jià)<high;
su2:=預(yù)測(cè)低二>low and 賣出價(jià)=high;
su3:=預(yù)測(cè)低二=low and 賣出價(jià)<high;
su4:=預(yù)測(cè)低二=low and 賣出價(jià)=high;
su5:=預(yù)測(cè)低二<low;
IF BARSTATUS=2 AND su1 THEN BEGIN
DRAWTEXTREL(750,370,' ★ 操作成功'),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su2 THEN BEGIN
DRAWTEXTREL(750,370,' ★ 操作成功'),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su3 THEN BEGIN
DRAWTEXTREL(750,370,' ★ 操作成功'),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su4 THEN BEGIN
DRAWTEXTREL(750,370,' ★ 操作成功'),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su5 THEN BEGIN
DRAWTEXTREL(750,370,' ● 買回操作失敗'),COLORgreen,linethick1;
END
su6:=賣出價(jià)>high;
IF BARSTATUS=2 AND su6 THEN BEGIN
DRAWTEXTREL(750,480,' ● 賣出操作失敗'),COLORgreen,linethick1;
END
頂線:=80;
{黃金點(diǎn):=-20;}
預(yù)測(cè)一:=-35;
預(yù)測(cè)二:=-50;
失敗:=-65;
底線:=-75;
DRAWTEXT(DISPSTATUS=2,頂線,' 80'),COLORred,ALIGN0;
{DRAWTEXT(DISPSTATUS=2,黃金點(diǎn),' 黃金買點(diǎn)'),COLORffffff,ALIGN0;}
DRAWTEXT(DISPSTATUS=2,預(yù)測(cè)一,' 預(yù)測(cè)一'),COLORred,ALIGN0;
DRAWTEXT(DISPSTATUS=2,預(yù)測(cè)二,' 預(yù)測(cè)二'),COLORyellow,ALIGN0;
DRAWTEXT(DISPSTATUS=2,失敗,' 未到位'),COLORgreen,ALIGN0;
DRAWTEXT(DISPSTATUS=2,底線,' -75'),COLORgreen,ALIGN0;
{DRAWTEXT(low<hjmd,-20,'☆'),COLORffffff,ALIGN1;}
{DRAWTEXT(low>hjmd,-20,'●'),COLORgreen,ALIGN1;}
DRAWTEXT(low<預(yù)測(cè)低一,-35,'☆'),COLORred,ALIGN1;
DRAWTEXT(low<預(yù)測(cè)低二,-50,'☆'),COLORyellow,ALIGN1;
DRAWTEXT(low>預(yù)測(cè)低二,-65,'●'),COLORgreen,ALIGN1;
{說明:紅樹林園 這一段源碼做出來的效果是買點(diǎn)到位閃爍交替顯示[☆到位]和[●失敗]}
Amod:=MOD(CURRENTTIME,2);
DRAWTEXT(DISPSTATUS=2 and Amod=0,70,'預(yù)測(cè)提示'),colorffffff;
DRAWTEXT(DISPSTATUS=2 and Amod=1,70,'提示預(yù)測(cè)'),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low<預(yù)測(cè)低一 and Amod=0,10,'預(yù)測(cè)一 ☆'),colorred;
DRAWTEXT(DISPSTATUS=2 and low<預(yù)測(cè)低一 and Amod=1,10,'預(yù)測(cè)一 ☆'),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low<預(yù)測(cè)低二 and Amod=0,-10,'預(yù)測(cè)二 ☆'),colorred;
DRAWTEXT(DISPSTATUS=2 and low<預(yù)測(cè)低二 and Amod=1,-10,'預(yù)測(cè)二 ☆'),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low>預(yù)測(cè)低一 and Amod=0,10,'預(yù)測(cè)一 ●'),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>預(yù)測(cè)低一 and Amod=1,10,'預(yù)測(cè)一 ●'),colorffffff;
DRAWTEXT(DISPSTATUS=2 and low>預(yù)測(cè)低二 and Amod=0,-10,'預(yù)測(cè)二 ●'),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>預(yù)測(cè)低二 and Amod=1,-10,'預(yù)測(cè)二 ●'),colorffffff;
DRAWTEXT(DISPSTATUS=2 and 賣出價(jià)<high and Amod=0,50,'賣出價(jià) ☆'),colorred;
DRAWTEXT(DISPSTATUS=2 and 賣出價(jià)<high and Amod=1,50,'賣出價(jià) ☆'),coloryellow;
DRAWTEXT(DISPSTATUS=2 and 賣出價(jià)>high and Amod=0,50,'賣出價(jià) ●'),colorgreen;
DRAWTEXT(DISPSTATUS=2 and 賣出價(jià)>high and Amod=1,50,'賣出價(jià) ●'),colorffffff;
DRAWTEXT(DISPSTATUS=2 and 預(yù)測(cè)低二>low and Amod=0,30,'買回價(jià) ☆'),colorred;
DRAWTEXT(DISPSTATUS=2 and 預(yù)測(cè)低二>low and Amod=1,30,'買回價(jià) ☆'),coloryellow;
DRAWTEXT(DISPSTATUS=2 and 預(yù)測(cè)低二<low and Amod=0,30,'買回價(jià) ●'),colorgreen;
DRAWTEXT(DISPSTATUS=2 and 預(yù)測(cè)低二<low and Amod=1,30,'買回價(jià) ●'),colorffffff;
看股吧 公式 www.kanguba .com
其它股票公式列表