奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- 紅鳥之伯樂相馬(源碼) (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1313)

紅鳥之伯樂相馬(源碼)

紅鳥之伯樂相馬(源碼)
QVAR1:=(HIGH+LOW+OPEN+(2)*(CLOSE))/(5);
QVAR2:=REF(QVAR1,1);
QVAR3:=((SMA(MAX(QVAR1-QVAR2,0),P,1))/(SMA(ABS(QVAR1-QVAR2),P,1)))*(100);
伯樂相馬:IF((COUNT((QVAR3<20),N1)>=1) AND (COUNT((QVAR1=LLV(QVAR1,M)),M)>=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<=N11),Color00CCFF;
底部:IF((VARW6<N2),20,0),ColorFF9933;
反攻雷達:(VARW6<=(-8)),Color9933FF;
多頭雷達:(VARW6<=N11),ColorFF3399;
犀牛王:(VARW6<=N11),Color008000;
黑馬:(VARW6<=N11),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);

伯樂相馬參數次序分別為-１０；-６；４９；２；７；４５

參數個數對應不上

請教may158此程式變數我只依次找出P;N1;M;N11;N2 好像少一個?
能否指點告知 謝謝!

回覆: 參數個數對應不上

引用:

---

最初由 jen50 發表
請教may158此程式變數我只依次找出P;N1;M;N11;N2 好像少一個?
能否指點告知 謝謝!

---

謝謝您may158

謝謝 !