咨詢內容：

老師能麻煩修改一下這個指標嗎，謝謝

DRAWGBK(DATE>900101,STRIP(RGB(100,0,0),RGB(30,30,0),1));?
Var1:=EMA(HHV(HIGH,500),21);?
Var2:=REF(LOW,1);?
Var3:=SMA(ABS(LOW-Var2),3,1)/SMA(MAX(LOW-Var2,0),3,1)*100;?
Var4:=EMA(IF(CLOSE*1.3,Var3*10,Var3/10),3);?
Var5:=LLV(LOW,30);?
Var6:=HHV(Var4,30);?
Var7:=IF(MA(CLOSE,58),1,0);?
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;?
Var9:=IF(Var8>100,100,Var8);?
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);?
VarB:=REF(LOW,1);?
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;?
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);?
VarE:=LLV(LOW,30);?
VarF:=HHV(VarD,30);?
Var10:=IF(MA(CLOSE,58),1,0);?
V1:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;?
V2:=2*ABS(V1);?
V3:=100-(100-3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1)+2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1),15,1));?
V4:=100-(100-3*SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1)+2*SMA(SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1),15,1));?
V5:=(H+L+C)/3;?
V6:=(V5-MA(V5,10))/(0.015*AVEDEV(V5,10));?
V7:=(V5-MA(V5,30))/(0.015*AVEDEV(V5,30));?
V8:=IF(V6>=150 AND V6<200 AND V7>=150 AND V7<200,10,0);?
V9:=IF(V6<=-150 AND V6>-200 AND V7<=-150 AND V7>-200,-10,V8);?
VA:=(C-MA(C,13))/MA(C,13)*100;?
VB:=100-ABS(VA);?
VE:=REF(L,1)*0.9;?
VF:=L*0.9;?
V10:=(VF*V+VE*(CAPITAL-V))/CAPITAL;?
V11:=EMA(V10,30);?
V12:=V11-C;?
V13:=REF(C,1);?
V14:=SMA(MAX(C-V13,0),7,1)/SMA(ABS(C-V13),7,1)*100;?
V15:=SMA(MAX(C-V13,0),13,1)/SMA(ABS(C-V13),13,1)*100;?
V16:=BARSCOUNT(C);?
V17:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;?
V18:=((-100)*(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))+50)*2;?
V19:=(C-LLV(L,15))/(HHV(H,15)-LLV(L,15))*100;?
V1A:=(SMA(V19,4,1)-50)*2;?
V1B:=SMA(V1A,3,1);?
V1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;?
V1D:=SMA(V1C,4,1);?
V1E:=SMA(V1D,3,1);?
V1F:=(HHV(H,30)-C)/C*100;?
V20:=IF(V17<=25 AND V18<-95 AND V1F>20 AND V1B<-30 AND V1E<30?
AND V12>=-0.25 AND V14<22 AND V15<28 AND V16>50,80,0);?
準備拉升: EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10;?
準備拉升: IF(準備拉升>0,準備拉升,0),STICK,linethick2, COLOR0000ff;?
今量: 準備拉升;?
A1:IF(準備拉升>0,今量*1.2,0),STICK,linethick5, COLOR0000ff;?
A2:IF(準備拉升>0,今量*0.8,0),STICK,linethick5, COLOR0066ff;?
A3:IF(準備拉升>0,今量*0.6,0),STICK,linethick5, COLOR0099ff;?
A4:IF(準備拉升>0,今量*0.4,0) ,STICK,linethick5,COLOR00ccff;?
A5:IF(準備拉升>0,今量*0.2,0) ,STICK,linethick5,COLOR00ffff;?
先知: (CLOSE-MA(CLOSE,25))/MA(CLOSE,25)*100, , colorff00ff;?
SSS:=(VAR3 AND VAR4 AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07 OR VAR5 AND VAR6 AND CROSS(VAR7,79) OR VARC AND CLOSE/COST(8)<=0.8)*100;?
抄底王:SSS>0,colorwhite,LINETHICK1;?
主力SK1:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3), colormagenta,linethick2;?
均量SD1:EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),colorgreen,linethick2;?
生命線:85,linethick1,coloryellow;?
生命禁區:75,linethick1,colorred;?
預警系統: (IF((V7>=200 AND V6>=150) OR CROSS(65,主力SK1),15,IF(V7<=-200?
AND V6<=-150,-15,V9))+65);?
T2:=C; T3:=主力SK1>60 AND 預警系統>85 AND 生命線=95;?
T4:=主力SK1>48 AND 預警系統>85 AND 生命線<95;?
T5:=均量SD1<-38 AND 預警系統<85;?
T6:=抄底王>50 AND 生命線<90;?
T7:=V3>REF(V4,1) AND V>REF(V,1) AND C>REF(C,1);?
DRAWTEXT(CROSS(主力SK1,生命禁區),60,'警惕！！ '),colorcyan;?
DRAWTEXT(CROSS(主力SK1,生命禁區),85,'減磅'),ColorFF6800;?
DRAWTEXT(CROSS(主力SK1,生命禁區),75,'▼注意.SK1向上持有.向下立即賣出'),colorblue ;?
DRAWTEXT(T2 AND COUNT(T2,30)=1,55,'下降通道!'),COLOR00FFFF;?
DRAWTEXT(T3 AND COUNT(T3,30)=1,55,'上漲過急!'),COLOR00FFFF;?
DRAWTEXT(T4 AND COUNT(T4,30)=1,75,'莊家出貨!'),COLOR00FFFF;?
DRAWTEXT(T5 AND COUNT(T5,30)=1,50,'有小反彈!'),COLOR00FFFF;?
DRAWTEXT(T6 AND COUNT(T6,30)=1,30,'搶反彈!'),COLOR00FFFF;?
DRAWTEXT(T7 AND COUNT(T7,30)=1,30,'資金進場!'),COLOR00FFFF; DRAWGBK(DATE>900101,STRIP(RGB(100,0,0),RGB(30,30,0),1));?
AA1:=AMOUNT/V;BB1:=L<AA1*0.9;?
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;?
FF1:=BB1 AND CC1 AND DD1 AND EE1;DRAWTEXT(FF1,(LOW* 0.99),'老鼠倉'),COLOR4080FF;

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： VAR1:=EMA(HHV(HIGH,500),21);?
VAR2:=REF(LOW,1);?
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;?
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);?
VAR5:=LLV(LOW,30);?
VAR6:=HHV(VAR4,30);?
VAR7:=IF(MA(CLOSE,58),1,0);?
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;?
VAR9:=IF(VAR8>100,100,VAR8);?
VARA:=EMA((VAR7*3+VAR8*2+VAR9)/6*1.738,21);?
VARB:=REF(LOW,1);?
VARC:=SMA(ABS(LOW-VARB),3,1)/SMA(MAX(LOW-VARB,0),3,1)*100;?
VARD:=EMA(IF(CLOSE*1.35<=VARA,VARC*10,VARC/10),3);?
VARE:=LLV(LOW,30);?
VARF:=HHV(VARD,30);?
VAR10:=IF(MA(CLOSE,58),1,0);?
V1:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;?
V2:=2*ABS(V1);?
V3:=100-(100-3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1)+2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1),15,1));?
V4:=100-(100-3*SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1)+2*SMA(SMA((O-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,20,1),15,1));?
V5:=(H+L+C)/3;?
V6:=(V5-MA(V5,10))/(0.015*AVEDEV(V5,10));?
V7:=(V5-MA(V5,30))/(0.015*AVEDEV(V5,30));?
V8:=IF(V6>=150 AND V6<200 AND V7>=150 AND V7<200,10,0);?
V9:=IF(V6<=-150 AND V6>-200 AND V7<=-150 AND V7>-200,-10,V8);?
VA:=(C-MA(C,13))/MA(C,13)*100;?
VB:=100-ABS(VA);?
VE:=REF(L,1)*0.9;?
VF:=L*0.9;?
V10:=(VF*V+VE*(CAPITAL-V))/CAPITAL;?
V11:=EMA(V10,30);?
V12:=V11-C;?
V13:=REF(C,1);?
V14:=SMA(MAX(C-V13,0),7,1)/SMA(ABS(C-V13),7,1)*100;?
V15:=SMA(MAX(C-V13,0),13,1)/SMA(ABS(C-V13),13,1)*100;?
V16:=BARSCOUNT(C);?
V17:=SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100;?
V18:=((-100)*(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))+50)*2;?
V19:=(C-LLV(L,15))/(HHV(H,15)-LLV(L,15))*100;?
V1A:=(SMA(V19,4,1)-50)*2;?
V1B:=SMA(V1A,3,1);?
V1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;?
V1D:=SMA(V1C,4,1);?
V1E:=SMA(V1D,3,1);?
V1F:=(HHV(H,30)-C)/C*100;?
V20:=IF(V17<=25 AND V18<-95 AND V1F>20 AND V1B<-30 AND V1E<30?
AND V12>=-0.25 AND V14<22 AND V15<28 AND V16>50,80,0);?
準備拉升1: EMA(IF(LOW<=VARE,(VARD+VARF*2)/2,0),3)/618*VAR10;?
準備拉升: IF(準備拉升1>0,準備拉升1,0),STICK,LINETHICK2, COLOR0000FF;?
今量: 準備拉升;?
A1:IF(準備拉升>0,今量*1.2,0),STICK,LINETHICK5, COLOR0000FF;?
A2:IF(準備拉升>0,今量*0.8,0),STICK,LINETHICK5, COLOR0066FF;?
A3:IF(準備拉升>0,今量*0.6,0),STICK,LINETHICK5, COLOR0099FF;?
A4:IF(準備拉升>0,今量*0.4,0) ,STICK,LINETHICK5,COLOR00CCFF;?
A5:IF(準備拉升>0,今量*0.2,0) ,STICK,LINETHICK5,COLOR00FFFF;?
先知: (CLOSE-MA(CLOSE,25))/MA(CLOSE,25)*100 , COLORFF00FF;?
SSS:=(VAR3 AND VAR4 AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07 OR VAR5 AND VAR6 AND CROSS(VAR7,79) OR VARC AND CLOSE/COST(8)<=0.8)*100;?
抄底王:SSS>0,COLORWHITE,LINETHICK1;?
主力SK1:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3), COLORMAGENTA,LINETHICK2;?
均量SD1:EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3),COLORGREEN,LINETHICK2;?
生命線:85,LINETHICK1,COLORYELLOW;?
生命禁區:75,LINETHICK1,COLORRED;?
預警系統: (IF((V7>=200 AND V6>=150) OR CROSS(65,主力SK1),15,IF(V7<=-200?
AND V6<=-150,-15,V9))+65);?
T2:=C; T3:=主力SK1>60 AND 預警系統>85 AND 生命線=95;?
T4:=主力SK1>48 AND 預警系統>85 AND 生命線<95;?
T5:=均量SD1<-38 AND 預警系統<85;?
T6:=抄底王>50 AND 生命線<90;?
T7:=V3>REF(V4,1) AND V>REF(V,1) AND C>REF(C,1);?
DRAWTEXT(CROSS(主力SK1,生命禁區),60,'警惕！！ '),COLORCYAN;?
DRAWTEXT(CROSS(主力SK1,生命禁區),85,'減磅'),COLORFF6800;?
DRAWTEXT(CROSS(主力SK1,生命禁區),75,'▼注意.SK1向上持有.向下立即賣出'),COLORBLUE ;?
DRAWTEXT(T2 AND COUNT(T2,30)=1,55,'下降通道!'),COLOR00FFFF;?
DRAWTEXT(T3 AND COUNT(T3,30)=1,55,'上漲過急!'),COLOR00FFFF;?
DRAWTEXT(T4 AND COUNT(T4,30)=1,75,'莊家出貨!'),COLOR00FFFF;?
DRAWTEXT(T5 AND COUNT(T5,30)=1,50,'有小反彈!'),COLOR00FFFF;?
DRAWTEXT(T6 AND COUNT(T6,30)=1,30,'搶反彈!'),COLOR00FFFF;?
DRAWTEXT(T7 AND COUNT(T7,30)=1,30,'資金進場!'),COLOR00FFFF;?
AA1:=AMOUNT/V;BB1:=L<AA1*0.9;?
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;DD1:=L<MA(C,5)*0.921;EE1:=V<MA(V,5)*1.5;?
FF1:=BB1 AND CC1 AND DD1 AND EE1;DRAWTEXT(FF1,(LOW* 0.99),'老鼠倉'),COLOR4080FF; 來源 程序化久久網