奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 應用交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=33)
-- 紅鳥上證天星K線(原碼) (http://www.chiefox.com.tw/bbs/showthread.php?threadid=1311)

紅鳥上證天星K線(原碼)

紅鳥上證天星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;