金字塔决策交易系统

 找回密码
 

微信登录

微信扫一扫,快速登录

搜索
查看: 3943|回复: 2

老师帮忙修改,文华转金字塔

[复制链接]

2

主题

3

帖子

3

积分

Rank: 1

等级: 新手上路

注册:
2021-6-8
曾用名:
发表于 2021-6-8 15:29 | 显示全部楼层 |阅读模式

VV:="WEEK$1$V";
M:=5;
N:=BARSLAST(VV<>REF(VV,1))+1;

HH1:=HHV(H,N);//当前最高价
LL1:=LLV(L,N);//当前最低价
CC:=REF(C,N);//昨日收盘价
HH:=REF(HH1,N);//昨日最高价
LL:=REF(LL1,N);//昨日最低价
PIVOT:(HH+LL+CC)/3,LINETHICK2,COLORWHITE,LINETHICK2;
R1:=2*PIVOT-LL,COLORYELLOW;
S1:=2*PIVOT-HH,COLORWHITE;
R2:=PIVOT+(R1-S1),COLORMAGENTA;
R3:=HH+2*(PIVOT-LL),COLORRED;
S2:=PIVOT-(R1-S1),COLORCYAN;
S3:=LL-2*(HH-PIVOT),COLORLIGHTGREEN;
RM1:=(PIVOT+R1)/2,COLORYELLOW,DOT;
RM2:=(R1+R2)/2,COLORMAGENTA,DOT;
RM3:=(R2+R3)/2,COLORRED,DOT;
SM1:=(PIVOT+S1)/2,COLORWHITE,DOT;
SM2:=(S1+S2)/2,COLORCYAN,DOT;
SM3:=(S2+S3)/2,COLORLIGHTGREEN,DOT;

