涼風(fēng)無(wú)夢(mèng)老師源碼(通達(dá)信),含九轉(zhuǎn)公式和倉(cāng)位判斷,希望高手老師能全部改為大智慧的: 短線多:EMA(H,25),colorred; 短線空:EMA(L,25),colorgreen; 短線波動(dòng):短線多-短線空,coloryellow,NODRAW; NOTEXT短線空0:IF(C>短線空,短線空,DRAWNULL),colorred; NOTEXT短線空1:IF(C<短線空,短線空,DRAWNULL),colorgreen; NOTEXT短線多0:IF(C>短線多,短線多,DRAWNULL),colorred; NOTEXT短線多1:IF(C<短線多,短線多,DRAWNULL),colorgreen; STICKLINE(C>短線多,短線多,短線空,0.1,1),colorred; STICKLINE(C<短線空,短線多,短線空,0.1,1),colorgreen; 長(zhǎng)線多:EMA(H,90),colormagenta; 長(zhǎng)線空:EMA(L,90),colorblue; 長(zhǎng)線波動(dòng):長(zhǎng)線多-長(zhǎng)線空,coloryellow,NODRAW; NOTEXT長(zhǎng)線空0:IF(C>長(zhǎng)線空,長(zhǎng)線空,DRAWNULL),colormagenta; NOTEXT長(zhǎng)線空1:IF(C<長(zhǎng)線空,長(zhǎng)線空,DRAWNULL),colorblue; NOTEXT長(zhǎng)線多0:IF(C>長(zhǎng)線多,長(zhǎng)線多,DRAWNULL),colormagenta; NOTEXT長(zhǎng)線多1:IF(C<長(zhǎng)線多,長(zhǎng)線多,DRAWNULL),colorblue; STICKLINE(C>長(zhǎng)線多,長(zhǎng)線多,長(zhǎng)線空,0.1,1),colormagenta; STICKLINE(C<長(zhǎng)線空,長(zhǎng)線多,長(zhǎng)線空,0.1,1),colorblue; 空:=REF(C,1)>REF(短線空,1) AND C<短線空 AND C<REF(C,1); 多:=REF(C,1)<REF(短線多,1) AND C>短線多 AND C>REF(C,1); 空1:=TFILTER(多,空,2); 多1:=TFILTER(多,空,1); DRAWTEXT(空1,短線多*1.04,'空'),NODRAW; DRAWTEXT(多1,短線空*0.96,'多'),NODRAW; DRAWICON(空1,H*1.04,2); DRAWICON(多1,L*0.96,1); 倉(cāng)位4:=(C>短線多 AND C<長(zhǎng)線多); 倉(cāng)位4B:=TFILTER(倉(cāng)位4,空,1); DRAWTEXT(倉(cāng)位4B,H*1.02,'四'),coloryellow; 倉(cāng)位10:=C>短線多 AND C>長(zhǎng)線多; 倉(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)線多,3)) OR (REF(C,2)>REF(長(zhǎng)線多,2))OR (REF(C,1)>REF(長(zhǎng)線多,1)) AND (C>短線空 AND C<長(zhǎng)線空); 倉(cāng)位44B:=TFILTER(倉(cāng)位44,倉(cāng)位10,1); DRAWTEXT(倉(cāng)位44B,H*1.02,'四'),coloryellow; 倉(cāng)位110:=C>短線多 AND C>長(zhǎng)線多; 倉(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<短線空 AND C<長(zhǎng)線空; 倉(cāng)位0B:=TFILTER(倉(cāng)位0,多,1); DRAWTEXT(倉(cāng)位0B,L*0.99,'零'),coloryellow; 倉(cāng)位6:=C<短線空 AND C>長(zhǎng)線空; 倉(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 編輯 ] |
|