|
DRAWGBK(1,RGB(0,0,0),RGB(1,1,1),1,0,0); VR1:=1270915;VR2:=1270920; VR3:=IF(DATE>VR1,IF(CLOSE<80,1,0),0); VR4:=IF(DATE>VR2,1,VR3); P2:=IF(VR3=1,0,240); TC1:=IF(H=HHV(H,P2),C,DRAWNULL); TC2:=CONST(BARSLAST(TC1=H))+1; UPPER:=CONST(IF(TC2=1,C,REF(C,TC2-1))); BC1:=IF(L=LLV(L,P2),C,DRAWNULL); BC2:=CONST(BARSLAST(BC1=L))+1; LOWER:=CONST(IF(BC2=1,C,REF(C,BC2-1))); NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));{用時} LR1:=FORCAST(C,NOD+1); NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLORLIGRAY;{近點} LR2:=SLOPE(C,NOD+1); LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))); FP:=NP-LR3*(NOD),POINTDOT,COLORGRAY;{遠(yuǎn)點} EQU:=(NP+FP)/2,POINTDOT,COLOR0000FF; AD:=ABS(NP-FP);{高差}; DBL:=BARSLAST(BC1!=DRAWNULL)+1; DBH:=BARSLAST(TC1!=DRAWNULL)+1; BSP:=IF(BC2>TC2,DBL,DBH)-1; LRL:=IF(NP>FP,FP+AD/NOD*BSP,FP-AD/NOD*BSP); AT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND H>LRL,H,LRL); AT2:=HHV(AT1-LRL,MAX(BC2,TC2)); AT3:=CONST(BARSLAST(AT1-LRL=AT2)); AT4:=CONST(IF(AT3=0,H,REF(H,AT3))); AT5:=CONST(IF(AT3=0,AT1-LRL,REF(AT1-LRL,AT3))); ATL:=LRL+AT5; UT1:=IF(BETWEEN(CURRBARSCOUNT,BC2,TC2) AND L<LRL,L,LRL); UT2:=HHV(LRL-UT1,MAX(BC2,TC2)); UT3:=CONST(BARSLAST(LRL-UT1=UT2)); UT4:=CONST(IF(UT3=0,H,REF(H,UT3))); UT5:=CONST(IF(UT3=0,LRL-UT1,REF(LRL-UT1,UT3))); UTL:=LRL-UT5; RH:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,ATL,CONST(REF(ATL,MIN(BC2,TC2)-11)));{限制高} RL:=IF(CURRBARSCOUNT>=MIN(BC2,TC2)-10,UTL,CONST(REF(UTL,MIN(BC2,TC2)-11)));{限制低} 中軌2:=IF(NP>FP,IF(LRL<=RH,LRL,DRAWNULL),IF(LRL>=RL,LRL,DRAWNULL)),COLORBLUE,,DOTLINE; 上軌2:=IF(NP>FP,IF(ATL<=RH,ATL,DRAWNULL),IF(ATL>=RL,ATL,DRAWNULL)),COLORMAGENTA,,DOTLINE; 下軌2:=IF(NP>FP,IF(UTL<=RH,UTL,DRAWNULL),IF(UTL>=RL,UTL,DRAWNULL)),COLOR00EE00,,DOTLINE; T30:=IF(BARSSINCE(C>0)>=30,1,0); {畫線} {IF(T30 AND 上軌2>REF(上軌2,2),上軌2,DRAWNULL),COLOR660066; IF(T30 AND 中軌2>REF(中軌2,2),中軌2,DRAWNULL),COLOR660066; IF(T30 AND 下軌2>REF(下軌2,2),下軌2,DRAWNULL),COLOR660066; IF(T30 AND 上軌2<=REF(上軌2,2),上軌2,DRAWNULL),COLOR999900; IF(T30 AND 中軌2<=REF(中軌2,2),中軌2,DRAWNULL),COLOR999900; IF(T30 AND 下軌2<=REF(下軌2,2),下軌2,DRAWNULL),COLOR999900;} X_1:=SUM(VOL*CLOSE,0)/SUM(VOL,0); X_2:=EMA(X_1,50)/0.97; X_3:=(X_1+X_2)/2; DRAWBAND(X_2,RGB(100,30,0),X_3,0);{上軌填充色} DRAWBAND(X_3,RGB(0,100,50),X_1,0); 上軌:X_2,COLORGREEN,LINETHICK2; 上軌變色:IF(X_2>REF(X_2,1),X_2,DRAWNULL),COLORRED,LINETHICK2; 中軌:X_3,COLORYELLOW; 下軌:X_1,COLORBLUE; 現(xiàn)價:CLOSE,COLORWHITE,LINETHICK2; X_4:=CONST(REF(CLOSE,480)); X_5:=CONST(HHV(HIGH,480)); X_6:=CONST(LLV(LOW,480)); X_7:=EMA(CLOSE,30); X_8:=EMA(CLOSE,900); X_9:=MAX(X_4,X_5); X_10:=MIN(X_4,X_6); X_11:=X_9-X_10; X_12:=X_10+X_11*7/8; X_13:=X_10+X_11*0.5/8; 漂移點1:=DRAWICON(LONGCROSS(X_13,CLOSE,2),CLOSE*0.995,7); 漂移點2:=DRAWICON(LONGCROSS(CLOSE,X_12,2),CLOSE*1.005,8); X_14:=BARSCOUNT(CLOSE); X_15:=CROSS(CLOSE,REF(HHV(HIGH,X_14),1)) AND CLOSE/X_1<1.09 AND X_14>=1 AND X_14<240; DRAWICON(FILTER(X_15,1),X_1,32);{分時軌道小圖標(biāo)} FSX_1:=CONST(REF(CLOSE,480)); FSX_2:=CONST(HHV(HIGH,480)); FSX_3:=CONST(LLV(LOW,480)); FSX_4:=MAX(FSX_1,FSX_2); FSX_5:=MIN(FSX_1,FSX_3); FSX_6:=FSX_4-FSX_5; FSX_9:=SUM(CLOSE*VOL,BARSSINCE(VOL>0)+1)/SUM(VOL,BARSSINCE(VOL>0)+1)+(BARSSINCE(VOL>0)+1)*0; FSX_12:EMA(EXPMA(CLOSE,20),13)COLORMAGENTA; 均價:=FSX_9,COLORYELLOW,LINETHICK2; 阻力FS:=FSX_5+FSX_6*7/8; 支撐FS:=FSX_5+FSX_6*1/8; {FS頂:=STICKLINE(C>阻力FS,C,阻力FS,1,0),COLORGREEN;} FS底:=STICKLINE(C<支撐FS,C,支撐FS*1.005,1,0),COLORRED; 攻擊量:=((HSL*0.50+REF(HSL,1)*0.33)+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN; 攻擊量A:=SUM(IF(C>REF(C,1),攻擊量*V,0),FROMOPEN); 攻擊量B:=-SUM(IF(C<REF(C,1),攻擊量*V,0),FROMOPEN); 攻擊流量:=攻擊量A+攻擊量B; 攻擊比:=攻擊流量/SUM(V,FROMOPEN)*100; 資金攻擊度:=IF(攻擊比>=0,(攻擊比+50),100-ABS((攻擊比-50))); 資金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN); 資金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN); 資金出入:=資金流入+資金流出; 資金比:=資金出入/SUM(V,FROMOPEN)*100; 資金流量比:=IF(資金比>=0,(資金比+100)/2,100-ABS((資金比-100)/2)); DRAWTEXT_FIX(1,0.2,1,1,STRCAT(STRCAT('【資金流量比】',CON2STR(資金流量比,2)),'％買')); DRAWTEXT_FIX(1,0.2,0.93,1, STRCAT(STRCAT('【資金攻擊度】',CON2STR(資金攻擊度,2)),'％買')); XGBB:=HHV(H,480); 去除5:=STICKLINE(FILTER(CROSS(C,REF(XGBB,1)),10) AND C>REF(XGBB,1),C*0.99,C,8,0); 去除6:=DRAWTEXT(FILTER(CROSS(C,REF(XGBB,1)),10) AND C>REF(XGBB,1),C*0.99,'突破'); RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1; JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1; MA1:=REF(C,JY); MA2:=REF(MA1,JY); MA3:=REF(MA2,JY); MA4:=REF(MA3,JY); MA5:=REF(MA4,JY); MA6:=REF(MA5,JY); MA7:=REF(MA6,JY); MA8:=REF(MA7,JY); MA9:=REF(MA8,JY); CK:=REFDATE((C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10,DATE); 去除8:=DRAWTEXT(ISLASTBAR,CK,' 參考線'); DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3); DEA:=EMA(DIF,9); MACD1:=10*(DIF-DEA); MACD2:=EMA(MACD1,2); 去除1:=STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0); 去除2:=STICKLINE(MACD1<MACD2 AND MACD1>0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0); 去除3:=STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0); 去除4:=STICKLINE(MACD1<MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,0); XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE)); 主力:=EXPMA(CLOSE/XX,20);大戶:=EXPMA(CLOSE/XX,60);散戶:=EXPMA(CLOSE/XX,120); 底:=1;1.02,NODRAW;高:=1.03; DRAWTEXT(CROSS(主力,1.02),C*0.999,'-突'); DRAWRECTREL(0,960,300,1000,RGB(0,250,50));{綠色} DRAWRECTREL(0,965,0+CONST(資金攻擊度*300/100),995,RGB(200,50,0)); DRAWRECTREL(147,960,153,1000,RGB(0,75,200));{0軸小條} DRAWRECTREL(159,960,165,1000,RGB(20,50,20));{起爆位置小條} DRAWRECTREL(0,915,300,955,RGB(0,250,50));{綠色} DRAWRECTREL(0,920,0+CONST(資金流量比*300/100),950,RGB(178,34,34));{攻擊條}; DRAWRECTREL(147,915,153,955,RGB(0,75,200));{0軸} DRAWRECTREL(165,915,171,955,RGB(20,50,20));{起爆位置小條} {機構(gòu)買賣盤} A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0); 成交額:=V*C/100,NODRAW; A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0); A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0); A4:=SUM((IF(((成交額/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0); A5:=SUM((IF(((成交額/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0); A6:=((A2+A3)+A4)+A5; A7:=IF((ISLASTBAR),((100*A2)/A6),0); A8:=IF((ISLASTBAR),((100*A3)/A6),0); A9:=IF((ISLASTBAR),((100*A4)/A6),0); A10:=IF((ISLASTBAR),((100*A5)/A6),0); 機構(gòu)買盤:=(A2); 機構(gòu)賣盤:=(A3); 散戶買盤:=(A4); 散戶賣盤:=(A5); DRAWTEXT_FIX(1,0.62,0.93,0,STRCAT(STRCAT('【機構(gòu)買盤】',CON2STR(機構(gòu)買盤,2)),'萬'))COLORRED; DRAWTEXT_FIX(1,0.62,1,0,STRCAT(STRCAT('【機構(gòu)賣盤】',CON2STR(機構(gòu)賣盤,2)),'萬'))COLORGREEN; DRAWTEXT_FIX(1,0.75,0.93,0,STRCAT(STRCAT('【散戶買盤】',CON2STR(散戶買盤,2)),'萬'))COLORRED; DRAWTEXT_FIX(1,0.75,1,0,STRCAT(STRCAT('【散戶賣盤】',CON2STR(散戶賣盤,2)),'萬'))COLORGREEN; DRAWTEXT_FIX(1,0.35,0.93,0, STRCAT(STRCAT('【資金流量比】',CON2STR(資金流量比,2)),'％買')),COLORMAGENTA; DRAWTEXT_FIX(1,0.35,1,0,STRCAT(STRCAT('【資金攻擊度】',CON2STR(資金攻擊度,2)),'％買')),COLORYELLOW; {滬深總上漲下跌家數(shù)} III1:=STRCAT('滬深總上漲家數(shù):',CON2STR(DYNAINFO(60),0)); III2:=STRCAT('滬深總下跌家數(shù):',CON2STR(DYNAINFO(61),0)); DRAWTEXT_FIX(ISLASTBAR,0.5,0.93,0,III1),COLORRED; DRAWTEXT_FIX(ISLASTBAR,0.5,1,0,III2),COLORLIGREEN; DRAWTEXT_FIX(1,0.9,0.93,0,DYBLOCK),COLORYELLOW; DRAWTEXT_FIX(1,0.9,1,0,HYBLOCK),COLORRED; DRAWTEXT_FIX(1,0.9,1,0,EXTERNSTR(0,1)),COLORWHITE; {字碼} 量價:=(VOL/CLOSE)/3; B2:=SUM((IF(((量價>0.20) AND (CLOSE>(REF(CLOSE,1)))),量價,0)),0); B3:=SUM((IF(((量價>0.20) AND (CLOSE<(REF(CLOSE,1)))),量價,0)),0); B6:=B2+B3;DD1:=1;比:=B2/B3; 機構(gòu)買入:=A2; 機構(gòu)賣出:=A3; 機構(gòu)總買入:=A2-A3; 散戶買入:=A4; 散戶賣出:=A5; 散戶總買入:=A4-A5; 機構(gòu)總色柱:=A2+A3; 機構(gòu)買入比:=A2/機構(gòu)總色柱*100; AAA1:=STRCAT(STRCAT('機構(gòu)買入',CON2STR((100*A2)/A6,0)),'%'); AAA2:=STRCAT(STRCAT('機構(gòu)賣出',CON2STR((100*A3)/A6,0)),'%'); AAA0:=STRCAT(STRCAT('機構(gòu)總買入',CON2STR((100*(A2-A3))/A6,0)),'%'); AAA3:=STRCAT(STRCAT('散戶買入',CON2STR((100*A4)/A6,0)),'%'); AAA4:=STRCAT(STRCAT('散戶賣出',CON2STR((100*A5)/A6,0)),'%'); AAA5:=STRCAT(STRCAT('散戶總買入',CON2STR((100*(A4-A5))/A6,0)),'%'); DRAWTEXT_FIX(DD1=1,0.18,0.93,0,AAA1),COLORBLACK; DRAWTEXT_FIX(DD1=1,0.18,1,0,AAA2),COLORBLACK; DRAWTEXT_FIX(DD1=1,0.24,0.93,0,AAA3),COLORRED; DRAWTEXT_FIX(DD1=1,0.24,1,0,AAA4),COLORRED; DRAWRECTREL(0,870,300,910,RGB(0,250,50));{綠色} DRAWRECTREL(0,875,CONST(機構(gòu)買入比*300/100),905,RGB(200,50,0)); {DRAWRECTREL(0,880,CONST(機構(gòu)買入比*300/100),900,RGB(255,210,0));} DRAWRECTREL(147,870,153,910,RGB(0,75,200));{0軸小條} {新加1-臨時撐壓線} 破頂:=COST(99),COLORCYAN,CROSSDOT;{2條臨時撐壓線} 鐵底:=COST(1),COLORCYAN,CROSSDOT; 平均價:(SUM((VOL * CLOSE),FROMOPEN) / SUM(VOL,FROMOPEN)),COLORYELLOW; {新加2-撐壓線} XA_1:=MAX(DYNAINFO(3),DYNAINFO(5)); XA_2:=MIN(DYNAINFO(3),DYNAINFO(6)); XA_3:=XA_1-XA_2; 阻力:XA_2+XA_3*7/8,COLORYELLOW,LINETHICK2;{撐壓線} 支撐:XA_2+XA_3*0.5/8,COLORRED,LINETHICK2; XA_4:=CLOSE; DRAWICON(LONGCROSS(支撐,XA_4,2),支撐*0.998,1);{1號2號小圖標(biāo)} DRAWICON(LONGCROSS(XA_4,阻力,2),XA_4,2); {新加3-強弱分界線} 強弱分界:EMA(CLOSE,720),CROSSDOT,LINETHICK2,COLORRED;{強弱分界線} HJ_1:=MAX(DYNAINFO(3),DYNAINFO(5)); HJ_2:=MIN(DYNAINFO(3),DYNAINFO(6)); HJ_3:=HJ_1-HJ_2; 壓力位:=HJ_2+HJ_3*7/8,COLORMAGENTA; 支撐位:=HJ_2+HJ_3*0.5/8,COLORMAGENTA; HJ_4:=CLOSE; HJ_5:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5); BAB1:=STICKLINE(HJ_5>0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0); BAB2:=STICKLINE(HJ_5<0,DYNAINFO(3),DYNAINFO(3)*(1+HJ_5),0.1,0); HJ_6:=CLOSE/DYNAINFO(3); HJ_7:=FILTER(HJ_5>0.015 AND HJ_5>REF(HJ_5,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR HJ_5>0.025,240); DRAWICON(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,23);{東風(fēng)小圖標(biāo)} DRAWICON(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,1); DRAWTEXT(HJ_7 AND HJ_6<1.06 AND CLOSE>DYNAINFO(3),C,' 東風(fēng)來了')COLORYELLOW; S木子0:=REF(CLOSE,1); S木子1:=REF(MAX(HIGH,S木子0),1); S木子2:=REF(MIN(LOW,S木子0),1); MACS:=(MA((((S木子1 - S木子2) / REF(CLOSE,2)) * 100),5) / 4); EMACS:=(EMA((((S木子1 - S木子2) / REF(CLOSE,2)) * 100),5) / 4); NOTEXT前收盤價:=REF(CLOSE,1)NODRAW; NOTEXT上市周期:=BARSSINCE(CLOSE)NODRAW; NOTEXTMA5:=MA(CLOSE,5); NOTEXTMA10:=MA(CLOSE,10); NOTEXTMA20:=MA(CLOSE,20); NOTEXTMA60:=MA(CLOSE,60); NOTEXTRMA5:=REF(MA(CLOSE,5),1); NOTEXTRMA10:=REF(MA(CLOSE,10),1); NOTEXTRMA20:=REF(MA(CLOSE,20),1); NOTEXTRMA60:=REF(MA(CLOSE,60),1); NOTEXT大盤價位:=INDEXC; NOTEXT昨日大盤:=REF(INDEXC,1); TT2:=1000; 木子0:=(BARSLAST(((HOUR = 9) AND (MINUTE = 31))) + 1); 木子1:=((AMOUNT / VOL) / 100); 木子2:=(SUM((CLOSE * VOL),0) / SUM(VOL,0)); 木子3:=(((SETCODE = 0) OR (SETCODE = 1)) AND (CLOSE < 500)); HHH:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < TT2),HHV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * HHV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000; LLL:=IF(((SETCODE < 2) AND (CONST(BARSSINCE(CLOSE)) < 241)),CONST(IF((TIME < TT2),HHV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * LLV(CLOSE,0)),0))),DRAWNULL),DOTLINE,COLORFF0000; 木子6:=IF(木子3,木子1,木子2); 價位:=CLOSE,LINETHICK4,COLORWHITE; 木子8:=MACS#DAY;{"NCFSYY00.MACS#DAY";} 木子9:=(木子8 * 1.3); 木子10:=((CLOSE > REF(CLOSE,1)) AND ((CLOSE / 木子6) > (1 + (木子8 / 100)))); 木子11:=((CLOSE < REF(CLOSE,1)) AND ((CLOSE / 木子6) < (1 - (木子8 / 100)))); 木子12:=((REF(SUM(木子10,0),1) = 0) AND (SUM(木子10,0) = 1)); 木子13:=((REF(SUM(木子11,0),1) = 0) AND (SUM(木子11,0) = 1)); 木子14:=(SUM(木子12,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(木子12)),0.5)); 木子15:=(SUM(木子13,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(木子13)),0.5)); CS1:=CONST(SUM(IF(木子14,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORGREEN; CB1:=CONST(SUM(IF(木子15,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORMAGENTA; 木子18:=CROSS(SUM((木子10 AND (CLOSE > (CS1 * (1 + (木子9 / 100))))),0),0.5); 木子19:=CROSS(SUM((木子11 AND (CLOSE < (CB1 * (1 - (木子9 / 100))))),0),0.5); 木子20:=(SUM(木子18,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(木子18)),0.5)); 木子21:=(SUM(木子19,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(木子19)),0.5)); CS2:=CONST(SUM(IF(木子20,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN; CB2:=CONST(SUM(IF(木子21,REF(CLOSE,1),DRAWNULL),0)),COLORMAGENTA; LF1:=木子12 OR 木子18 ; LF2:=木子13 OR 木子19 ; LF3:=木子15 OR 木子21 ; LF4:=木子14 OR 木子20 ; DRAWICON(LF1,(CLOSE*1.005),8);{S點} DRAWICON(LF4,CLOSE,39); DRAWICON(LF2,(CLOSE*0.995),7);{B點} DRAWICON(LF3,CLOSE,38); {底部紅條頂部綠條} F頂:=STICKLINE(C>壓力位,C,壓力位,1,0),COLORGREEN; F底:=STICKLINE(C<支撐位,C,支撐位*1.008,1,0),COLORRED; {超級分時} CJFSVAR1:=EMA(EMA(CLOSE,13),13); 控盤:=(CJFSVAR1-REF(CJFSVAR1,1))/REF(CJFSVAR1,1)*1000; CJFSJJ:=AMOUNT/VOL/100; CJFSP:=55; CJFSS:=8; CJFSM1:=3; 財:=(EMA(CLOSE,CJFSS)-EMA(CLOSE,CJFSP))*10; 神:=EMA(財,CJFSM1); BTJ1:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.005); BTJ11:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.03); BTJ12:=LAST(CJFSJJ>=REF(CJFSJJ,1),5,1) AND (CLOSE-CJFSJJ)/CJFSJJ<0.005; STJ1:=(CLOSE-CJFSJJ)/CJFSJJ>0.005; STJ01:=控盤<REF(控盤,1) AND 控盤>0.5; STJ02:=控盤>0; BTJ2:=控盤>REF(控盤,1) AND 控盤<(-0.2); BTJ22:=控盤>REF(控盤,1) AND 控盤<0; BTJ3:=CROSS(財,神) AND 財<(-0.3); BTJ32:=CROSS(財,神) AND 財<(-0.1); STJ31:=CROSS(神,財); STJ32:=CROSS(神,財) AND 財>1.618; BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13); BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13); 有莊:=IF(BTJ81,1,0); STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13); VAR11:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100; VAR22:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100; VAR33:=SMA(VAR22,2,1); CJFSNN:=SMA(VAR33,2,1); CJFSMM:=ABS(VAR11); 買:=STICKLINE(CROSS(CJFSNN,CJFSMM),3,20,2,0); 可買:IF(買,上軌,支撐位)COLORYELLOW,LINETHICK2; 必買:IF(BTJ81,上軌,支撐位)COLORYELLOW,LINETHICK2; VAR3:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1); 趨勢:=EMA(VAR3,3)-10; VAR4:=(趨勢-REF(趨勢,1))/REF(趨勢,1)*100; VAR6:=FILTER(趨勢>=90 AND VAR4,10); 賣1:=IF(VAR6,5,0); 賣2:=IF(STJ81,3,0),COLORLICYAN; STJ82:=FILTER(STJ02 AND STJ32,13); STJ83:=STJ81 AND STJ82; 清倉:=IF(STJ83,4,0),COLORRED; DRAWICON(可買 ,上軌,23); |
|
|
