海神之子
发表于 2010-6-14 16:09
<P>TT:=240/FROMOPEN;<BR>比:=TT;<BR>J12:=(HIGH - ((HIGH - LOW) / 3));<BR>J23:=(LOW + ((HIGH - LOW) / 3));<BR>AAA:=CONST(HHV(H,90));<BR>BBB:=CONST(LLV(L,100));<BR>MA1:MA(CLOSE,5);<BR>MA2:MA(CLOSE,10);<BR>MA3:MA(CLOSE,20);<BR>MA4:MA(CLOSE,60);<BR>MA5:MA(CLOSE,120);<BR>DRAWKLINE(H,O,L,C);<BR>T1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) <BR>< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND<BR>CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));<BR>T2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1) <BR>> REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02 <BR>AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2)),1,0));<BR>T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));<BR>T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));<BR>T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1) <BR>< REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND<BR>CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));<BR>T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1) <BR>> REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND<BR>CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2)),1,0));<BR>T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > <BR>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));<BR>T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW > <BR>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));<BR>T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > <BR>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));<BR>T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW > <BR>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));<BR>T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 <BR>AND CLOSE<REF(OPEN,1) <BR>AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 <BR>AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1))),1,0));<BR>T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97 <BR>AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)),1,0));<BR>T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 <BR>AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1)),1,0));<BR>T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 <BR>AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND<BR>MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN) <BR>> MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));<BR>T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04 <BR>AND CLOSE=OPEN AND<BR>CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)<BR>,REF(OPEN,1))),1,0));<BR>T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));<BR>T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)<BR>-REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));<BR>T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));<BR>T19{三个白武士}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<BR>>REF(OPEN,1) AND CLOSE>OPEN <BR>AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));<BR>T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN <BR>AND CLOSE/OPEN<0.98),1,0));<BR>T21{孕育线}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)<BR>-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1) <BR>AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)<BR><=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN <BR>AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1) <BR>AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))<BR><=1/100),1,0));<BR>T22{多方炮}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) <BR>AND CLOSE>OPEN),1,0));<BR>T23{出水芙蓉}:=CONST(IF(((OPEN<EMA(C,20) OR OPEN<EMA(C,40) OR OPEN<<BR>EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))AND (V/MA(V,30)<BR>>1.2 AND C/REF(C,1)>1.049)),1,0));<BR>T24{上升三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)<BR><REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1) <BR>AND REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<BR><REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) <BR>AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4)),1,0));<BR>T25{下跌三部曲}:=CONST(IF(( REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)<BR>>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) <BR>AND REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)<BR><REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND<BR>CLOSE<REF(CLOSE,4)),1,0));<BR>T26{跳空缺口}:=CONST(IF(HIGH<REF(LOW,1) OR LOW>REF(HIGH,1),1,0));<BR>T27{三只乌鸦}:=CONST(IF((REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<BR><REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2) <BR>AND CLOSE<REF(CLOSE,1)),1,0));<BR>T28{光脚阴线}:=CONST(IF((LOW=CLOSE AND HIGH!=LOW),1,0));<BR>T29{光头阳线}:=CONST(IF((HIGH=CLOSE AND HIGH!=LOW),1,0));<BR>T30{分离}:=CONST(IF((OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)<BR>-REF(OPEN,1))<0),1,0));<BR>T31{长下影}:=CONST(IF(((MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667),1,0));<BR>T32{长上影}:=CONST(IF(((HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667),1,0));<BR>T33{十字星}:=CONST(IF((CLOSE=OPEN AND HIGH!=LOW),1,0));<BR>T34{大阴烛}:=CONST(IF((OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018),1,0));<BR>T35{好友反攻}:=CONST(IF(((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN <BR>AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002) OR (REF(CLOSE,1)>REF(OPEN,1) <BR>AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))<BR>/CLOSE<0.002)),1,0));<BR>T36{倾盆大雨}:=CONST(IF((REF(C,1)/REF(O,1)>=1.03 AND O<REF(C,1) AND O<BR>>REF(O,1) AND C<REF(O,1)),1,0));<BR>T37{M9}:=CONST(V*比>REF(V,1) AND MA(V,5)>REF(MA(V,5),1));<BR>T38{M10}:=CONST(V*比<REF(V,1) AND MA(V,5)>REF(MA(V,5),1));<BR>T39{M11}:=CONST(V*比>REF(V,1)AND MA(V,5)<REF(MA(V,5),1));<BR>T40{M12}:=CONST(V*比<REF(V,1)AND MA(V,5)<REF(MA(V,5),1));<BR>T41{M13}:=CONST((((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE <= J23),1,0)) > 1));<BR>T42{M14}:=CONST((((AMOUNT / VOL) / 100) > REF(HIGH,1)));<BR>T43{M15}:=CONST((((AMOUNT / VOL) / 100) < REF(LOW,1)));<BR>TS1:=IF(T1=1,0+0.03,0);<BR>TS2:=IF(T2=1,TS1+0.03,TS1);<BR>TS3:=IF(T3=1,TS2+0.03,TS2);<BR>TS4:=IF(T4=1,TS3+0.03,TS3);<BR>TS5:=IF(T5=1,TS4+0.03,TS4);<BR>TS6:=IF(T6=1,TS5+0.03,TS5);<BR>TS7:=IF(T7=1,TS6+0.03,TS6);<BR>TS8:=IF(T8=1,TS7+0.03,TS7);<BR>TS9:=IF(T9=1,TS8+0.03,TS8);<BR>TS10:=IF(T10=1,TS9+0.03,TS9);<BR>TS11:=IF(T11=1,TS10+0.03,TS10);<BR>TS12:=IF(T12=1,TS11+0.03,TS11);<BR>TS13:=IF(T13=1,TS12+0.03,TS12);<BR>TS14:=IF(T14=1,TS13+0.03,TS13);<BR>TS15:=IF(T15=1,TS14+0.03,TS14);<BR>TS16:=IF(T16=1,TS15+0.03,TS15);<BR>TS17:=IF(T17=1,TS16+0.03,TS16);<BR>TS18:=IF(T18=1,TS17+0.03,TS17);<BR>TS19:=IF(T19=1,TS18+0.03,TS18);<BR>TS20:=IF(T20=1,TS19+0.03,TS19);<BR>TS21:=IF(T21=1,TS20+0.03,TS20);<BR>TS22:=IF(T22=1,TS21+0.03,TS21);<BR>TS23:=IF(T23=1,TS22+0.03,TS22);<BR>TS24:=IF(T24=1,TS23+0.03,TS23);<BR>TS25:=IF(T25=1,TS24+0.03,TS24);<BR>TS26:=IF(T26=1,TS25+0.03,TS25);<BR>TS27:=IF(T27=1,TS26+0.03,TS26);<BR>TS28:=IF(T28=1,TS27+0.03,TS27);<BR>TS29:=IF(T29=1,TS28+0.03,TS28);<BR>TS30:=IF(T30=1,TS29+0.03,TS29);<BR>TS31:=IF(T31=1,TS30+0.03,TS30);<BR>TS32:=IF(T32=1,TS31+0.03,TS31);<BR>TS33:=IF(T33=1,TS32+0.03,TS32);<BR>TS34:=IF(T34=1,TS33+0.03,TS33);<BR>TS35:=IF(T35=1,TS34+0.03,TS34);<BR>TS36:=IF(T36=1,TS35+0.03,TS35);<BR>TS37:=IF(T37=1,TS36+0.03,TS36);<BR>TS38:=IF(T38=1,TS37+0.03,TS37);<BR>TS39:=IF(T39=1,TS38+0.03,TS38);<BR>TS40:=IF(T40=1,TS39+0.03,TS39);<BR>TS41:=IF(T41=1,TS40+0.03,TS40);<BR>TS42:=IF(T42=1,TS41+0.03,TS41);<BR>TS43:=IF(T43=1,TS42+0.03,TS42);<BR>DRAWTEXT(T1=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS1),''早晨之星,见底回升‖''),COLORGREEN ;<BR>DRAWTEXT(T2=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS2),''黄昏之星,见顶回落‖''),COLORGREEN ;<BR>DRAWTEXT(T3=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS3),''长十字,重要的警告信号,原趋势停顿或反转‖''),COLORGREEN ;<BR>DRAWTEXT(T4=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS4),''垂死十字,下跌信号‖''),COLORGREEN ;<BR>DRAWTEXT(T5=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS5),''早晨十字星,上涨信号,见底回升‖''),COLORGREEN ;<BR>DRAWTEXT(T6=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS6),''黄昏十字星,趋势停顿或反转,下跌或,见顶回落‖''),COLORGREEN ;<BR>DRAWTEXT(T7=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS7),''射击之星,市场顶部就在眼前,可能见顶回落,可靠性低‖''),COLORGREEN ;<BR>DRAWTEXT(T8=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS8),''倒转锤头构成一个看涨信号,可能见底回升‖''),COLORGREEN ;<BR>DRAWTEXT(T9=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS9),''锤头,可能见底回升,如有量配合,信号强烈‖''),COLORGREEN ;<BR>DRAWTEXT(T10=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS10),''吊颈,上升行情中见顶回落,顶部出现,见顶信号‖''),COLORGREEN ;<BR>DRAWTEXT(T11=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS11),''穿头破脚,顶部出现,见顶回落信号‖''),COLORGREEN ;<BR>DRAWTEXT(T12=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS12),''乌云盖顶,见顶回落信号‖''),COLORGREEN ;<BR>DRAWTEXT(T13=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS13),''曙光初现,将演化为V型反转或横盘。后市见底回升‖''),COLORGREEN ;<BR>DRAWTEXT(T14=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS14),''身怀六甲,底部,是见底回升,顶部,是见顶回落信号‖''),COLORGREEN ;<BR>DRAWTEXT(T15=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS15),''十字胎‖''),COLORYELLOW ;<BR>DRAWTEXT(T16=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS16),''平顶,行情见顶,股价将反转。但下跌力度较小‖''),COLORYELLOW ;<BR>DRAWTEXT(T17=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS17),''平底,行情探低见底,股价行将反转上升,但力度较小‖''),COLORYELLOW ;<BR>DRAWTEXT(T18=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS18),''大阳烛,上升中,剧烈地向上攀升。下行中,剧烈地向上反弹</P>
<P>‖''),COLORYELLOW ;<BR>DRAWTEXT(T19=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS19),''三个白武士,每日收盘价上移,表示可能见底回升‖''),COLORYELLOW ;<BR>DRAWTEXT(T20=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS20),''双飞乌鸦,行情开始疲软将见顶回落‖''),COLORYELLOW ;<BR>DRAWTEXT(T21=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS21),''孕育线,注意股价位置‖''),COLORYELLOW ;<BR>DRAWTEXT(T22=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS22),''多方炮,底部可能上涨,中间上涨中继,顶部见顶信号‖''),COLORYELLOW ;<BR>DRAWTEXT(T23=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS23),''出水芙蓉,阳线穿过20、40、60日均线,上攻势头初现‖''),COLORYELLOW ;<BR>DRAWTEXT(T24=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS24),''上升三部曲,上涨信号‖''),COLORYELLOW ;<BR>DRAWTEXT(T25=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS25),''下跌三部曲,下跌信号‖''),COLORYELLOW ;<BR>DRAWTEXT(T26=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS26),''跳空缺口,突破盘整,向上涨、向下跌开始‖''),COLORYELLOW ;<BR>DRAWTEXT(T27=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS27),''三只乌鸦站枝头,可能见顶回落‖''),COLORYELLOW ;<BR>DRAWTEXT(T28=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS28),''光脚阴线,下跌信号‖''),COLORYELLOW ;<BR>DRAWTEXT(T29=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS29),''光头阳线,多方积极上攻态势,后市看涨‖''),COLORYELLOW ;<BR>DRAWTEXT(T30=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS30),''分离,注意看涨分离和看跌分离‖''),COLORYELLOW ;<BR>DRAWTEXT(T31=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS31),''长下影,有可能止跌回升,升势末期,须小心‖''),COLORYELLOW ;<BR>DRAWTEXT(T32=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS32),''长上影,表明行情上档压力沉重,升势受阻‖''),COLORYELLOW ;<BR>DRAWTEXT(T33=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS33),''十字星,重要的警告信号,原趋势停顿或反转‖''),COLORYELLOW ;<BR>DRAWTEXT(T34=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS34),''大阴烛,后市向淡,发生逆转‖''),COLORYELLOW ;<BR>DRAWTEXT(T35=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS35),''好友反攻,跌势已尽,要展开一段反弹行情‖''),COLORYELLOW ;<BR>DRAWTEXT(T36=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS36),''倾盆大雨,见顶信号‖''),COLORYELLOW ; <BR>DRAWTEXT(T37=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS37),''今日成交量大于昨日,且有继续增大趋势''),COLORYELLOW ;<BR>DRAWTEXT(T38=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS38),''今日成交量小于昨日，但有放大迹象''),COLORYELLOW ;<BR>DRAWTEXT(T39=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS39),''今日成交量大于昨日, 但有缩小迹象''),COLORRED ;<BR>DRAWTEXT(T40=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS40),''今日成交量小于昨日，且有缩小迹象''),COLORRED ;<BR>DRAWTEXT(T41=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS41),''极端行情,在未来的几日内有85%的机会变更方向''),COLORWHITE ;<BR>DRAWTEXT(T42=1 AND CURRBARSCOUNT=58,AAA-(AAA*TS42),''上涨趋势''),COLORRED ;<
感恩
发表于 2010-6-14 21:50
谢谢!
打婕
发表于 2010-6-15 08:10
<P>老大，你发公式真的很感激你啊。就是你能不能自己先验证好了再发出来啊？这么些错误谁能改了啊？</P>
弈海清风
发表于 2010-6-15 09:25
能不能自己先验证好了再发出来啊？
自由自在炒股
发表于 2010-6-24 19:25
能不能自己先验证好了再发出来啊？
五线开花
发表于 2010-6-24 21:32
上野嘉
发表于 2010-10-22 15:30
精神可嘉。可惜啊，不是吗？
页:
[1]