当前位置:分析家公式网 → 股票公式 → 飞狐公式 → 一键转帖:创新黄金分割,提供飞狐和KT交易师版本(源码、主图、贴图)
软件名称:[B]创新黄金分割,提供飞狐和KT交易师版本(源码、主图、贴图)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:6.00 KB
官方主页:Home Page
更新时间:2018-12-02 03:24:15
软件简介:
N:=SYSPARAM(3)-SYSPARAM(1)+10; A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1); B:=COUNT(A,N)=1; 前高:=IF(N>0,REF(H,BARSLAST(B)),0),COLORWHITE; A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1); B2:=A2>REF(A2,1); 前低:=REF(L,BARSLAST(B2)),COLORWHITE; hh:= 前高; ll:= 前低; HL:=hh-ll; wH := BARSLAST(H=hh); wL :=BARSLAST(L=ll); K := wH-wL; a2 :=IF(k<0,hh- HL*0.382,ll+HL*0.382); a3 :=IF(k<0,hh- HL*0.618,ll+HL*0.618); mHL:= hh-HL*0.5; A := ISLASTBAR; DRAWTEXT(A AND K<>3, a2,NUMTOSTR(a2,2)+ '\n F3'),ALIGN2,COLORYELLOW; DRAWTEXT(A AND K<>3, a3, NUMTOSTR(a3,2)+'\n F5'),ALIGN2,COLORYELLOW; HH:=SYSPARAM(4); LL:=SYSPARAM(5); P16:=(LL + ((HH - LL) * 0.618)); P17:=(LL + ((HH - LL) * 0.382)); DRAWTEXT(DATACOUNT-BARPOS+1=20,P17, NUMTOSTR(P17,2)+'\n F3'),ALIGN2,colorff; DRAWTEXT(DATACOUNT-BARPOS+1=20,P16, NUMTOSTR(P16,2)+'\n F5'),ALIGN2,colorff; P16:=(HH - ((LL + HH) * 0.382)); P17:=(HH - ((LL + HH) * 0.191)); DRAWTEXT(DATACOUNT-BARPOS+1=20,P17, NUMTOSTR(P17,2)+'\n F3'),ALIGN2,colormagenta; DRAWTEXT(DATACOUNT-BARPOS+8=20,P16, NUMTOSTR(P16,2)+'\n F5'),ALIGN2,colormagenta; HH:=SYSPARAM(6); LL:=SYSPARAM(5); P18:=(LL + ((HH - LL) * 1.618)); P19:=(LL + ((HH - LL) * 1)); P20:=(LL + ((HH - LL) * 0.618)); DRAWTEXT(DATACOUNT-BARPOS+1=40,P18, NUMTOSTR(P18,2)+'\n xop'),color99FF; DRAWTEXT(DATACOUNT-BARPOS+1=40,P19, NUMTOSTR(P19,2)+'\n op'),color99FF; DRAWTEXT(DATACOUNT-BARPOS+1=40,P20, NUMTOSTR(P20,2)+'\n cop'),color99FF; P18:=(HH + ((LL - HH) * 1.618)); P19:=(HH + ((LL - HH) * 1)); P20:=(HH + ((LL - HH) * 0.618)); DRAWTEXT(DATACOUNT-BARPOS+8=40,P18, NUMTOSTR(P18,2)+'\n xop'),Color00FF00; DRAWTEXT(DATACOUNT-BARPOS+1=40,P19, NUMTOSTR(P19,2)+'\n op'),Color00FF00; DRAWTEXT(DATACOUNT-BARPOS+1=40,P20, NUMTOSTR(P20,2)+'\n cop'),Color00FF00; A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1); B:=COUNT(A,N)=1; 前高:=IF(N>0,REF(H,BARSLAST(B)),0),COLORWHITE; A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1); B2:=A2>REF(A2,1); 前低:=REF(L,BARSLAST(B2)),COLORWHITE; hh:= 前高; ll:= 前低; HL:=hh-ll; wH := BARSLAST(H=hh); wL :=BARSLAST(L=ll); K := wH-wL; a1 :=IF(k<0,hh- HL*1.618,ll+HL*1.618); a2 :=IF(k<0,hh- HL*1,ll+HL*1); a3 :=IF(k<0,hh- HL*0.618,ll+HL*0.618); mHL:= hh-HL*0.5; A := ISLASTBAR; DRAWTEXT(A AND K<>3, a1, NUMTOSTR(a1,2)+'\n xop:'),ALIGN2,colormagenta; DRAWTEXT(A AND K<>3, a2,NUMTOSTR(a2,2)+ '\n op:'),ALIGN2,colormagenta; DRAWTEXT(A AND K<>3, a3, NUMTOSTR(a3,2)+'\n cop::'),ALIGN2,colormagenta;
[url=http://www.70822.com/soft/sort013/sort02/down-131097.html]创新黄金分割,提供飞狐和KT交易师版本(源码、主图、贴图)[/url]