谁能编个通达信的波神凯线？

大家用Fibonacci就可以拉 100%（0线）， 150%（开门）， 200%（1线）， 240%（2线），275%（2线半），310%（3线），370%（4线），410%（5线），470%（6线），540%（7线），600%（8线），680%（9线，极限） a,o)i8G9R<  
dq%N,1.F  
然后自己用顶/底部的单根K线测算目标。。。指标很fancy，实用价值为零

哪位高手能编个通达信的波神凯线？




破译波神凯线测量参数

开门线:161.8% (实际为:150.8%)
一线:200%
二线:240%
三线:305%
四线:375%
五线:415%
六线:480%
七线:550%
八线:610%
关门线:690%

使用方法：
1，做多时：用波段相对低点K线的长度乘以参数的百分比值+此K线的最低点价格。
2，做空时：用波段相对高点K线的最高价减去此K线长度乘以参数的百分比值。




原码!!!


波神上升
X1:=SYSPARAM(1)=BARPOS;
X2:=SYSPARAM(2)=BARPOS;
z1:=hhv(HIGH,n);
z2:=llv(LOW,n);
DRAWTEXT(X1 ,hhv(HIGH,n),'----------------------------------------------------------------------------------------------------'),colorFFFFFF;
DRAWTEXT(X1 ,llv(LOW,n),'----------------------------------------------------------------------------------------------------'),colorFFFFFF;
DRAWTEXT(X1 ,z1+(z1-z2)*0.9406,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*1.2673,'----------------------------------------------------------------------------------------------------'),colorFFFF;
DRAWTEXT(X1 ,z1+(z1-z2)*1.9505,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*2.6139,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*3.0297,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*3.5644,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*4.2319,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z1+(z1-z2)*4.8551,'----------------------------------------------------------------------------------------------------'),colorFF00FF;


波神下降
X1:=SYSPARAM(1)=BARPOS;
X2:=SYSPARAM(2)=BARPOS;
z1:=hhv(HIGH,n);
z2:=llv(LOW,n);
DRAWTEXT(X1 ,hhv(HIGH,n),'----------------------------------------------------------------------------------------------------'),colorFFFFFF;
DRAWTEXT(X1 ,llv(LOW,n),'----------------------------------------------------------------------------------------------------'),colorFFFFFF;
DRAWTEXT(X1 ,z2-(z1-z2)*0.9406,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*1.2673,'----------------------------------------------------------------------------------------------------'),colorFFFF;
DRAWTEXT(X1 ,z2-(z1-z2)*1.9505,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*2.6139,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*3.0297,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*3.5644,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*4.2319,'----------------------------------------------------------------------------------------------------'),colorFF00FF;
DRAWTEXT(X1 ,z2-(z1-z2)*4.8551,'----------------------------------------------------------------------------------------------------'),colorFF00FF;