老師您好！幫忙改哈這個指標(biāo)！
作者：文華財(cái)經(jīng) 來源：cxh99.com 發(fā)布時間：2018年01月31日
-
咨詢內(nèi)容：
?漲停:=BETWEEN(CLOSE/REF(CLOSE,1),1.0984,1.110) AND C=H AND C>O;{藍(lán)心板}R1:=(C>REF(C,1) AND C>REF(C,2));R2:=(REF(R1,1) AND C<=REF(C,1) AND C>=REF(C,2));R3:=(REF(R2,1) AND C>=REF(C,1) AND C<=REF(C,2));R4:=(REF(R3,1) AND C<=REF(C,1) AND C>=REF(C,2));R5:=(REF(R4,1) AND C>=REF(C,1) AND C<=REF(C,2));R6:=(REF(R5,1) AND C<=REF(C,1) AND C>=REF(C,2));R7:=(REF(R6,1) AND C>=REF(C,1) AND C<=REF(C,2));R8:=(REF(R7,1) AND C<=REF(C,1) AND C>=REF(C,2));R9:=(REF(R8,1) AND C>=REF(C,1) AND C<=REF(C,2));RA:=(REF(R9,1) AND C<=REF(C,1) AND C>=REF(C,2));RB:=(REF(RA,1) AND C>=REF(C,1) AND C<=REF(C,2));RC:=(REF(RB,1) AND C<=REF(C,1) AND C>=REF(C,2));RD:=(C<REF(C,1) AND C<REF(C,2));RE:=(REF(RD,1) AND C>=REF(C,1) AND C<=REF(C,2));RF:=(REF(RE,1) AND C<=REF(C,1) AND C>=REF(C,2));R10:=(REF(RF,1) AND C>=REF(C,1) AND C<=REF(C,2));R11:=(REF(R10,1) AND C<=REF(C,1) AND C>=REF(C,2));R12:=(REF(R11,1) AND C>=REF(C,1) AND C<=REF(C,2));R13:=(REF(R12,1) AND C<=REF(C,1) AND C>=REF(C,2));R14:=(REF(R13,1) AND C>=REF(C,1) AND C<=REF(C,2));R15:=(REF(R14,1) AND C<=REF(C,1) AND C>=REF(C,2));R16:=(REF(R15,1) AND C>=REF(C,1) AND C<=REF(C,2));R17:=(REF(R16,1) AND C<=REF(C,1) AND C>=REF(C,2));R18:=(REF(R17,1) AND C>=REF(C,1) AND C<=REF(C,2));R19:=((REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13?OR R14 OR R15 OR R16 OR R17 OR R18,1)) AND R1);R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);藍(lán)心板:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1);{綠心板}RSV9:=(C-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K1:=SMA(RSV9,3,1);DK1:=K1-REF(K1,1);出手就贏:=IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0);綠心板:=(出手就贏=50 OR REF("KDJ.J",1)<0) AND "KDJ.J">0;紅心板:=藍(lán)心板 AND 綠心板;紅色持股:=R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC;短進(jìn):=R19;青色觀望:=RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18;急速超跌:=(C-MA(C,34))/MA(C,34)*100<-14;品紅離場:=R1A;STICKLINE(C>=O,L,H,0,0),COLOR0000CC;STICKLINE(C<O,L,H,0,0),COLOR999900;STICKLINE(1,C,O,3.5,0),COLOR858500;STICKLINE(C>=O,C,O,3.5,0),COLOR0000E5;STICKLINE(紅色持股,C,O,2.8,0),COLOR000055;STICKLINE(紅色持股,C,O,2,0),COLOR000088;STICKLINE(紅色持股,C,O,1.5,0),COLOR0000AA;STICKLINE(紅色持股,C,O,1,0),COLOR0000CC;STICKLINE(紅色持股,C,O,0.5,0),COLOR0000EE;STICKLINE(青色觀望,C,O,2.8,0),COLOR555500;STICKLINE(青色觀望,C,O,2,0),COLOR888800;STICKLINE(青色觀望,C,O,1.5,0),COLORAAAA00;STICKLINE(青色觀望,C,O,1,0),COLORCCCC00;STICKLINE(青色觀望,C,O,0.5,0),COLOREEEE00;CO:=(C-O);綠心過濾:=IF((藍(lán)心板),DRAWNULL,綠心板);藍(lán)心過濾:=IF((綠心板),DRAWNULL,藍(lán)心板);STICKLINE(急速超跌,O,C-CO/2,2.8,0),COLOR555555;STICKLINE(急速超跌,O,C-CO/2,2,0),COLOR888888;STICKLINE(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA;STICKLINE(急速超跌,O,C-CO/2,1,0),COLORCCCCCC;STICKLINE(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE;STICKLINE(短進(jìn),O,O+CO/3,2.8,0),COLOR335555;STICKLINE(短進(jìn),O,O+CO/3,2,0),COLOR338888;STICKLINE(短進(jìn),O,O+CO/3,1.5,0),COLOR33AAAA;STICKLINE(短進(jìn),O,O+CO/3,1,0),COLOR33CCCC;STICKLINE(品紅離場,O,O+CO/3,2.8,0),COLOR550055;STICKLINE(品紅離場,O,O+CO/3,2,0),COLOR880088;STICKLINE(品紅離場,O,O+CO/3,1.5,0),COLORAA00AA;STICKLINE(品紅離場,O,O+CO/3,1,0),COLORCC00CC;STICKLINE(品紅離場,O,O+CO/3,0.5,0),COLOREE00EE;STICKLINE(漲停,O,C,3.6,1),COLORYELLOW;STICKLINE(漲停 AND 藍(lán)心過濾,O,C,0.4,0),COLORBLUE;STICKLINE(漲停 AND 綠心過濾,O,C,0.4,0),COLORGREEN;STICKLINE(漲停 AND 紅心板,O,C,0.4,0),COLORRED;{均線}EXPMA5:EXPMA(C,5),COLORWHITE LINETHICK2;EXPMA13:EXPMA(C,13),COLORMAGENTA LINETHICK2;{近期高位}AB1:=REF(C,10)=HHV(C,2*10+1); BB1:=FILTER(AB1,10); CB1:=BACKSET(BB1,10+1); HBD:=FILTER(CB1,10);近期壓力:REF(C,BARSLAST(HBD)) NODRAW,COLORYELLOW;STICKLINE(C,近期壓力,近期壓力,10,0),COLORYELLOW ;DRAWTEXT(ISLASTBAR,近期壓力,'近期壓力';{長期高位}AS1:=REF(C,60)=HHV(C,2*60+1); AS2:=FILTER(AS1,60); AS3:=BACKSET(AS2,60+1); AS4:=FILTER(AS3,60); ?長期壓力:REF(C,BARSLAST(AS4)) NODRAW COLORRED;STICKLINE(C,長期壓力,長期壓力,10,0),COLORRED;DRAWTEXT(ISLASTBAR,長期壓力,'長期壓力';{箱體}跌幅:=(C-REF(C,1))/REF(C,1)*100<-4.94;箱頂:DRAWLINE(跌幅,O,REF(跌幅,1),REF(O,1),1),COLORMAGENTA LINETHICK2;DRAWTEXT(ISLASTBAR,箱頂,'箱頂';{概念}Z11:=STRCAT(HYBLOCK,'';Z21:=STRCAT(Z11,DYBLOCK);Z31:=STRCAT(Z21,'';DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z31,GNBLOCK)),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0,0.08,0,STRCAT(Z31,FGBLOCK)),COLORYELLOW;{}DRAWTEXT((漲停) AND FINANCE(52),C,'融資',COLORGREEN;
?
?來源:程序化99
-
文華技術(shù)人員：
?這個指標(biāo)我不能復(fù)制進(jìn)去，因?yàn)樘崾菊f79哪一行逗號是不對的，麻煩老師改哈，謝謝！
?
?來源: www.weiqiv.net.cn
-
文華客服：
?這個代碼我在銀河證券上面可以用，但是在文化上面不能用，麻煩老師看看，幫忙解決哈！感恩老師！
?
-
網(wǎng)友回復(fù)：
您代碼中有部分其他軟件字符串函數(shù)，暫時無法改寫，后續(xù)會研究如何實(shí)現(xiàn)的，其余如下
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;//收盤價與N周期最低值做差，N周期最高值與N周期最低值做差，兩差之間做比值。
K:=SMA(RSV,3,1);//RSV的移動平均值
D:=SMA(K,3,1);//K的移動平均值
J:=3*K-2*D;
?漲停:=BETWEEN(CLOSE/REF(CLOSE,1),1.0984,1.110) AND C=H AND C>O;
R1:=(C>REF(C,1) AND C>REF(C,2));
R2:=(REF(R1,1) AND C<=REF(C,1) AND C>=REF(C,2));
R3:=(REF(R2,1) AND C>=REF(C,1) AND C<=REF(C,2));
R4:=(REF(R3,1) AND C<=REF(C,1) AND C>=REF(C,2));
R5:=(REF(R4,1) AND C>=REF(C,1) AND C<=REF(C,2));
R6:=(REF(R5,1) AND C<=REF(C,1) AND C>=REF(C,2));
R7:=(REF(R6,1) AND C>=REF(C,1) AND C<=REF(C,2));
R8:=(REF(R7,1) AND C<=REF(C,1) AND C>=REF(C,2));
R9:=(REF(R8,1) AND C>=REF(C,1) AND C<=REF(C,2));
RA:=(REF(R9,1) AND C<=REF(C,1) AND C>=REF(C,2));
RB:=(REF(RA,1) AND C>=REF(C,1) AND C<=REF(C,2));
RC:=(REF(RB,1) AND C<=REF(C,1) AND C>=REF(C,2));
RD:=(C<REF(C,1) AND C<REF(C,2));
RE:=(REF(RD,1) AND C>=REF(C,1) AND C<=REF(C,2));
RF:=(REF(RE,1) AND C<=REF(C,1) AND C>=REF(C,2));
R10:=(REF(RF,1) AND C>=REF(C,1) AND C<=REF(C,2));
R11:=(REF(R10,1) AND C<=REF(C,1) AND C>=REF(C,2));
R12:=(REF(R11,1) AND C>=REF(C,1) AND C<=REF(C,2));
R13:=(REF(R12,1) AND C<=REF(C,1) AND C>=REF(C,2));
R14:=(REF(R13,1) AND C>=REF(C,1) AND C<=REF(C,2));
R15:=(REF(R14,1) AND C<=REF(C,1) AND C>=REF(C,2));
R16:=(REF(R15,1) AND C>=REF(C,1) AND C<=REF(C,2));
R17:=(REF(R16,1) AND C<=REF(C,1) AND C>=REF(C,2));
R18:=(REF(R17,1) AND C>=REF(C,1) AND C<=REF(C,2));
R19:=((REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13
?OR R14 OR R15 OR R16 OR R17 OR R18,1)) AND R1);
R1A:=((REF(R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC,1)) AND RD);
藍(lán)心板:=REF(RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18,1);
RSV9:=(C-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;?
K1:=SMA(RSV9,3,1);
DK1:=K1-REF(K1,1);
出手就贏:=IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0);
綠心板:=(出手就贏=50 OR REF(J,1)<0) AND J>0;
紅心板:=藍(lán)心板 AND 綠心板;
紅色持股:=R1 OR R2 OR R3 OR R4 OR R5 OR R6 OR R7 OR R8 OR R9 OR RA OR RB OR RC;
短進(jìn):=R19;
青色觀望:=RD OR RE OR RF OR R10 OR R11 OR R12 OR R13 OR R14 OR R15 OR R16 OR R17 OR R18;
急速超跌:=(C-MA(C,34))/MA(C,34)*100<-14;
品紅離場:=R1A;
STICKLINE1(C>=O,L,H,0,0),COLOR0000CC;
STICKLINE1(C<O,L,H,0,0),COLOR999900;
STICKLINE1(1,C,O,3.5,0),COLOR858500;
STICKLINE1(C>=O,C,O,3.5,0),COLOR0000E5;
STICKLINE1(紅色持股,C,O,2.8,0),COLOR000055;
STICKLINE1(紅色持股,C,O,2,0),COLOR000088;
STICKLINE1(紅色持股,C,O,1.5,0),COLOR0000AA;
STICKLINE1(紅色持股,C,O,1,0),COLOR0000CC;
STICKLINE1(紅色持股,C,O,0.5,0),COLOR0000EE;
STICKLINE1(青色觀望,C,O,2.8,0),COLOR555500;
STICKLINE1(青色觀望,C,O,2,0),COLOR888800;
STICKLINE1(青色觀望,C,O,1.5,0),COLORAAAA00;
STICKLINE1(青色觀望,C,O,1,0),COLORCCCC00;
STICKLINE1(青色觀望,C,O,0.5,0),COLOREEEE00;
CO:=(C-O);
綠心過濾:=IF((藍(lán)心板),NULL,綠心板);
藍(lán)心過濾:=IF((綠心板),NULL,藍(lán)心板);
STICKLINE1(急速超跌,O,C-CO/2,2.8,0),COLOR555555;
STICKLINE1(急速超跌,O,C-CO/2,2,0),COLOR888888;
STICKLINE1(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA;
STICKLINE1(急速超跌,O,C-CO/2,1,0),COLORCCCCCC;
STICKLINE1(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE;
STICKLINE1(短進(jìn),O,O+CO/3,2.8,0),COLOR335555;
STICKLINE1(短進(jìn),O,O+CO/3,2,0),COLOR338888;
STICKLINE1(短進(jìn),O,O+CO/3,1.5,0),COLOR33AAAA;
STICKLINE1(短進(jìn),O,O+CO/3,1,0),COLOR33CCCC;
STICKLINE1(品紅離場,O,O+CO/3,2.8,0),COLOR550055;
STICKLINE1(品紅離場,O,O+CO/3,2,0),COLOR880088;
STICKLINE1(品紅離場,O,O+CO/3,1.5,0),COLORAA00AA;
STICKLINE1(品紅離場,O,O+CO/3,1,0),COLORCC00CC;
STICKLINE1(品紅離場,O,O+CO/3,0.5,0),COLOREE00EE;
STICKLINE1(漲停,O,C,3.6,1),COLORYELLOW;
STICKLINE1(漲停 AND 藍(lán)心過濾,O,C,0.4,0),COLORBLUE;
STICKLINE1(漲停 AND 綠心過濾,O,C,0.4,0),COLORGREEN;
STICKLINE1(漲停 AND 紅心板,O,C,0.4,0),COLORRED;
EXPMA5:EMA(C,5),COLORWHITE ,LINETHICK2;
EXPMA13:EMA(C,13),COLORMAGENTA, LINETHICK2;
AB1:=REF(C,10)=HHV(C,2*10+1);?
BB1:=FILTER(AB1,10);?
CB1:=BACKSET(BB1,10+1);?
HBD:=FILTER(CB1,10);
近期壓力:REF(C,BARSLAST(HBD)), NODRAW,COLORYELLOW;
STICKLINE1(C,近期壓力,近期壓力,10,0),COLORYELLOW ;
DRAWTEXT(ISLASTBAR,近期壓力,' 近期壓力');
AS1:=REF(C,60)=HHV(C,2*60+1);?
AS2:=FILTER(AS1,60);?
AS3:=BACKSET(AS2,60+1);?
AS4:=FILTER(AS3,60); ?
長期壓力:REF(C,BARSLAST(AS4)), NODRAW, COLORRED;
STICKLINE1(C,長期壓力,長期壓力,10,0),COLORRED;
DRAWTEXT(ISLASTBAR,長期壓力,' 長期壓力');
跌幅:=(C-REF(C,1))/REF(C,1)*100<-4.94;
箱頂:TRENDLINES(跌幅,O,REF(跌幅,1),REF(O,1)),COLORMAGENTA ,LINETHICK2;
DRAWTEXT(ISLASTBAR,箱頂,' 箱頂');
DRAWTEXT((漲停),C,' 融資'),COLORGREEN;
?
打印本文
關(guān)閉窗口