{炒股機器人1號(源代碼) [N 1,100,10]}
Var1:=1;
V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
HY1:=REF(EMA(V1,3),1);
亞當1:=EMA(c,1.2);
夏娃1:=HY1;
n3:=barslast(cross(亞當1,夏娃1));
n4:=barslast(cross(夏娃1,亞當1));
持股:if(n3<n4,n3+1,0),Coloryellow;
當:=((HIGH + LOW + CLOSE)/3-MA((HIGH + LOW + CLOSE)/3,84))*100/(1.5*avedev((HIGH
+ LOW + CLOSE)/3,84))>=50;
鳳8:=MA((100-100*(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))),1);
龍8:=(100-100*(HHV(HIGH,72)-CLOSE)/(HHV(HIGH,72)-LLV(LOW,72)));
龍88:=龍8>=80 and 龍8>=鳳8;
絲綢:=ma(C,6)>=ma(C,8) and ma(C,8)>=ma(C,10) and ma(C,10)>=ma(C,12) and ma(C,12)
>=ma(C,15) and ma(C,15)>=ma(C,18) and ma(C,18)>=ma(C,21) and ma(C,21)>=ma(C,25)
and ma(C,25)>=ma(C,30);
強:=龍88+當+絲綢;
n33:=barslast(cross(強,0.7));
n44:=barslast(cross(0.7,強));
強勢:if(n33<n44,n33+1,0),Colorred;
stickline(強>=0.7,70000,0,8,0),Color000040;
stickline(強<0.7,0,70000,8,0),color400000;
TY:=H;
A1:=REF(TY,N)=HHV(TY,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); HD:=FILTER
(C1,N);
A2:=REF(TY,N)=LLV(TY,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); LD:=FILTER
(C2,N);
A:=REF(H,BARSLAST(HD));
Z:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
操盤:HY1,COLORyellow;
abcd:=(3*c+l+o+h)/6;
dkx:=(20*abcd+19*ref(abcd,1)+18*ref(abcd,2)+17*ref(abcd,3)+16*ref(abcd,4)+15*ref
(abcd,5)+14*ref(abcd,6)
+13*ref(abcd,7)+12*ref(abcd,8)+11*ref(abcd,9)+10*ref(abcd,10)+9*ref(abcd,11)
+8*ref(abcd,12)
+7*ref(abcd,13)+6*ref(abcd,14)+5*ref(abcd,15)+4*ref(abcd,16)+3*ref(abcd,17)
+2*ref(abcd,18)+
ref(abcd,20))/210,colorwhite;
多空:dkx,COLORff00ff;
成本:MAXCYC,color00ff00;
壓力:IF(T1,A,A),COLORyellow,linethick1,POINTDOT;
支撐:IF(T2,Z,Z),COLORWHITE,linethick1,POINTDOT;
亞當:=EMA(C,1.2);
夏娃:=HY1;
stickline(亞當>=夏娃,low,high,0.1,0),colorred;
stickline(亞當>=夏娃,close,open,4,0),color0000AA;
stickline(亞當>=夏娃,close,open,3,0),color0000CC;
stickline(亞當>=夏娃,close,open,2,0),color0000DD;
stickline(亞當>=夏娃,close,open,1,0),color0000FF;
stickline(亞當<夏娃,close,open,1,0),colorEEEE00;
stickline(亞當<夏娃,close,open,2,0),colorDDDD00;
stickline(亞當<夏娃,close,open,3,0),colorCCCC00;
stickline(亞當<夏娃,close,open,4,0),colorAAAA00;
stickline(亞當<夏娃,low,high,0.1,0),colorFFff00;
{炒股機器人2號}
V1:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
HY1:=REF(EMA(V1,3),1);
操盤線:=HY1;
鳳8:=MA((100-100*(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV
(LOW,36))),1),colorRED,linethick1;
龍8:=(100-100*(HHV(HIGH,72)-CLOSE)/(HHV(HIGH,72)-LLV
(LOW,72))),colorYELLOW,linethick1;
龍88:=(龍8>=80 and 龍8>=鳳8) OR (龍8>=80 and 鳳8>=80);
P:=(HIGH + LOW + CLOSE)/3;
順勢主力:=(P-MA(P,84))*100/(1.5*avedev(P,84));
C88:=順勢主力>=100 or 龍88;
買1:=EMA(C,5)>=REF(EMA(C,5),1) AND EMA(C,1)>=EMA(C,5);
買2:=EMA(C,1.2)>=操盤線;
周均獲利:=EMA(100*WINNER(CLOSE),5),colorwhite;
日獲利盤:=100*WINNER(CLOSE),colorRED;
買3:=日獲利盤>=周均獲利;
亞:=((HIGH + LOW + CLOSE)/3-MA((HIGH + LOW + CLOSE)/3,14))*100/(1.5*avedev((HIGH
+ LOW + CLOSE)/3,14));
夏:=SMA(亞,4,1);
買4:=(亞>=-100 and 亞<=100 and 亞>=ref(亞,1) and 亞>=夏) or 亞>=100;
買:=(買1+買2+買3+買4)>=3;
買買:=(買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)<3;
n3:=barslast(cross(買,0.6));
n4:=barslast(cross(0.6,買));
堅持:if(n3<n4,n3+1,0),POINTDOT;
n39:=barslast(cross(買買,0.6));
n49:=barslast(cross(0.6,買買));
謹持:if(n39<n49,n39+1,0),POINTDOT;
龍888:=順勢主力>=50 or (龍8>=鳳8 and 龍8>=65) or (鳳8>=80 and 龍8>=50);
n30:=barslast(cross(龍888,0.6));
n40:=barslast(cross(0.6,龍888));
強:if(n30<n40,n30+1,0),POINTDOT,color00ff00;
n303:=barslast(cross(C88,0.6));
n403:=barslast(cross(0.6,C88));
特強:if(n303<n403,n303+1,0),POINTDOT,colorred;
stickline(龍888<0.6,0,70000,8,0),color400000;
stickline(龍888>=0.6,70000,0,8,0),Color003300;
stickline(C88>=0.7,70000,0,8,0),Color000040;
m13:ma(c,13),COLORyellow;
m34:ma(c,34),COLORff00ff;
m55:ma(c,55),COLOR00ff00;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
Z:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
頂:IF(T1,A,A),COLORyellow,linethick1,POINTDOT;
底:IF(T2,Z,Z),COLOR00ff00,linethick1,POINTDOT;
stickline((買1+買2+買3+買4)>=3,low,high,0.1,0),colorred;
stickline((買1+買2+買3+買4)>=3,close,open,4,0),color0000AA;
stickline((買1+買2+買3+買4)>=3,close,open,3,0),color0000CC;
stickline((買1+買2+買3+買4)>=3,close,open,2,0),color0000DD;
stickline((買1+買2+買3+買4)>=3,close,open,1,0),color0000FF;
stickline((買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)
<3,low,high,0.1,0),colorFF76FF;
stickline((買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)
<3,close,open,4,0),colorFF00FF;
stickline((買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)
<3,close,open,3,0),colorFF62FF;
stickline((買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)
<3,close,open,2,0),colorFF76FF;
stickline((買1+買2+買3+買4)>=1 and (買1+買2+買3+買4)
<3,close,open,1,0),colorFFA8FF;
stickline(買1+買2+買3+買4=0,close,open,1,0),colorEEEE00;
stickline(買1+買2+買3+買4=0,close,open,2,0),colorDDDD00;
stickline(買1+買2+買3+買4=0,close,open,3,0),colorCCCC00;
stickline(買1+買2+買3+買4=0,close,open,4,0),colorAAAA00;
stickline(買1+買2+買3+買4=0,low,high,0.1,0),colorFFff00;
{炒股機器人3號}
鳳8:=MA((100-100*(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV
(LOW,36))),1),colorRED,linethick1;
龍8:=(100-100*(HHV(HIGH,72)-CLOSE)/(HHV(HIGH,72)-LLV
(LOW,72))),colorYELLOW,linethick1;
龍888:=(龍8>=80 and 龍8>=鳳8) or (龍8>=80 and 鳳8>=80);
P:=(HIGH + LOW + CLOSE)/3;
順勢主力:=(P-MA(P,84))*100/(1.5*avedev(P,84));
C88:=順勢主力>=100 or 龍888;
買1:=順勢主力>=100;
買2:=龍888;
買3:=順勢主力>=50 and 順勢主力<100;
亞:=((HIGH + LOW + CLOSE)/3-MA((HIGH + LOW + CLOSE)/3,14))*100/(1.5*avedev((HIGH
+ LOW + CLOSE)/3,14));
夏:=SMA(亞,4,1);
買4:=(龍8>=65 and 龍8>=鳳8 and 龍8<80) or (龍8>=50 and 鳳8>=100);
買88:=買1 OR 買2;
買5:=C>=MA(C,13);
買6:=C>=MA(C,30);
買7:=C>=MAXCYC;
買:=買1 OR 買2 OR 買3 or 買4;
買66:=買3 or 買4 OR 買5 OR 買6 or 買7;
n3:=barslast(cross(買88,0.6));
n4:=barslast(cross(0.6,買88));
堅持:if(n3<n4,n3+1,0),POINTDOT;
n30:=barslast(cross(買66,0.6));
n40:=barslast(cross(0.6,買66));
謹持:if(n30<n40,n30+1,0),POINTDOT,color00ff00;
n303:=barslast(cross(買,0.6));
n403:=barslast(cross(0.6,買));
強勢:if(n303<n403,n303+1,0),POINTDOT,colorred;
stickline(買<0.7,0,70000,8,0),color400000;
stickline(買>=0.7,70000,0,8,0),Color000040;
M13:MA(C,13),COLORyellow;
M30:MA(C,30),colorWHITE;
CYC0:MAXCYC,color00ff00;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1);
LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
Z:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
頂:IF(T1,A,A),COLORyellow,linethick1,POINTDOT;
底:IF(T2,Z,Z),COLORWHITE,linethick1,POINTDOT;
stickline(買1+買2+買3+買4=0,close,open,1,0),colorEEEE00;
stickline(買1+買2+買3+買4=0,close,open,2,0),colorDDDD00;
stickline(買1+買2+買3+買4=0,close,open,3,0),colorCCCC00;
stickline(買1+買2+買3+買4=0,close,open,4,0),colorAAAA00;
stickline(買1+買2+買3+買4=0,low,high,0.1,0),colorFFff00;
stickline(買66,low,high,0.1,0),colorFF76FF;
stickline(買66,close,open,4,0),colorFF00FF;
stickline(買66,close,open,3,0),colorFF62FF;
stickline(買66,close,open,2,0),colorFF76FF;
stickline(買66,close,open,1,0),colorFFA8FF;
stickline(買1 OR 買2,low,high,0.1,0),colorred;
stickline(買1 OR 買2,close,open,4,0),color0000AA;
stickline(買1 OR 買2,close,open,3,0),color0000CC;
stickline(買1 OR 買2,close,open,2,0),color0000DD;
stickline(買1 OR 買2,close,open,1,0),color0000FF;
