:{顶部起点画线法}_hy.alg
名称: {顶部起点画线法}  类别:技术指标
说明:
公式组: *雪缘指标

转向:ZIG(3,10),LINETHICK2,colorFFB97A;
HH:HHV(HIGH,N);
LL:LLV(LOW,N);
<%
VH=FFL.VARDATA("HH")
VL=FFL.VARDATA("LL")
VN=FFL.VARDATA("N")
LAST=UBOUND(VH)
IF VN>LAST THEN VN=LAST+1
FOR I=LAST TO LAST-VN+1 STEP-1
    VH(I)=VH(LAST)
    VL(I)=VL(LAST)
NEXT
FFL.VARDATA("HH")=VH
FFL.VARDATA("LL")=VL
FFL.VARSTARTINDEX("HH")=LAST-VN+1
FFL.VARSTARTINDEX("LL")=LAST-VN+1
%>
HH,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH,'【顶部起点】↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH,HH,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.809,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.809,' 0.809↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.809,HH-(HH-LL)*0.809,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.618,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.618,' 0.618↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.618,HH-(HH-LL)*0.618,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.5,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.5,' 0.500↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.5,HH-(HH-LL)*0.5,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.382,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.382,' 0.382↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.382,HH-(HH-LL)*0.382,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.301,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.301,' 0.301↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.301,HH-(HH-LL)*0.301,2),ALIGN2,colorFFFF;
HH-(HH-LL)*0.14,POINTDOT,LINETHICK1,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,HH-(HH-LL)*0.14,' 0.140↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),HH-(HH-LL)*0.14,HH-(HH-LL)*0.14,2),ALIGN2,colorFFFF;
LL,colorFFFF;
DRAWTEXT(CLOSE>0 AND ISLASTBAR=1,LL,'〖黄金分割〗↓'),colorFFFF;
DRAWNUMBER(BARSCOUNT(LL)=N-(N-1),LL,LL,2),ALIGN2,colorFFFF;
TJ1:=HHVBARS(VOL,30)+1;
R30价:REF(CLOSE,BARSSINCE(BACKSET(ISLASTBAR,TJ1))),colorFFFF;
TJ2:=HHVBARS(VOL,60)+1;
R60价:REF(CLOSE,BARSSINCE(BACKSET(ISLASTBAR,TJ2))),colorFF;
A:=REF(CLOSE,1);
B:=REF(OPEN,1);
S:=(A+B)/2;
STICKLINE(A<>0,S,S,10,1),colorFFFF;
M2:=CLOSE+(HIGH-CLOSE)/2;
STICKLINE(CLOSE>OPEN,M2,M2,5,1),colorFFFFFF;
M3:=OPEN-(OPEN-LOW)/2;
STICKLINE(CLOSE>OPEN,M3,M3,5,1),colorFF00;
M4:=OPEN+(HIGH-OPEN)/2;
STICKLINE(CLOSE<OPEN,M4,M4,5,1),colorFFFFFF;
M5:=LOW+(CLOSE-LOW)/2;
STICKLINE(CLOSE<OPEN,M5,M5,5,1),colorFF00;
AA:=IF(LOW=2.22 OR LOW=3.33 OR LOW=4.44 OR LOW=5.55 OR LOW=6.66 OR LOW=7.77 OR LOW=8.88 OR LOW=9.99,1,0);
DRAWTEXT(AA=1,LOW*0.98,'★三'),colorFF00;
AA1:=IF(HIGH=2.22 OR HIGH=3.33 OR HIGH=4.44 OR HIGH=5.55 OR HIGH=6.66 OR HIGH=7.77 OR HIGH=8.88 OR HIGH=9.99,1,0);
DRAWTEXT(AA=1,LOW*0.98,'★三'),colorFF;
AA2:=IF(CLOSE=2.22 OR CLOSE=3.33 OR CLOSE=4.44 OR CLOSE=5.55 OR CLOSE=6.66 OR CLOSE=7.77 OR CLOSE=8.88 OR CLOSE=9.99,1,0);
DRAWTEXT(AA=1,LOW*0.98,'★三'),colorFFFF;
DRAWTEXT(REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND CLOSE/OPEN>=0.55 AND CLOSE>REF(CLOSE,2),LOW*0.95,'弃婴子'),colorFFFF;
DRAWTEXT(OPEN>CLOSE AND OPEN/REF(CLOSE,1)>=1+4/100 AND CLOSE/OPEN<=1-5/100,LOW*0.98,'冒阴'),colorFF00FF;
DRAWTEXT(OPEN<CLOSE AND OPEN/REF(CLOSE,1)<=1-4/100 AND CLOSE/OPEN>=1+7/100,LOW*0.99,'低开'),colorFFFF00;
A:=REF(CLOSE,1);
B:=REF(OPEN,1);
S:=(A+B)/2;
十八:MA(CLOSE,18),LINETHICK2,colorFF;
EMA１８:EMA(CLOSE,18),LINETHICK2,colorFF00;