涼風(fēng)無(wú)夢(mèng)老師源碼(通達(dá)信),含九轉(zhuǎn)公式和倉(cāng)位判斷,希望高手老師能全部改為大智慧的:
短線(xiàn)多:EMA(H,25),colorred;
短線(xiàn)空:EMA(L,25),colorgreen;
短線(xiàn)波動(dòng):短線(xiàn)多-短線(xiàn)空,coloryellow,NODRAW;
NOTEXT短線(xiàn)空0:IF(C>短線(xiàn)空,短線(xiàn)空,DRAWNULL),colorred;
NOTEXT短線(xiàn)空1:IF(C<短線(xiàn)空,短線(xiàn)空,DRAWNULL),colorgreen;
NOTEXT短線(xiàn)多0:IF(C>短線(xiàn)多,短線(xiàn)多,DRAWNULL),colorred;
NOTEXT短線(xiàn)多1:IF(C<短線(xiàn)多,短線(xiàn)多,DRAWNULL),colorgreen;
STICKLINE(C>短線(xiàn)多,短線(xiàn)多,短線(xiàn)空,0.1,1),colorred;
STICKLINE(C<短線(xiàn)空,短線(xiàn)多,短線(xiàn)空,0.1,1),colorgreen;
長(zhǎng)線(xiàn)多:EMA(H,90),colormagenta;
長(zhǎng)線(xiàn)空:EMA(L,90),colorblue;
長(zhǎng)線(xiàn)波動(dòng):長(zhǎng)線(xiàn)多-長(zhǎng)線(xiàn)空,coloryellow,NODRAW;
NOTEXT長(zhǎng)線(xiàn)空0:IF(C>長(zhǎng)線(xiàn)空,長(zhǎng)線(xiàn)空,DRAWNULL),colormagenta;
NOTEXT長(zhǎng)線(xiàn)空1:IF(C<長(zhǎng)線(xiàn)空,長(zhǎng)線(xiàn)空,DRAWNULL),colorblue;
NOTEXT長(zhǎng)線(xiàn)多0:IF(C>長(zhǎng)線(xiàn)多,長(zhǎng)線(xiàn)多,DRAWNULL),colormagenta;
NOTEXT長(zhǎng)線(xiàn)多1:IF(C<長(zhǎng)線(xiàn)多,長(zhǎng)線(xiàn)多,DRAWNULL),colorblue;
STICKLINE(C>長(zhǎng)線(xiàn)多,長(zhǎng)線(xiàn)多,長(zhǎng)線(xiàn)空,0.1,1),colormagenta;
STICKLINE(C<長(zhǎng)線(xiàn)空,長(zhǎng)線(xiàn)多,長(zhǎng)線(xiàn)空,0.1,1),colorblue;
空:=REF(C,1)>REF(短線(xiàn)空,1) AND C<短線(xiàn)空 AND C<REF(C,1);
多:=REF(C,1)<REF(短線(xiàn)多,1) AND C>短線(xiàn)多 AND C>REF(C,1);
空1:=TFILTER(多,空,2);
多1:=TFILTER(多,空,1);
DRAWTEXT(空1,短線(xiàn)多*1.04,'空'),NODRAW;
DRAWTEXT(多1,短線(xiàn)空*0.96,'多'),NODRAW;
DRAWICON(空1,H*1.04,2);
DRAWICON(多1,L*0.96,1);
倉(cāng)位4:=(C>短線(xiàn)多 AND C<長(zhǎng)線(xiàn)多);
倉(cāng)位4B:=TFILTER(倉(cāng)位4,空,1);
DRAWTEXT(倉(cāng)位4B,H*1.02,'四'),coloryellow;
倉(cāng)位10:=C>短線(xiàn)多 AND C>長(zhǎng)線(xiàn)多;
倉(cāng)位10B:=TFILTER(倉(cāng)位10, 空,1);
DRAWTEXT(倉(cāng)位10B,H*1.02,'拾'),coloryellow;
倉(cāng)位44:=(REF(C,3)>REF(長(zhǎng)線(xiàn)多,3)) OR (REF(C,2)>REF(長(zhǎng)線(xiàn)多,2))OR (REF(C,1)>REF(長(zhǎng)線(xiàn)多,1)) AND (C>短線(xiàn)空 AND C<長(zhǎng)線(xiàn)空);
倉(cāng)位44B:=TFILTER(倉(cāng)位44,倉(cāng)位10,1);
DRAWTEXT(倉(cāng)位44B,H*1.02,'四'),coloryellow;
倉(cāng)位110:=C>短線(xiàn)多 AND C>長(zhǎng)線(xiàn)多;
倉(cāng)位110B:=TFILTER(倉(cāng)位110,倉(cāng)位44B,1);
DRAWTEXT(倉(cāng)位110B,H*1.02,'拾'),coloryellow;
DRAWTEXT(倉(cāng)位44B,H*1.02,'四'),coloryellow;
倉(cāng)位0:=C<短線(xiàn)空 AND C<長(zhǎng)線(xiàn)空;
倉(cāng)位0B:=TFILTER(倉(cāng)位0,多,1);
DRAWTEXT(倉(cāng)位0B,L*0.99,'零'),coloryellow;
倉(cāng)位6:=C<短線(xiàn)空 AND C>長(zhǎng)線(xiàn)空;
倉(cāng)位6B:=TFILTER(倉(cāng)位6,多,1);
DRAWTEXT(倉(cāng)位6B,L*0.99,'六'),coloryellow;
A1:=C>REF(C,4);
A2:=BARSLASTCOUNT(A1);
A3:=REF(A2,1)=8 AND A2>REF(A2,1);
A4:=REF(BETWEEN(A2,5,8),1) AND A2<REF(A2,1);
A5:=ISLASTBAR AND BETWEEN(A2,6,8);
A6:=(BACKSET(A3>0,9) OR BACKSET(A4>0,A2+1)*0 OR BACKSET(A5>0,A2))*A2;
DRAWTEXT(A6>0,H+H*0.02,VAR2STR(A6,0)),COLORFF00FF;
DRAWTEXT(A2=9,H+H*0.02,'9'),COLOR00FF00;
B1:=C<REF(C,4);
B2:=BARSLASTCOUNT(B1);
B3:=REF(B2,1)=8 AND B2>REF(B2,1);
B4:=REF(BETWEEN(B2,5,8),1) AND B2<REF(B2,1);
B5:=ISLASTBAR AND BETWEEN(B2,6,8);
B6:=(BACKSET(B3>0,9) OR BACKSET(B4>0,B2+1)*0 OR BACKSET(B5>0,B2))*B2;
DRAWTEXT(B6>0,L-L*0.02, VAR2STR(B6,0)),COLOR00FF00;
DRAWTEXT(B2=9,L-L*0.02,'9'),COLORFF00FF;
[ 本帖最后由 股癡2003 于 2017-8-3 17:28 編輯 ]
本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶(hù)發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)
點(diǎn)擊舉報(bào)。