 | |  |  |
flag:=barslast(dispstatus=1)>=1;
顶部: HHV(HIGH,60),colorwhite;
TR := MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
atr:=ma(tr,13);
var1:=ref(close,1)-ref(atr,1);
泉鑫线:hhv(var1,13),colorgreen;
HZ3:=SMA(AMOUNT,15,6)-REF(SMA(AMOUNT,15,6),61);
TZ:=llv(l,2);
SMA(DMA(TZ,HZ3),8,4);
SMA(DMA(TZ,HZ3),7,4);
SMA(DMA(TZ,HZ3),6,4);
SMA(DMA(TZ,HZ3),5,4),linethick2;
{高潮线:EMA(CLOSE,21)-1+EMA(VOL,5)/EMA(VOL,40),COLORGRAY;}
VarC:=AMOUNT/VOL/100;
VarD:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarE:=SUM(AMOUNT,5)/VarC/100;
VarF:=SUM(AMOUNT,13)/VarC/100;
Var10:=SUM(AMOUNT,34)/VarC/100;
Var11:=SUM(AMOUNT,209)/VarC/100;
Var12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
Var13:=Var12/CAPITAL;
Var14:=VOL/CAPITAL*VarD+Var13*REF(VarC,1);
CYC5:= IF(DATE<1500501,DMA(VarD,VOL/VarE),0);
CYC13:= IF(DATE<1500501,DMA(VarD,VOL/VarF),0);
CYC34:= IF(DATE<1500501,DMA(VarD,VOL/Var10),0);
CYCw:= IF(DATE<1500501,DMA(VarD,VOL/CAPITAL),0);
Var15:=100*(CLOSE-CYC5)/CYC5;
Var16:=100*(CLOSE-CYC13)/CYC13;
Var17:=100*(CLOSE-CYC34)/CYC34;
Var18:=100*(CLOSE-CYCw)/CYCw;
Var19:=MA(CLOSE,13);
Var1A:=100*(Var19-REF(Var19,1))/REF(Var19,1);
Var1B:=CLOSE-LOW;
Var1C:=HIGH-LOW;
Var1D:=CLOSE-HIGH;
Var1E:=IF(CLOSE>=0,(Var1B/Var1C+Var1D/Var1C)*VOL,(Var1D/Var1C+Var1B/Var1C)*VOL);
Var1F:=SUM(Var1E,10)/10000;
Var20:=100*(CYC13-REF(CYC13,1))/REF(CYC13,1);
Var21:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Var22:=SMA(Var21,3,1);
Var23:=SMA(Var22,3,1);
Var24:=3*Var22-2*Var23;
Var25:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var26:=SMA(Var25,5,1);
Var27:=SMA(Var26,10,1);
Var28:=CROSS(Var27,Var26);
Var29:=Var27>80 OR Var26>80;
Var2A:=Var28 AND Var29;
Var2B:=Var1A>0 AND Var20>0 AND Var1F>0;
Var2C:=Var1A<0 OR Var20<0 OR Var1F<0 OR Var16<0;
Var2D:=CLOSE;
Var2E:=OPEN;
Var2F:=HIGH;
Var30:=LOW;
持股: STICKLINE(Var2B and flag,Var2D,Var2E,6,0),COLORRED;
STICKLINE(Var2B and flag and c<o,Var2D,Var2E,6,1) ,COLORRED;
持币: STICKLINE(Var2C and flag,Var2D,Var2E,6,0), COLORBLUE;
STICKLINE(Var2C and flag and c<o,Var2D,Var2E,6,1) , COLORBLUE;
大顶: STICKLINE(Var2A and flag,Var2F,Var30,6,0), COLORYELLOW;
STICKLINE(Var2B and flag,Var2F,MAX(Var2D,Var2E),0,1) , COLORRED;
STICKLINE(Var2B and flag,MIN(Var2D,Var2E),Var30,0,1) , COLORRED;
STICKLINE(Var2C and flag,Var2F,MAX(Var2D,Var2E),0,1) ,COLORBLUE;
STICKLINE(Var2C and flag,MIN(Var2D,Var2E),Var30,0,1) ,COLORBLUE;
步版将(源码)改成大智慧请大家使用：
flag:=1;
顶部: HHV(HIGH,60),colorwhite;
TR := MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
atr:=ma(tr,13);
var1:=ref(close,1)-ref(atr,1);
泉鑫线:hhv(var1,13),colorgreen;
HZ3:=SMA(AMOUNT,15,6)-REF(SMA(AMOUNT,15,6),61);
TZ:=llv(l,2);
SMA(DMA(TZ,HZ3),8,4);
SMA(DMA(TZ,HZ3),7,4);
SMA(DMA(TZ,HZ3),6,4);
SMA(DMA(TZ,HZ3),5,4),linethick2;
{高潮线:EMA(CLOSE,21)-1+EMA(VOL,5)/EMA(VOL,40),COLORGRAY;}
VarC:=AMOUNT/VOL/100;
VarD:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarE:=SUM(AMOUNT,5)/VarC/100;
VarF:=SUM(AMOUNT,13)/VarC/100;
Var10:=SUM(AMOUNT,34)/VarC/100;
Var11:=SUM(AMOUNT,209)/VarC/100;
Var12:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
Var13:=Var12/CAPITAL;
Var14:=VOL/CAPITAL*VarD+Var13*REF(VarC,1);
CYC5:= IF(DATE<1500501,DMA(VarD,VOL/VarE),0);
CYC13:= IF(DATE<1500501,DMA(VarD,VOL/VarF),0);
CYC34:= IF(DATE<1500501,DMA(VarD,VOL/Var10),0);
CYCw:= IF(DATE<1500501,DMA(VarD,VOL/CAPITAL),0);
Var15:=100*(CLOSE-CYC5)/CYC5;
Var16:=100*(CLOSE-CYC13)/CYC13;
Var17:=100*(CLOSE-CYC34)/CYC34;
Var18:=100*(CLOSE-CYCw)/CYCw;
Var19:=MA(CLOSE,13);
Var1A:=100*(Var19-REF(Var19,1))/REF(Var19,1);
Var1B:=CLOSE-LOW;
Var1C:=HIGH-LOW;
Var1D:=CLOSE-HIGH;
Var1E:=IF(CLOSE>=0,(Var1B/Var1C+Var1D/Var1C)*VOL,(Var1D/Var1C+Var1B/Var1C)*VOL);
Var1F:=SUM(Var1E,10)/10000;
Var20:=100*(CYC13-REF(CYC13,1))/REF(CYC13,1);
Var21:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Var22:=SMA(Var21,3,1);
Var23:=SMA(Var22,3,1);
Var24:=3*Var22-2*Var23;
Var25:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var26:=SMA(Var25,5,1);
Var27:=SMA(Var26,10,1);
Var28:=CROSS(Var27,Var26);
Var29:=Var27>80 OR Var26>80;
Var2A:=Var28 AND Var29;
Var2B:=Var1A>0 AND Var20>0 AND Var1F>0;
Var2C:=Var1A<0 OR Var20<0 OR Var1F<0 OR Var16<0;
Var2D:=CLOSE;
Var2E:=OPEN;
Var2F:=HIGH;
Var30:=LOW;
持股: STICKLINE(Var2B and flag,Var2D,Var2E,6,0),COLORRED;
STICKLINE(Var2B and flag and c<o,Var2D,Var2E,6,1) ,COLORRED;
持币: STICKLINE(Var2C and flag,Var2D,Var2E,6,0), COLORBLUE;
STICKLINE(Var2C and flag and c<o,Var2D,Var2E,6,1) , COLORBLUE;
大顶: STICKLINE(Var2A and flag,Var2F,Var30,6,0), COLORYELLOW;
STICKLINE(Var2B and flag,Var2F,MAX(Var2D,Var2E),0,1) , COLORRED;
STICKLINE(Var2B and flag,MIN(Var2D,Var2E),Var30,0,1) , COLORRED;
STICKLINE(Var2C and flag,Var2F,MAX(Var2D,Var2E),0,1) ,COLORBLUE;
STICKLINE(Var2C and flag,MIN(Var2D,Var2E),Var30,0,1) ,COLORBLUE;
20080630_203a2042c46d6da353fbrP7JyFsyDu12.png
[ 本帖最后由 好多钱 于 2008-6-30 00:13 编辑 ] |
| |  | |  |
|
