股民大家庭

标题: [飞狐]飞狐一半一半源码公式 [打印本页]

作者: 我是一个兵 时间: 2010-1-10 23:26
标题: [飞狐]飞狐一半一半源码公式
飞狐一半一半源码公式：
input:p1(30), 几份(4),添加速阻(1,0,1);
波段高低:zig(4,p1),linethick0;

DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h,0),COLORAA77EE;
DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l,0),COLOREE9933;

一半:(PEAK(4,p1,1)+TROUGH(4,p1,1))/2,linethick0;
if 几份=2 then
begin

stickline(一半=ref(一半,1),一半,一半,10,0),coloree33aa;
end;

if 几份=4 then
begin

stickline(一半=ref(一半,1),一半,一半,10,0),coloree33aa;

四分之三:(PEAK(4,p1,1)*3+TROUGH(4,p1,1))/4,linethick0;
stickline(四分之三=ref(四分之三,1),四分之三,四分之三,10,0),coloree33aa;
四分之一:(PEAK(4,p1,1) +TROUGH(4,p1,1) *3)/4,linethick0;
stickline(四分之一=ref(四分之一,1),四分之一,四分之一,10,0),coloree33aa;
end;

if 几份=3 then
begin
三分之二:(PEAK(4,p1,1)*2+TROUGH(4,p1,1))/3,linethick0;
stickline(三分之二=ref(三分之二,1),三分之二,三分之二,10,0),coloree33aa;

三分之一:(PEAK(4,p1,1)+TROUGH(4,p1,1)*2)/3,linethick0;
stickline(三分之一=ref(三分之一,1),三分之一,三分之一,10,0),coloree33aa;
end;

{☆§-------------------------------------§☆}

if 添加速阻=1 then begin

if 几份=2 then
begin
DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))/2,0),COLOR77eeEE;
//DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),TROUGH(4,p1,1) ,0),COLORAA77EE;

DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))/2 ,0),COLOReeee99;
//DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),PEAK(4,p1,1),0),COLOREE9933;

end;

if 几份=4 then
begin
DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))/2,0),COLORAA77EE;

DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))/4,0),COLORAA77EE;
DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))*3/4,0),COLORAA77EE;
end;

if 几份=4 then
begin
DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))/2 ,0),COLOREE9933;

DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))/4 ,0),COLOREE9933;
DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))*3/4 ,0),COLOREE9933;
end;

if 几份=3 then
begin
DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))/3*2 ,0),COLOR3377aa;
DRAWLINE(zig(4,p1)=TROUGH(4,p1,1),l,zig(4,p1)=PEAK(4,p1,1),h-(PEAK(4,p1,1)-TROUGH(4,p1,1))/3,0),COLOR3377aa;

DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))/3 ,0),COLOR99ee77;
DRAWLINE(zig(4,p1)=PEAK(4,p1,1),h,zig(4,p1)=TROUGH(4,p1,1),l+(PEAK(4,p1,1)-TROUGH(4,p1,1))/3*2 ,0),COLOR99ee77;

335122_1.jpg (954.05 KB, 下载次数: 0)

335122_2.jpg (827.81 KB, 下载次数: 0)

335122_3.jpg (163.42 KB, 下载次数: 0)

1565108_600000.png (25.68 KB, 下载次数: 0)

欢迎光临股民大家庭 (https://gupiao168.com/)