[大智慧Ⅱ] 【新《阳光普照》】

范范の世界

管理员

Rank: 27

帖子: 20872
金币: 127271 ￥
推广积分: 0 点
性别: 男
最后登录: 2008-9-7

Medal No.1 Medal No.2 Medal No.3 Medal No.4 常住居民论坛管理

1^# 大中小发表于 2008-5-5 19:24 只看该作者

【新《阳光普照》】

本文来自:海涛股票论坛(www.198bbs.com) 作者:范范の世界点击228次

参数K为2时可看见用图标表示的效果。 {阳光普照} input:K(1,1,2); DRAWTEXTREL(20,30,'阳光普照'),LINETHICK6,Coloryellow; DRAWTEXTREL(200,30,STKLABEL+' '+STKNAME),LINETHICK6,ColorFFFF80; wWj:=' '; wyy1:=WEEKDAY; if C>0 then begin; wWj:=' 星期'; IF wyy1=5 then wWj:= wWj+'五'; IF wyy1=4 then wWj:= wWj+'四'; IF wyy1=3 then wWj:= wWj+'三'; IF wyy1=2 then wWj:= wWj+'二'; IF wyy1=1 then wWj:= wWj+'一'; end; wWl:=''; wWh:=''; wyy2:=LMONTH; wyy3:=LDAY; IF BARSTATUS=2 then wWw:=' 农历 '+NUMTOSTRN(wyy2,0)+'月 '+NUMTOSTRN(wyy3,0)+'日'; IF BARSTATUS=2 then wWh:=NUMTOSTRN(date+1000000,0); IF BARSTATUS=2 then wWl:=wWj; DRAWTEXTREL(20 ,40 ,' '+wWh+wWl+wWw),LINETHICK3,ColorFFFF80;
MA5:MA(C,5); MA10:MA(C,10); MA20:MA(C,20); MA30:MA(C,30); MA60:MA(C,60); IF BARSTATUS=2 then 获利盘:=WINNER(CLOSE)*100; IF BARSTATUS=2 then 平均成本:=COST(50); DRAWTEXTREL(20,700,'获利盘:'+获利盘+'% '),colormagenta; DRAWTEXTREL(20,760,'平均成本:'+平均成本),colormagenta; zg:=FINANCE2(35);{总股} lta:=FINANCE2(37);{流通A} sy:=FINANCE2(3);{收益} sl:=DYNAINFO(39);{市盈率} wf:=FINANCE2(8);{未分} gj:=FINANCE2(7);{公积}; jz:=FINANCE2(4);{净资} cw:='总股:'+zg+' 流通A:'+lta+' 收益:'+sy+' 市盈率:'+sl+' 未分:'+wf+' 公积:'+gj+' 净资:'+jz; DRAWTEXTREL(20,900,BKNAME),Coloryellow; DRAWTEXTREL(20,960,cw),Coloryellow; YYA4:=MA(CLOSE,20); YYA5:=(CLOSE > MA(CLOSE,5)); YYA6:=(MA(CLOSE,5) > MA(CLOSE,10)); YYA7:=(CLOSE > MA(CLOSE,10)); YYA8:=(MA(CLOSE,5) > MA(CLOSE,20)); YYA9:=(CLOSE > MA(CLOSE,20)); YYA10:=REF(YYA4,1); YYA11:=(YYA4 > YYA10); YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 - 10))) + IF(YYA11,10,(0 - 10))); DSLX:=(CLOSE / INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); YYV1:=MA(VOL,5); YYV2:=MA(VOL,10); DRAWGBKLAST(((YYAVX > 0) OR (DSLX1 > DSLX2)),'sun'); DRAWGBKLAST((YYAVX <= 0),'moon'); STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0.1,0),color0000FF; STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,7,0),color0000FF; STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE <= REF(CLOSE,1)))),LOW,HIGH,0.1,0),colorFFFF00; STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE <= REF(CLOSE,1)))),OPEN,CLOSE,7,0),colorFFFF00; STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),LOW,HIGH,0.1,0),color0000FF; STICKLINE(((CLOSE > OPEN) OR ((CLOSE = OPEN) AND (CLOSE > REF(CLOSE,1)))),OPEN,CLOSE,7,0),color0000FF; STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE <= REF(CLOSE,1)))),LOW,HIGH,0.1,0),colorFFFF00; STICKLINE(((CLOSE < OPEN) OR ((CLOSE = OPEN) AND (CLOSE <= REF(CLOSE,1)))),OPEN,CLOSE,7,0),colorFFFF00;
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07)); 阻力位1:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位); 止损位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93)); 止损位1:=IF((CLOSE < 10),(CLOSE * 0.95),止损位); 情况1:=((CROSS(YYAVX,1) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)); 情况2:=((CROSS(YYAVX,1) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)); 情况3:=((CROSS(YYAVX,1) AND (YYV1 > YYV2)) AND (DSLX < DSLX1)); 情况4:=((CROSS(YYAVX,1) AND (YYV1 <= YYV2)) AND (DSLX < DSLX1)); 情况5:=((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)); 情况6:=((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)); 情况7:=((CROSS(1,YYAVX) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)); 情况8:=((CROSS(1,YYAVX) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)); 情况9:=((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)); 情况10:=((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)); 情况11:=((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)); 情况12:=((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)); 情况13:=((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)); 情况14:=((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)); 情况15:=((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)) AND (DSLX < DSLX1)); 情况16:=((((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2)) AND (DSLX < DSLX1)); 大盘1:=(CROSS(YYAVX,1) AND (YYV1 >= YYV2)); 大盘2:=(CROSS(YYAVX,1) AND (YYV1 < YYV2)); 大盘3:=(CROSS(1,YYAVX) AND (YYV1 >= YYV2)); 大盘4:=(CROSS(1,YYAVX) AND (YYV1 < YYV2)); 大盘5:=(((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)); 大盘6:=(((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)); 大盘7:=(((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 >= YYV2)); 大盘8:=(((YYAVX < 1) AND (REF(YYAVX,1) < 0)) AND (YYV1 < YYV2));
{显示图标,一般不用}
DRAWICON(K=2 AND (情况1 OR 情况2 OR 情况3 OR 情况4 OR 情况9 OR 情况10) AND (CLOSE < 200),H,10),ALIGN0,VALIGN2; DRAWICON(K=2 AND ( 大盘1 OR 大盘2 OR 大盘5) AND (CLOSE >200),H,10),ALIGN0,VALIGN2; DRAWICON(K=2 AND (情况5 OR 情况6 OR 情况7 OR 情况8 OR 情况11 OR 情况12 OR 情况13 OR 情况14 OR 情况15 OR 情况16) AND CLOSE < 200,L,8),ALIGN1,VALIGN0; DRAWICON(K=2 AND (大盘3 OR 大盘4 OR 大盘6 OR 大盘7 OR 大盘8) AND CLOSE >200,L,8),ALIGN1,VALIGN0;
DRAWMOVETEXT(情况1 AND (CLOSE < 200),'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况2 AND (CLOSE < 200),'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况3 AND (CLOSE < 200),'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况4 AND (CLOSE < 200),'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况9 AND (CLOSE < 200),'该股形态良好，强势明显，量能充足，可以继续持有。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况10 AND (CLOSE < 200),'该股上行趋势不变，强势依然，但量能开始转弱，注意风险' +'阻力位:'+阻力位1+'止损位:'+止损位1);
DRAWMOVETEXT(大盘1 AND (CLOSE >200),'量能理想，考虑中线参与，仓位在2/3左右，如前期经一轮下跌，最佳买点，如前期有段涨幅谨慎介入。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘2 AND (CLOSE >200),'走势趋强，量能还显不足，如前期经一轮下跌，考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘5 AND (CLOSE >200),'大盘走势良好，量能理想，可以继续持有强势股。' +'阻力位:'+阻力位1+'止损位:'+止损位1);
DRAWMOVETEXT(情况5 AND (CLOSE < 200),'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况6 AND (CLOSE < 200),'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况7 AND (CLOSE < 200),'该股放量下跌，走势明显偏弱，离场观望。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况8 AND (CLOSE < 200),'该股缩量下跌，走势偏弱，离场观望。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况11 AND (CLOSE < 200),'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况12 AND (CLOSE < 200),'该股走势趋弱，量能不足，减持大部分筹码' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况13 AND (CLOSE < 200),'该股形态不佳，注意成交量的变化，但目前不适合参与。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况14 AND (CLOSE < 200),'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况15 AND (CLOSE < 200),'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(情况16 AND (CLOSE < 200),'该股走势太弱，没有参与价值。' +'阻力位:'+阻力位1+'止损位:'+止损位1);
DRAWMOVETEXT(大盘3 AND (CLOSE >200),'大盘形态走坏，重仓者可以减去大部分仓位。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘4 AND (CLOSE >200),'大盘缩量调整，注意风险，短线清仓观望。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘6 AND (CLOSE >200),'大盘形态良好，但量能稍显不足，随时准备减仓。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘7 AND (CLOSE >200),'大盘趋势不明，注意成交量变化，目前不适宜进场。' +'阻力位:'+阻力位1+'止损位:'+止损位1); DRAWMOVETEXT(大盘8 AND (CLOSE >200),'大盘趋势向下，量能萎缩，不适合进场。' +'阻力位:'+阻力位1+'止损位:'+止损位1);

附件

1.gif (114.78 KB)

2008-5-5 19:24

【新《阳光普照》】 - ≡指标公式探讨区≡ -

2.gif (109.21 KB)

2008-5-5 19:24

【新《阳光普照》】 - ≡指标公式探讨区≡ -

有事请联系海涛股票论坛QQ客服:

TOP

jhyyg

海涛二级股民

Rank: 3

帖子: 393
金币: 383 ￥
推广积分: 0 点
最后登录: 2008-9-4

2^# 大中小发表于 2008-9-2 15:51 只看该作者

谢谢楼主提供分享。。。。。。。。。。。

TOP

‹‹ 上一主题 | 下一主题 ››

海涛核心成员招募中	海涛强庄成员招募中	海涛股票论坛QQ交流群	庄家拉升③只涨停短线黑马
积分等级划分及如何升级	今日最新消息的短线黑马	提前布局３只暴涨黑马金股	推荐明天３只暴涨黑马金股