连连涨 发表于 2011-2-16 20:49

<P><BR><BR><BR>一,为解盘照图把图文文字没置一下。</P>
<P>二,参数K有三种没置方式,缺省为0。k=0时背景变色,当图面k线周期多时k线</P>
<P>&nbsp; 有压缩现象。k=2时背景不变色无压缩,但会失去表示强弱的背景自功变色。</P>
<P>三,k=2时只有熊样线以上的图面变色,无压缩。但要选择系统背景色配合才好</P>
<P>&nbsp; 看。(我选的狩猎绿)</P>
<P></P>
<P>&nbsp;</P>
<P><BR>{阳光普照__TDX 参数K(0,2,0) 缺省为0}</P>
<P>TT:=240/FROMOPEN;<BR>比:=TT;<BR>促进指数MFL:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;<BR>AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);<BR>AZ2:=EMA(AY2,9);<BR>LT2:=(AY2-AZ2);<BR>L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;<BR>ZGD:=HHV(H,80)*0.99;<BR>ZGD2:=CONST(ZGD);<BR>ZDD:=LLV(L211,80);<BR>ZDD2:=CONST(ZDD);<BR>YYA4:=MA(CLOSE,20);<BR>YYA5:=(CLOSE &gt; MA(CLOSE,5));<BR>YYA6:=(MA(CLOSE,5) &gt; MA(CLOSE,10));<BR>YYA7:=(CLOSE &gt; MA(CLOSE,10));<BR>YYA8:=(MA(CLOSE,5) &gt; MA(CLOSE,20));<BR>YYA9:=(CLOSE &gt; MA(CLOSE,20));<BR>YYA10:=REF(YYA4,1);<BR>YYA11:=(YYA4 &gt; YYA10);<BR>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)));<BR>DSLX:=(CLOSE / INDEXC);<BR>DSLX1:=MA(DSLX,5);<BR>DSLX2:=MA(DSLX,10);<BR>YYV1:=MA(VOL,5);<BR>YYV2:=MA(VOL,10);<BR>J1:=CONST(IF( YYAVX &gt; 0,200,100));<BR>J2:=CONST(IF( YYAVX &gt; 0,00,100));<BR>J3:=CONST(IF( YYAVX &gt; 0,100,100));<BR>ZGD3:=IF(K=0,ZGD2,DRAWNULL);<BR>ZDD3:=IF(K=0,ZDD2,DRAWNULL);<BR>ZGD4:=IF(K=1,ZGD2,DRAWNULL);</P>
<P>牛背:=MA(C,21);<BR>牛逼:=牛背+2*STD(C,21);<BR>熊样:=牛背-2*STD(C,21);<BR>牛背2:=IF(C&gt;牛背,牛背,DRAWNULL);<BR>熊样2:=IF(C&gt;牛背,熊样,DRAWNULL);<BR>DRAWBAND(ZGD3,RGB(J1,J2,J3),ZDD3,DRAWNULL);<BR>DRAWBAND(ZGD4,RGB(J1,J2,J3),熊样,DRAWNULL);<BR>DRAWBAND(牛背2,RGB(185,127,158),熊样2,RGB(0,0,0));<BR>牛缰绳:MA(CLOSE,4);<BR>牛喘气: EMA(CLOSE,13),COLORFFFF00,LINETHICK2 ;<BR>牛趴窝: EMA(CLOSE,34), COLORBLUE,LINETHICK2;<BR>牛熊斗: EMA(CLOSE,55), COLORWHITE,LINETHICK1;</P>
<P>AY:=EMA(CLOSE,12)-EMA(CLOSE,26);<BR>AZ:=EMA(AY,9);<BR>LT:=(AY-AZ);<BR>L21:IF(LT,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;<BR>IF(LT,LLV(L,21),DRAWNULL),COLORFFFF00;<BR>STICKLINE(((CLOSE &gt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &gt; REF(CLOSE,1)))),LOW,HIGH,0 ,0),COLOR0000FF;<BR>STICKLINE(((CLOSE &gt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &gt; REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;<BR>STICKLINE(((CLOSE &lt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &lt;= REF(CLOSE,1)))),LOW,HIGH,0,0),COLORFFFF00;<BR>STICKLINE(((CLOSE &lt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &lt;= REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLORFFFF00;<BR>STICKLINE(((CLOSE &gt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &gt; REF(CLOSE,1)))),LOW,HIGH,0,0),COLOR0000FF;<BR>STICKLINE(((CLOSE &gt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &gt; REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLOR0000FF;<BR>STICKLINE(((CLOSE &lt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &lt;= REF(CLOSE,1)))),LOW,HIGH,0,0),COLORFFFF00;<BR>STICKLINE(((CLOSE &lt; OPEN) OR ((CLOSE = OPEN) AND (CLOSE &lt;= REF(CLOSE,1)))),OPEN,CLOSE,3,0),COLORFFFF00;<BR>情况1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 &gt;= YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 &lt; YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 &gt; YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1 &lt;= YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况5:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 &gt;= YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况6:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 &lt; YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况7:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 &gt;= YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况8:=CONST(IF(((CROSS(1,YYAVX) AND (YYV1 &lt; YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况9:=CONST(IF(((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &gt;= YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况10:=CONST(IF(((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &lt; YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况11:CONST(IF(((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &gt;= YYV2)) AND (DSLX &lt; DSLX1)),1,0)),NODRAW;<BR>情况12:=CONST(IF(((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &lt; YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况13:=CONST(IF(((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &gt;= YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况14:=CONST(IF(((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &lt; YYV2)) AND (DSLX &gt;= DSLX1)),1,0));<BR>情况15:=CONST(IF(((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &gt;= YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>情况16:=CONST(IF(((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &lt; YYV2)) AND (DSLX &lt; DSLX1)),1,0));<BR>大盘1:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 &gt;= YYV2)),1,0));<BR>大盘2:=CONST(IF((CROSS(YYAVX,1) AND (YYV1 &lt; YYV2)),1,0));<BR>大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 &gt;= YYV2)),1,0));<BR>大盘4:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 &lt; YYV2)),1,0));<BR>大盘5:=CONST(IF((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &gt;= YYV2)),1,0));<BR>大盘6:=CONST(IF((((YYAVX &gt;= 1) AND (REF(YYAVX,1) &gt; 0)) AND (YYV1 &lt; YYV2)),1,0));<BR>大盘7:=CONST(IF((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &gt;= YYV2)),1,0));<BR>大盘8:=CONST(IF((((YYAVX &lt; 1) AND (REF(YYAVX,1) &lt; 0)) AND (YYV1 &lt; YYV2)),1,0));</P>
<P><BR>WJ:=(H+L+C)/3;<BR>V1:=IF(H=L,1,H-MAX(O,C));<BR>V2:=IF(H=L,1,MAX(C,O)-WJ);<BR>V3:=IF(H=L,1,MIN(O,C)-L);<BR>V4:=IF(H=L,1,WJ-MIN(C,O));<BR>V5:=VOL/IF(H=L,4,H-L);<BR>V6:=(V1*V5);<BR>V7:=(V2*V5);<BR>V8:=(V3*V5);<BR>V9:=(V4*V5);<BR>买盘1:=DYNAINFO(23)*比;<BR>卖盘1:=DYNAINFO(22)*比;<BR>买盘2:=IF(ISLASTBAR AND C&gt;300,(V9+V8)*TT,(V9+V8));<BR>卖盘2:=IF(ISLASTBAR AND C&gt;300,(V6+V7)*TT,(V6+V7));<BR>买盘:=IF(ISLASTBAR AND PERIOD=5 AND C&lt;300,买盘1,买盘2);<BR>卖盘:=IF(ISLASTBAR AND PERIOD=5 AND C&lt;300,卖盘1,卖盘2);<BR>{买卖差:=买盘-卖盘;}</P>
<P><BR>MFI:=(HIGH-LOW)*1000000/(VOL*比);<BR>绿灯:=MFI&gt;=REF(MFI,1)AND VOL*比&gt;=REF(VOL,1);<BR>M1:=CONST(绿灯);<BR>衰退:=MFI&lt;REF(MFI,1)AND VOL*比&lt;REF(VOL,1);<BR>M2:=CONST(衰退);<BR>伪装:=MFI&gt;=REF(MFI,1)AND VOL*比&lt;REF(VOL,1);<BR>M3:=CONST(伪装);<BR>蛰伏:=MFI&lt;REF(MFI,1)AND VOL*比&gt;=REF(VOL,1); <BR>M4:=CONST(蛰伏);</P>
<P>量大:=(卖盘+买盘)/REF(VOL,1)&gt;2;<BR>M5:=CONST(量大);<BR>量缩:=REF(VOL,1)/(卖盘+买盘)&gt;1.5;<BR>M6:=CONST(量缩);<BR>卖量大:=(卖盘-买盘)/买盘&gt;0.4;<BR>M7:=CONST(卖量大);<BR>买量大:=(买盘-卖盘)/卖盘&gt;0.4;<BR>M8:=CONST(买量大);<BR>TS1:=IF(M1=1,0.03+0.03,0.03);<BR>TS2:=IF(M2=1,TS1+0.03,TS1);<BR>TS3:=IF(M3=1,TS2+0.03,TS2);<BR>TS4:=IF(M4=1,TS3+0.03,TS3);<BR>TS5:=IF(M5=1,TS4+0.03,TS4);<BR>TS6:=IF(M6=1,TS5+0.03,TS5);<BR>TS7:=IF(M7=1,TS6+0.03,TS6);<BR>TS8:=IF(M8=1,TS7+0.03,TS7);</P>
<P>DRAWTEXT(情况1=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,明显走强,中线参与,仓位在2/3左右''),COLORFF00FF;<BR>DRAWTEXT(情况2=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''走势趋强量能不足,短线进场,仓位在1/2左右''),COLORFF00FF;<BR>DRAWTEXT(情况3=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量价良好,并没有明显走强,短线进场,仓位1/2左右。''),COLORFF00FF;<BR>DRAWTEXT(情况4=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态尚可,量能不足,未完全走强,短线参与,仓位1/3左右。''),COLORFF00FF;<BR>DRAWTEXT(情况5=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''形态变坏,走势尚可,重仓减大半,清仓者观望。''),COLORFF0000;<BR>DRAWTEXT(情况6=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''随大盘一起下跌,明显缩量走势,考虑大盘风险,减持或清仓。''),COLORFF0000;<BR>DRAWTEXT(情况7=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股放量下跌,走势明显偏弱,离场观望。''),COLORFF0000;<BR>DRAWTEXT(情况8=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股缩量下跌,走势偏弱,离场观望。''),COLORFFFF00;<BR>DRAWTEXT(情况9=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态良好,强势明显,量能充足,可以继续持有。''),COLOR00FFFF;<BR>DRAWTEXT(情况10=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股上行趋势不变,强势依然,但量能开始转弱,注意风险''),COLOR00FFFF;<BR>DRAWTEXT(情况11=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股仍然具备上涨潜力,但股性偏弱,可考虑减仓。''),COLORFFFFFF;<BR>DRAWTEXT(情况12=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势趋弱,量能不足,减持大部分筹码''),COLORFFFF00;<BR>DRAWTEXT(情况13=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股形态不佳,注意成交量的变化,但目前不适合参与。''),COLORFFFF00;<BR>DRAWTEXT(情况14=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股趋势不明,股价偏弱,注意量能变化,目前不宜参与。''),COLORFFFF00;<BR>DRAWTEXT(情况15=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''有走强迹象,但量能不足,趋势不明,不适合操作''),COLORFFFF00;<BR>DRAWTEXT(情况16=1&nbsp; AND (CLOSE &lt; 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''该股走势太弱,没有参与价值。''),COLORFFFFFF;<BR>DRAWTEXT(大盘1 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''量能理想,2/3仓位, 前一轮下跌,最佳买点,否则谨慎介入。''),COLOR00FF00;<BR>DRAWTEXT(大盘2 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''趋强,量能不足,若前一轮下跌,短线进场1/2,量能放大加仓。''),COLORFF00FF;<BR>DRAWTEXT(大盘3 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态走坏,重仓者可以减去大部分仓位。''),COLORAAAAAA;<BR>DRAWTEXT(大盘4 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘缩量调整,注意风险,短线清仓观望。''),COLORFF0000;<BR>DRAWTEXT(大盘5 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘走势良好,量能理想,可以继续持有强势股。''),COLOR00FFFF;<BR>DRAWTEXT(大盘6 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘形态良好,但量能稍显不足,随时准备减仓''),COLOR00FF00;<BR>DRAWTEXT(大盘7 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势不明,注意成交量变化,目前不适宜进场。''),COLORFFFFFF;<BR>DRAWTEXT(大盘8 AND (CLOSE &gt;200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),''大盘趋势向下,量能萎缩,不适合进场。''),COLORFFFFFF;<BR>DRAWTEXT(M1 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS1),''[绿灯]实计交易量增加。MFI促进指数增加。''),COLORFFFFFF;<BR>DRAWTEXT(M2 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS2),''[衰退]实计交易量减少。MFI促进指数减少。''),COLORGREEN;<BR>DRAWTEXT(M3 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS3),''[伪装]实计交易量减少。MFI促进指数增加。''),COLORGREEN;<BR>DRAWTEXT(M4 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS4),''[蛰伏]实计交易量增加。MFI促进指数减少。''),COLORYELLOW;<BR>DRAWTEXT(M5 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS5),''★预比昨量放大一倍以上;''),COLORGREEN;<BR>DRAWTEXT(M6 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS6),''★预比昨缩量一半以上;''),COLORYELLOW;<BR>DRAWTEXT(M7 AND CURRBARSCOUNT=70,ZGD2-(ZGD2*TS7),''☆卖出量大于买入量40%以上;''),COLORGREEN;<BR>DRAWTEXT(M8 AND CURRBARSCO

舜江侯 发表于 2011-2-17 12:42

页: [1]
查看完整版本: 【阳光普照__TDX 解盘】