干净测幅（源码主图通达信贴图）

分析家公式网,提供指标公式,股票软件用户登录 |

当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：干净测幅（源码主图通达信贴图）

软件名称：[B]干净测幅（源码主图通达信贴图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2016-08-17 01:01:26
软件简介:

站内智者发表了测幅公试，十分有利我们大家，只是我感觉有点影响视觉，画面繁重,今试作修饰望原作者谅解！
原作者原码:

A1:=10;

A2:=10;

A3:=ZIG(1,A1);

A4:=PEAK(1,A1,1);

A5:=TROUGH(1,A1,1);

CC:=IF((A3 < (REF(A3,1))),A4,A5),NODRAW,LINETHICK2;

点:CC>REF(CC,1) OR CC<REF(CC,1);

正距:=BARSLAST(点),NODRAW,LINETHICK2;

倒距:=IF(BARSNEXT(点=1)=DRAWNULL,CURRBARSCOUNT,BARSNEXT(点=1)),NODRAW;

A6:=CROSS((A4 - 0.02),A3);

A7:=CROSS(A3,(A5 + 0.02));

A8:=A2 / 100;

A9:=IF((A3 < (REF(A3,1))),A8,REVERSE(A8));

A10:=IF((A3 < (REF(A3,1))),A6,A7);

H1:=REF((CC * (1 - (A9 * 1))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H2:=REF((CC * (1 - (A9 * 2))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H3:=REF((CC * (1 - (A9 * 3))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H4:=REF((CC * (1 - (A9 * 4))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H5:=REF((CC * (1 - (A9 * 5))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H6:=REF((CC * (1 - (A9 * 6))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H7:=REF((CC * (1 - (A9 * 7))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H8:=REF((CC * (1 - (A9 * 8))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H9:=REF((CC * (1 - (A9 * 9))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H10:=REF((CC * (1 - (A9 * 10))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H11:=REF((CC * (1 - (A9 * 11))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H12:=REF((CC * (1 - (A9 * 12))),BARSLAST(A10)),DOTLINE,LINETHICK0;

H13:=REF((CC * (1 - (A9 * 13))),BARSLAST(A10)),DOTLINE,LINETHICK0;

{==========================}

SW2:=HHV(CROSS(H,H2) OR CROSS(H2,L),正距)AND 点=0,COLORWHITE;

SW3:=HHV(CROSS(H,H3) OR CROSS(H3,L),正距)AND 点=0,COLORWHITE;

SW4:=HHV(CROSS(H,H4) OR CROSS(H4,L),正距)AND 点=0,COLORWHITE;

SW5:=HHV(CROSS(H,H5) OR CROSS(H5,L),正距)AND 点=0,COLORWHITE;

SW6:=HHV(CROSS(H,H6) OR CROSS(H6,L),正距)AND 点=0,COLORWHITE;

SW7:=HHV(CROSS(H,H7) OR CROSS(H7,L),正距)AND 点=0,COLORWHITE;

SW8:=HHV(CROSS(H,H8) OR CROSS(H8,L),正距)AND 点=0,COLORWHITE;

SW9:=HHV(CROSS(H,H9) OR CROSS(H9,L),正距)AND 点=0,COLORWHITE;

SW10:=HHV(CROSS(H,H10) OR CROSS(H10,L),正距)AND 点=0,COLORWHITE;

SW11:=HHV(CROSS(H,H11) OR CROSS(H11,L),正距)AND 点=0,COLORWHITE;

SW12:=HHV(CROSS(H,H12) OR CROSS(H12,L),正距)AND 点=0,COLORWHITE;

SW13:=HHV(CROSS(H,H13) OR CROSS(H13,L),正距)AND 点=0,COLORWHITE;

AF2:REFX(HHV(SW2,正距)=1,倒距-1);

AF3:REFX(HHV(SW3,正距)=1,倒距-1);

AF4:REFX(HHV(SW4,正距)=1,倒距-1);

AF5:REFX(HHV(SW5,正距)=1,倒距-1);

AF6:REFX(HHV(SW6,正距)=1,倒距-1);

AF7:REFX(HHV(SW7,正距)=1,倒距-1);

AF8:REFX(HHV(SW8,正距)=1,倒距-1);

AF9:REFX(HHV(SW9,正距)=1,倒距-1);

AF10:REFX(HHV(SW10,正距)=1,倒距-1);

AF11:REFX(HHV(SW11,正距)=1,倒距-1);

AF12:REFX(HHV(SW12,正距)=1,倒距-1);

AF13:REFX(HHV(SW13,正距)=1,倒距-1);

A11:=BARSLAST((ISLASTBAR = 1)) + 1;

A12:=HHV(HIGH,100);

A13:=LLV(LOW,100);

A14:=IF((PERIOD = 12),1.00005,(IF((PERIOD < 3),1.0005,1.002)));

STICKLINE(((CC >= A13) AND (CC <= A12)),CC,(CC * A14),10,-1000),COLORRED;

STICKLINE(((CC >= A13) AND (CC <= A12)),H1,H1,5,0),COLORGRAY;

STICKLINE(((H1 > A13) AND (H1 < A12)) AND AF2=1,H2,H2,5,0),COLORGRAY;

STICKLINE(((H2 > A13) AND (H2 < A12)) AND AF3=1,H3,H3,5,0),COLORGRAY;

STICKLINE(((H3 > A13) AND (H3 < A12)) AND AF4=1,H4,H4,5,0),COLORGRAY;

STICKLINE(((H4 > A13) AND (H4 < A12)) AND AF5=1,H5,H5,5,0),COLORGRAY;

STICKLINE(((H5 > A13) AND (H5 < A12)) AND AF6=1,H6,H6,5,0),COLORGRAY;

STICKLINE(((H6 > A13) AND (H6 < A12)) AND AF7=1,H7,H7,5,0),COLORGRAY;

STICKLINE(((H7 > A13) AND (H7 < A12)) AND AF8=1,H8,H8,5,0),COLORGRAY;

STICKLINE(((H8 > A13) AND (H8 < A12)) AND AF9=1,H9,H9,5,0),COLORGRAY;

STICKLINE(((H9 > A13) AND (H9 < A12)) AND AF10=1,H10,H10,5,0),COLORGRAY;

STICKLINE(((H10 > A13) AND (H10 < A12)) AND AF11=1,H11,H11,5,0),COLORGRAY;

STICKLINE(((H11 > A13) AND (H11 < A12)) AND AF12=1,H12,H12,5,0),COLORGRAY;

STICKLINE(((H12 > A13) AND (H12 < A12)) AND AF13=1,H13,H13,5,0),COLORGRAY;

{WWW.70822.com}

DRAWTEXT(BARSLAST(A10)=1 ,H1,'10' ),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF2=1 ,H2,'20'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF3=1 ,H3,'30'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF4=1 ,H4,'40'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF5=1 ,H5,'50'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF6=1 ,H6,'60'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF7=1 ,H7,'70'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF8=1 ,H8,'80'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF9=1 ,H9,'90'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF10=1 ,H10,'100'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF11=1 ,H11,'110'),COLORC0C0C0;

DRAWTEXT(BARSLAST(A10)=1 AND AF12=1 ,H12,'120'),COLORC0C0C0;

通达信公式

[url=http://www.70822.com/soft/sort013/sort05/down-101611.html]干净测幅（源码主图通达信贴图）[/url]