分析家的<分价图>+直线黄金分割线
5万
回贴人数还不到下载人数的1/4,用源码就可想而知了。真有点不想给,想想还是 算了,自觉不自觉还是由他(她)自已。 黄金分割线可以加到任何主图后面。 {分价图} DRAWGBK(C,STRIP(RGB(100,50,0),RGB(100,100,0),0)); x11:=(C+L+H)/3; x22:=EMA(x11,6); x33:=EMA(x22,5); STICKLINE(x22>=x33,x22,x33,10,1),Color008000; STICKLINE(x22<x33,x22,x33,10,1), COLOR0000ff; X1:=HHV(H,3); X2:=LLV(L,3); Xc:=c; Xh:=h; Xl:=l; Ycjy:=0; if Xh>REF(x1,1) and Xc>REF(Xc,1) then Ycjy:=x2; ELSE IF Xl<REF(x2,1) and Xc<REF(Xc,1) Then Ycjy:=x1; else Ycjy:=REF(Ycjy,1); y1:=hhv(h,13); y2:=if(y1>ref(y1,30),y1,ref(y1,8)); RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); j1:=-(3*K-2*D)+100; j2:=if(j1<0 ,0 ,j1); j:=if(j2>100,100,j2); 超短:=SMA(AMOUNT,3,1)/100000000; 中线:=SMA(AMOUNT,13,1)/100000000; 压力:if(j<k and 超短>中线 and c<y2,Ycjy,y2),COLORCYAN,LINETHICK1;; 支撑:Ycjy,COLORGREEN,LINETHICK2; aa1:=ema(c,2); bb1:=ema(aa1,2); a:=ma(bb1,3); aa2:=ema((h+c+o)/3,18); dd3:=a>=aa2 and c>aa2; dd4:=a<aa2 ; dd5:=a>aa2 ; STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99; STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99; STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A; STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A; STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred; STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred; STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff; STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff; STICKLINE(MA(C,13)>O and C>MA(C,13) and O<c,O,C,8,0),coloryellow; STICKLINE(MA(C,13)>O and C>MA(C,13),H,L,0.8,1),coloryellow; {黄金分割线} lhnh:=BARSLAST(DISPSTATUS=1)+1; nnl:=DISPSTATUS=2; hhhh:=HHV(h ,lhnh); llll:=llV(l ,lhnh); q809:=llll+(hhhh-llll)*0.809; q618:=llll+(hhhh-llll)*0.618; q500:=llll+(hhhh-llll)*0.5; q382:=llll+(hhhh-llll)*0.382; q191:=llll+(hhhh-llll)*0.191; DRAWTEXT(nnl,hhhh,' 最高价:'+hhhh),ALIGN0,Color00FFFF; DRAWTEXT(nnl,q809,' 19.1%:'+q809),ALIGN0,Color00FFFF; DRAWTEXT(nnl,q618,' 38.2%:'+q618),ALIGN0,Color00FFFF; DRAWTEXT(nnl,q500,' 50%:'+q500),ALIGN0,Color00FFFF; DRAWTEXT(nnl,q382,' 61.8%:'+q382),ALIGN0,Color00FFFF; DRAWTEXT(nnl,q191,' 80.9%:'+q191),ALIGN0,Color00FFFF; DRAWTEXT(nnl,llll,' 最低价:'+llll),ALIGN0,VALIGN2,Color00FFFF; DRAWTEXT(nnl,hhhh,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,LINETHICK3; DRAWTEXT(nnl,q809,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2; DRAWTEXT(nnl,q618,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2; DRAWTEXT(nnl,q500,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ColorFFFF00,ALIGN2,LINETHICK3; DRAWTEXT(nnl,q382,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2; DRAWTEXT(nnl,q191,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2; DRAWTEXT(nnl,llll,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,LINETHICK3; DRAWTEXT(nnl,llll*0.98,'·'),ALIGN0,VALIGN2,Color00FFFF; |
附件
附件
-
10.07 KB, 下载次数: 106, 下载积分: 共享币 -25 个
楼主 | 19楼 |
2楼 | 20楼 |
3楼 | 21楼 |
4楼 | 22楼 |
5楼 | 23楼 |
6楼 | 24楼 |
7楼 | 25楼 |
8楼 | 26楼 |
9楼 | 27楼 |
10楼 | 28楼 |
11楼 | 29楼 |
12楼 | 30楼 |
13楼 | |
14楼 | |
15楼 | |
16楼 | |
17楼 | |
18楼 |