紅鳥公式集
走勢分析
VAR2:=LLV(LOW,18);
VAR3:=HHV(HIGH,18);
VAR4:=EMA(((CLOSE-VAR2)/(VAR3-VAR2))*(100),13);
VAR5:=EMA((0.61799997)*(REF(VAR4,1))+(0.38199999)*(VAR4),3);
drawtext((VAR5-REF(VAR5,1))>0,VAR5,'•'),Color00FFFF,POINTDOT,Linethick3;
drawtext((VAR5-REF(VAR5,1))<0,VAR5,'•'),ColorFF0000,POINTDOT,Linethick3;
drawtext(((VAR5-REF(VAR5,1)<0) AND (REF(VAR5,1)>REF(VAR5,2)) AND (VAR5>40)),(VAR5*0.98),'↓'),Color0000FF,Linethick3;
IF(CROSS(80,VAR5),80,100),ColorFFFFFF;
VAR6:=((CLOSE-MA(CLOSE,6))/(MA(CLOSE,6)))*(100);
VAR7:=((CLOSE-MA(CLOSE,12))/(MA(CLOSE,12)))*(100);
VAR8:=((CLOSE-MA(CLOSE,24))/(MA(CLOSE,24)))*(100);
VAR9:=(VAR6+(2)*(VAR7)+(3)*(VAR8))/(6);
VARA:=MA(VAR9,3);
警戒:IF((VARA<-6),15,0),ColorFFFF00;
15,Color0000FF;
50,Color008000;
80,ColorFF0000;

莊家抄底王
INPUT:週期(15,1,100), 過濾(8,1,100),選股(-26, -30,-20),抄底(-40,-50,-25);
售價一萬五千元:0,ColorFF00FF,POINTDOT;
VAR2:=MA(CLOSE,5);
VAR3:=MA(CLOSE,10);
VAR4:=MA(CLOSE,20);
VAR5:=MA(CLOSE,30);
VAR6:=(VAR2+VAR3+VAR4+VAR5)/(4);
VAR7:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR8:=((VAR6-REF(VAR6,週期))/(REF(VAR6,週期)))*(100);
VAR9:=EMA(VAR7,過濾);
紅包:IF((TROUGHBARS(3,15,1)=0) AND (HIGH>LOW+0.01),10,(-5)),Color00FF00;
反轉:STICKLINE(Var9>1*REF(Var9, 1), Var7, 0, 5, 0), COLOREE00EE;
持股:STICKLINE(Var7>1*REF(Var7, 1), Var7, Var9, 5, 0), COLORRED;
持幣:STICKLINE(Var7<1*REF(Var7, 1), Var7, Var9, 5, 1), COLORGREEN;
洗盤:STICKLINE(Var7<1*REF(Var7, 1) AND Var9>1*REF(Var9, 1), Var7, Var9, 10, 0), COLOR00EEFF;
VAR10:=((CLOSE-MA(CLOSE,58))/(MA(CLOSE,58)))*(100);
VAR11:=((VAR10>(1)*(REF(VAR10,1))) AND (VAR10<選股) AND (VAR10>抄底))*(1.5);
VAR12:=((VOL)/(CAPITAL))*(100);
VAR13:=LLVBARS(LOW,50);
VAR14:=SUM(VOL,VAR13);
VAR15:=HHVBARS(HIGH,50);
VAR16:=SUM(VOL,VAR15);
VAR17:=((CLOSE-REF(OPEN,VAR15))/(REF(OPEN,VAR15)))*(100);
VAR18:=((VAR16)/(CAPITAL))*(100);
VAR19:=((CLOSE-REF(OPEN,VAR13))/(REF(OPEN,VAR13)))*(100);
VAR20:=((VAR14)/(CAPITAL))*(100);
VAR21:=MA(CLOSE,3);
VAR22:=(REF(CLOSE,2))*(0.86500001);
VAR23:=(REF(CLOSE,13))*(0.77200001);
VAR24:=MIN(VAR22,VAR23);
VAR25:=MA(CLOSE,13);
抄底王:(IF(((CLOSE-VAR24)/(CLOSE)<0.02999999) AND (VAR17<(-35)) AND ((SUM(VAR12,5))/(5)<1.8),1,0))*(10),ColorFFFFFF;
DRAWTEXT(抄底王, 抄底王, ' 成功率90追 '), COLORFFAA00;
VAR26:=((CLOSE-REF(CLOSE,1))/(REF(CLOSE,1)))*(100);
VAR27:=(EMA(CLOSE,12)-EMA(CLOSE,26))*(100);
VAR28:=EMA(VAR27,9);
VAR29:=(2)*(VAR27-VAR28);
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27<Var28, (-10), '底'), COLORWHITE;
DRAWTEXT(Var27<(-50) AND Var26>7 AND Var27>=Var28, 5, '追'), COLORWHITE;
STICKLINE(Var27<(-50) AND Var26>7, 0,(-10), 5, 0), COLORFFFF66;

