预测股价公式 预测最低价 最高价等等
{预测股价公式}
{预测当天最低价公式}
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;
:=最低价2; BB
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.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:=预测低二low or卖出价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;};
MSN空间完美搬家到新浪博客~