咨詢內容：
請老師幫忙修改
MA20:=MA(CLOSE,20);?
MA120:=MA(CLOSE,120);?
MA30:=MA(CLOSE,37);?
MAP:=MA(CLOSE,8);?
AA5:=MA(CLOSE,21);
AA10:=MA(CLOSE,8),COLORFF0000;?
AA12:=MA(CLOSE,12),COLORFF0000;
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);?
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);?
MA13:=MA(CLOSE,13);?
VAR01:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);?
中期大底:LLV(LOW,30),COLORCDFFBB;?
短期底部0:=LLV(HIGH,30);?
短底:=EMA(VAR01,5);
?支撐:=HHV(短底,60);
?壓力1:HHV(LOW,20),COLORFAABEC;?
壓力:=SMA(LOW,5,1);
?中線:=MA(CLOSE,3);?
DRAWTEXT(FILTER(((((HIGH > 支撐) AND (CLOSE < 支撐)) AND ((CLOSE / OPEN) > (0 - 1.06))) AND (CLOSE < OPEN)),5),(HIGH + 0.02),''),COLORFFFF00;?
中軌道:=(MA(HIGH,15) * 1.05);
?天:=(MA(LOW,15) * 0.985);
?人:=(MA(LOW,15) * 0.96);?
地:=(((HIGH + LOW) + CLOSE) / 3);
?B1:=HHV(地,(4 * 15));?
B6:=LLV(地,(4 * 15));?
B7:=(B1 - B6);?
B8:=(MA(((地 - B6) / B7),2) * 80);
?VAR1:=(((CLOSE - LLV(LOW,100)) / (HHV(HIGH,100) - LLV(LOW,100))) * 200);
?飛龍頂底線1:=SMA(VAR1,3,1);?
VAR2:=SMA(飛龍頂底線1,3,1);?
VAR3:=((3 * 飛龍頂底線1) - (2 * VAR2));?
VAR4:=LLV(LOW,5);?
VAR5:=HHV(HIGH,5);?
VAR6:=(EMA((((CLOSE - VAR4) / (VAR5 - VAR4)) * 100),4) * 2);?
VAR7:=EMA(((0.667 * REF(VAR6,1)) + (0.333 * VAR6)),2);
?VAR8:=((3 * VAR6) - (2 * VAR7));?
VAR9:=(POW(MA(CLOSE,5),2) + MA(CLOSE,5));?
VARA:=(POW(MA(LOW,5),2) + MA(LOW,5));?
VARB:=(POW(MA(HIGH,5),2) + MA(HIGH,5));?
VARC:=(((((VAR9 - LLV(VARA,64)) / (HHV(VARB,64) - LLV(VARA,64))) * 150) + 65) - 10);?
VARD:=((SMA(VARC,3,1) * 1.5) - 100);?
VARE:=SMA(VARD,3,1);?
VARF:=((3 * VARD) - (2 * VARE));?
VAR10:=(((HIGH + LOW) + (CLOSE * 2)) / 4);?
VAR11:=EMA(VAR10,13);?
VAR12:=STD(VAR10,13);?
VAR13:=(((VAR10 - VAR11) * 100) / VAR12);?
VAR14:=EMA(VAR13,5);
?VAR15:=EMA(VAR14,13);
?VAR16:=((EMA(VAR14,13) + 200) - 100);?
VAR17:=EMA(VAR16,10);
?VAR18:=((3 * VAR16) - (2 * VAR17));?
VAR19:=(((飛龍頂底線1 + VAR6) + VARD) + VAR16);?
VAR1A:=(((VAR2 + VAR7) + VARE) + VAR17);?
VAR1B:=(((VAR3 + VAR8) + VARF) + VAR18);
?VAR1C:=(((HIGH + LOW) + CLOSE) / 3);?
AMOUNT:=AVPRICE*V;
VAR1D:=((AMOUNT / VOL) / 100);?
VAR1E:=((SUM(AMOUNT,5) / SUM(VOL,5)) / 100);?
VAR1F:=((VAR1C - MA(VAR1C,34)) / (0.015 * AVEDEV(VAR1C,34)));?
VAR21:=((((HIGH + LOW) + CLOSE) + VAR1C) / 4);
?VAR22:=EMA(VAR21,24);
?VAR23:=STD(VAR21,24);?
VAR24:=(((VAR21 - VAR22) / VAR23) * 100);
?VAR25:=((VAR1C - MA(VAR1C,24)) / (0.015 * AVEDEV(VAR1C,24)));?
VAR26:=EMA(VAR24,5);
?VAR27:=((VAR1D - MA(VAR1D,21)) / (0.015 * AVEDEV(VAR1D,21)));?
VAR28:=((VAR1E - MA(VAR1E,90)) / (0.015 * AVEDEV(VAR1E,90)));?
VAR29:=(((((((VAR28 + VAR27) + VAR26) + VAR25) + VAR1F) / 5) + 165) / 4);?
VAR2A:=(((((VAR19 + VAR1A) + (VAR1B * 30)) / 32) / 5) - 15);
?VAR2B:=(((VAR29 + VAR2A) / 2) / 1.1);
?VAR2C:=VAR2B;
?短線:=MA(VAR2C,26);?
MID:=(短線 + (2 * STD(VAR2C,26)));?
UPPER:=(短線 - (2 * STD(VAR2C,26)));?
LOWER:=IF((VAR2C > 短線),短線,VAR2C);?
XY:=MA(CLOSE,5);
?M80:=MA(CLOSE,80);?
短期底部:(LLV(HIGH,30) * 0.93),COLOR0000FF;?
MA80:=LLV(HIGH,30);?
短期底部2:=SMA(CLOSE,2,1);
?趨勢:=(MA(LOW,10) * 0.96);?
趨:=(EMA(OPEN,107) * 0.897);
?超跌位2:=MA(CLOSE,15);
?GF:=MA(CLOSE,10);
?MAN:=(SMA(HIGH,21,2) * 1.05);
?上1:=(HHV(短底,60) * 0.92);
?壓力2:=(SMA(HIGH,21,2) * 1.035);
?阻擋線:=(SMA(LOW,21,2) * 0.96);
?下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);?
RSV:=SMA(下檔線,3,1);?
K:=SMA(RSV,3,1);
?D:=((3 * RSV) - (2 * K));?
J:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);?
VAR2P:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);?
VAR3P:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);?
VAR4P:=(((J + (2 * VAR2P)) + (3 * VAR3P)) / 6);
?VAR5P:=MA(VAR4P,3);?
VAR6P:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);
?RSV12:=SMA(VAR6P,3,1);?
K12:=SMA(RSV12,3,1);?
D12:=((3 * RSV12) - (2 * K12));
?J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);?
RSV24:=SMA(J12,3,1);?
K24:=SMA(RSV24,3,1);
?D24:=((3 * RSV24) - (2 * K24));
?J24:=IF(CROSS(D,D24),LOW,REF(LOW,BARSLAST(CROSS(D,D24))));?
壓力位:IF(CROSS(D24,D),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D)))),COLORFFFFFF;
?支撐位:=IF((CLOSE >= MA(CLOSE,20)),80,50);
?U2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);?
L2L:=IF(((D < 支撐位) AND (REF(D,1) >= 支撐位)),HHV(REF(HIGH,1),(BARSLAST(((D >= 支撐位) AND (REF(D,1) < 支撐位))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((D >= 支撐位) AND (REF(D,1) < 支撐位))) - 1)),BARSLAST(((D < 支撐位) AND REF(D,1)))));?
RH1:=IF((HIGH > L2L),LOW,REF(LOW,BARSLAST((HIGH > L2L))));?
RH4:=IF((HIGH > L2L),D,REF(D,BARSLAST((HIGH > L2L))));?
RH42:=IF((((HIGH > RH1) AND (D < RH4)) AND (D < D24)),HIGH,REF(HIGH,BARSLAST((((HIGH > RH1) AND (D < RH4)) AND (D < D24)))));?
RH5:=IF(((D > U2L) AND (REF(D,1) <= U2L)),LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),BARSLAST(((D > U2L) AND REF(D,1)))));?
RL1:=IF((LOW < RH5),HIGH,REF(HIGH,BARSLAST((LOW < RH5))));?
RL4:=IF((LOW < RH5),D,REF(D,BARSLAST((LOW < RH5))));?
RL42:=IF((((LOW < RL1) AND (D > RL4)) AND (D > D24)),LOW,REF(LOW,BARSLAST((((LOW < RL1) AND (D > RL4)) AND (D > D24)))));?
長期底部:LLV(HIGH,30),COLORFF0000;?
DRAWTEXT(FILTER(((((RL42 = J24) AND (CLOSE > OPEN)) AND (CLOSE > 長期底部)) AND (LOW <= J24)),20),(LOW - 15),'底成'),VALIGN0,FONTSIZE16,COLORMAGENTA;?
RL5:=(SMA(HIGH,5,2) * 1.05);?
上:=(SMA(LOW,5,2) * 0.96);?
下:=SMA(LOW,2,1);?
中:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);?
X1:=EMA(中,10);?
X2:=REF(X1,1);?
X3:=((REF(HIGH,1) + REF(LOW,1)) / 2);?
X4:=(MA(CLOSE,21) + (2 * STD(CLOSE,21)));?
X5:=REF(CLOSE,1);?
X6:=((SMA(MAX((CLOSE - X5),0),7,1) / SMA(ABS((CLOSE - X5)),7,1)) * 100);?
X7:=CROSS(79,X6);?
X8:=FILTER(X7,4);?
X9:=MA(CLOSE,115);?
VAR001:=EMA(CLOSE,8);
?飛龍頂底線:=EMA(VAR001,20);?
VAR002:=CROSS(VAR001,飛龍頂底線);
?VAR003:=(VAR001 < MA(CLOSE,20));?
VAR004:=(((HHV(HIGH,36) - CLOSE) / (HHV(HIGH,36) - LLV(LOW,36))) * 100);?
VAR005:=SMA(VAR004,5,1);?
VAR006:=SMA(VAR005,8,1);?
VAR007:=(CROSS(VAR005,VAR006) AND (VAR006 < 5));?
VAR008:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR007);?
VAR009:=IF((CLOSE > 1000),VAR007,VAR008);?
VAR00F:=CROSS(X1,X2);?
MA115:=VAR00F;?
低買:=(VAR002 AND VAR003);?
黑馬起步:=VAR009;?
DRAWTEXT(X8,(HIGH * 1.001),'出貨'),VALIGN0,FONTSIZE16,COLORGREEN;?
DRAWTEXT((黑馬起步 > 0),(HIGH * 1.04),'逃命'),COLORFF0000;?
逃遁:=(SMA(HIGH,21,2) * 1.05);?
阻擋:=(SMA(LOW,21,2) * 0.94);?
DRAWTEXT(FILTER(((((((((CLOSE / OPEN) > 1.03) AND ((超跌位2 - REF(超跌位2,1)) > 0)) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (HIGH < 壓力1)) AND (CLOSE < 壓力1)) AND ((壓力2 - REF(壓力2,1)) > 0)) AND (CLOSE < MAN)),3),LOW,'出擊'),FONTSIZE16,COLOR646E69;?
DRAWTEXT((((((低買 > 0) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 壓力位)) AND (HIGH < X9)) AND ((X2 - REF(X2,1)) > 0)),LOW,'黑馬'),COLOR00FF00;?
DRAWTEXT((((((CROSS(VAR2C,短線) AND ((CLOSE - REF(HIGH,1)) > 0)) AND ((中線 - REF(中線,1)) > 0)) AND (HIGH <= 壓力1)) AND (CLOSE < MA20)) AND (LOW <= 中線)),(LOW - 0.06),'關注'),FONTSIZE16,COLOR00FF00;?
DRAWTEXT((((CROSS(VAR2C,UPPER) AND (HIGH < 壓力1)) AND ((XY - REF(XY,1)) > 0)) AND (HIGH < 支撐)),LOW,'買'),COLORFFFFFF;?
DRAWTEXT(FILTER(((((((LOW <= 天) AND (CLOSE >= MA20)) AND (HIGH < 壓力1)) AND ((天 - REF(天,1)) > 0)) AND (CLOSE < 壓力1)) AND ((MA20 - REF(MA20,1)) > 0)),6),(LOW - 0.12),'全倉'),FONTSIZE16,COLOR00FFFF;?
DRAWTEXT(FILTER((((((MA115 AND (CLOSE < 壓力位)) AND ((人 - REF(人,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 上1)) AND ((CLOSE / OPEN) > 1.03)),5),LOW,'●買'),FONTSIZE16,COLOR93EE7D;?
DRAWTEXT(((((LOW <= 上) AND (HIGH >= 短期底部)) AND (CLOSE >= 長期底部)) AND ((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),COLOR0000FF;?
DRAWTEXT(FILTER((((((LOW <= 阻擋線) AND ((MA20 - REF(MA20,1)) > 0)) AND (OPEN <= 上1)) AND (HIGH > 上1)) AND (CLOSE > 阻擋線)),5),LOW,'漲10%'),COLORFFFFFF;?
DRAWTEXT(FILTER((((((B8 <= 1) AND (LOW <= 阻擋)) AND (CLOSE > OPEN)) AND (LOW <= 中期大底)) AND (CLOSE >= 長期底部)),3),(LOW - 0.08),'短抄E'),COLORA100FF;?
DRAWTEXT((((CROSS(D,0) AND (HIGH < 壓力位)) AND (VAR5P <= (0 - 7))) AND (CLOSE < XY)),(LOW - 0.11),'半倉'),COLORFFFF00;?
DRAWTEXT(FILTER((((CROSS(趨勢,趨) AND (HIGH < M80)) AND (HIGH < 壓力1)) AND LLV(LOW,0)),10),LOW,'果斷買'),COLOR668800;?
DRAWTEXT(FILTER(((CROSS(中線,人) AND (LOW <= 人)) AND (CLOSE >= 人)),4),(LOW - 0.06),'買'),COLOR00FF00;?
DRAWTEXT(((CROSS(阻擋,長期底部) AND (BB10 > 1)) AND (HIGH < 支撐)),LOW,'出擊'),COLORA04F00;?
DRAWTEXT(FILTER((((((((MA20 - REF(MA20,1)) > 0) AND (HIGH < 支撐)) AND ((AA10 - REF(AA10,1)) > 0)) AND (HIGH < 壓力1)) AND (VOL >= REF(VOL,1))) AND CROSS(CLOSE,MA20)),57),LOW,'突破生命線'),FONTSIZE16,COLORYELLOW;?
DRAWTEXT(FILTER(((((LOW <= MA80) AND (CLOSE > MA80)) AND (CLOSE > OPEN)) AND (短期底部2 <= MA80)),8),LOW,'底'),VALIGN0,FONTSIZE16,COLORMAGENTA;?
DRAWTEXT(((CROSS(MA20,壓力位) AND (LOW <= MA20)) AND ((MA20 - REF(MA20,1)) > 0.02)),(LOW - 0.03),'絕佳買點'),FONTSIZE16,COLORWHITE;?
DRAWTEXT((((((((CROSS(CLOSE,MA20) AND (HIGH < 壓力位)) AND (OPEN < MA20)) AND (HIGH < 支撐)) AND ((MAN - REF(MAN,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (D < 63)) AND ((MA20 - REF(MA20,1)) > 0)),(LOW - 0.05),'大牛浮水'),FONTSIZE16,COLORYELLOW;?
DRAWTEXT(CROSS(中期大底,短期底部),(LOW - 0.02),'短線買');?
短趨勢線:MA(CLOSE,13),COLORRED,LINETHICK3;?
中趨勢線1:=MA(CLOSE,33),LINETHICK1;?
中趨勢線:MA(CLOSE,55),LINETHICK1,COLORGRAY;?
漲:IF(短趨勢線>REF(短趨勢線,1),短趨勢線,NULL),COLORRED,LINETHICK3;?
平:IF(短趨勢線=REF(短趨勢線,1),短趨勢線,NULL),COLOR00FFFF,LINETHICK3;?
跌:IF(短趨勢線<REF(短趨勢線,1),短趨勢線,NULL),COLORGREEN,LINETHICK3;?
INDEXH:="999001$H";?
INDEXL:="999001$L";
INDEXC:="999001$C";?
STICKLINE(CROSS(MA(CLOSE,13),C) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L,L*0.98,3,0),COLORYELLOW;?
DRAWTEXT(CROSS(MA(CLOSE,13),C) AND INDEXC>MA(INDEXC,13) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L*0.95,'買'),COLORRED,LINETHICK2;?
DRAWTEXT(CROSS(CLOSE,(((C-REF(MA(CLOSE,20),1))/20+MA(CLOSE,13))*1.20)) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1),H*1.04,'減倉'),COLORGREEN,LINETHICK2;?
STICKLINE(CROSS(CLOSE,(((C-REF(MA(CLOSE,20),1))/20+MA(CLOSE,13))*1.20)) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1),H,H*1.02,3,0),COLORYELLOW,LINETHICK2;?
VAR011:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;?
DRAWTEXT(VAR011>9 AND FILTER(VAR011<REF(VAR011,1),5),H*1.06,'洗盤'),COLORGREEN,LINETHICK2;?
DRAWTEXT(VAR011>20 AND FILTER(VAR011<REF(VAR011,1),5),H*1.02,'賣出'),COLORYELLOW,LINETHICK2;?
DRAWTEXT(FILTER(VAR011<-9 AND VAR011>REF(VAR011,1),18),L*0.95,'反彈'),COLORRED,LINETHICK2;?
DRAWTEXT(VAR011<-20 AND INDEXC<MA(INDEXC,13) AND FILTER(VAR011> REF(VAR011,1),5),L*0.93,'抄底'),COLORYELLOW,LINETHICK2;?
//DRAWTEXT(VAR012 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),H*1.1,'危險'),COLORYELLOW;?
VAR013:=IF(MA(CLOSE,13)>REF(MA(CLOSE,13),1),MA(CLOSE,13),NULL);?
DRAWTEXT(IF(CLOSE>MA(CLOSE,13) AND OPEN<CLOSE,-0.1,0) AND ((C-REF(C,1))/(REF(C,1))>0.061) AND (MA(CLOSE,13)=VAR013) AND (MA(CLOSE,1)>MA(CLOSE,13)) AND (VOL>REF(HHV(VOL,3),1)*2),L*0.98,'主力介入'),COLORMAGENTA;?
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);?
Y:=EMA(CLOSE,10);?
DRAWTEXT(CROSS(X,Y),(LOW * 0.999),'回買'),VALIGN0,FONTSIZE16,COLORYELLOW;
?
?來源:程序化99網（ m.weiqiv.net.cn ）
博易技術人員：
MA20:=MA(CLOSE,20);?
MA120:=MA(CLOSE,120);?
MA30:=MA(CLOSE,37);?
MAP:=MA(CLOSE,8);?
AA5:=MA(CLOSE,21);
AA10:=MA(CLOSE,8),COLORFF0000;?
AA12:=MA(CLOSE,12),COLORFF0000;
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);?
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);?
MA13:=MA(CLOSE,13);?
VAR01:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);?
中期大底:LLV(LOW,30),COLORCDFFBB;?
短期底部0:=LLV(HIGH,30);?
短底:=EMA(VAR01,5);
?支撐:=HHV(短底,60);
?壓力1:HHV(LOW,20),COLORFAABEC;?
壓力:=SMA(LOW,5,1);
?中線:=MA(CLOSE,3);?
DRAWTEXT(FILTER(((((HIGH > 支撐) AND (CLOSE < 支撐)) AND ((CLOSE / OPEN) > (0 - 1.06))) AND (CLOSE < OPEN)),5),(HIGH + 0.02),''),COLORFFFF00;?
中軌道:=(MA(HIGH,15) * 1.05);
?天:=(MA(LOW,15) * 0.985);
?人:=(MA(LOW,15) * 0.96);?
地:=(((HIGH + LOW) + CLOSE) / 3);
?B1:=HHV(地,(4 * 15));?
B6:=LLV(地,(4 * 15));?
B7:=(B1 - B6);?
B8:=(MA(((地 - B6) / B7),2) * 80);
?VAR1:=(((CLOSE - LLV(LOW,100)) / (HHV(HIGH,100) - LLV(LOW,100))) * 200);
?飛龍頂底線1:=SMA(VAR1,3,1);?
VAR2:=SMA(飛龍頂底線1,3,1);?
VAR3:=((3 * 飛龍頂底線1) - (2 * VAR2));?
VAR4:=LLV(LOW,5);?
VAR5:=HHV(HIGH,5);?
VAR6:=(EMA((((CLOSE - VAR4) / (VAR5 - VAR4)) * 100),4) * 2);?
VAR7:=EMA(((0.667 * REF(VAR6,1)) + (0.333 * VAR6)),2);
?VAR8:=((3 * VAR6) - (2 * VAR7));?
VAR9:=(POW(MA(CLOSE,5),2) + MA(CLOSE,5));?
VARA:=(POW(MA(LOW,5),2) + MA(LOW,5));?
VARB:=(POW(MA(HIGH,5),2) + MA(HIGH,5));?
VARC:=(((((VAR9 - LLV(VARA,64)) / (HHV(VARB,64) - LLV(VARA,64))) * 150) + 65) - 10);?
VARD:=((SMA(VARC,3,1) * 1.5) - 100);?
VARE:=SMA(VARD,3,1);?
VARF:=((3 * VARD) - (2 * VARE));?
VAR10:=(((HIGH + LOW) + (CLOSE * 2)) / 4);?
VAR11:=EMA(VAR10,13);?
VAR12:=STD(VAR10,13);?
VAR13:=(((VAR10 - VAR11) * 100) / VAR12);?
VAR14:=EMA(VAR13,5);
?VAR15:=EMA(VAR14,13);
?VAR16:=((EMA(VAR14,13) + 200) - 100);?
VAR17:=EMA(VAR16,10);
?VAR18:=((3 * VAR16) - (2 * VAR17));?
VAR19:=(((飛龍頂底線1 + VAR6) + VARD) + VAR16);?
VAR1A:=(((VAR2 + VAR7) + VARE) + VAR17);?
VAR1B:=(((VAR3 + VAR8) + VARF) + VAR18);
?VAR1C:=(((HIGH + LOW) + CLOSE) / 3);?
VAR1D:=((AMOUNT / VOL) / 100);?
VAR1E:=((SUM(AMOUNT,5) / SUM(VOL,5)) / 100);?
VAR1F:=((VAR1C - MA(VAR1C,34)) / (0.015 * AVEDEV(VAR1C,34)));?
VAR21:=((((HIGH + LOW) + CLOSE) + VAR1C) / 4);
?VAR22:=EMA(VAR21,24);
?VAR23:=STD(VAR21,24);?
VAR24:=(((VAR21 - VAR22) / VAR23) * 100);
?VAR25:=((VAR1C - MA(VAR1C,24)) / (0.015 * AVEDEV(VAR1C,24)));?
VAR26:=EMA(VAR24,5);
?VAR27:=((VAR1D - MA(VAR1D,21)) / (0.015 * AVEDEV(VAR1D,21)));?
VAR28:=((VAR1E - MA(VAR1E,90)) / (0.015 * AVEDEV(VAR1E,90)));?
VAR29:=(((((((VAR28 + VAR27) + VAR26) + VAR25) + VAR1F) / 5) + 165) / 4);?
VAR2A:=(((((VAR19 + VAR1A) + (VAR1B * 30)) / 32) / 5) - 15);
?VAR2B:=(((VAR29 + VAR2A) / 2) / 1.1);
?VAR2C:=VAR2B;
?短線:=MA(VAR2C,26);?
MID:=(短線 + (2 * STD(VAR2C,26)));?
UPPER:=(短線 - (2 * STD(VAR2C,26)));?
LOWER:=IF((VAR2C > 短線),短線,VAR2C);?
XY:=MA(CLOSE,5);
?M80:=MA(CLOSE,80);?
短期底部:(LLV(HIGH,30) * 0.93),COLOR0000FF;?
MA80:=LLV(HIGH,30);?
短期底部2:=SMA(CLOSE,2,1);
?趨勢:=(MA(LOW,10) * 0.96);?
趨:=(EMA(OPEN,107) * 0.897);
?超跌位2:=MA(CLOSE,15);
?GF:=MA(CLOSE,10);
?MAN:=(SMA(HIGH,21,2) * 1.05);
?上1:=(HHV(短底,60) * 0.92);
?壓力2:=(SMA(HIGH,21,2) * 1.035);
?阻擋線:=(SMA(LOW,21,2) * 0.96);
?下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);?
RSV:=SMA(下檔線,3,1);?
K:=SMA(RSV,3,1);
?D:=((3 * RSV) - (2 * K));?
J:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);?
VAR2P:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);?
VAR3P:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);?
VAR4P:=(((J + (2 * VAR2P)) + (3 * VAR3P)) / 6);
?VAR5P:=MA(VAR4P,3);?
VAR6P:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100);
?RSV12:=SMA(VAR6P,3,1);?
K12:=SMA(RSV12,3,1);?
D12:=((3 * RSV12) - (2 * K12));
?J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);?
RSV24:=SMA(J12,3,1);?
K24:=SMA(RSV24,3,1);
?D24:=((3 * RSV24) - (2 * K24));
?J24:=IF(CROSS(D,D24),LOW,REF(LOW,BARSLAST(CROSS(D,D24))));?
壓力位:IF(CROSS(D24,D),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D)))),COLORFFFFFF;
?支撐位:=IF((CLOSE >= MA(CLOSE,20)),80,50);
?U2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);?
L2L:=IF(((D < 支撐位) AND (REF(D,1) >= 支撐位)),HHV(REF(HIGH,1),(BARSLAST(((D >= 支撐位) AND (REF(D,1) < 支撐位))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((D >= 支撐位) AND (REF(D,1) < 支撐位))) - 1)),BARSLAST(((D < 支撐位) AND REF(D,1)))));?
RH1:=IF((HIGH > L2L),LOW,REF(LOW,BARSLAST((HIGH > L2L))));?
RH4:=IF((HIGH > L2L),D,REF(D,BARSLAST((HIGH > L2L))));?
RH42:=IF((((HIGH > RH1) AND (D < RH4)) AND (D < D24)),HIGH,REF(HIGH,BARSLAST((((HIGH > RH1) AND (D < RH4)) AND (D < D24)))));?
RH5:=IF(((D > U2L) AND (REF(D,1) <= U2L)),LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),BARSLAST(((D > U2L) AND REF(D,1)))));?
RL1:=IF((LOW < RH5),HIGH,REF(HIGH,BARSLAST((LOW < RH5))));?
RL4:=IF((LOW < RH5),D,REF(D,BARSLAST((LOW < RH5))));?
RL42:=IF((((LOW < RL1) AND (D > RL4)) AND (D > D24)),LOW,REF(LOW,BARSLAST((((LOW < RL1) AND (D > RL4)) AND (D > D24)))));?
長期底部:LLV(HIGH,30),COLORFF0000;?
DRAWTEXT(FILTER(((((RL42 = J24) AND (CLOSE > OPEN)) AND (CLOSE > 長期底部)) AND (LOW <= J24)),20),(LOW - 15),'底成'),VALIGN0,FONTSIZE16,COLORMAGENTA;?
RL5:=(SMA(HIGH,5,2) * 1.05);?
上:=(SMA(LOW,5,2) * 0.96);?
下:=SMA(LOW,2,1);?
中:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);?
X1:=EMA(中,10);?
X2:=REF(X1,1);?
X3:=((REF(HIGH,1) + REF(LOW,1)) / 2);?
X4:=(MA(CLOSE,21) + (2 * STD(CLOSE,21)));?
X5:=REF(CLOSE,1);?
X6:=((SMA(MAX((CLOSE - X5),0),7,1) / SMA(ABS((CLOSE - X5)),7,1)) * 100);?
X7:=CROSS(79,X6);?
X8:=FILTER(X7,4);?
X9:=MA(CLOSE,115);?
VAR001:=EMA(CLOSE,8);
?飛龍頂底線:=EMA(VAR001,20);?
VAR002:=CROSS(VAR001,飛龍頂底線);
?VAR003:=(VAR001 < MA(CLOSE,20));?
VAR004:=(((HHV(HIGH,36) - CLOSE) / (HHV(HIGH,36) - LLV(LOW,36))) * 100);?
VAR005:=SMA(VAR004,5,1);?
VAR006:=SMA(VAR005,8,1);?
VAR007:=(CROSS(VAR005,VAR006) AND (VAR006 < 5));?
VAR008:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR007);?
VAR009:=IF((CLOSE > 1000),VAR007,VAR008);?
VAR00F:=CROSS(X1,X2);?
MA115:=VAR00F;?
低買:=(VAR002 AND VAR003);?
黑馬起步:=VAR009;?
DRAWTEXT(X8,(HIGH * 1.001),'出貨'),VALIGN0,FONTSIZE16,COLORGREEN;?
DRAWTEXT((黑馬起步 > 0),(HIGH * 1.04),'逃命'),COLORFF0000;?
逃遁:=(SMA(HIGH,21,2) * 1.05);?
阻擋:=(SMA(LOW,21,2) * 0.94);?
DRAWTEXT(FILTER(((((((((CLOSE / OPEN) > 1.03) AND ((超跌位2 - REF(超跌位2,1)) > 0)) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (HIGH < 壓力1)) AND (CLOSE < 壓力1)) AND ((壓力2 - REF(壓力2,1)) > 0)) AND (CLOSE < MAN)),3),LOW,'出擊'),FONTSIZE16,COLOR646E69;?
DRAWTEXT((((((低買 > 0) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 壓力位)) AND (HIGH < X9)) AND ((X2 - REF(X2,1)) > 0)),LOW,'黑馬'),COLOR00FF00;?
DRAWTEXT((((((CROSS(VAR2C,短線) AND ((CLOSE - REF(HIGH,1)) > 0)) AND ((中線 - REF(中線,1)) > 0)) AND (HIGH <= 壓力1)) AND (CLOSE < MA20)) AND (LOW <= 中線)),(LOW - 0.06),'關注'),FONTSIZE16,COLOR00FF00;?
DRAWTEXT((((CROSS(VAR2C,UPPER) AND (HIGH < 壓力1)) AND ((XY - REF(XY,1)) > 0)) AND (HIGH < 支撐)),LOW,'買'),COLORFFFFFF;?
DRAWTEXT(FILTER(((((((LOW <= 天) AND (CLOSE >= MA20)) AND (HIGH < 壓力1)) AND ((天 - REF(天,1)) > 0)) AND (CLOSE < 壓力1)) AND ((MA20 - REF(MA20,1)) > 0)),6),(LOW - 0.12),'全倉'),FONTSIZE16,COLOR00FFFF;?
DRAWTEXT(FILTER((((((MA115 AND (CLOSE < 壓力位)) AND ((人 - REF(人,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 上1)) AND ((CLOSE / OPEN) > 1.03)),5),LOW,'●買'),FONTSIZE16,COLOR93EE7D;?
DRAWTEXT(((((LOW <= 上) AND (HIGH >= 短期底部)) AND (CLOSE >= 長期底部)) AND ((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),COLOR0000FF;?
DRAWTEXT(FILTER((((((LOW <= 阻擋線) AND ((MA20 - REF(MA20,1)) > 0)) AND (OPEN <= 上1)) AND (HIGH > 上1)) AND (CLOSE > 阻擋線)),5),LOW,'漲10%'),COLORFFFFFF;?
DRAWTEXT(FILTER((((((B8 <= 1) AND (LOW <= 阻擋)) AND (CLOSE > OPEN)) AND (LOW <= 中期大底)) AND (CLOSE >= 長期底部)),3),(LOW - 0.08),'短抄E'),COLORA100FF;?
DRAWTEXT((((CROSS(D,0) AND (HIGH < 壓力位)) AND (VAR5P <= (0 - 7))) AND (CLOSE < XY)),(LOW - 0.11),'半倉'),COLORFFFF00;?
DRAWTEXT(FILTER((((CROSS(趨勢,趨) AND (HIGH < M80)) AND (HIGH < 壓力1)) AND LLV(LOW,0)),10),LOW,'果斷買'),COLOR668800;?
DRAWTEXT(FILTER(((CROSS(中線,人) AND (LOW <= 人)) AND (CLOSE >= 人)),4),(LOW - 0.06),'買'),COLOR00FF00;?
DRAWTEXT(((CROSS(阻擋,長期底部) AND (BB10 > 1)) AND (HIGH < 支撐)),LOW,'出擊'),COLORA04F00;?
DRAWTEXT(FILTER((((((((MA20 - REF(MA20,1)) > 0) AND (HIGH < 支撐)) AND ((AA10 - REF(AA10,1)) > 0)) AND (HIGH < 壓力1)) AND (VOL >= REF(VOL,1))) AND CROSS(CLOSE,MA20)),57),LOW,'突破生命線'),FONTSIZE16,COLORYELLOW;?
DRAWTEXT(FILTER(((((LOW <= MA80) AND (CLOSE > MA80)) AND (CLOSE > OPEN)) AND (短期底部2 <= MA80)),8),LOW,'底'),VALIGN0,FONTSIZE16,COLORMAGENTA;?
DRAWTEXT(((CROSS(MA20,壓力位) AND (LOW <= MA20)) AND ((MA20 - REF(MA20,1)) > 0.02)),(LOW - 0.03),'絕佳買點'),FONTSIZE16,COLORWHITE;?
DRAWTEXT((((((((CROSS(CLOSE,MA20) AND (HIGH < 壓力位)) AND (OPEN < MA20)) AND (HIGH < 支撐)) AND ((MAN - REF(MAN,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (D < 63)) AND ((MA20 - REF(MA20,1)) > 0)),(LOW - 0.05),'大牛浮水'),FONTSIZE16,COLORYELLOW;?
DRAWTEXT(CROSS(中期大底,短期底部),(LOW - 0.02),'短線買');?
短趨勢線:MA(CLOSE,13),COLORRED,LINETHICK3;?
中趨勢線1:=MA(CLOSE,33),LINETHICK1;?
中趨勢線:MA(CLOSE,55),LINETHICK1,COLORGRAY;?
漲:IF(短趨勢線>REF(短趨勢線,1),短趨勢線,DRAWNULL),COLORRED,LINETHICK3;?
平:IF(短趨勢線=REF(短趨勢線,1),短趨勢線,DRAWNULL),COLOR00FFFF,LINETHICK3;?
跌:IF(短趨勢線<REF(短趨勢線,1),短趨勢線,DRAWNULL),COLORGREEN,LINETHICK3;?
INDEXH1:="999001$H";?
INDEXL1:="999001$L";
INDEXC1:="999001$C";?
STICKLINE(CROSS(MA(CLOSE,13),C) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L,L*0.98,3,0),COLORYELLOW;?
DRAWTEXT(CROSS(MA(CLOSE,13),C) AND INDEXC1>MA(INDEXC,13) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L*0.95,'買'),COLORRED,LINETHICK2;?
DRAWTEXT(CROSS(CLOSE,(((C-REF(MA(CLOSE,20),1))/20+MA(CLOSE,13))*1.20)) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1),H*1.04,'減倉'),COLORGREEN,LINETHICK2;?
STICKLINE(CROSS(CLOSE,(((C-REF(MA(CLOSE,20),1))/20+MA(CLOSE,13))*1.20)) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1),H,H*1.02,3,0),COLORYELLOW,LINETHICK2;?
VAR011:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;?
DRAWTEXT(VAR011>9 AND FILTER(VAR011<REF(VAR011,1),5),H*1.06,'洗盤'),COLORGREEN,LINETHICK2;?
DRAWTEXT(VAR011>20 AND FILTER(VAR011<REF(VAR011,1),5),H*1.02,'賣出'),COLORYELLOW,LINETHICK2;?
DRAWTEXT(FILTER(VAR011<-9 AND VAR011>REF(VAR011,1),18),L*0.95,'反彈'),COLORRED,LINETHICK2;?
DRAWTEXT(VAR011<-20 AND INDEXC1<MA(INDEXC1,13) AND FILTER(VAR011> REF(VAR011,1),5),L*0.93,'抄底'),COLORYELLOW,LINETHICK2;?
//DRAWTEXT(VAR012 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),H*1.1,'危險'),COLORYELLOW;?
VAR013:=IF(MA(CLOSE,13)>REF(MA(CLOSE,13),1),MA(CLOSE,13),DRAWNULL);?
DRAWTEXT(IF(CLOSE>MA(CLOSE,13) AND OPEN<CLOSE,-0.1,0) AND ((C-REF(C,1))/(REF(C,1))>0.061) AND (MA(CLOSE,13)=VAR013) AND (MA(CLOSE,1)>MA(CLOSE,13)) AND (VOL>REF(HHV(VOL,3),1)*2),L*0.98,'主力介入'),COLORMAGENTA;?
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);?
Y:=EMA(CLOSE,10);?
DRAWTEXT(CROSS(X,Y),(LOW * 0.999),'回買'),VALIGN0,FONTSIZE16,COLORYELLOW;
是副圖嗎主圖不顯示
來源 程序化久久網
打印本文
關閉窗口