找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
楼主: 飞鸟的空间

网上淘的黄金柱公式,修改后不错。喜欢就用

   火... [复制链接]
发表于 2012-6-9 14:20 | 显示全部楼层
学习知识,学习论坛。
回复

使用道具 举报

发表于 2012-6-9 22:09 | 显示全部楼层
回复

使用道具 举报

发表于 2012-6-28 00:17 | 显示全部楼层
估计又是用不了的,高手会,杯具
回复

使用道具 举报

发表于 2012-8-12 23:54 | 显示全部楼层
向高手学习
回复

使用道具 举报

发表于 2012-8-20 22:16 | 显示全部楼层
多谢提供,多看帖,回好贴!!!
回复

使用道具 举报

发表于 2012-8-23 18:10 | 显示全部楼层
我的天啊,这个世界才人太多了
回复

使用道具 举报

发表于 2012-9-6 19:17 | 显示全部楼层
学习学习再学习 谢谢分享
回复

使用道具 举报

发表于 2012-9-15 12:28 | 显示全部楼层
回复

使用道具 举报

发表于 2012-9-15 21:05 | 显示全部楼层
回复

使用道具 举报

发表于 2012-9-19 13:39 | 显示全部楼层
谢谢分享,呵呵,不错。
回复

使用道具 举报

发表于 2013-7-23 12:43 | 显示全部楼层
学习了,谢谢分享!
回复

使用道具 举报

