飛狐二十四節(jié)氣K線主圖公式公式、代碼源碼

作者：飛狐交易師來源：cxh99.com 發(fā)布時(shí)間：2021年11月05日

相關(guān)標(biāo)簽:

原理解析：

TBS賦值:10的最小變動價(jià)位的對數(shù)的絕對值乘冪

JQD賦值:LSOLARTERMDAY(日期)

FD賦值:日期

TJ賦值:(JQD-1日前的JQD不等于DATEDIFF(1日前的FD,FD))*((月份)*2-(JQD>日)-(日<=16))

輸出JW:上次TJ距今天數(shù),線寬為0

JDG賦值:JW=0 OR 是否最后一個周期

JWX賦值:0*收盤價(jià)

賦值:0

賦值:JWX[JQ+1]+1

JR賦值:若是否最后一個周期則將最近JW+1周期置為1-是否最后一個周期

JWX賦值:1日后的JWX+JR,線寬為0

JOO賦值:JW日前的開盤價(jià)

JHH賦值:JW+1日內(nèi)最高價(jià)的最高值

JLL賦值:JW+1日內(nèi)最低價(jià)的最低值

JZQ1賦值:上次1日前的JWX=0ORBARPOS=1距今天數(shù)+1

N天數(shù)JYT1賦值:如果JZQ1=1ANDREFX(JZQ1,2)=1,返回13,否則返回如果1日后的JZQ1=1ORJZQ1=1,返回7,否則返回14

輸出節(jié)開:對JOO*TBS(進(jìn)行)四舍五入/TBS,線寬為0,COLOREEEE00

輸出節(jié)高:對JWX日后的JHH*TBS(進(jìn)行)四舍五入/TBS,線寬為0,COLOREEAAFF

輸出節(jié)低:對JWX日后的JLL*TBS(進(jìn)行)四舍五入/TBS,線寬為0,COLOR00EE00

輸出節(jié)收:對JWX日后的收盤價(jià)*TBS(進(jìn)行)四舍五入/TBS,線寬為0,COLOR00EEEE

JF賦值:節(jié)收>節(jié)開 OR (節(jié)收=節(jié)開 AND 節(jié)收>JW日前的節(jié)收)

JJ賦值:JW上穿JWX

當(dāng)滿足條件JW>0ANDJFANDJJ時(shí),在節(jié)低和節(jié)高位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR5055B1

當(dāng)滿足條件節(jié)開<節(jié)收時(shí),在節(jié)開和節(jié)收位置之間畫柱狀線,寬度為JYT1,0不為0則畫空心柱.,COLOR5055B1

當(dāng)滿足條件JW>0ANDNOT(JF)ANDJJ時(shí),在節(jié)低和節(jié)高位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR5A7234

當(dāng)滿足條件節(jié)開>節(jié)收時(shí),在節(jié)開和節(jié)收位置之間畫柱狀線,寬度為JYT1,0不為0則畫空心柱.,COLOR5A7234

當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000AA

當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000BB?

當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000CC?

當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000EE

當(dāng)滿足條件收盤價(jià)>=開盤價(jià)時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000FF

當(dāng)滿足條件收盤價(jià)<=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR7B7B00

當(dāng)滿足條件收盤價(jià)<=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR909000

當(dāng)滿足條件收盤價(jià)<=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORA8A800

當(dāng)滿足條件收盤價(jià)<=開盤價(jià)時(shí),在收盤價(jià)和開盤價(jià)位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORCECE00

當(dāng)滿足條件收盤價(jià)<=開盤價(jià)時(shí),在最高價(jià)和最低價(jià)位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFFF00

當(dāng)滿足條件TJ=1時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=2時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=3時(shí),在最低價(jià)位置書寫文字,畫綠色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=4時(shí),在最低價(jià)位置書寫文字,畫綠色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=5時(shí),在最低價(jià)位置書寫文字,畫綠色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=6時(shí),在最低價(jià)位置書寫文字,畫綠色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=7時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=8時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=9時(shí),在最低價(jià)位置書寫文字,畫紅色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=10時(shí),在最低價(jià)位置書寫文字,畫紅色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=11時(shí),在最低價(jià)位置書寫文字,畫紅色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=12時(shí),在最低價(jià)位置書寫文字,畫紅色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=13時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=14時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=15時(shí),在最低價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXDN5

當(dāng)滿足條件TJ=16時(shí),在最低價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXDN5

當(dāng)滿足條件TJ=17時(shí),在最低價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXDN5

當(dāng)滿足條件TJ=18時(shí),在最低價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXDN5

當(dāng)滿足條件TJ=19時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=20時(shí),在最低價(jià)位置書寫文字,畫黃色,ALIGN0,PXDN5

當(dāng)滿足條件TJ=21時(shí),在最低價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXDN5

當(dāng)滿足條件TJ=22時(shí),在最低價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXDN5

當(dāng)滿足條件TJ=23時(shí),在最低價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXDN5

當(dāng)滿足條件TJ=24時(shí),在最低價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXDN5

當(dāng)滿足條件TJ=1時(shí),在最高價(jià)位置書寫文字,畫黃色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=3時(shí),在最高價(jià)位置書寫文字,畫綠色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=5時(shí),在最高價(jià)位置書寫文字,畫綠色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=7時(shí),在最高價(jià)位置書寫文字,畫黃色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=9時(shí),在最高價(jià)位置書寫文字,畫紅色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=11時(shí),在最高價(jià)位置書寫文字,畫紅色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=13時(shí),在最高價(jià)位置書寫文字,畫黃色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=15時(shí),在最高價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXUP19

當(dāng)滿足條件TJ=17時(shí),在最高價(jià)位置書寫文字,COLORBBBBBB,ALIGN0,PXUP19

當(dāng)滿足條件TJ=19時(shí),在最高價(jià)位置書寫文字,畫黃色,ALIGN0,PXUP19

當(dāng)滿足條件TJ=21時(shí),在最高價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXUP19

當(dāng)滿足條件TJ=23時(shí),在最高價(jià)位置書寫文字,COLORFF9900,ALIGN0,PXUP19

源碼：

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天數(shù)
Jyt1:=if(Jzq1=1 and refx(Jzq1,2)=1,13,if(refx(Jzq1,1)=1 or Jzq1=1,7,14));
節(jié)開:ROUND(JOO*TBS)/TBS,LINETHICK,COLOReeee00;
節(jié)高:ROUND(refx(Jhh,Jwx)*TBS)/TBS,LINETHICK,COLOReeaaFF;
節(jié)低:ROUND(refx(JLL,Jwx)*TBS)/TBS,LINETHICK,COLOR00ee00;
節(jié)收:ROUND(refx(c,Jwx)*TBS)/TBS,LINETHICK,COLOR00eeee;
Jf:=節(jié)收>節(jié)開 or (節(jié)收=節(jié)開 and 節(jié)收>ref(節(jié)收,JW));
Jj:=cross(Jw,Jwx);
STICKLINE(Jw>0 and JF and Jj ,節(jié)低,節(jié)高,10,0),Color5055B1;
STICKLINE(節(jié)開<節(jié)收 ,節(jié)開,節(jié)收,JYT1,0),Color5055B1;
STICKLINE(Jw>0 and not(JF) and Jj ,節(jié)低,節(jié)高,10,0),Color5A7234;
STICKLINE(節(jié)開>節(jié)收 ,節(jié)開,節(jié)收,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;{來源:www.tumamayizhan.com　程序化交易}

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】【同花順公式源碼導(dǎo)入方法教程】【大智慧新一代公式源碼導(dǎo)入方法教程】