版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、.:.;【大智慧】极品黄金上涨家数、黑马线、趋势线-目的公式源码K(1,1,3); DRAWGBKLAST(C0,STRIP(RGB(90,90,90),RGB(0,0,0),0);ema13:ema(c,13),colorblue,linethick2;ema34:ema(c,34),colorred,linethick2;ema55:ema(c,55),coloryellow,linethick2;ema89:ema(c,89),colorwhite,linethick2;T := BARSLAST(DISPSTATUS=1)+1;A := DISPSTATUS=2;HH := HHV(H
2、, T);LL := LLV(L, T);HL := HH-LL;wH := HHVBARS(H, T);wL := LLVBARS(L, T);KK := wH-wL;mHL := HH-HL*0.5;if K=1 then begin HL191 := (HH-LL)*0.191; HL382 := (HH-LL)*0.382; HL618 := (HH-LL)*0.618; HL809 := (HH-LL)*0.809; if KK0 then begin a1 := HH-HL191; a2 := HH-HL382; a3 := HH-HL618; a4 := HH-HL809; en
3、d else begin a1 := LL+HL191; a2 := LL+HL382; a3 := LL+HL618; a4 := LL+HL809; endendif k=1 then begin HL125 := (HH-LL)*0.125; HL250 := (HH-LL)*0.25; HL375 := (HH-LL)*0.375; HL625 := (HH-LL)*0.625; HL750 := (HH-LL)*0.75; HL875 := (HH-LL)*0.875; if kk0 then begin b1 := HH-HL125; b2 := HH-HL250; b3 := H
4、H-HL375; b4 := HH-HL625; b5 := HH-HL750; b6 := HH-HL875; end else begin b1 := LL+HL125; b2 := LL+HL250; b3 := LL+HL375; b4 := LL+HL625; b5 := LL+HL750; b6 := LL+HL875; endend DRAWTEXT(A and K3,HH, 最高价:+HH),ALIGN2,colorgreen;DRAWTEXT(A and K3,LL, 最低价:+ll),ALIGN2,VALIGN2,colorgreen;DRAWTEXT(A and K3,m
5、HL, 50%:+mHL),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a1, 0.191:+NUMTOSTRN(a1,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a2, 0.382:+NUMTOSTRN(a2,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a3, 0.618:+NUMTOSTRN(a3,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a4, 0.809:+NUMTOSTRN(a4,2),ALIGN2,color00ffff;DRA
6、WTEXT(A and K=1, b1, 1/8:+NUMTOSTRN(b1,2),ALIGN2,colorgreen;DRAWTEXT(A and K=1, b2, 1/4:+NUMTOSTRN(b2,2),ALIGN2,colorgreen;DRAWTEXT(A and K=1, b3, 3/8:+NUMTOSTRN(b3,2),ALIGN0,colorgreen;DRAWTEXT(A and K=1, b4, 5/8:+NUMTOSTRN(b4,2),ALIGN0,colorgreen;DRAWTEXT(A and K=1, b5, 3/4:+NUMTOSTRN(b5,2),ALIGN2
7、,colorgreen;DRAWTEXT(A and K=1, b6, 7/8:+NUMTOSTRN(b6,2),ALIGN2,colorgreen;DRAWTEXT(A and K3,HH, ),ALIGN2,colorred,linethick7;DRAWTEXT(A and K3,LL, ),ALIGN2,colorred,linethick7;DRAWTEXT(A and K3,mHL,),ALIGN2,colorff0000,linethick7;DRAWTEXT(A and K=1, a1, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A an
8、d K=1, a2, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, a3, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, a4, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, b1, ),ALIGN2,color00FF00;DRAWTEXT(A and K=1, b2, ),ALIGN2,color00ff00;DRAWTEXT(A and K=1, b3, ),ALIGN0,color00ff00;DRAWTEXT(A
9、 and K=1, b4, ),ALIGN0,color00ff00;DRAWTEXT(A and K=1, b5, ),ALIGN2,color00ff00;DRAWTEXT(A and K=1, b6, ),ALIGN2,color00FF00;OO:=ma(O,22);j:=kdj.j#DAY;CC:=ma(c,22);hs:=vol/CAPITAL*100;jj:=(H+L+C)/3;qj0:=vol/IF(H=L,4,H-L);qj1:=IF(CAPITAL=0,qj0*(jj-MIN(C,O),qj0*(MIN(O,C)-L);qj2:=IF(CAPITAL=0,qj0*(MIN(
10、O,C)-L),qj0*(jj-MIN(C,O);qj3:=qj0*(H-MAX(O,C);qj4:=qj0*(MAX(C,O)-jj);qj5:=qj1+qj2;qj6:=qj3+qj4;DD:=(qj5-qj6)/(qj5+qj6)*100;DDX:=(qj1+qj2)-(qj3+qj4)/sum(vol,10)*100;DDZ:=DD*17;DDY:=(qj2+qj4)-(qj1+qj3)/sum(vol,10)*100;bb:=(cross(j,0)and (ddx0 and ddy0) or DDZ400);bbd:=EMA(总0#WEEK,2)/sum(IF(CAPITAL=0,r
11、ef(INDEXA,1),ref(vol,1),5)*100;XH1:=ref(bbd,1)ref(bbd,1) and bbd-10;XH2:=ref(bbd,1)=15 and bbdref(bbd,1) and bbd=REF(c,1),H,L,0,0),COLOR0000FF;STICKLINE(C=REF(c,1),C,O,8,0),COLOR0000bb;STICKLINE(C=REF(c,1),C,O,5,0),COLOR0000dd;STICKLINE(C=REF(c,1),C,O,3,0),COLOR0000ee;STICKLINE(C=REF(c,1),C,O,1,0),C
12、OLOR0000ff;STICKLINE(CREF(c,1),H,L,0,0),COLORFFFF00;STICKLINE(CREF(c,1),C,O,8,0),COLOR999900;STICKLINE(CREF(c,1),C,O,5,0),COLORbbbb00;STICKLINE(CREF(c,1),C,O,3,0),COLORdddd00;STICKLINE(C0,CC,OO,8,0),COLORFF00FF;STICKLINE(bbd0,CC,OO,8,0),COLOR00FF00;DRAWICON(XH1,l*0.98,7);DRAWICON(XH2,h*1.02,8);DRAWT
13、EXT(bb,L*0.98,点钱),COLOR00FFFF;DRAWTEXTREL(20,0,上涨家数:+NUMTOSTRN(DYNAINFO(69),0)+ 家),COLOR0066FF;DRAWTEXTREL(180,0,下跌家数:+NUMTOSTRN(DYNAINFO(70),0)+ 家),COLOR99FF99;DRAWTEXTREL(340,0,平盘家数:+NUMTOSTRN(DYNAINFO(71),0)+ 家),COLOREEEEEE;DRAWTEXTREL(20,50,STKLABEL+ +STKNAME+ +STRLEFT(BKNAME,40),ColorFFB060;x:=
14、BARSLAST(DISPSTATUS=1)+1; ah:=hhvall(hhv(h,x); al:=llvall(llv(l,x); x1:=(C+L+H)/3;bb13:=atan(ema(x1,13)-ref(ema(x1,13),1)*3.1416*10;ema8:=ema(c,8);x1:=(C+L+H)/3;bb13:=atan(ema(x1,13)-ref(ema(x1,13),1)*3.1416*10;ema8:=ema(c,8);AA1:=AMOUNT/V;BB1:=L1.2;DD1:=LMA(C,5)*0.921;EE1:=VMA(V,5)*1.5;FF1:=BB1 AND
15、 CC1 AND DD1 AND EE1;DRAWTEXT(ff1,(LOW* 0.99),老鼠仓),Color4080FF;A51:=3*SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1)-2*SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1);黑马线:=EMA(A51,5);A54:=(C-LLV(L,21)/(HHV(H,21)-LLV(L,21)*100;趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2);DRAWTEXT(CROSS(趋势线,0)AND 黑
16、马线40,(HIGH* 0.97),大黑马),COLORYELLOW;LC:=REF(CLOSE,1);RSI:=(SMA(MAX(CLOSE - LC),0),3,1) / SMA(ABS(CLOSE - LC),3,1) * 100);FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),底背叛),ColorA6E500;DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),顶背叛),Color1880FF;VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA(CLOSE-Var2)/(Var3-Var2)*4,4)*25;留意买:=IF(Var410),80,100);RSV:=(C-LLV(L,9)/(HHV(H,9)-LLV(L,9)*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J0,10,0);BDDD:=LLV(J,2)=LLV(J,8);买入:=IF(CROSS(J,REF(J+0.01,1) AND BDDD AND J20,30,0);DRAWTEXT(买入 AN
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 统编语文小学二年级下册第一单元测试卷及答案06
- 长度校准测试题目及答案解析
- 2026年三维扫描仪行业发展分析:分辨率定义测试方法与高性能产品研究报告
- 安全专工招聘测评试题及答案解析
- CorelDRAW案例教程 课件全套1-8 模块1 认识 CorelDRAW - -包装设计
- 啤酒销售人员年终述职总结
- 历年小学科学试卷及答案解析
- 2025届云南省德宏州数学四下期末复习检测模拟试题含解析
- 出纳培训试题及答案
- 病房巡视试题及答案
- 开学第一课 课件-2025-2026学年统编版道德与法治八年级上册
- “筑梦航天”青少年航天知识大赛试题与答案
- 公安刑侦业务知识培训课件
- 雷电灾害专项应急预案
- rma销货退回管理办法
- CJ/T 158-2002城市污水处理厂管道和设备色标
- 2025年版!药食同源物质目录(106种)
- 《海洋遥感技术》课件
- (高清版)DB23∕T 3699-2024 养老机构失智症老人照护规范
- DL∕T 802.8-2023 电力电缆导管技术条件 第8部分:塑钢复合电缆导管
- 变压器局部放电的
评论
0/150
提交评论