因為好奇 如何畫出重複幾K
沒使用條件句 學習上較簡單
//N 請自行帶入參數
H01a:=H=HHV(H,N); H01:=FILTERX(H01a,N); H01b:=BARSLAST(H01); H01c:=SETVAL(REFX(H01,1),H01b+1,-H01b,H01b+1);
H01H:=REF(H,H01b);
STICKLINE(H01b>=0,H01H,H01H,10,0),COLORRED,LINEDOT;
STICKLINE(H01b>=0,H01H,H01H,10,0),COLORRED,LINEDOT,SHIFT6;
DRAWNUMBER(H01,H,H,0),COLORRED,PXUP25,ALIGN0;
H02:=LLV(L,H01c); H02L:=SETVAL(REFX(H01,1) OR ISLASTBAR,H02,-H01b,H02);
H03:=L=H02L AND L<REFX(L,1); H03b:=BARSLAST(H03);
H04L:=REF(L,H03b);// H04L:=SETVAL(REFX(H03,1) OR ISLASTBAR,H04La,-H03b,H04La);
STICKLINE(H03b>=0,H04L,H04L,10,0),COLORGREEN,LINEDOT;
STICKLINE(H03b>=0,H04L,H04L,10,0),COLORGREEN,LINEDOT,SHIFT6;
DRAWNUMBER(H03,L,L,0),COLORGREEN,PXDN10,ALIGN0;
H05:=SUM(H01,0); H06:=SUM(H03,0);
STICKLINE(H05=H05[DATACOUNT] AND H01b>=0,H01H,H01H,10,0),COLORRED;
STICKLINE(H06=H06[DATACOUNT] AND H03b>=0,H04L,H04L,10,0),COLORGREEN;
__________________
至誠能勝天下至偽
至拙能勝天下至巧
|