振盪波
VAR1:=10;
VAR2:=11;
VAR3:=11;
VAR4:=12;
VAR5:=12;
VAR6:=13;
VAR7:=13;
VAR8:=14;
VAR9:=14;
VARA:=15;
VARB:=15;
VARC:=SMA(((CLOSE-LLV(LOW,VAR1))/(HHV(HIGH,VAR1)-LLV(LOW,VAR1)))*(100),4,1);
VARD:=SMA(((CLOSE-LLV(LOW,VAR2))/(HHV(HIGH,VAR2)-LLV(LOW,VAR2)))*(100),4,1);
VARE:=SMA(((CLOSE-LLV(LOW,VAR3))/(HHV(HIGH,VAR3)-LLV(LOW,VAR3)))*(100),4,1);
VARF:=SMA(((CLOSE-LLV(LOW,VAR4))/(HHV(HIGH,VAR4)-LLV(LOW,VAR4)))*(100),4,1);
VAR10:=SMA(((CLOSE-LLV(LOW,VAR5))/(HHV(HIGH,VAR5)-LLV(LOW,VAR5)))*(100),4,1);
VAR11:=SMA(((CLOSE-LLV(LOW,VAR6))/(HHV(HIGH,VAR6)-LLV(LOW,VAR6)))*(100),4,1);
VAR12:=SMA(((CLOSE-LLV(LOW,VAR7))/(HHV(HIGH,VAR7)-LLV(LOW,VAR7)))*(100),4,1);
VAR13:=SMA(((CLOSE-LLV(LOW,VAR8))/(HHV(HIGH,VAR8)-LLV(LOW,VAR8)))*(100),4,1);
VAR17:=SMA(((CLOSE-LLV(LOW,VARB))/(HHV(HIGH,VARB)-LLV(LOW,VARB)))*(100),4,1);
D11:(SMA((VAR17-50)*(2),3,1)+SMA((VAR13-50)*(2),3,1))/(2),Color008000;
VAR14:=SMA(((CLOSE-LLV(LOW,VAR9))/(HHV(HIGH,VAR9)-LLV(LOW,VAR9)))*(100),4,1);
(SMA((VAR14-50)*(2),3,1)+SMA((VAR11-50)*(2),3,1))/(2),ColorFFCC33;
VAR15:=SMA(((CLOSE-LLV(LOW,VARA))/(HHV(HIGH,VARA)-LLV(LOW,VARA)))*(100),4,1);
VAR16:=SMA((VAR15-50)*(2),3,1);
D11,Color888888,ColorStick;
X:((3)*(VAR17-50))*(2)-(2)*(SMA((VAR17-50)*(2),3,1)),Color00FFFF;
VAR18:=(HIGH+LOW+CLOSE)/(3);
VAR19:=(VAR18-MA(VAR18,14))/((0.015)*(AVEDEV(VAR18,14)));
VAR1A:=(VAR18-MA(VAR18,70))/((0.015)*(AVEDEV(VAR18,70)));
VAR1B:=IF((VAR19>=150) AND (VAR19<200) AND (VAR1A>=150) AND (VAR1A<200),(-10),0);
VAR1C:=IF((VAR19<=(-150)) AND (VAR19>(-200)) AND (VAR1A<=(-150)) AND (VAR1A>(-200)),10,0);
VAR1D:=((CLOSE-MA(CLOSE,13))/(MA(CLOSE,13)))*(100);
VAR1E:=100-ABS(VAR1D);
IF((BARSCOUNT(CLOSE)<13),100,IF((VAR1E<88) AND (VAR1D>0),85,100)),ColorCCFFCC;
IF((BARSCOUNT(CLOSE)<13),(-100),0-IF((VAR1E<92) AND (VAR1D<0),85,100)),Color008000;
IF((BARSCOUNT(CLOSE)<70),120,IF((VAR1A>=200) AND (VAR19>=150),(-15),VAR1B)+120),ColorCCFF66;
紅鳥出擊1:IF((BARSCOUNT(CLOSE)<70),(-120),IF((VAR1A<=(-200)) AND (VAR19<=(-150)),15,VAR1C)-120),Color0000FF;
POLYLINE((CLOSE>0),SMA((VARC-50)*(2),3,1)),ColorFF0033;
POLYLINE((CLOSE>0),SMA((VARD-50)*(2),3,1)),ColorFF2233;
POLYLINE((CLOSE>0),(SMA((VARE-50)*(2),3,1)+SMA((VARC-50)*(2),3,1))/(2)),ColorFF4433;
POLYLINE((CLOSE>0),SMA((VARF-50)*(2),3,1)),ColorFF6633;
POLYLINE((CLOSE>0),(SMA((VAR10-50)*(2),3,1)+SMA((VARD-50)*(2),3,1))/(2)),ColorFF8833;
POLYLINE((CLOSE>0),SMA((VAR11-50)*(2),3,1)),ColorFF9933;
POLYLINE((CLOSE>0),(SMA((VAR12-50)*(2),3,1)+SMA((VARF-50)*(2),3,1))/(2)),ColorFFAA33;
POLYLINE((CLOSE>0),SMA((VAR13-50)*(2),3,1)),ColorFFBB33;

