以下是大智慧T加0操作副图指标
大智慧T加0操作副图指标
源码
N:=27;
{预测股价公式}
{预测当天最低价公式}
A1:=REF(O,1);
A2:=ABS((REF(C,1)-A1)/A1);
A3:=ABS((REF(H,1)-A1)/A1);
A4:=ABS((REF(L,1)-A1)/A1);
B1:=ABS((A2+A3+A4)/3);
B2:=O*B1;
预测低一:O-B2,linethick0;
最低价:low,coloryellow,linethick0;
预测高一:=O+B2;
{预测当天股价公式}
开盘价1:=open;
开盘价2:=REF(open,1);
最高价1:=high;
最高价2:=REF(high,1);
最低价1:=low;
最低价2:=REF(low,1);
收盘价1:=CLOSE;
收盘价2:=REF(CLOSE,1);
AA:=最高价2;
BB:=最低价2;
CC:=开盘价2;
DD:=收盘价2;
EE:=(AA+BB+CC+2*DD)/5;
AAA:=EE+(AA-BB);
BBB:=2*EE-BB;
CCC:=2*EE-AA;
DDD:=EE-(AA-BB);
上升突破价:=AAA;
上升阻力价:=BBB;
下跌支撑价:=CCC;
下跌反转价:=DDD;
EEE:=(EE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5;
心理价:=EEE;
FFF:=(EEE+开盘价1)/2;
GGG:=(预测低一+FFF)/2;
预测低二:GGG,colorffffff,LINETHICK0;
最高价:high,colorred,linethick0;
{预测今日最高价公式}
预测高二:=MA(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1);
开盘价:open,colorffffff,linethick0;
收盘价:close,coloryellow,linethick0;
差额一:预测低一-low,colorffffff,LINETHICK0;
差额二:预测低二-low,colorffffff,LINETHICK0;
差比一:(差额一/low)*100,colorffffff,LINETHICK0;
差比二:(差额二/low)*100,colorffffff,LINETHICK0;
DRAWTEXTREL(10,60,\’ ★ 今日最低价：\’+NUMTOSTRN(low,2)+\’元\’),coloryellow,linethick1;
DRAWTEXTREL(10,200,\’ 预测 预测低一: \’+NUMTOSTRN(ref(预测低一,0),2)+\’元\’+\’ 预测低二: \’+NUMTOSTRN(ref(ggg,0),2)+\’元\’),colorffffff,linethick1;
DRAWTEXTREL(10,350,\’目前差价 \’+NUMTOSTRN(ref(差额一,0),2)+\’元 \’+ NUMTOSTRN(ref(差额二,0),2)+\’元\’),coloryellow,linethick1;
DRAWTEXTREL(10,470,\’目前差比 \’+NUMTOSTRN(ref(差比一,0),2)+\’% \’+ NUMTOSTRN(ref(差比二,0),2)+\’%\’),coloryellow,linethick1;
DRAWTEXTREL(320,150,\’ ● 今日最高价：\’+NUMTOSTRN(high,2)+\’元\’),coloryellow,linethick1;
DRAWTEXTREL(350,350,\’ 预测高一: \’+NUMTOSTRN(ref(预测高一,0),2)+\’元\’),colorffffff,linethick1;
DRAWTEXTREL(350,470,\’ 预测高二: \’+NUMTOSTRN(ref(预测高二,0),2)+\’元\’),colorffffff,linethick1;
{T + 0 操作数据}
pp:=0.0115;{纯利为1.15%，可调整，建议最大为1.5%}
成本价:=预测低二*1.006;{也是买回价}
卖出价:=成本价*(1+pp);
高低差一:=预测高一-预测低二;
高低差二:=预测高二-预测低二;
差价比一:=卖出价/预测高一*100;
差价比二:=卖出价/预测高二*100;
昨日高低比:=(最高价2-最低价2)/最高价2*100;
目前高低比:=(最高价1-最低价1)/最高价1*100;
ssu1:=卖出价<预测高一 and 卖出价<预测高二;
ssu2:=卖出价>预测高一 or 卖出价>预测高二 or 差价比一 >98% or 差价比二 >98%;
DRAWTEXTREL(500,60,\’ ★ T + 0 操作数据 目前纯利设定为：\’+NUMTOSTRN(ref(pp*100,0),2)+\’%\’),coloryellow,linethick1;
DRAWTEXTREL(530,200,\’ 成本价: \’+NUMTOSTRN(ref(成本价,0),2)+\’元\’+\’ 卖出价: \’+NUMTOSTRN(ref(卖出价,0),2)+\’元\’),colorffffff,linethick1;
DRAWTEXTREL(530,350,\’ 高低差一: \’+NUMTOSTRN(ref(高低差一,0),2)+\’元\’+ \’ 差价比一: \’+NUMTOSTRN(ref(差价比一,0),2)+\’%\’),coloryellow,linethick1;
DRAWTEXTREL(530,470,\’ 高低差二: \’+NUMTOSTRN(ref(高低差二,0),2)+\’元\’+ \’ 差价比二: \’+NUMTOSTRN(ref(差价比二,0),2)+\’%\’),coloryellow,linethick1;
DRAWTEXTREL(750,200,\’ 买回价: \’+NUMTOSTRN(ref(ggg,0),2)+\’元\’),colorffffff,linethick1;
DRAWTEXTREL(750,470,\’ 昨日高低比: \’+NUMTOSTRN(ref(昨日高低比,0),2)+\’%\’),colorffffff,linethick1;
DRAWTEXTREL(750,350,\’ 目前高低比: \’+NUMTOSTRN(ref(目前高低比,0),2)+\’%\’),colorffffff,linethick1;
IF BARSTATUS=2 AND ssu1 THEN BEGIN
DRAWTEXTREL(530,610,\’ ★ 设定成功\’),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND ssu2 THEN BEGIN
DRAWTEXTREL(530,610,\’ ● 设定失败\’),COLORgreen,linethick1;
END
su1:=预测低二>low and 卖出价<high;
su2:=预测低二high;
IF BARSTATUS=2 AND su1 THEN BEGIN
DRAWTEXTREL(650,610,\’★ 操作成功\’),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su2 THEN BEGIN
DRAWTEXTREL(650,610,\’● 操作失败\’),COLORgreen,linethick1;
END
顶线:=80;
顶线:=80;
{黄金点:=-20;}
预测一:=-35;
预测二:=-50;
失败:=-65;
底线:=-75;
DRAWTEXT(DISPSTATUS=2,顶线,\’ 80\’),COLORred,ALIGN0;
{DRAWTEXT(DISPSTATUS=2,黄金点,\’ 黄金买点\’),COLORffffff,ALIGN0;}
DRAWTEXT(DISPSTATUS=2,预测一,\’ 预测一\’),COLORred,ALIGN0;
DRAWTEXT(DISPSTATUS=2,预测二,\’ 预测二\’),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<预测低一,-35,\’☆\’),COLORred,ALIGN1;
DRAWTEXT(low<预测低二,-50,\’☆\’),COLORyellow,ALIGN1;
DRAWTEXT(low>预测低二,-65,\’●\’),COLORgreen,ALIGN1;
{说明：红树林园 这一段源码做出来的效果是买点到位闪烁交替显示[风险]和[注意]}
Amod:=MOD(CURRENTTIME,2);
DRAWTEXT(DISPSTATUS=2 and Amod=0,50,\’预测警示\’),colorffffff;
DRAWTEXT(DISPSTATUS=2 and low<预测低一 and Amod=0,30,\’预测一 ☆\’),colorred;
DRAWTEXT(DISPSTATUS=2 and low<预测低一 and Amod=1,30,\’预测一 ☆\’),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low<预测低二 and Amod=0,10,\’预测二 ☆\’),colorred;
DRAWTEXT(DISPSTATUS=2 and low<预测低二 and Amod=1,10,\’预测二 ☆\’),coloryellow;
{DRAWTEXT(DISPSTATUS=2 and low<hjmd and Amod=0,20,\’黄金买点 ☆\’),colorred;}
{DRAWTEXT(DISPSTATUS=2 and low<hjmd and Amod=1,20,\’黄金买点 ☆\’),coloryellow;}
DRAWTEXT(DISPSTATUS=2 and low>预测低一 and Amod=0,30,\’预测一 ●\’),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>预测低一 and Amod=1,30,\’预测一 ●\’),colorffffff;
DRAWTEXT(DISPSTATUS=2 and low>预测低二 and Amod=0,10,\’预测二 ●\’),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>预测低二 and Amod=1,10,\’预测二 ●\’),colorffffff;
{DRAWTEXT(DISPSTATUS=2 and low>hjmd and Amod=0,20,\’黄金买点 ●\’),colorgreen;}
{DRAWTEXT(DISPSTATUS=2 and low>hjmd and Amod=1,20,\’黄金买点 ●\’),colorffffff;};
