主圖：

我:=MA(C,1);
贏:=SMA(SMA(SMA(我,2,1),2,1),2,1);
龍:=MA(贏,3);
我贏龍頭:=(L+H+C*4)/6;
FILLRGN(贏,龍,贏>龍,RGB(255,96,96),贏<龍,RGB(0,224,224));

BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高點:REF(C,GDSJ),COLOR00FF00,POINTDOT,LINETHICK1;
突破:=CROSS(C,REF(高點,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,高點,高點,8,0),COLORFF00FF;
BDDD:=C=LLV(C,13);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;
低點:REF(C,DDSJ),COLOR00FFFF,POINTDOT,LINETHICK1;
STICKLINE(DDSJ<=6,低點,低點,8,0),COLOR00FF00;

附圖：

空方價:=EMA(HIGH,4);
多方價:=EMA(LOW,5);
B1:=IF(CROSS(CLOSE,空方價),1,IF(CROSS(多方價,CLOSE),-1,0));
B2:=REF(B1,BARSLAST(B1));
B3:=IF(B2=1,多方價,IF(B2=-1,空方價,0));
界點:B3,LINETHICK0,COLORFF00FF;
MA1:=B3;
C1:=(ABS(CLOSE-MA1))/CLOSE;
J:=(HHV(C1,160)+LLV(C1,160))/1.7;
CC:=IF(C1<=J-J/2,1,IF(C1<=J-J/3 AND C1>J-J/2,2,IF(C1<=J+J/3 AND C1>J-J/3,3,IF(C1<=2*J AND C1>J+J/3,4,IF(C1>2*J,5,0)))));
STICKLINE(CLOSE>MA1,0,CC*20,4,0),COLORFFFFFF;
STICKLINE(CLOSE>MA1,0,CC*20,2,0),COLOR0000FF;
STICKLINE(CLOSE > MA1 AND CC > 3,30,CC * 20,2,0),COLORFFFF00;
STICKLINE(CLOSE < MA1,0,-CC * 20,4,0),COLORFFFFFF;
STICKLINE(CLOSE < MA1,0,-CC* 20,2,0),COLORFF3333;
STICKLINE(CLOSE < MA1 AND CC > 3,-30,-CC*20,2,0),COLOR00FFFF;
W:=IF(1,0,0);
DRAWTEXT(CLOSE>=MA1 AND ISLASTBAR,1,'←多↑'),COLOR00FFFF;
DRAWTEXT(CLOSE < MA1 AND ISLASTBAR,-1 ,'←空↓'),COLORFFFF00;

 VAR6:=(2 * CLOSE+HIGH+LOW)/4;
VAR8:=LLV(LOW,34);
VARB:=HHV(HIGH,34);
BB:=EMA((VAR6-VAR8)/(VARB-VAR8)*100,9);
趨勢:EMA(0.667*REF(BB,1)+0.333*BB,2),LINETHICK0,COLORFFFF00;
Q:=(2*CLOSE+HIGH+LOW)/4;
A1:=LLV(LOW,24);
A2:=HHV(HIGH,24);
A:=EMA((Q-A1)/(A2-A1)*100,13);
B:=EMA(0.667*REF(A,1)+0.333*A,3);
力道:A-B,LINETHICK0,COLORFFFF00;