戰國箭雨
Var1:=REF(CLOSE,2);
A2: SMA(MAX(CLOSE-Var1,0),7,1)/SMA(ABS(CLOSE-Var1),7,1)*100, , COLORGREEN;
車弩機: IF(A2<12,30,0);
Var2:=REF(CLOSE,1);
Var3:=SMA(MAX(CLOSE-Var2,0),7,1)/SMA(ABS(CLOSE-Var2),7,1)*100;
彎弓: IF(Var3<12,30,0);
逢高派發區: STICKLINE(A2>80,A2+1,A2-1,1.5,0), , COLORRED;
var1J:=REF("W&R.WR1"(14),1)>REF("W&R.WR1"(14),2);
VAR2J:=REF("W&R.WR1"(14),1)>98;
VAR3J:="W&R.WR1"(14)<REF("W&R.WR1"(14),1);
放箭:IF(VAR1J AND VAR2J AND VAR3J,15,0),STICK,linethick3,COLORRED;
DRAWTEXT(VAR1J AND VAR2J AND VAR3J,8,'箭'),COLORF0F000;

時間之窗
var1:=ma(close,15);
var2:=var1+(2)*(std(close,20));
var3:=var1-(2)*(std(close,20));
var4:=((close-var3)/(var2-var3))*(100);
var5:=(var4-ema(var4,2))*(100);
var6:=((ema(var5,22))*(10))*(100);
var7:=ema(((0.4)*(var5))*((-1)),300);
var8:=((((-1))*(ema(var5,20)))*(10))*(100);
var9:=(var6>10);
vara:=(var8>100);
varb:=ma(var9,300);
varc:=ma(var9,5);
vard:=ma(var9,10);
vare:=ma(var9,20);
varf:=ma(var9,30);
var10:=ma(var9,40);
var11:=ma(var9,50);
var12:=min(var9,varc);
★:min(var12,vard),colorffccff;
紅:min(★,vare),color0000ff;
色:min(紅,varf),colorffff00;
上:min(色,var10),color00ff00;
升:min(上,var11),color00ff00;
var13:=(ma(vara,300))*(100);
var14:=ma(vara,5);
var15:=ma(vara,10);
var16:=ma(vara,20);
var17:=ma(vara,30);
var18:=ma(vara,40);
var19:=ma(vara,50);
（黃:min(vara,var15),color00ffcc;
min(vara,var13),color33ffcc;
min(vara,var14),color66ffcc;
色）:min(（黃,var16),color99ffff;
下:min(色）,var17),color55ffff;
降:min(下,var18),color33ffff;
min(降,var19),color00ffff;
var1a:=forcast(close,2);
var1b:=(high+(4)*(low)+open+var1a)/(7);
var1c:=ema(var1b,13)-ema(var1b,34);
var1d:=ema(var1c,5);
var1e:=(var1c-var1d)*(5);
var1f:=if((var1e>=1000),1000,if((var1e<=var1b),var1b,var1e));
var20:=(forcast(forcast(var1f,14),10))/(1.007);
（時間之窗）:min(vara,var20),color0066cc;
min(（時間之窗）,var20),color0066cc;

