|
源碼一：
<br /><br />A1:=REF(H,8)=HHV(H,2*8+1);<br />B1:=FILTER(A1,8);<br />C1:=BACKSET(B1,8+1);<br />D1:=FILTER(C1,8);{高點(diǎn)}<br />R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);<br />DRAWLINE(D1,H,S11,H,1),COLORBLUE;<br />A2:=REF(L,8)=LLV(L,2*8+1);<br />B2:=FILTER(A2,8);<br />C2:=BACKSET(B2,8+1);<br />D2:=FILTER(C2,8);{低點(diǎn)}<br />T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);<br />DRAWLINE(D2,L,U11,L,1),COLORBLUE;<br />M:=INTPART(3*8/5);<br />A12:=REF(H,M)=HHV(H,2*M+1);<br />B12:=FILTER(A12,M);<br />C12:=BACKSET(B12,M+1);<br />D12:=FILTER(C12,M);{高點(diǎn)}<br />R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1);<br />DRAWLINE(D12,H,S112,H,1),COLORRED;<br />A22:=REF(L,M)=LLV(L,2*M+1);<br />B22:=FILTER(A22,M);<br />C22:=BACKSET(B22,M+1);<br />D22:=FILTER(C22,M);{低點(diǎn)}<br />T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); U112:=T112>REF(T112,1);<br />DRAWLINE(D22,L,U112,L,1),COLORRED;<br />VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);<br />VAR2222:=CROSS(VAR1111,0.9);<br />VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);<br />VAR4444:=CROSS(VAR3333,0.9);<br />壓力:= REF(HIGH,BARSLAST(VAR2222));<br />STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,LINETHICK3;<br />支撐:= REF(LOW,BARSLAST(VAR4444));<br />STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LINETHICK3;<br />下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);<br />RRRSV:=SMA(下檔線,3,1);<br />KKK:=SMA(RRRSV,3,1);<br />DDD:=((3 * RRRSV) - (2 * KKK));<br />JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);<br />RSV24:=SMA(JJ12,3,1);<br />K24:=SMA(RSV24,3,1);<br />D24:=((3 * RSV24) - (2 * K24));<br />壓力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF;<br />壓力位:=IF(ISLASTBAR,壓力2,DRAWNULL);<br />STICKLINE(ISLASTBAR ,壓力位,壓力位,120,0),LINETHICK4,COLORFFFFFF;<br />底部:=LLV(HIGH,30),COLOR00FF00;<br />底部位:=IF(ISLASTBAR,底部,DRAWNULL);<br />STICKLINE(ISLASTBAR ,底部位,底部位,100,0),LINETHICK4,COLOR00FF00; 源碼二： A1:=REF(H,8)=HHV(H,2*8+1); B1:=FILTER(A1,8); C1:=BACKSET(B1,8+1); D1:=FILTER(C1,8);{高點(diǎn)} R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1); DRAWLINE(D1,H,S11,H,1),COLORBLUE; A2:=REF(L,8)=LLV(L,2*8+1); B2:=FILTER(A2,8); C2:=BACKSET(B2,8+1); D2:=FILTER(C2,8);{低點(diǎn)} T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1); DRAWLINE(D2,L,U11,L,1),COLORBLUE; M:=INTPART(3*8/5); A12:=REF(H,M)=HHV(H,2*M+1); B12:=FILTER(A12,M); C12:=BACKSET(B12,M+1); D12:=FILTER(C12,M);{高點(diǎn)} R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1); DRAWLINE(D12,H,S112,H,1),COLORRED; A22:=REF(L,M)=LLV(L,2*M+1); B22:=FILTER(A22,M); C22:=BACKSET(B22,M+1); D22:=FILTER(C22,M);{低點(diǎn)} T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); U112:=T112>REF(T112,1); DRAWLINE(D22,L,U112,L,1),COLORRED; VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3); VAR2222:=CROSS(VAR1111,0.9); VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3); VAR4444:=CROSS(VAR3333,0.9); 壓力:= REF(HIGH,BARSLAST(VAR2222)); STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST(VAR2222)),0.5,1),COLOREA91B5,LINETHICK3; 支撐:= REF(LOW,BARSLAST(VAR4444)); STICKLINE(CLOSE,REF(LOW,BARSLAST(VAR4444)),REF(LOW,BARSLAST(VAR4444)),0.5,1),COLOR00B4FF,LINETHICK3; 下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); RRRSV:=SMA(下檔線,3,1); KKK:=SMA(RRRSV,3,1); DDD:=((3 * RRRSV) - (2 * KKK)); JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); RSV24:=SMA(JJ12,3,1); K24:=SMA(RSV24,3,1); D24:=((3 * RSV24) - (2 * K24)); 壓力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF; 壓力位:=IF(ISLASTBAR,壓力2,DRAWNULL); STICKLINE(ISLASTBAR ,壓力位,壓力位,120,0),LINETHICK4,COLORFFFFFF; 底部:=LLV(HIGH,30),COLOR00FF00; 底部位:=IF(ISLASTBAR,底部,DRAWNULL); STICKLINE(ISLASTBAR ,底部位,底部位,100,0),LINETHICK4,COLOR00FF00; |
|
|
