引用:
原帖由 hhxing 于 2008-6-10 21:42 发表 
901013请去掉时限
{无敌买卖主图}{主图} 修改版
QQ1:IF((DATE<=1080531),EMA(EMA(EMA(EMA(CLOSE,3),3),3),3),0),Linethick1,CoLor0000FF;
QQ2:IF((DATE<=1080531),EMA(REF(QQ1,1),3),0),Linethick1,CoLor00FFFF;
VAAR1:=(CLOSE>REF(CLOSE,1)) AND (CLOSE>REF(CLOSE,2));
VAAR2:=REF(VAAR1,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR3:=REF(VAAR2,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR4:=REF(VAAR3,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR5:=REF(VAAR4,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR6:=REF(VAAR5,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR7:=REF(VAAR6,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR8:=REF(VAAR7,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR9:=REF(VAAR8,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAARA:=REF(VAAR9,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAARB:=REF(VAARA,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAARC:=REF(VAARB,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAARD:=(CLOSE<REF(CLOSE,1)) AND (CLOSE<REF(CLOSE,2));
VAARE:=REF(VAARD,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAARF:=REF(VAARE,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR10:=REF(VAARF,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR11:=REF(VAAR10,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR12:=REF(VAAR11,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR13:=REF(VAAR12,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR14:=REF(VAAR13,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR15:=REF(VAAR14,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR16:=REF(VAAR15,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR17:=REF(VAAR16,1) AND (CLOSE<=REF(CLOSE,1)) AND (CLOSE>=REF(CLOSE,2));
VAAR18:=REF(VAAR17,1) AND (CLOSE>=REF(CLOSE,1)) AND (CLOSE<=REF(CLOSE,2));
VAAR19:=REF((((((((((((VAARD or VAARE) or VAARF) or VAAR10) or VAAR11) or VAAR12) or VAAR13) or VAAR14) or VAAR15) or VAAR16) or VAAR17) or VAAR18),1) AND VAAR1;
VAAR1A:=REF((((((((((((VAAR1 or VAAR2) or VAAR3) or VAAR4) or VAAR5) or VAAR6) or VAAR7) or VAAR8) or VAAR9) or VAARA) or VAARB) or VAARC),1) AND VAARD;
买:VAAR19,CoLor00FF00;
卖:VAAR1A,CoLorFFFFFF;
VA1:=((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28)))*(100);
VA2:=SMA(VA1,4,1);
VA3:=SMA(VA2,2,1);
主力建仓:=IF((VA3<8.5) AND (VA2<11),15,(-15));
MAV:=(((CLOSE)*(2)+HIGH+LOW)/(4))*(10);
SK:=EMA(MAV,13)-EMA(MAV,34);
SD:=EMA(SK,5);
B:=((2)*(SK-SD))*(5.5);
拉升资金:=IF((IF((B>=0),B,(-18))>150) AND (DATE<=1080531),15,(IF((B>=0) AND (DATE<=1080531),B,(-150)))/(10));
选潜力股:=(买=0) AND (COUNT(卖,BARSLAST(买))=0) AND ((CLOSE)/(REF(CLOSE,BARSLAST(买)))<=1.08) AND ((主力建仓=15) or (拉升资金>0)) AND (DATE<=1080531);
选暴涨股:=(买=1) AND (COUNT((主力建仓=15),BARSLAST(卖))>=3);
暴涨潜力:=((CLOSE)/(REF(CLOSE,BARSLAST(选暴涨股)))<=1.15) AND (COUNT(卖,BARSLAST(选暴涨股))<=2);
坚决买进:=(买 AND 暴涨潜力 or 选暴涨股);
选暴涨潜力股:=(坚决买进 or ((CLOSE)/(REF(CLOSE,BARSLAST(坚决买进)))<=1.15) AND (COUNT(卖,BARSLAST(坚决买进))<=2));
DRAWTEXT(买,(LOW)*(0.999),'▲'),CoLor0000FF;
DRAWTEXT(卖,(HIGH)*(1.02),'▼'),CoLor00FFFF;
DRAWTEXT(坚决买进,(LOW)*(0.94),'坚决买'),CoLor00FFFF;
DRAWTEXT(选暴涨潜力股 and 买,(LOW)*(0.96),'暴涨'),CoLor0000FF;
{------------------ ------------------}
[
本帖最后由 狂野中国 于 2008-6-11 07:41 编辑 ]