把哭臉移到K線頂部 [文華財經]
-
咨詢內容：
把哭臉移到K線頂部，謝謝
TY:=C;
CURRBARSCOUNT:=DATACOUNT-DAYBARPOS+1;
AAL1:=REF(TY,10)=HHV(TY,2*10+1);
BB1:=FILTER(AAL1,10);
CL1:=BACKSET(BB1,10+1);
HDL:=FILTER(CL1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1);
BB2:=FILTER(AA2,10);
CC2:=BACKSET(BB2,10+1);
LDL:=FILTER(CC2,10);
前期高位:REF(C,BARSLAST(HDL)),LINETHICK2,COLORYELLOW;DRAWTEXT(CURRBARSCOUNT=8,前期高位,'箱體高點'),COLORCYAN;
前期低位:REF(L,BARSLAST(LDL)),LINETHICK2,COLORFF0000;
DRAWTEXT(CURRBARSCOUNT=8,前期低位,'箱體低點'),COLORRED;
BP1:=MA(C,1);
BP2:=SMA(SMA(SMA(BP1,2,1),2,1),2,1);
SMA2:=MA(BP2,3);
停損下限:IF(LLV(MA(BP2,8),3)<BP2,LLV(MA(BP2,8),3),BP2),LINETHICK4;
IF(BP2>SMA2,BP2,NULL),COLORRED,LINETHICK4;X:=2;//如果距離還是較近，可以調大X值，設置為20等數值
DRAWTEXT( CROSS(BP2>SMA2,0.5),L-X,'多'),FONTSIZE36,COLORRED,VALIGN0;
IF(BP2<SMA2,BP2,NULL),COLORGREEN,LINETHICK4;
DRAWTEXT( CROSS(BP2<SMA2,0.5),H+X,'空'),FONTSIZE36,COLORCYAN,VALIGN2;//STICKLINE1(BP2>停損下限,BP2,停損下限,0.1,0),COLORRED;
//STICKLINE1(BP2<停損下限,BP2,停損下限,0.1,0),COLORGREEN;SNAKEA:=HHV(MA(BP2,1),13),COLORYELLOW,LINETHICK4;
DRAWCOLORLINE(SNAKEA>REF(SNAKEA,1),SNAKEA,COLORYELLOW,COLORGREEN),LINETHICK3;
//STICKLINE1(SNAKEA>BP2 AND BP2>SMA2,SNAKEA,BP2,0.1,0),COLORLIGHTGREEN;
//STICKLINE1(SNAKEA>SMA2 AND BP2<SMA2,SNAKEA,SMA2,0.1,0),COLORLIGHTGREEN;HIGHN:=10;
LOWN:=10;
HIGHDISPLAY:=0;
LOWDISPLAY:=0;
ZGDISPLAY:=0;
MADISPLAY:=0;
AAB:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AAB,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DRAWICON(CC,H,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=REFX1(DINGBUTS,10000);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=REFX1(DINGBUTS1,10000);
DINGBU2:=REF(DINGBU1,DDD+1);
MMM:=IF(CURRBARSCOUNT>GDCS2,0,1);
DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORGREEN,DOT;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,DOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,DOT;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=REFX1(DDTS1,10000);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=REFX1(DDTS2,10000);
DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1), COLORRED,DOT;
//ZGSTAR:=(高點壓力+低點支撐)/2;
//ZGEND:=REFX1((高點壓力+低點支撐)/2,10000);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
//DRAWLINE(CURRBARSCOUNT=STARDAY,
??
?來源:程序化99
-
文華技術人員：
?哭臉圖標現在就是在k線頂部的，您是覺得哪里不對？
?
?來源: www.tumamayizhan.com
-
文華客服：
太遠了小級別看不見，移到臘蠟圖當根餞頂上
?
-
網友回復：
?
TY:=C;
CURRBARSCOUNT:=DATACOUNT-DAYBARPOS+1;
AAL1:=REF(TY,10)=HHV(TY,2*10+1);?
BB1:=FILTER(AAL1,10);?
CL1:=BACKSET(BB1,10+1);?
HDL:=FILTER(CL1,10);
AA2:=REF(TY,10)=LLV(TY,2*10+1);?
BB2:=FILTER(AA2,10);?
CC2:=BACKSET(BB2,10+1);?
LDL:=FILTER(CC2,10);
前期高位:REF(C,BARSLAST(HDL)),LINETHICK2,COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=8,前期高位,'體高點',COLORCYAN;
前期低位:REF(L,BARSLAST(LDL)),LINETHICK2,COLORFF0000;
DRAWTEXT(CURRBARSCOUNT=8,前期低位,'體低點',COLORRED;
BP1:=MA(C,1); BP2:=SMA(SMA(SMA(BP1,2,1),2,1),2,1); SMA2:=MA(BP2,3); 停損下限:IF(LLV(MA(BP2,8),3)<BP2,LLV(MA(BP2,8),3),BP2),LINETHICK4; IF(BP2>SMA2,BP2,NULL),COLORRED,LINETHICK4; X:=2;//如果距離還是較近，可以調大X值，設置為20等數值 DRAWTEXT( CROSS(BP2>SMA2,0.5),L-X,'',FONTSIZE36,COLORRED,VALIGN0; IF(BP2<SMA2,BP2,NULL),COLORGREEN,LINETHICK4; DRAWTEXT( CROSS(BP2<SMA2,0.5),H+X,'',FONTSIZE36,COLORCYAN,VALIGN2; //STICKLINE1(BP2>停損下限,BP2,停損下限,0.1,0),COLORRED; //STICKLINE1(BP2<停損下限,BP2,停損下限,0.1,0),COLORGREEN; SNAKEA:=HHV(MA(BP2,1),13),COLORYELLOW,LINETHICK4; DRAWCOLORLINE(SNAKEA>REF(SNAKEA,1),SNAKEA,COLORYELLOW,COLORGREEN),LINETHICK3; //STICKLINE1(SNAKEA>BP2 AND BP2>SMA2,SNAKEA,BP2,0.1,0),COLORLIGHTGREEN; //STICKLINE1(SNAKEA>SMA2 AND BP2<SMA2,SNAKEA,SMA2,0.1,0),COLORLIGHTGREEN; HIGHN:=10; LOWN:=10; HIGHDISPLAY:=0; LOWDISPLAY:=0; ZGDISPLAY:=0; MADISPLAY:=0; AAB:=REF(H,HIGHN)=HHV(H,2*HIGHN+1); QY:=BACKSET(AAB,HIGHN+1); CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1); DRAWICON(CC,H,2),VALIGN2; DDD:=BARSLAST(CC); GDTS:=IF(CC,CURRBARSCOUNT,0); DINGBU:=IF(DDD,REF(H,DDD),H); DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DINGBU1:=REF(DINGBU,DDD+1); GDCS1:=REFX1(DINGBUTS,10000); DINGBUTS1:=REF(DINGBUTS,DDD+1); GDCS2:=REFX1(DINGBUTS1,10000); DINGBU2:=REF(DINGBU1,DDD+1); MMM:=IF(CURRBARSCOUNT>GDCS2,0,1); DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORGREEN,DOT; DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,DOT; DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,DOT; AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1); QY1:=BACKSET(AA1,LOWN+1); CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1); DD1:=BARSLAST(CC1); DDTS:=IF(CC1,CURRBARSCOUNT,0); YDB:=IF(DD1,REF(L,DD1),L); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS); DDCS1:=REFX1(DDTS1,10000); ZDB:=REF(YDB,DD1+1); DDTS2:=REF(DDTS1,DD1+1); DDCS2:=REFX1(DDTS2,10000); DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1), COLORRED,DOT; //ZGSTAR:=(高點壓力+低點支撐)/2; //ZGEND:=REFX1((高點壓力+低點支撐)/2,10000); STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2); //DRAWLINE(CURRBARSCOUNT=STARDAY,
?
- 網友回復： 老師，麻煩您把4樓指標哭臉下臘蠟圖改為實心黃色，謝謝啊
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 262069696 或微信：cxhjy888 進行 有償收費 編寫！(注：由于人數限制，QQ或微信請選擇方便的一個聯系我們就行，謝謝您！)
相關文章
-
沒有相關內容
會員登錄/注冊