NG:=CROSS(BACKSET(ISLASTBAR,M),0.5);
DRAWSL(ISLASTBAR,PIVOT,0,-M+1,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,PIVOT,0,M,0,COLORWHITE),LINETHICK2;
DRAWTEXT(NG,REFX1(PIVOT,9999),'周PIVOT'),COLORWHITE,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,PIVOT,PIVOT,5,COLORWHITE),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,R1,0,-M+1,0,COLORYELLOW),LINETHICK2;
DRAWSL(ISLASTBAR,R2,0,-M+1,0,COLORMAGENTA),LINETHICK2;
DRAWSL(ISLASTBAR,R3,0,-M+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR,R1,0,M,0,COLORYELLOW),LINETHICK2;
DRAWSL(ISLASTBAR,R2,0,M,0,COLORMAGENTA),LINETHICK2;
DRAWSL(ISLASTBAR,R3,0,M,0,COLORRED),LINETHICK2;
DRAWTEXT(NG,REFX1(R1,9999),'周R1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(R2,9999),'周R2'),COLORMAGENTA,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(R3,9999),'周R3'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R1,R1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R2,R2,5,COLORMAGENTA),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R3,R3,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,S1,0,-M+1,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,S2,0,-M+1,0,COLORCYAN),LINETHICK2;
DRAWSL(ISLASTBAR,S3,0,-M+1,0,COLORLIGHTGREEN),LINETHICK2;
DRAWSL(ISLASTBAR,S1,0,M,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,S2,0,M,0,COLORCYAN),LINETHICK2;
DRAWSL(ISLASTBAR,S3,0,M,0,COLORLIGHTGREEN),LINETHICK2;
DRAWTEXT(NG,REFX1(S1,9999),'周S1'),COLORWHITE,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(S2,9999),'周S2'),COLORCYAN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(S3,9999),'周S3'),COLORLIGHTGREEN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S1,S1,5,COLORWHITE),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S2,S2,5,COLORCYAN),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S3,S3,5,COLORLIGHTGREEN),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,RM1,0,-M+1,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,RM2,0,-M+1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM3,0,-M+1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM1,0,M,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,RM2,0,M,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM3,0,M,0,COLORRED),DOT;
DRAWTEXT(NG,REFX1(RM1,9999),'周RM1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(RM2,9999),'周RM2'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(RM3,9999),'周RM3'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM1,RM1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM2,RM2,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM3,RM3,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,SM1,0,-M+1,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,SM2,0,-M+1,0,COLORCYAN),DOT;
DRAWSL(ISLASTBAR,SM3,0,-M+1,0,COLORLIGHTGREEN),DOT;
DRAWSL(ISLASTBAR,SM1,0,M,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,SM2,0,M,0,COLORCYAN),DOT;
DRAWSL(ISLASTBAR,SM3,0,M,0,COLORLIGHTGREEN),DOT;
DRAWTEXT(NG,REFX1(SM1,9999),'周SM1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(SM2,9999),'周SM2'),COLORCYAN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,REFX1(SM3,9999),'周SM3'),COLORLIGHTGREEN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM1,SM1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM2,SM2,5,COLORCYAN),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM3,SM3,5,COLORLIGHTGREEN),ALIGN0,VALIGN0,FONTSIZE15;


回复

使用道具 举报

38

主题

1万

帖子

1万

积分

Rank: 8Rank: 8

等级: 超级版主

注册:
2021-5-18
曾用名:
发表于 2021-6-8 15:49 | 显示全部楼层


VV:="vol#week";
M:=5;
N:=BARSLAST(VV<>REF(VV,1))+1;

HH1:=HHV(H,N);//当前最高价
LL1:=LLV(L,N);//当前最低价
CC:=REF(C,N);//昨日收盘价
HH:=REF(HH1,N);//昨日最高价
LL:=REF(LL1,N);//昨日最低价
PIVOT:(HH+LL+CC)/3,LINETHICK2,COLORWHITE,LINETHICK2;
R1:=2*PIVOT-LL,COLORYELLOW;
S1:=2*PIVOT-HH,COLORWHITE;
R2:=PIVOT+(R1-S1),COLORMAGENTA;
R3:=HH+2*(PIVOT-LL),COLORRED;
S2:=PIVOT-(R1-S1),COLORCYAN;
S3:=LL-2*(HH-PIVOT),colorgreen;
RM1:=(PIVOT+R1)/2,COLORYELLOW,DOT;
RM2:=(R1+R2)/2,COLORMAGENTA,DOT;
RM3:=(R2+R3)/2,COLORRED,DOT;
SM1:=(PIVOT+S1)/2,COLORWHITE,DOT;
SM2:=(S1+S2)/2,COLORCYAN,DOT;
SM3:=(S2+S3)/2,colorgreen,DOT;

NG:=CROSS(BACKSET(ISLASTBAR,M),0.5);
DRAWSL(ISLASTBAR,PIVOT,0,-M+1,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,PIVOT,0,M,0,COLORWHITE),LINETHICK2;
DRAWTEXT(NG,REFX(PIVOT,9999),'周PIVOT'),COLORWHITE,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,PIVOT,PIVOT,5,COLORWHITE),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,R1,0,-M+1,0,COLORYELLOW),LINETHICK2;
DRAWSL(ISLASTBAR,R2,0,-M+1,0,COLORMAGENTA),LINETHICK2;
DRAWSL(ISLASTBAR,R3,0,-M+1,0,COLORRED),LINETHICK2;
DRAWSL(ISLASTBAR,R1,0,M,0,COLORYELLOW),LINETHICK2;
DRAWSL(ISLASTBAR,R2,0,M,0,COLORMAGENTA),LINETHICK2;
DRAWSL(ISLASTBAR,R3,0,M,0,COLORRED),LINETHICK2;
DRAWTEXT(NG,refx(R1,9999),'周R1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(R2,9999),'周R2'),COLORMAGENTA,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(R3,9999),'周R3'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R1,R1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R2,R2,5,COLORMAGENTA),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,R3,R3,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,S1,0,-M+1,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,S2,0,-M+1,0,COLORCYAN),LINETHICK2;
DRAWSL(ISLASTBAR,S3,0,-M+1,0,colorgreen),LINETHICK2;
DRAWSL(ISLASTBAR,S1,0,M,0,COLORWHITE),LINETHICK2;
DRAWSL(ISLASTBAR,S2,0,M,0,COLORCYAN),LINETHICK2;
DRAWSL(ISLASTBAR,S3,0,M,0,colorgreen),LINETHICK2;
DRAWTEXT(NG,refx(S1,9999),'周S1'),COLORWHITE,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(S2,9999),'周S2'),COLORCYAN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(S3,9999),'周S3'),colorgreen,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S1,S1,5,COLORWHITE),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S2,S2,5,COLORCYAN),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,S3,S3,5,colorgreen),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,RM1,0,-M+1,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,RM2,0,-M+1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM3,0,-M+1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM1,0,M,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,RM2,0,M,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,RM3,0,M,0,COLORRED),DOT;
DRAWTEXT(NG,refx(RM1,9999),'周RM1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(RM2,9999),'周RM2'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(RM3,9999),'周RM3'),COLORRED,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM1,RM1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM2,RM2,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,RM3,RM3,5,COLORRED),ALIGN0,VALIGN0,FONTSIZE15;
DRAWSL(ISLASTBAR,SM1,0,-M+1,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,SM2,0,-M+1,0,COLORCYAN),DOT;
DRAWSL(ISLASTBAR,SM3,0,-M+1,0,colorgreen),DOT;
DRAWSL(ISLASTBAR,SM1,0,M,0,COLORYELLOW),DOT;
DRAWSL(ISLASTBAR,SM2,0,M,0,COLORCYAN),DOT;
DRAWSL(ISLASTBAR,SM3,0,M,0,colorgreen),DOT;
DRAWTEXT(NG,refx(SM1,9999),'周SM1'),COLORYELLOW,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(SM2,9999),'周SM2'),COLORCYAN,ALIGN2,VALIGN1,FONTSIZE15;
DRAWTEXT(NG,refx(SM3,9999),'周SM3'),colorgreen,ALIGN2,VALIGN1,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM1,SM1,5,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM2,SM2,5,COLORCYAN),ALIGN0,VALIGN0,FONTSIZE15;
DRAWNUMBER(ISLASTBAR,SM3,SM3,5,colorgreen),ALIGN0,VALIGN0,FONTSIZE15;
金字塔提供一对一VIP专业技术指导服务,技术团队实时响应您的日常使用问题与策略编写。联系电话:021-20339086
回复

