- 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp)
-- 公式模型编写问题提交 (http://weistock.com/bbs/list.asp?boardid=4)
---- 大智慧的这个如何改成金字塔系统的 (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=52417)
-- 发布时间：2013/5/25 18:17:44
-- 大智慧的这个如何改成金字塔系统的
variable:tr=0,up=0,dn=0;
TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR:=MA(TR1,N);
median:=(high+low)/2;
up:= median+atr * M;
dn:= median-atr * M;
tr:=if(c>ref(up,1),1,if(c<ref(dn,1),-1,tr));
flag:=tr<0 and ref(tr,1)>0;
flagh:=tr>0 and ref(tr,1)<0;
dn:=if(tr>0 and dn<ref(dn,1),ref(dn,1),dn);
up:=if(tr<0 and up>ref(up,1),ref(up,1),up);
up:=if(flag,median+atr*M,up);
dn:=if(flagh,median-atr*M,dn);
PARTLINE(dn,tr=1,rgb(200,0,0));
PARTLINE(up,tr=-1,rgb(0,200,0));
-- 发布时间：2013/5/26 20:14:41
--
variable:TRA=0,up=0,dn=0;
TRA1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATRA:=MA(TRA1,N);
median1:=(high+low)/2;
up:= median1+aTRA * M;
dn:= median1-aTRA * M;
TRA:=if(c>ref(up,1),1,if(c<ref(dn,1),-1,TRA));
flag:=TRA<0 and ref(TRA,1)>0;
flagh:=TRA>0 and ref(TRA,1)<0;
dn:=if(TRA>0 and dn<ref(dn,1),ref(dn,1),dn);
up:=if(TRA<0 and up>ref(up,1),ref(up,1),up);
up:=if(flag,median1+aTRA*M,up);
dn:=if(flagh,median1-aTRA*M,dn);
PARTLINE(dn,TRA=1,rgb(200,0,0));
PARTLINE(up,TRA=-1,rgb(0,200,0));
-- 发布时间：2013/5/26 21:20:21
--
怎么显示的图和大智慧差距那么大啊
这事大智慧的
此主题相关图片如下：dzh.jpg
这事改成金字塔后显示的
此主题相关图片如下：jzt.jpg