发表于 2013-9-14 18:44 | 显示全部楼层
C3:=REF(C,1); 涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),2,0);
STICKLINE(涨停,OPEN,CLOSE,5,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),2,0);
STICKLINE(跌停,OPEN,CLOSE,5,0),COLORGREEN;
STICKLINE(涨停,OPEN,CLOSE,5,0),COLORRED;
STICKLINE(跌停,OPEN,CLOSE,5,0),COLORGREEN;
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ2=1;
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),COLORYELLOW;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
STICKLINE(LJL,OPEN,CLOSE,8,0),COLORYELLOW;
DRAWTEXT(LJL,L*0.99,'黄'),COLORYELLOW;
DRAWTEXT(LJL,L*0.95,'金'),COLORYELLOW;
DRAWTEXT(LJL,L*0.90,'柱'),COLORYELLOW;
MA1:MA(CLOSE,8);??MA2:MA(CLOSE,13);
MA3:MA(CLOSE,21),LINETHICK2;
MA4:MA(CLOSE,34);? ? MA5:=MA(CLOSE,20);
FFF:=(LOW<=MA1 AND LOW<=MA2 AND LOW<=MA3 AND CLOSE>=MA1 AND
CLOSE>=MA2 AND CLOSE>=MA3 AND CLOSE>REF(CLOSE,1));
DRAWICON(OPEN>MA1 AND OPEN>MA2 AND OPEN>MA5 AND CLOSE<MA1
AND CLOSE<MA2 AND CLOSE<MA5,LOW,2);
BBB:=(LOW<=MA1 AND LOW<=MA2 AND LOW<=MA3 AND HIGH>=MA1
AND HIGH>=MA2 AND HIGH>=MA3 AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1));
STICKLINE(BBB,CLOSE,OPEN,8,0),COLOR9900FF;
A1:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(C,2)<REF(C,3);
A2:=REF(OPEN,1)<REF(CLOSE,2)AND REF(CLOSE,1)>REF(CLOSE,2)
AND REF(CLOSE,1)>(REF(CLOSE,2)+REF(OPEN,2))/2;
A3:=CLOSE>REF(CLOSE,1);? ?A4:=LLV(LOW,13)=REF(LOW,1);
MB:=BACKSET(A1 AND A2 AND A3 AND A4,3);
STICKLINE(MB,CLOSE,OPEN,7,0),COLOR0066FF;
DRAWTEXT(CROSS(0.5,MB),HIGH *1.08,'哈哈!,↑曙光初现'),COLOR0066FF;
DRAWTEXT(FFF,LOW*0.98,'↑拐点'),COLOR00FFFF;
DRAWTEXTREL(16,950,STKLABEL+' ※'+STKNAME+' '+BKNAME),LINETHICK2,COLOR00FFFF;
N:=20;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N));
量能饱和度:=IF(SAT>1,1,SAT)*100;
DRAWTEXTABS(30,86,'●量能饱和度:'+NUMTOSTRN(量能饱和度,2)+'%'),LINETHICK2,COLORRED;
DRAWRECTREL(1,83,18,382,RGB(30,30,30)),COLORWHITE;
AAA:=量能饱和度<=10;
BBB:=量能饱和度>10 AND 量能饱和度<=20;
CCC:=量能饱和度>20 AND 量能饱和度<=30;
DDD:=量能饱和度>30 AND 量能饱和度<=50;
EEE:=量能饱和度>50 AND 量能饱和度<=70;
FFF:=量能饱和度>70 AND 量能饱和度<=80;
GGG:=量能饱和度>80 AND 量能饱和度<=90;
HHH:=量能饱和度>90;
IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(3,350,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(3,320,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(3,290,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(3,230,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(3,170,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(3,140,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(3,110,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(3,85,16,380,RGB(255,0,0));
END;
{老鼠仓}
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;
老鼠仓:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;
DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;
T := BARSLAST(DISPSTATUS=1)+1;
HHG := HHV(H, T);
DDG := LLV(L, T);
{HK := LL-HH; G12 := LL-HK*1.55; }
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股的量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股虽然走势趋强,但量能还显不足,可以考虑短线进场,仓位在1/2左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(20,100,'该股量价配合良好,但相对其它股票并没有明显走强,可以考虑短线进场,仓位1/2左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态尚可,但量能不足,股票也未完全走强,可以短线参与,仓位1/3左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态变坏,但走势相对其它股票尚可,重仓者减持大半,清仓者可以观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股随大盘一起下跌,程明显缩量走势,考虑到大盘风险,减持或清仓。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股放量下跌,走势明显偏弱,离场观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股缩量下跌,走势偏弱,离场观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态良好,强势明显,量能充足,可以继续持有。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股上行趋势不变,强势依然,但量能开始转弱,注意风险。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股走势趋弱,量能不足,减持大部分筹码。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态不佳,注意成交量的变化,但目前不适合参与。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股趋势不明,股价偏弱,注意量能变化,目前不宜参与。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股有走强迹象,但量能不足,趋势不明,不适合操作。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股走势太弱,没有参与价值。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右,? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'如前期经过一轮下跌,此时为最佳买点,但如果前期有过一段涨幅则介入需谨慎。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘虽然走势趋强,但量能还显不足,如果前期经过一轮下跌,? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'可以考虑短线进场,仓位在1/2左右,一旦量能放大可以加仓买入。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘形态走坏,重仓者可以减去大部分仓位。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘缩量调整,注意风险,短线清仓观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘走势良好,量能理想,可以继续持有强势股。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘形态良好,但量能稍显不足,随时准备减仓。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘趋势不明,注意成交量变化,目前不适宜进场。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘趋势向下,量能萎缩,不适合进场。? ?'),COLOR00FF00,LINETHICK3;
PT??:= REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH + LOW + CLOSE)/3;
压力Ⅰ:= 2*重心-LOW;
压力Ⅱ:= 重心 + PT;
支撑Ⅰ:= 2*重心-HIGH;
支撑Ⅱ:= 重心 - PT;
DRAWTEXTABS(100,13,' 《逆势操作》'),COLORFFFFFF;
DRAWTEXTABS(175,13,' 重心:'+重心),COLORYELLOW;
DRAWTEXTABS(100,32,'? ? 支??撑'),COLORFFFFFF;
DRAWTEXTABS(100,49,'? ? '+支撑Ⅰ),COLORFFFFFF;
DRAWTEXTABS(100,67,'? ? '+支撑Ⅱ),COLORFFFFFF;
DRAWTEXTABS(100,32,'? ?? ?? ?? ?? ? 压??力'),COLORFFFFFF;
DRAWTEXTABS(100,49,'? ?? ?? ?? ?? ? '+压力Ⅰ),COLORFFFFFF;
DRAWTEXTABS(100,67,'? ?? ?? ?? ?? ? '+压力Ⅱ),COLORFFFFFF;
DRAWTEXTABS(100,10,'│'),COLOR00FFFF;
DRAWTEXTABS(100,22,'│'),COLOR00FFFF;
DRAWTEXTABS(100,34,'│'),COLOR00FFFF;
DRAWTEXTABS(100,46,'│'),COLOR00FFFF;
DRAWTEXTABS(100,58,'│'),COLOR00FFFF;
DRAWTEXTABS(100,70,'│'),COLOR00FFFF;
DRAWTEXTABS(243,10,'│'),COLOR00FFFF;
DRAWTEXTABS(243,22,'│'),COLOR00FFFF;
DRAWTEXTABS(243,34,'│'),COLOR00FFFF;
DRAWTEXTABS(243,46,'│'),COLOR00FFFF;
DRAWTEXTABS(243,58,'│'),COLOR00FFFF;
DRAWTEXTABS(243,70,'│'),COLOR00FFFF;
DRAWTEXTABS(171,30,'│'),COLOR00FFFF;
DRAWTEXTABS(171,34,'│'),COLOR00FFFF;
DRAWTEXTABS(171,46,'│'),COLOR00FFFF;
DRAWTEXTABS(171,58,'│'),COLOR00FFFF;
DRAWTEXTABS(171,70,'│'),COLOR00FFFF;
DRAWTEXTABS(105,5,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,25,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,42,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,59,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,76,'────────────'),COLOR00FFFF;

错误句 : ? ? MA5:=MA(CLOSE,20)
详细信息 : 在变量 MA5 前又错误的定义一次变量!
错误起始位置 : 1170 ; 长度: 3

回复

使用道具 举报

发表于 2013-9-14 18:58 | 显示全部楼层
C3:=REF(C,1); 涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),2,0);
STICKLINE(涨停,OPEN,CLOSE,5,0),COLORRED;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),2,0);
STICKLINE(跌停,OPEN,CLOSE,5,0),COLORGREEN;
STICKLINE(涨停,OPEN,CLOSE,5,0),COLORRED;
STICKLINE(跌停,OPEN,CLOSE,5,0),COLORGREEN;
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(HIGH,3),1,0)));
TP:=TJ2=1;
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),6,0),COLORYELLOW;
TJ3:=IF(BARSLAST(LJL)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(LJL)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(LJL)=3 AND CLOSE>REF(LOW,3),1,0)));
STFZ:=TJ3=1;
CL:=STFZ AND TP;
TJCL:=FILTER(CL,3);
STICKLINE(LJL,OPEN,CLOSE,8,0),COLORYELLOW;
DRAWTEXT(LJL,L*0.99,'黄'),COLORYELLOW;
DRAWTEXT(LJL,L*0.95,'金'),COLORYELLOW;
DRAWTEXT(LJL,L*0.90,'柱'),COLORYELLOW;
MA1:MA(CLOSE,8);??MA2:MA(CLOSE,13);
MA3:MA(CLOSE,21),LINETHICK2;
MA4:MA(CLOSE,34);  MA5:=MA(CLOSE,20);
FFF:=(LOW<=MA1 AND LOW<=MA2 AND LOW<=MA3 AND CLOSE>=MA1 AND
CLOSE>=MA2 AND CLOSE>=MA3 AND CLOSE>REF(CLOSE,1));
DRAWICON(OPEN>MA1 AND OPEN>MA2 AND OPEN>MA5 AND CLOSE<MA1
AND CLOSE<MA2 AND CLOSE<MA5,LOW,2);
BBB:=(LOW<=MA1 AND LOW<=MA2 AND LOW<=MA3 AND HIGH>=MA1
AND HIGH>=MA2 AND HIGH>=MA3 AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1));
STICKLINE(BBB,CLOSE,OPEN,8,0),COLOR9900FF;
A1:=REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(C,2)<REF(C,3);
A2:=REF(OPEN,1)<REF(CLOSE,2)AND REF(CLOSE,1)>REF(CLOSE,2)
AND REF(CLOSE,1)>(REF(CLOSE,2)+REF(OPEN,2))/2;
A3:=CLOSE>REF(CLOSE,1); A4:=LLV(LOW,13)=REF(LOW,1);
MB:=BACKSET(A1 AND A2 AND A3 AND A4,3);
STICKLINE(MB,CLOSE,OPEN,7,0),COLOR0066FF;
DRAWTEXT(CROSS(0.5,MB),HIGH *1.08,'哈哈!,↑曙光初现'),COLOR0066FF;
DRAWTEXT(FFF,LOW*0.98,'↑拐点'),COLOR00FFFF;
DRAWTEXTREL(16,950,STKLABEL+' ※'+STKNAME+' '+BKNAME),LINETHICK2,COLOR00FFFF;
N:=20;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N));
量能饱和度:=IF(SAT>1,1,SAT)*100;
DRAWTEXTABS(30,86,'●量能饱和度:'+NUMTOSTRN(量能饱和度,2)+'%'),LINETHICK2,COLORRED;
DRAWRECTREL(1,83,18,382,RGB(30,30,30)),COLORWHITE;
AAA:=量能饱和度<=10;
BBB:=量能饱和度>10 AND 量能饱和度<=20;
CCC:=量能饱和度>20 AND 量能饱和度<=30;
DDD:=量能饱和度>30 AND 量能饱和度<=50;
EEE:=量能饱和度>50 AND 量能饱和度<=70;
FFF:=量能饱和度>70 AND 量能饱和度<=80;
GGG:=量能饱和度>80 AND 量能饱和度<=90;
HHH:=量能饱和度>90;
IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(3,350,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(3,320,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(3,290,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(3,230,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(3,170,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(3,140,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(3,110,16,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(3,85,16,380,RGB(255,0,0));
END;
{老鼠仓}
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;
老鼠仓:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0;
DRAWTEXT(老鼠仓,(LOW* 0.99),'老鼠仓'),COLOR40CCFF;
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10))) + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);T := BARSLAST(DISPSTATUS=1)+1;
T := BARSLAST(DISPSTATUS=1)+1;
HHG := HHV(H, T);
DDG := LLV(L, T);
{HK := LL-HH; G12 := LL-HK*1.55; }
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股的量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股虽然走势趋强,但量能还显不足,可以考虑短线进场,仓位在1/2左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(20,100,'该股量价配合良好,但相对其它股票并没有明显走强,可以考虑短线进场,仓位1/2左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态尚可,但量能不足,股票也未完全走强,可以短线参与,仓位1/3左右。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态变坏,但走势相对其它股票尚可,重仓者减持大半,清仓者可以观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股随大盘一起下跌,程明显缩量走势,考虑到大盘风险,减持或清仓。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股放量下跌,走势明显偏弱,离场观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股缩量下跌,走势偏弱,离场观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态良好,强势明显,量能充足,可以继续持有。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股上行趋势不变,强势依然,但量能开始转弱,注意风险。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股走势趋弱,量能不足,减持大部分筹码。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股形态不佳,注意成交量的变化,但目前不适合参与。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN
DRAWTEXTABS(32,100,'该股趋势不明,股价偏弱,注意量能变化,目前不宜参与。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股有走强迹象,但量能不足,趋势不明,不适合操作。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN
DRAWTEXTABS(32,100,'该股走势太弱,没有参与价值。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘量能理想,有明显走强迹象,可以考虑中线进场参与,仓位在2/3左右,? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'如前期经过一轮下跌,此时为最佳买点,但如果前期有过一段涨幅则介入需谨慎。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘虽然走势趋强,但量能还显不足,如果前期经过一轮下跌,? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(AVX,1) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'可以考虑短线进场,仓位在1/2左右,一旦量能放大可以加仓买入。? ?'),COLOR0000FF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(1,AVX) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘形态走坏,重仓者可以减去大部分仓位。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (CROSS(1,AVX) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘缩量调整,注意风险,短线清仓观望。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘走势良好,量能理想,可以继续持有强势股。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘形态良好,但量能稍显不足,随时准备减仓。? ?'),COLOR00FFFF,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) THEN
DRAWTEXTABS(32,100,'大盘趋势不明,注意成交量变化,目前不适宜进场。? ?'),COLOR00FF00,LINETHICK3;
IF BARSTATUS=2 AND C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) THEN
DRAWTEXTABS(32,100,'大盘趋势向下,量能萎缩,不适合进场。? ?'),COLOR00FF00,LINETHICK3;
PT??:= REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH + LOW + CLOSE)/3;
压力Ⅰ:= 2*重心-LOW;
压力Ⅱ:= 重心 + PT;
支撑Ⅰ:= 2*重心-HIGH;
支撑Ⅱ:= 重心 - PT;
DRAWTEXTABS(100,13,' 《逆势操作》'),COLORFFFFFF;
DRAWTEXTABS(175,13,' 重心:'+重心),COLORYELLOW;
DRAWTEXTABS(100,32,'? ? 支??撑'),COLORFFFFFF;
DRAWTEXTABS(100,49,'? ? '+支撑Ⅰ),COLORFFFFFF;
DRAWTEXTABS(100,67,'? ? '+支撑Ⅱ),COLORFFFFFF;
DRAWTEXTABS(100,32,'? ?? ?? ?? ?? ? 压??力'),COLORFFFFFF;
DRAWTEXTABS(100,49,'? ?? ?? ?? ?? ? '+压力Ⅰ),COLORFFFFFF;
DRAWTEXTABS(100,67,'? ?? ?? ?? ?? ? '+压力Ⅱ),COLORFFFFFF;
DRAWTEXTABS(100,10,'│'),COLOR00FFFF;
DRAWTEXTABS(100,22,'│'),COLOR00FFFF;
DRAWTEXTABS(100,34,'│'),COLOR00FFFF;
DRAWTEXTABS(100,46,'│'),COLOR00FFFF;
DRAWTEXTABS(100,58,'│'),COLOR00FFFF;
DRAWTEXTABS(100,70,'│'),COLOR00FFFF;
DRAWTEXTABS(243,10,'│'),COLOR00FFFF;
DRAWTEXTABS(243,22,'│'),COLOR00FFFF;
DRAWTEXTABS(243,34,'│'),COLOR00FFFF;
DRAWTEXTABS(243,46,'│'),COLOR00FFFF;
DRAWTEXTABS(243,58,'│'),COLOR00FFFF;
DRAWTEXTABS(243,70,'│'),COLOR00FFFF;
DRAWTEXTABS(171,30,'│'),COLOR00FFFF;
DRAWTEXTABS(171,34,'│'),COLOR00FFFF;
DRAWTEXTABS(171,46,'│'),COLOR00FFFF;
DRAWTEXTABS(171,58,'│'),COLOR00FFFF;
DRAWTEXTABS(171,70,'│'),COLOR00FFFF;
DRAWTEXTABS(105,5,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,25,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,42,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,59,'────────────'),COLOR00FFFF;
DRAWTEXTABS(105,76,'────────────'),COLOR00FFFF;


错误句 :
DRAWTEXTREL(16,950,STKLABEL+14+STKNAME+15+BKNAME),LINETHICK2,COLOR00FFFF
详细信息 : 您在括号前写的不是函数、公式等,
且缺少必要的运算符!
错误起始位置 : 1919 ; 长度: 8

回复

使用道具 举报

发表于 2014-3-12 09:29 | 显示全部楼层
in学习一下啦
回复

使用道具 举报

发表于 2014-5-26 21:26 | 显示全部楼层
谢谢楼主分享!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-11-23 01:28 , Processed in 0.100084 second(s), Total 10, Slave 10 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表