使用道具 举报

2

主题

10

帖子

10

积分

Rank: 1

等级: 新手上路

注册:
2021-9-3
曾用名:
发表于 2022-5-20 20:43 | 显示全部楼层
老师您好,文华财经改金字塔,转新交易系统,谢谢


总手数:=1;
A:=MINPRICE1;//交易合约最小变动价位
CC:=REF(O,DAYBARPOS-1);//为当天第几根K线
N:=COUNTSIG(BK,SUMBARS(TIME=0900,1))+COUNTSIG(SK,SUMBARS(TIME=0900,1))+
COUNTSIG(BPK,SUMBARS(TIME=0900,1))+COUNTSIG(SPK,SUMBARS(TIME=0900,1));//COUNTSIG 统计N周期X的信号
HH:=HHV(H,BARSBK+1);//BARSBK上一次买开信号位置
LL:=LLV(L,BARSSK+1);//BARSSK上一次卖开信号位置

XXX_A:=3;

TIME_KAI_A:=TIME>=YY_A && TIME<=1458;
TIME_P_A:=2108;
TIME_PING_A:=TIME>=TIME_P_A && TIME<=2259;
ZS_A:=2.5;
ZY_A:=4;
MM_A:=0;
MMM_A:=1;



MIDDLE:VALUEWHEN(TIME=TIME_2,MA((C+O)/2,SUMBARS(TIME=TIME_1,1))),COLORGREEN;//9
//VALUEWHEN满足条件COND的X值  SUMBARS多少个周期X向前累计>=A
ZUIGAO_A:MIDDLE+X1,COLORRED,LINETHICK2;//红色
ZUIDI_A:MIDDLE-X1,COLORGREEN,LINETHICK2;//绿色
BK_TJ:=WEEKDAY<>5 && TIME_KAI_A && (CROSSUP(C,ZUIGAO_A) || (C>ZUIGAO_A && REF(C<=ZUIGAO_A,2))) && BKVOL=0;//BKVOL多头理论持仓
SK_TJ:=WEEKDAY<>5 && TIME_KAI_A && (CROSSDOWN(C,ZUIDI_A) || (C<ZUIDI_A && REF(C>=ZUIDI_A,2))) && SKVOL=0;//SKVOL空头理论持仓
SP_A_TJ1:=C>=ZUIGAO_A+CC*0.01*ZY_A && BKVOL>0;
SP_A_TJ2:=C<=HH-CC*0.01*ZS_A && BKVOL>0;
SP_A_TJ3:=C<ZUIDI_A && BKVOL>0;//BKVOL多头理论持仓
SP_A_TJ4:=TIME_PING_A;
BP_A_TJ1:=C<=ZUIDI_A-CC*0.01*ZY_A && SKVOL>0;//SKVOL空头理论持仓
BP_A_TJ2:=C>=LL+CC*0.01*ZS_A && SKVOL>0;
BP_A_TJ3:=C>ZUIGAO_A && SKVOL>0;
BP_A_TJ4:=TIME_PING_A;
KAICANG:=VALUEWHEN(BK_TJ || SK_TJ,TIME);//VALUEWHEN满足条件COND的X值
PINGCANG:=VALUEWHEN(SP_A_TJ1 || SP_A_TJ2 || SP_A_TJ3 || SP_A_TJ4 || BP_A_TJ1 || BP_A_TJ2 || BP_A_TJ3 || BP_A_TJ4,TIME);
MIDDLE1:=VALUEWHEN(TIME=PINGCANG,MA((C+O)/2,SUMBARS(TIME=TIME_1,1))),COLORGREEN;
MIDDLE2:=(VALUEWHEN(TIME=PINGCANG,HHV(H,BARSLAST(TIME=TIME_1)+1))+VALUEWHEN(TIME=PINGCANG,LLV(L,BARSLAST(TIME=TIME_1)+1)))/2;
ZUIGAO_AA:=MIDDLE1+X1,COLORRED,LINETHICK2;
ZUIDI_AA:=MIDDLE1-X1,COLORGREEN,LINETHICK2;
BK_TJ1:=WEEKDAY<>5 && TIME_KAI_A && (CROSSUP(C,ZUIGAO_AA) || (C>ZUIGAO_AA && REF(C<=ZUIGAO_AA,2))) && BKVOL=0;
SK_TJ1:=WEEKDAY<>5 && TIME_KAI_A && (CROSSDOWN(C,ZUIDI_AA) || (C<ZUIDI_AA && REF(C>=ZUIDI_AA,2))) && SKVOL=0;//WEEKDAY取星期数
总手数<=10 && (N=0 && BK_TJ) || (N>0 && BK_TJ1),BPK('A',总手数);
总手数<=10 && (N=0 && SK_TJ) || (N>0 && SK_TJ1),SPK('A',总手数);
C>=ZUIGAO_A+CC*0.01*ZY_A && BKVOL>0,SP('A',GROUPSKVOL('A'));//GROUPSKVOL模组空头持仓
C<=HH-CC*0.01*ZS_A && BKVOL>0,SP('A',GROUPBKVOL('A'));//GROUPBKVOL模组多头持仓
C<ZUIDI_A && BKVOL>0,SP('A',GROUPBKVOL('A'));
C<=ZUIDI_A-CC*0.01*ZY_A && SKVOL>0,BP('A',GROUPSKVOL('A'));
C>=LL+CC*0.01*ZS_A && SKVOL>0,BP('A',GROUPSKVOL('A'));
C>ZUIGAO_A && SKVOL>0,BP('A',GROUPSKVOL('A'));
TIME_PING_A,SP('A',GROUPBKVOL('A'));
TIME_PING_A,BP('A',GROUPSKVOL('A'));