上證天星K線
VARQA:=MA(CLOSE,20);
RSV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27));
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
D2:=SMA(K,2,1);
T1:=((3)*(K)-(2)*(D))*(100);
天空:T1,ColorFF8000;
主線:(MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24)+MA(CLOSE,36))/(4),Color00FF00;
MA5:=EMA(CLOSE,5);
MA20:=MA(CLOSE,20);
(MA5>MA(CLOSE,20)),Color00FFFF;
(MA5<MA(CLOSE,20)),ColorFF0000;
MA60:MA(CLOSE,60),Color0000FF;
MA90:=EMA(CLOSE,90);
MA120:EMA(CLOSE,120),Color0000FF;
(CLOSE>=OPEN),Color0055AA;
(CLOSE>=OPEN),Color0077CC;
(CLOSE>=OPEN),Color00BBFF;
(CLOSE>=OPEN),Color00BBFF;
(CLOSE<=OPEN),Color006600;
(CLOSE<=OPEN),Color009900;
(CLOSE<=OPEN),Color00EE00;
VAR5:=IF((DATE<1081201),1,0);
VAR6:=IF((DATE<1081201),1,0);
VAR7:=EMA((CLOSE)*(VAR6),8);
VAR8:=EMA((CLOSE)*(VAR5),34)-0.1;
★:EMA((VAR5)*(CLOSE),5),Color0000FF;
雨:EMA((VAR6)*(CLOSE),13)-0.15,ColorFF6633;
紅鳥風雲:(MA(CLOSE,60))*(0.98000001),Color008000;
風:FORCAST(★,8),ColorFFFF00;
(風>=雨),Color000080;
(COUNT(CROSS(★,雨),1)>=1) AND (雨>REF(雨,1)),Color0000FF;

起越界臨
A:=(AMOUNT)/((100)*(VOL));
短線成本均線:=MA(A,5);
中線成本均線:=MA(A,13);
長線成本均線:=MA(A,34);
無窮成本均線:=DMA(CLOSE,(VOL)/(CAPITAL));
CYS13:=((100)*(CLOSE-中線成本均線))/(中線成本均線);
AA:=(CYS13<(-16));
BB:=(CYS13>(-8));
CC:=(CYS13<(-8)) AND (CYS13>(-16));
AA,Color00FFFF;

軍前飛探
{戰國時期!行軍做戰!均有快馬探子軍前打探敵情!消息準確!如有謊報消息不實!立刻推出帳前!殺無赦!快馬飛探為戰國各諸侯作戰提供消息來源!特我把它做為股市戰國冊第一個指標!
信號不多!但準確率較高![指標謹供參考,操作個人小心]}
VAR1:=(CLOSE<=OPEN);
VAR2:=(CLOSE>OPEN);
VAR3:=DMA(EMA(CLOSE,12),((SUM(VOL,5))/(3))/(CAPITAL));
VAR4:=((CLOSE-VAR3)/(VAR3))*(100);
VAR5:=(REF(VAR4,1)<(-32)) AND (VAR4>REF(VAR4,1)) AND (REF(VAR4,1)<REF(VAR4,2)) AND (VAR4-REF(VAR4,1)>2.5) AND (REF(VAR4,2)-REF(VAR4,1)>1);
VAR6:=VAR2 AND REF(VAR1,1) AND REF(VAR1,2) AND REF(VAR1,3) AND REF(VAR1,4) AND REF(VAR1,5) AND REF(VAR2,6) AND (HIGH<REF(HIGH,60)) AND (HIGH<REF(HIGH,120)) AND (HIGH<REF(CLOSE,200));
(VAR5 or VAR6),Color00FFFF;

