1.慢速macd
LC := REF(CLOSE,1);
VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100);
RC := (CLOSE-LC)*VID;
LONG := SUM(RC,0);
DIFF := SMA(LONG,10,1);
DEA := SMA(LONG,20,1);
LON : DIFF-DEA;
LONMA : MA(LON,10);
LONT : LON, COLORSTICK;
2.多空线
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:= (20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
drawkline('k',kline);
drawline(牛线,'牛线',clRed,1,1);
drawline(马线,'马线',clyellow,1,1);
3.倚天屠龙
drawkline('k',kline);
N1:=10;
N2:=30;
M1:MA(C,N1);
M2:MA(C,N2);
STICKLINE(M1>M2,M1,M2,2,0,CLRED);
STICKLINE(M1
DRAWTEXT(CROSS(M1,M2)*5,LOW,'买入',CLRED,3);
DRAWTEXT(CROSS(M2,M1)*2,HIGH,'卖出',CLYELLOW,2);
4.线下空逢高空
drawkline('k',kline);
HH:=HHV(HIGH,10);
LL:=LLV(LOW,10);
HH1:=BARSLAST((HH > REF(HH,1)));
LL1:=BARSLAST((LL < REF(LL,1)));
PARTLINE((HH1 < LL1),LL,CLYELLOW);
PARTLINE((HH1 > LL1),HH,CLBLUE);
DRAWTEXT(CROSS(HH1,LL1),HH,'线下空逢高空',CLGREEN,3);
DRAWTEXT(CROSS(LL1,HH1),LL,'线上多逢低多',CLRED,2);
DRAWTEXT(((HH1 < REF(HH1,1)) AND (HH1 < LL1)),LOW,'♂刷多',CLRED,2);
DRAWTEXT(((LL1 < REF(LL1,1)) AND (HH1 > LL1)),HIGH,'♀刷空',CLGREEN,3);
5.抢钱
tr:=max(abs(h-ref(h,1)),abs(l-ref(l,1)));
dmz:=ifthen((h+l)<=(ref(h,1)+ref(l,1)),0,max(abs(h-ref(h,1)),abs(l-ref(l,1))));
dmf:=ifthen((h+l)>=(ref(h,1)+ref(l,1)),0,max(abs(h-ref(h,1)),abs(l-ref(l,1))));
diz:=sum(dmz,n)/(sum(dmz,n)+sum(dmf,n));
dif:=sum(dmf,n)/(sum(dmf,n)+sum(dmz,n));
水平面:diz-dif, colorFFFFFF, colorstick;
金龙:sma(水平面,n1,m), color00FFFF, line, pensize3;
银龙:ma(金龙,m1), colorF0CAA6, line, pensize3;
6.智能辅助
hhjsjda:=(2.97*close+open+low+high)/6;
hhjsjdb:(20*hhjsjda+19*ref(hhjsjda,1)+18*ref(hhjsjda,2)+17*ref(hhjsjda,3)+16*ref(hhjsjda,4)
+15*ref(hhjsjda,5)+14*ref(hhjsjda,6)+13*ref(hhjsjda,7)+12*ref(hhjsjda,8)+11*ref(hhjsjda,9)
+10*ref(hhjsjda,10)+9*ref(hhjsjda,11)+8*ref(hhjsjda,12)
+7*ref(hhjsjda,13)+6*ref(hhjsjda,14)+5*ref(hhjsjda,15)
+4*ref(hhjsjda,16)+3*ref(hhjsjda,17)+2*ref(hhjsjda,18)+
ref(hhjsjda,20))/210, colorFFFFFF, line;
hhjsjdc:ma(hhjsjdb,5), color00FF00, line;
7.长龙
stickline(ref(var1,1)>var1,var1,ref(var1,1),5,0,clgreen);
stickline(ref(var1,1)
m1:=(close-llv(low,30))/(hhv(high,30)-llv(low,30))*100;
m3:=sma(m1,3,1);
var1:=sma(m3,4,1)-10;
var4:=(hhv(high,30)-close)/(hhv(high,30)-llv(low,30))*100;
var5:=sma(var4,3,1);
var2:=sma(var5,4,1)-60;
8.好吗：
M1:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
M3:=SMA(M1,3,1);
VAR1:=SMA(M3,4,1)-10;
VAR4:=(HHV(HIGH,30)-CLOSE)/(HHV(HIGH,30)-LLV(LOW,30))*100;
VAR5:=SMA(VAR4,3,1);
VAR2:=SMA(VAR5,4,1)-60;
STICKLINE(REF(VAR1,1)
STICKLINE(REF(VAR1,1)>VAR1,VAR1,REF(VAR1,1),5,0,CLGREEN);
STICKLINE(REF(VAR2,1)>VAR2,VAR2,REF(VAR2,1),10,0,CLRED);
STICKLINE(REF(VAR2,1)
9.多空线
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:= (20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210;
马线:=MA(牛线,6);
drawkline('k',kline);
drawline(牛线,'牛线',clRed,1,1);
drawline(马线,'马线',clyellow,1,1);
10逃顶抄底
rsv:=(((close - llv(low,9)) / (hhv(high,9) - llv(low,9))) * 100);
k:sma(rsv,3,1), color00FFFF, line;
d:sma(k,3,1), color0000FF, line;
j:=((3 * k) - (2 * d));
kk:=(sma(rsv,3,1));
dd:=(sma(k,3,1));
jj:=(((3 * k) - (2 * d)));
n:=(kk + dd);
kx:=(n < 25);
kx1:=ref(kx,29);
xx:=(n < 18);
xx1:=ref(xx,31);
xxx:=(n < 23);
xxx1:=ref(xxx,198);
kp:=((kx1 or xx1) or xxx1);
ka1:=(((ref(close,2) / ref(open,2)) < 0.95) and (ref(close,2) < ref(close,3)));
ka2:=(((ref(open,1) < ref(close,2)) and (ref(close,1) > ref(close,2)))
and (ref(close,1) > ((ref(close,2) + ref(open,2)) / 2)));
ka3:=(close > ref(close,1));
ka4:=(llv(low,13) = ref(low,1));
kp2:=(count((((ka1 and ka2) and ka3) and ka4),3) > 0);
kp3:=cross((-100*(hhv(high,14)-close)/(hhv(high,14)-llv(low,14))),80);
kd:=(n < 45);
kd1:=(((((ref(kd,180) or ref(kd,179)) or ref(kd,31)) or ref(kd,29)) or ref(kd,13)) or ref(kd,11));
kp4:=((kp2 and kp3) and kd1);
diff:=ema(close,12) - ema(close,26);
dea:=ema(diff,9);
kp5:=2*(diff-dea);
kd2:=((((ref(kd,180) or ref(kd,261)) or ref(kd,98)) or ref(kd,77)) or ref(kd,1));
kp6:=((kp2 and kp5) and kd2);
kp7:=(n < 34);
kp8:=ref(kp7,11);
kp9:=(n < 45);
kp10:=((ref(kp9,83) and kp8) and kp2);
kp11:=(n < 38);
kp12:=((ref(kp11,19) and ref(kp11,32)) and kp2);
kp13:=((ref(kp9,28) and ref(kp11,101)) and kp2);
kp14:=(n < 43);
kp15:=((ref(kp14,28) and ref(kp14,189)) and kp2);
i:=((((((ref(close,2) / ref(open,2)) < 0.95) and (ref(open,1) < ref(close,2)))
and ((abs((ref(open,1) - ref(close,1))) / ref(close,1)) < 0.03))
and ((close / open) > 1.05)) and (close > ref(close,2)));
i1:=2*(diff-dea);
t3:=(n < 40);
t4:=((ref(t3,34) or ref(t3,28)) or ref(t3,57));
kp16:=((i and i1) and t4);
逃顶线:90, colorFF00FF, line;
中轴线:50, colorFFFFFF, line;
抄底线:10, color00FF00, line;
11.MACD变色龙主图
DIF:IFthen(EMA(C,12)>EMA(C,26),EMA(C,12),EMA(C,26)); {MACD}
DEA:IFthen(EMA(EMA(C,12),9)>EMA(EMA(C,26),9),EMA(EMA(C,12),9),EMA(EMA(C,26),9));
STICKLINE(DIF>DEA,CLOSE,OPEN,4,1,CLRED);
STICKLINE(DEA>DIF,CLOSE,OPEN,4,1,CLGREEN);
STICKLINE(DIF>DEA,LOW,HIGH,1,0,CLRED);
STICKLINE(DEA>DIF,LOW,HIGH,1,0,CLGREEN);
PARTLINE(DEA>DIF,DIF,CLblue);
PARTLINE(DEA
PARTLINE(DEA>DIF,DEA,CLGREEN);
PARTLINE(DEA
{箭头提示买卖信号}
{DRAWICON(CROSS(DIF,DEA),LOW*0.99,0);
DRAWICON(CROSS(DEA,DIF),HIGH*1.01,1);}
{两条线交叉时变盘黄白颜色提示}
STICKLINE( CROSS(DIF,DEA),OPEN,CLOSE,5,1,CLYELLOW);
STICKLINE( CROSS(DEA,DIF),OPEN,CLOSE,5,1,CLWHITE);
{文字提示}
DRAWTEXT( CROSS(DIF,DEA),High*1.04,'逢高空',CLGREEN,2);
DRAWTEXT( CROSS(DEA,DIF),LOW*0.96,'逢低多',CLRed,2);
12.方块长龙kk附图
VAR1:=HHV(HIGH,9)-LLV(LOW,9);
VAR2:=HHV(HIGH,9)-CLOSE;
VAR3:=CLOSE-LLV(LOW,9);
VAR4:=VAR2/VAR1*100-70;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR7:=SMA(VAR3/VAR1*100,3,1);
VAR8:=LLV(LOW,34);
VAR9:=SMA(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:=IFthen(VAR9>100,VAR9-100,0);
VAR11:=HHV(HIGH,34);
VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13);
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2);
注意顶:88;
STICKLINE(VAR12-VAR13>0,VAR12,VAR13,10,1,CLRED);
STICKLINE(VAR12-VAR13<0,VAR12,VAR13,10,1,CLGREEN);
生命线:EMA(VAR13,5);
DRAWLINE(生命线, '生命线', clYELLOW, 1, 1);
红灯买:ifthen(cross(VAR13,VAR12) and VAR1260,VAR13,88);
DRAWLINE(红灯买, '红灯买', clred, 1, 1);
绿灯卖:ifthen(cross(VAR12,VAR13) and VAR12>VAR13 and VAR12<18,38,18);
DRAWLINE(绿灯卖, '绿灯卖', clgreen, 1, 1);
13.这样k
BASE:(HHV(HIGH,21)+LLV(LOW,21))/2;
STICKLINE(CLOSE>=BASE,O,C,1,0,clRed);
STICKLINE(CLOSE>=BASE,O,H,1,0,clRed);
STICKLINE(CLOSE>=BASE,O,L,1,0,clRed);
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE
STICKLINE(CLOSE>=BASE,O,C,3,0,clRed);
STICKLINE(CLOSE>=BASE,O,C,2,0,clRed);
STICKLINE(CLOSE>=BASE,O,C,1,0,clRed);
STICKLINE(CLOSE>=BASE,O,C,1,0,clRed);
14.合做多分做空
drawicon(cross(空势,空仓),观望*1.2,1);
drawicon(cross(空仓,空势),空势*0.96,0);
v1:=hhv(high,55);
v2:=llv(low,35);
v3:=wma((high+low+open+close)/4,4);
空仓:wma((close-v2)/(v1-v2),6)*100, colorFF0000, line, pensize5;
观望:ema(hhv(空仓,13),1), colorFFFFFF, line, pensize2;
操作:ema(hhv(空仓,7),1), color0000FF, line, pensize5;
空势:ma(空仓,4), color00FF00, line;
15.源码：
M1:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;
M3:=SMA(M1,3,1);
VAR1:=SMA(M3,4,1)-10;
VAR4:=(HHV(HIGH,30)-CLOSE)/(HHV(HIGH,30)-LLV(LOW,30))*100;
VAR5:=SMA(VAR4,3,1);
VAR2:=SMA(VAR5,4,1)-60;
STICKLINE(REF(VAR1,1)
STICKLINE(REF(VAR1,1)>VAR1,VAR1,REF(VAR1,1),5,0,CLGREEN);
STICKLINE(REF(VAR2,1)>VAR2,VAR2,REF(VAR2,1),10,0,CLRED);
STICKLINE(REF(VAR2,1)
箭头VAR2:=(CLOSE-LLV(LOW, 10))/(HHV(HIGH, 10)-LLV(LOW,10))*100;
VAR3:=SMA(VAR2, 5, 1);
VAR4:=CLOSE<=1*REF(CLOSE, 1);
VAR5:=SMA(VAR3, 5, 1);
人:=3*VAR3-2*VAR5; 和:=MA(人, 5);
选股:CROSS(人,和);
|
雷达卡
发表于 2014-1-4 18:51:24
提升卡
喧嚣卡
变色卡
楼主