自動(dòng)畫(huà)線 通達(dá)信指標(biāo)公式源碼

自動(dòng)畫(huà)線通達(dá)信指標(biāo)公式源碼Z1:=STRCAT(HYBLOCK,'');Z2:=STRCAT(Z1,DYBLOCK);Z3:=STRCAT(Z2,'');DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLOR00C0C0;//篩選出最近3根K線中的最高點(diǎn)A1:=REF(HIGH,3)=HHV(HIGH,2*3+1);B1:=FILTER(A1,3);C1:=BACKSET(B1,3+1);D1:=FILTER(C1,3);//篩選出最近3根K線中的最低點(diǎn)A2:=REF(LOW,3)=LLV(LOW,2*3+1);B2:=FILTER(A2,3);C2:=BACKSET(B2,3+1);D2:=FILTER(C2,3);//計(jì)算高低點(diǎn)的位置E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;E2:=(HIGH+LOW)/2;//判斷當(dāng)前K線是否為高點(diǎn)或低點(diǎn)H1:=(D1ANDNOT(D2ANDE1>=E2))ORISLASTBARORBARSCOUNT(CLOSE)=1;H2:=D1ANDNOT(D2ANDE1>=E2);L1:=D2ANDNOT(D1ANDE1=E2);//計(jì)算過(guò)濾后的低點(diǎn)位置X1:=REF(BARSLAST(H1),1)+1;F1:=BACKSET(H1ANDCOUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1));G1:=F1>REF(F1,1);I1:=BACKSET(G1,2);LD:=I1>REF(I1,1);//計(jì)算過(guò)濾后的高點(diǎn)位置L2:=LDORISLASTBARORBARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1;F2:=BACKSET(L2ANDCOUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));G2:=F2>REF(F2,1);I2:=BACKSET(G2,2);HD:=I2>REF(I2,1);//計(jì)算當(dāng)前K線是否為高點(diǎn)或低點(diǎn)J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1);J2:=J1>REF(J1,1);//輸出結(jié)果A3:=H;B3：如果當(dāng)前K線的前一根高點(diǎn)的后一根K線的收盤(pán)價(jià)大于當(dāng)前K線前一根高點(diǎn)的收盤(pán)價(jià)，則為真。D3：當(dāng)A3為真且B3為真且HD為真時(shí)，為真。E3：將D3向前移動(dòng)兩個(gè)K線，得到新的序列。HH：找到所有的長(zhǎng)期高點(diǎn)。A4：如果當(dāng)前K線的收盤(pán)價(jià)大于前一根低點(diǎn)的收盤(pán)價(jià)，則為真。B4：當(dāng)前K線前一根低點(diǎn)的收盤(pán)價(jià)。D4：當(dāng)A4為真且B4為真且LD為真時(shí)，為真。E4：將D4向前移動(dòng)兩個(gè)K線，得到新的序列。LL：找到所有的長(zhǎng)期低點(diǎn)。繪制圖標(biāo)，表示長(zhǎng)期高點(diǎn)和長(zhǎng)期低點(diǎn)。H3：如果當(dāng)前K線是最后一根K線或者當(dāng)前K線之前沒(méi)有出現(xiàn)過(guò)高點(diǎn)或低點(diǎn)，則為真。X3：最后一個(gè)符合條件的長(zhǎng)期高點(diǎn)的索引加1。F3：找到最后一個(gè)符合條件的長(zhǎng)期低點(diǎn)之后的第一個(gè)長(zhǎng)期高點(diǎn)，并將其向前移動(dòng)兩個(gè)K線，得到新的序列。G3：將F3向前移動(dòng)一根K線，得到新的序列。I3：將G3向前移動(dòng)兩根K線，得到新的序列。LZ：找到所有的長(zhǎng)期低點(diǎn)，并將其向前移動(dòng)一根K線，得到新的序列。L4：如果當(dāng)前K線是最后一根K線或者當(dāng)前K線之前沒(méi)有出現(xiàn)過(guò)高點(diǎn)或低點(diǎn)，則為真。X4：最后一個(gè)符合條件的長(zhǎng)期低點(diǎn)的索引加1。F4：找到最后一個(gè)符合條件的長(zhǎng)期高點(diǎn)之后的第一個(gè)長(zhǎng)期低點(diǎn)，并將其向前移動(dòng)兩個(gè)K線，得到新的序列。G4：將F4向前移動(dòng)一根K線，得到新的序列。I4：將G4向前移動(dòng)兩根K線，得到新的序列。HZ：找到所有的長(zhǎng)期高點(diǎn)，并將其向前移動(dòng)一根K線，得到新的序列。K1：如果當(dāng)前K線是最后一根K線或者當(dāng)前K線之前沒(méi)有