荊坷刺秦王
QVAR2:=IF((HIGH+LOW<=REF(HIGH,1)+REF(LOW,1)),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
QVAR3:=IF((HIGH+LOW>=REF(HIGH,1)+REF(LOW,1)),0,MAX(ABS(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));
QVAR4:=(SUM(QVAR2,13))/(SUM(QVAR2,13)+SUM(QVAR3,13));
QVAR5:=(SUM(QVAR3,13))/(SUM(QVAR3,13)+SUM(QVAR2,13));
QVAR9:=100-(3)*(SMA(((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1))+(2)*(SMA(SMA(((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1),15,1));
QVARA:=100-(3)*(SMA(((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1))+(2)*(SMA(SMA(((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75)))*(100),20,1),15,1));
QVARB:=(QVAR9<REF(QVARA,1)) AND (VOL>REF(VOL,1)) AND (CLOSE>REF(CLOSE,1));
QVAR1A:=((HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)))*(100)-10;
QVAR1B:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
QVAR1C:=SMA(QVAR1B,13,8);
QVAR1D:=SMA(QVAR1A,21,8);
殺機乍現:SMA(QVAR1C,13,8),Color00FFFF;
見禮台:(殺機乍現-QVAR1D<(-65)),Color00FF00,Stick,Linethick3;
QVAR1E:=(CLOSE+OPEN+HIGH+LOW)/(4);
AA:=QVARB AND (COUNT(QVARB,1)=1) AND (殺機乍現<80);
VAR1:=IF(((EMA(CLOSE,5))/(EMA(EMA(CLOSE,9),16))<=0.85000002) AND ((CLOSE)/(REF(CLOSE,1))>0.90499997) AND ((CLOSE)/(REF(CLOSE,1))<1.05) AND (((VOL)/(CAPITAL))*(100)<5),50,0);
圖窮匕現:MA((((-100))*(HHV(HIGH,34)-CLOSE))/(HHV(HIGH,34)-LLV(LOW,34))+100,5),Color00FF00;
VAR3:=(((-100))*(HHV(HIGH,50)-CLOSE))/(HHV(HIGH,50)-LLV(LOW,50))+100;
VAR4:=(((-100))*(HHV(HIGH,70)-CLOSE))/(HHV(HIGH,70)-LLV(LOW,70))+100;
VAR5:=(((CLOSE-MA(CLOSE,34))/(MA(CLOSE,34)))*(100)+10)*(5);
VAR6:=(((CLOSE-MA(CLOSE,50))/(MA(CLOSE,50)))*(100)+10)*(5);
VAR7:=(((CLOSE-MA(CLOSE,70))/(MA(CLOSE,70)))*(100)+10)*(5);
VAR8:=(圖窮匕現+VAR3+VAR4+VAR5+VAR6+VAR7)/(6);
VAR9:=EMA(VAR8,3);
VARA:=ABS(VAR5-VAR7);
VARB:=(VAR8+VARA)/(2);
VARC:=(-1);
VARD:=VARC+VARB;
VARE:=IF((VAR1>0) AND (VARD<0),200,0);
VARF:=IF((VARB<0) AND (CLOSE=LLV(CLOSE,5)) AND ((CLOSE)/(REF(CLOSE,1))>0.90499997) AND ((CLOSE)/(REF(CLOSE,1))<1.05) AND (((VOL)/(CAPITAL))*(100)<5),(-50),0);
VAR10:=IF((VARD<0) AND (VARF=(-50)),100,0);
VAR11:=(REF(CLOSE,2))*(0.86500001);
VAR12:=(REF(CLOSE,13))*(0.77200001);
VAR13:=MIN(VAR11,VAR12);
VAR14:=((100)*(VOL))/(CAPITAL);
VAR15:=IF(((CLOSE-VAR13)/(CLOSE)<0.02999999) AND ((SUM(VAR14,5))/(5)<1.8),1,0);
VAR16:=IF((VAR15>0) AND ((VARF<0) or (VAR1>0)),100,0);
VAR17:=((VARE>0) AND (VAR10>0) AND ((SUM(((VOL)/(CAPITAL))*(100),5))/(5)<1) or (VAR15>0)) AND ((VARF<0) or (VAR1>0));
VAR18:=((VARE>0) AND (VAR10>0) AND ((SUM(((VOL)/(CAPITAL))*(100),5))/(5)<1) or (VAR15>0) AND ((REF(CLOSE,1))/(REF(CLOSE,2))>0.90200001));
VAR19:=(VAR17 or VAR18);
VAR1A:=(VAR16 or VAR19);
VAR1B:=VAR16;
VAR1C:=MA(CLOSE,80)-(MA(CLOSE,10))/(3);
VAR1D:=IF((VAR1A>0),87,0);
VAR1E:=IF((VAR1B>0),91,0);
VAR1F:=IF((VAR16>0) AND (CLOSE<VAR1C),97,0);
VAR20:=MAX(MAX(VAR1F,VAR1D),VAR1E);
VAR21:=MA(CLOSE,80)-(MA(CLOSE,13))/(3);
VAR22:=MA((CLOSE-VAR21)/(VAR21),1);
VAR23:=(EMA(VAR22,12))*(0.69999998);
VAR24:=EMA(VAR22,3);
VAR25:=IF((LLV(VAR24-VAR23,12)>0),0,(-30));
FILTER((COUNT((VAR25<(-20)),3)=3),34),Color0000FF;
FILTER((VAR1D>80) AND (VAR1E>90) AND (VAR1F>90) AND (VAR20>90),13),Color008000;

蛟龍沖天庭
A1:=(EMA(((AMOUNT)/(VOL))/(100),3)+EMA(((AMOUNT)/(VOL))/(100),6)+EMA(((AMOUNT)/(VOL))/(100),9))/(3),linethick2,Color0000FF;
a1,linethick1,Color0000FF;
A2:=(EMA(((AMOUNT)/(VOL))/(100),5)+EMA(((AMOUNT)/(VOL))/(100),10)+EMA(((AMOUNT)/(VOL))/(100),20))/(3),Color0000FF;
a2,linethick1,Color0000FF;
A3:=(EMA(((AMOUNT)/(VOL))/(100),7)+EMA(((AMOUNT)/(VOL))/(100),14)+EMA(((AMOUNT)/(VOL))/(100),28))/(3),Color0000FF;
a3,linethick1,Color0000FF;
A4:=(EMA(((AMOUNT)/(VOL))/(100),9)+EMA(((AMOUNT)/(VOL))/(100),18)+EMA(((AMOUNT)/(VOL))/(100),36))/(3),Color0000FF;
a4,linethick1,Color0000FF;
A5:=(EMA(((AMOUNT)/(VOL))/(100),11)+EMA(((AMOUNT)/(VOL))/(100),22)+EMA(((AMOUNT)/(VOL))/(100),44))/(3),Color0000FF;
a5,linethick1,Color0000FF;
A6:=(EMA(((AMOUNT)/(VOL))/(100),13)+EMA(((AMOUNT)/(VOL))/(100),26)+EMA(((AMOUNT)/(VOL))/(100),52))/(3),Color0000FF;
a6,linethick1,Color0000FF;
A:(EMA(AMOUNT/VOL/100,21)+EMA(((AMOUNT)/(VOL))/(100),34)+EMA(((AMOUNT)/(VOL))/(100),55))/(3),linethick2,Color008000;
A7:=(A-A1+A),Color00FFFF;
a7,linethick1,Color00FFFF;
A8:=A-A2+A,Color00FFFF;
a8,linethick1,Color00FFFF;
A9:=A-A3+A,Color00FFFF;
a9,linethick1,Color00FFFF;
A10:=A-A4+A,Color00FFFF;
a10,linethick1,Color00FFFF;
A11:=A-A5+A,Color00FFFF;
a11,linethick1,Color00FFFF;
A12:=A-A6+A,Color00FFFF;
a12,linethick1,Color00FFFF;
VAR1:=((2)*(CLOSE)+HIGH+LOW)/(4);
VAR2:=MA(VAR1,5);
VAR3:=MA(VAR1,21);
VAR4:=MA(VAR1,60);
stickline(VAR1>=VAR2,o,c,5,0),ColorFF00FF;
stickline(VAR1>=VAR2,h,l,1,0),ColorFF00FF;
stickline(VAR1<VAR2,o,c,5,0),ColorFFFFFF;
stickline(VAR1<VAR2,h,l,1,0),ColorFFFFFF;
stickline(VAR1<=VAR3 AND (VAR1>OPEN),o,c,5,0),Color00FFFF;
stickline(VAR1<=VAR3 AND (VAR1>OPEN),h,l,1,0),Color00FFFF;
stickline((VAR1>=VAR4) AND (VAR1>OPEN),o,c,5,0),Colorred;
stickline((VAR1>=VAR4) AND (VAR1>OPEN),h,l,1,0),Colorred;
stickline((VAR1>=VAR4) AND (VAR1<OPEN),o,c,5,0),Color808080;
stickline((VAR1>=VAR4) AND (VAR1<OPEN),h,l,1,0),Color808080;

伯樂相馬
QVAR1:=(HIGH+LOW+OPEN+(2)*(CLOSE))/(5);
QVAR2:=REF(QVAR1,1);
QVAR3:=((SMA(MAX(QVAR1-QVAR2,0),45,1))/(SMA(ABS(QVAR1-QVAR2),45,1)))*(100);
伯樂相馬:IF((COUNT((QVAR3<20),7)>=1) AND (COUNT((QVAR1=LLV(QVAR1,2)),2)>=1) AND (CLOSE>OPEN) AND (REF(CLOSE,1)>REF(OPEN,1)) AND (VOL>REF(VOL,1)),70,0),Color0000FF,Stick;
VARW1:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);
底:20,Color009900,POINTDOT;
入頂:80,ColorFFFF00,POINTDOT;
大頂:100,Color6699FF,POINTDOT;
VARW2:=((CLOSE-MA(CLOSE,6))/(MA(CLOSE,6)))*(100);
VARW3:=((CLOSE-MA(CLOSE,12))/(MA(CLOSE,12)))*(100);
VARW4:=((CLOSE-MA(CLOSE,24))/(MA(CLOSE,24)))*(100);
VARW5:=(VARW2+(2)*(VARW3)+(3)*(VARW4))/(6);
VARW6:=MA(VARW5,3);
關注1:(VARW6<=(-8)),ColorFF0000;
關注2:(VARW6<=(-8)),ColorFFFFFF;
關注3:(VARW6<=-8),Color00CCFF;
底部:IF((VARW6<-10),20,0),ColorFF9933;
反攻雷達:(VARW6<=(-8)),Color9933FF;
多頭雷達:(VARW6<=-8),ColorFF3399;
犀牛王:(VARW6<=-8),Color008000;
黑馬:(VARW6<=-8),Color0000FF;
AA1:=(EMA(CLOSE,12)-EMA(CLOSE,26))*(100)+50;
AA2:=EMA(AA1,9);
AA3:=((HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)))*(100)-10;
AA4:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
AA5:=SMA(AA4,13,8);
走勢:CEILING(SMA(AA5,13,8)),Color00FF00;
AA6:=SMA(AA3,21,8);
買觀注:(走勢-AA6<(-65)),ColorFFFFFF;
買進:=LONGCROSS(AA1,(AA2)*(1.05),15) AND (AA1<40);
賣觀注:(走勢-AA6>85),ColorFFFF00;
賣出:LONGCROSS(AA2,(AA1)*(0.94999998),7) AND (AA1>0),Color0000FF;
90,Color008000,POINTDOT;
0,ColorFF0000,POINTDOT;
45,Color000080,POINTDOT;
排序1:IF((買進>0),20,0),Color808000,Stick;
(排序1>0),Color;
VAR1:=1;
VAR2:=DMA(CLOSE,((HIGH)/(MA(LOW,4)))/(4));
VAR3:=DMA(CLOSE,((CLOSE)/(MA(LOW,30)))/(30));
VAR4:=(((LOW-VAR2)/(VAR2))*(100)<(-5.889));
VAR5:=(((VAR2-VAR3)/(VAR3))*(100)<(-15.889));
VAR6:=VAR4 AND VAR5 AND ((HIGH-MA(LOW,3))/(REF(LOW,2))>(-0.059));
VAR7:=(VAR6>0);
VAR8:=((AMOUNT)/(VOL))/(100);
VAR9:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARA:=((SUM(AMOUNT,13))/(VAR8))/(100);
VARB:=DMA(VAR9,(VOL)/(VARA));
VARC:=MA(HHV(HIGH,488),18);
VARD:=MA(HHV(HIGH,220),18);
VARE:=MA(HHV(HIGH,98),18);
VARF:=MA(LLV(LOW,488),18);
VAR10:=MA(LLV(LOW,220),18);
VAR11:=MA(LLV(LOW,98),18);
VAR12:=MA(((VARF)*(0.95999997)+(VAR10)*(0.95999997)+(VAR11)*(0.95999997)+(VARC)*(0.55800002)+(VARD)*(0.55800002)+(VARE)*(0.55800002))/(6),18);
VAR13:=MA(((VARF)*(1.25)+(VAR10)*(1.23)+(VAR11)*(1.2)+(VARC)*(0.55000001)+(VARD)*(0.55000001)+(VARE)*(0.64999997))/(6),18);
VAR14:=MA(((VARF)*(1.3)+(VAR10)*(1.3)+(VAR11)*(1.3)+(VARC)*(0.68)+(VARD)*(0.68)+(VARE)*(0.68))/(6),18);
VAR15:=MA((((VAR12)*(3)+(VAR13)*(2)+VAR14)/(6))*(1.738),18);
VAR16:=IF((DATE<=1021231),VAR15,(VAR15)*(DAY));
VAR17:=LOW;
VAR18:=REF(LOW,1);
VAR19:=((SMA(ABS(VAR17-VAR18),3,1))/(SMA(MAX(VAR17-VAR18,0),3,1)))*(100);
VAR1A:=MA(IF(((CLOSE)*(1.35)<=VAR16),(VAR19)*(10),(VAR19)/(10)),3);
VAR1B:=LLV(LOW,30);
VAR1C:=HHV(VAR1A,30);
VAR1D:=IF((LOW<=VAR1B),(VAR1A+(VAR1C)*(2))/(2),0);
VAR1E:=MA(VAR1D AND (CLOSE<COST(1)),3) AND (((CLOSE-VARB)/(VARB))*(100)<(-11));
VAR1F:=MA(CLOSE,5);
VAR20:=MA(CLOSE,10);
VAR21:=MA(CLOSE,20);
VAR22:=MA(CLOSE,30);
VAR23:=(VAR1F+VAR20+VAR21+VAR22)/(4);
VAR24:=((VAR23-REF(VAR23,15))/(REF(VAR23,15)))*(100);
VAR25:=IF((VAR24<(-10)) AND (VAR24<REF(VAR24,1)),20,0);
穩操勝券:(VAR7)*(VAR1) AND (VAR1E)*(VAR1) AND (VAR25)*(VAR1) AND ((CLOSE-OPEN)*(VAR1)>0),Color;
(VAR7)*(VAR1) AND (VAR1E)*(VAR1) AND (VAR25)*(VAR1) AND ((CLOSE-OPEN)*(VAR1)>0),Color;
BB1:=REF(CLOSE,1);
BB2:=((SMA(MAX(CLOSE-BB1,0),7,1))/(SMA(ABS(CLOSE-BB1),7,1)))*(100);
BB3:=((SMA(MAX(CLOSE-BB1,0),13,1))/(SMA(ABS(CLOSE-BB1),13,1)))*(100);
BB4:=BARSCOUNT(CLOSE);
BB5:=(BB2<20) AND (BB3<23) AND (BB4>35);
BB5 AND (COUNT(BB5,30)=1),Color;
定海神針:BB5 AND (COUNT(BB5,30)=1),Color;
BB5 AND (COUNT(BB5,30)=1),Color;
CC1:=CLOSE;
CC2:=100-BB1;
CC3:=ABS(BB1-BB2);

謝謝大大無私的分享!