XXX_C:=1;

TIME_KAI_C:=TIME>=YY_C && TIME<=1457;
TIME_P_C:=2106;
TIME_PING_C:=TIME>=TIME_P_C && TIME<=2259;
ZS_C:=0.5;
ZY_C:=0.9;

MMM_C:=1;
NNN_C:=2;
ZUIGAO_C:=VALUEWHEN(TIME=XX_C+XXX_C,HHV(H,BARSLAST(TIME=XX_C)+1)),COLORRED,LINETHICK2;
ZUIDI_C:=VALUEWHEN(TIME=XX_C+XXX_C,LLV(L,BARSLAST(TIME=XX_C)+1)),COLORGREEN,LINETHICK2;
总手数<=10 && WEEKDAY=5 && TIME_KAI_C && (CROSSUP(C,ZUIGAO_C+MM_C) || (REF(C>ZUIGAO_C,MMM_C) && REF(C<=ZUIGAO_C,NNN_C))) && BKVOL=0,BPK('C',总手数);
总手数<=10 && WEEKDAY=5 && TIME_KAI_C && (CROSSDOWN(C,ZUIDI_C-MM_C) || (REF(C<ZUIDI_C,MMM_C) && REF(C>=ZUIDI_C,NNN_C))) && SKVOL=0,SPK('C',总手数);
C>=ZUIGAO_C+CC*0.01*ZY_C && BKVOL>0,SP('C',GROUPBKVOL('C'));
C<=HH-CC*0.01*ZS_C && BKVOL>0,SP('C',GROUPBKVOL('C'));
C<ZUIDI_C && BKVOL>0,SP('C',GROUPBKVOL('C'));
C<=ZUIDI_C-CC*0.01*ZY_C && SKVOL>0,BP('C',GROUPBKVOL('C'));
C>=LL+CC*0.01*ZS_C && SKVOL>0,BP('C',GROUPSKVOL('C'));
C>ZUIGAO_C && SKVOL>0,BP('C',GROUPSKVOL('C'));
TIME_PING_C,SP('C',GROUPBKVOL('C'));
TIME_PING_C,BP('C',GROUPSKVOL('C'));
//SETSIGPRICETYPE(LIMIT_ORDER);
TRADE_OTHER('AUTO');






回复

使用道具 举报

您需要登录后才可以回帖 登录 | 微信登录

本版积分规则

手机版|小黑屋|上海金之塔信息技术有限公司 ( 沪ICP备13035422号 )

GMT+8, 2025-5-29 05:27 , Processed in 0.240418 second(s), 27 queries .

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表