- 金字塔客服中心 - 专业程序化交易软件提供商 (http://222.73.7.161/bbs/index.asp)
-- 公式模型编写问题提交 (http://222.73.7.161/bbs/list.asp?boardid=4)
---- [求助]请老师修改24节气K线指标在金字塔用,先谢谢 (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=49366)
-- 发布时间：2013/3/7 8:36:03
-- [求助]请老师修改24节气K线指标在金字塔用,先谢谢
就是将24节气k线公式分解成12节k和12气k公式?(二十四节气又分为12个节气和12个中气,其中12节气简称12节,12中气简称12气!)
//二十四节K线
TBS:=POW(10,ABS(LOG(MINDIFF)));
jqd:=LSOLARTERMday(date);
fd:=date;
tj:=(jqd-ref(jqd,1)<>DATEDIFF(ref(fd,1),fd))*((month)*2-(jqd>day)-(day<=16));
Jw:BARSLAST(tj),LINETHICK;
Jdg:=Jw=0 or ISLASTBAR;
Jwx:=0*C;
for JQ=datacount-1 downto lbound(Jdg) do
if Jdg[JQ] then
Jwx[JQ]:=0;
else
Jwx[JQ]:=Jwx[JQ+1]+1;
Jr:=BACKSET(ISLASTBAR,Jw+1)-ISLASTBAR;
Jwx:=refx(Jwx,1)+Jr,LINETHICK;
Joo:=ref(o,Jw);
Jhh:=hhv(h,Jw+1);
JLL:=LLv(L,Jw+1);
Jzq1:=BARSLAST(ref(Jwx,1)=0 or BARPOS=1)+1;//N天数
Jyt1:=if(Jzq1=1 and refx(Jzq1,2)=1,13,if(refx(Jzq1,1)=1 or Jzq1=1,7,14));
节开:ROUND(JOO*TBS)/TBS,LINETHICK,COLOReeee00;
节高:ROUND(refx(Jhh,Jwx)*TBS)/TBS,LINETHICK,COLOReeaaFF;
节低:ROUND(refx(JLL,Jwx)*TBS)/TBS,LINETHICK,COLOR00ee00;
节收:ROUND(refx(c,Jwx)*TBS)/TBS,LINETHICK,COLOR00eeee;
Jf:=节收>节开 or (节收=节开 and 节收>ref(节收,JW));
Jj:=cross(Jw,Jwx);
STICKLINE(Jw>0 and JF and Jj ,节低,节高,10,0),Color5055B1;
STICKLINE(节开<节收 ,节开,节收,JYT1,0),Color5055B1;
STICKLINE(Jw>0 and not(JF) and Jj ,节低,节高,10,0),Color5A7234;
STICKLINE(节开>节收 ,节开,节收,JYT1,0),Color5A7234;
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;
drawtext(tj=1 ,l,\'小寒\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=2 ,L,\'大寒\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=3 ,L,\'立春\'),COLORGREEN,align0,PXDN5;
drawtext(tj=4 ,L,\'雨水\'),COLORGREEN,align0,PXDN5;
drawtext(tj=5 ,L,\'惊蛰\'),COLORGREEN,align0,PXDN5;
drawtext(tj=6 ,L,\'春分\'),COLORGREEN,align0,PXDN5;
drawtext(tj=7 ,L,\'清明\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=8 ,L,\'谷雨\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=9 ,L,\'立夏\'),COLORRED,align0,PXDN5;
drawtext(tj=10,L,\'小满\'),COLORRED,align0,PXDN5;
drawtext(tj=11,L,\'芒种\'),COLORRED,align0,PXDN5;
drawtext(tj=12,L,\'夏至\'),COLORRED,align0,PXDN5;
drawtext(tj=13,L,\'小暑\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=14,L,\'大暑\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=15,L,\'立秋\'),COLORBBBBBB,align0,PXDN5;
drawtext(tj=16,L,\'处暑\'),COLORBBBBBB,align0,PXDN5;
drawtext(tj=17,L,\'白露\'),COLORBBBBBB,align0,PXDN5;
drawtext(tj=18,L,\'秋分\'),COLORBBBBBB,align0,PXDN5;
drawtext(tj=19,L,\'寒露\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=20,L,\'霜降\'),COLORYELLOW,align0,PXDN5;
drawtext(tj=21,L,\'立冬\'),COLORFF9900,align0,PXDN5;
drawtext(tj=22,L,\'小雪\'),COLORFF9900,align0,PXDN5;
drawtext(tj=23,L,\'大雪\'),COLORFF9900,align0,PXDN5;
drawtext(tj=24,L,\'冬至\'),COLORFF9900,align0,PXDN5;
drawtext(tj=1 ,H,\'丑月\'),COLORYELLOW,align0,PXUP19;
drawtext(tj=3 ,H,\'寅月\'),COLORGREEN,align0,PXUP19;
drawtext(tj=5 ,H,\'卯月\'),COLORGREEN,align0,PXUP19;
drawtext(tj=7 ,H,\'辰月\'),COLORYELLOW,align0,PXUP19;
drawtext(tj=9 ,H,\'巳月\'),COLORRED,align0,PXUP19;
drawtext(tj=11,H,\'午月\'),COLORRED,align0,PXUP19;
drawtext(tj=13,H,\'未月\'),COLORYELLOW,align0,PXUP19;
drawtext(tj=15,H,\'申月\'),COLORBBBBBB,align0,PXUP19;
drawtext(tj=17,H,\'酉月\'),COLORBBBBBB,align0,PXUP19;
drawtext(tj=19,H,\'戌月\'),COLORYELLOW,align0,PXUP19;
drawtext(tj=21,H,\'亥月\'),COLORFF9900,align0,PXUP19;
drawtext(tj=23,H,\'子月\'),COLORFF9900,align0,PXUP19;
-- 发布时间：2013/3/7 9:01:36
--
可以直接用，看上去挺不错的！
此主题相关图片如下：1.png
-- 发布时间：2013/3/7 9:42:24
--
要合并成大的K线!