老师这个能改成博弈大师吗 [博易POBO]
咨询内容:
N1:=200;
A:=BACKSET(BARSTATUS=2,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:REF(H,BARSLAST(B)),COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前高,''+NUMTOSTRN(前高,2)),COLORGREEN;}
A2:=BACKSET(BARSTATUS=2,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)) ,COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前低,''+NUMTOSTRN(前低,2)),COLORYELLOW;}
F2:((前高-前低)*0.382)+前低,COLORGREEN,DOTLINE;
{DRAWTEXT(BARSTATUS=2,F2,''+NUMTOSTRN(F2,2)),COLORGREEN;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F2,'(0.382)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F2,'(0.618)'),COLORGREEN;
F4:((前高-前低)*0.618)+前低,COLORGREEN,DOTLINE;
{DRAWTEXT(BARSTATUS=2,F4,''+NUMTOSTRN(F4,2)),COLORGREEN,ALIGN2;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F4,'(0.618)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F4,'(0.382)'),COLORGREEN;
A1:=BACKSET(BARSTATUS=2,HHVBARS(H,N1)+1);
B1:=COUNT(A1,N1)=1;
前高1:REF(H,BARSLAST(B1)),COLORFF00FF,LINETHICK2;
A12:=BACKSET(BARSTATUS=2,LLVBARS(L,N1)+1);
B12:=A12>REF(A12,1);
前低1:REF(L,BARSLAST(B12)),COLORFF00FF,LINETHICK2;
{DRAWTEXT(BARSTATUS=2,前低1,''+NUMTOSTRN(前低1,2)),COLORWHITE;}
F12:((前高1-前低1)*0.382)+前低1,COLORFF00FF,DOTLINE{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F12,''+NUMTOSTRN(F12,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F12,'(0.382)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F12,'(0.618)'),COLORFF00FF;
F13:((前高1-前低1)*0.5)+前低1,COLORRED;
{DRAWTEXT(BARSTATUS=2,F13,''+NUMTOSTRN(F13,2)),COLORFF00FF,ALIGN2;}
F14:((前高1-前低1)*0.618)+前低1,COLORFF00FF,DOTLINE{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F14,''+NUMTOSTRN(F14,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F14,'(0.618)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F14,'(0.382)'),COLORFF00FF;
N1:=200;
A:=BACKSET(BARSTATUS=2,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:REF(H,BARSLAST(B)),COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前高,''+NUMTOSTRN(前高,2)),COLORGREEN;}
A2:=BACKSET(BARSTATUS=2,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)) ,COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前低,''+NUMTOSTRN(前低,2)),COLORYELLOW;}
F2:((前高-前低)*0.382)+前低,COLORGREEN,POINTDOT;
{DRAWTEXT(BARSTATUS=2,F2,''+NUMTOSTRN(F2,2)),COLORGREEN;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F2,'(0.382)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F2,'(0.618)'),COLORGREEN;
F4:((前高-前低)*0.618)+前低,COLORGREEN,POINTDOT;
{DRAWTEXT(BARSTATUS=2,F4,''+NUMTOSTRN(F4,2)),COLORGREEN,ALIGN2;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F4,'(0.618)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F4,'(0.382)'),COLORGREEN;
A1:=BACKSET(BARSTATUS=2,HHVBARS(H,N1)+1);
B1:=COUNT(A1,N1)=1;
前高1:REF(H,BARSLAST(B1)),COLORFF00FF,LINETHICK2;
A12:=BACKSET(BARSTATUS=2,LLVBARS(L,N1)+1);
B12:=A12>REF(A12,1);
前低1:REF(L,BARSLAST(B12)),COLORFF00FF,LINETHICK2;
{DRAWTEXT(BARSTATUS=2,前低1,''+NUMTOSTRN(前低1,2)),COLORWHITE;}
F12:((前高1-前低1)*0.382)+前低1,COLORFF00FF,POINTDOT;
{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F12,''+NUMTOSTRN(F12,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F12,'(0.382)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F12,'(0.618)'),COLORFF00FF;
F13:((前高1-前低1)*0.5)+前低1,COLORRED;
{DRAWTEXT(BARSTATUS=2,F13,''+NUMTOSTRN(F13,2)),COLORFF00FF,ALIGN2;}
F14:((前高1-前低1)*0.618)+前低1,COLORFF00FF,POINTDOT;
{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F14,''+NUMTOSTRN(F14,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F14,'(0.618)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F14,'(0.382)'),COLORFF00FF; 谢谢老师 来源 程序化久久网
老师这个能改成博弈大师吗
N:=100;{INPUT:N(14,1,100), N1(37,1,200);}N1:=200;
A:=BACKSET(BARSTATUS=2,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:REF(H,BARSLAST(B)),COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前高,''+NUMTOSTRN(前高,2)),COLORGREEN;}
A2:=BACKSET(BARSTATUS=2,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)) ,COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前低,''+NUMTOSTRN(前低,2)),COLORYELLOW;}
F2:((前高-前低)*0.382)+前低,COLORGREEN,DOTLINE;
{DRAWTEXT(BARSTATUS=2,F2,''+NUMTOSTRN(F2,2)),COLORGREEN;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F2,'(0.382)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F2,'(0.618)'),COLORGREEN;
F4:((前高-前低)*0.618)+前低,COLORGREEN,DOTLINE;
{DRAWTEXT(BARSTATUS=2,F4,''+NUMTOSTRN(F4,2)),COLORGREEN,ALIGN2;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F4,'(0.618)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F4,'(0.382)'),COLORGREEN;
A1:=BACKSET(BARSTATUS=2,HHVBARS(H,N1)+1);
B1:=COUNT(A1,N1)=1;
前高1:REF(H,BARSLAST(B1)),COLORFF00FF,LINETHICK2;
A12:=BACKSET(BARSTATUS=2,LLVBARS(L,N1)+1);
B12:=A12>REF(A12,1);
前低1:REF(L,BARSLAST(B12)),COLORFF00FF,LINETHICK2;
{DRAWTEXT(BARSTATUS=2,前低1,''+NUMTOSTRN(前低1,2)),COLORWHITE;}
F12:((前高1-前低1)*0.382)+前低1,COLORFF00FF,DOTLINE{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F12,''+NUMTOSTRN(F12,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F12,'(0.382)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F12,'(0.618)'),COLORFF00FF;
F13:((前高1-前低1)*0.5)+前低1,COLORRED;
{DRAWTEXT(BARSTATUS=2,F13,''+NUMTOSTRN(F13,2)),COLORFF00FF,ALIGN2;}
F14:((前高1-前低1)*0.618)+前低1,COLORFF00FF,DOTLINE{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F14,''+NUMTOSTRN(F14,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F14,'(0.618)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F14,'(0.382)'),COLORFF00FF;
来源:程序化99网( WWW.CXH99.COM )
博易技术人员: N:=100;{INPUT:N(14,1,100), N1(37,1,200);}N1:=200;
A:=BACKSET(BARSTATUS=2,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:REF(H,BARSLAST(B)),COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前高,''+NUMTOSTRN(前高,2)),COLORGREEN;}
A2:=BACKSET(BARSTATUS=2,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:REF(L,BARSLAST(B2)) ,COLORGREEN,LINETHICK1;
{DRAWTEXT(BARSTATUS=2,前低,''+NUMTOSTRN(前低,2)),COLORYELLOW;}
F2:((前高-前低)*0.382)+前低,COLORGREEN,POINTDOT;
{DRAWTEXT(BARSTATUS=2,F2,''+NUMTOSTRN(F2,2)),COLORGREEN;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F2,'(0.382)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F2,'(0.618)'),COLORGREEN;
F4:((前高-前低)*0.618)+前低,COLORGREEN,POINTDOT;
{DRAWTEXT(BARSTATUS=2,F4,''+NUMTOSTRN(F4,2)),COLORGREEN,ALIGN2;}
DRAWTEXT(BARSLAST(B)>BARSLAST(B2) AND BARSTATUS=2,F4,'(0.618)'),COLORGREEN;
DRAWTEXT(BARSLAST(B)<BARSLAST(B2) AND BARSTATUS=2,F4,'(0.382)'),COLORGREEN;
A1:=BACKSET(BARSTATUS=2,HHVBARS(H,N1)+1);
B1:=COUNT(A1,N1)=1;
前高1:REF(H,BARSLAST(B1)),COLORFF00FF,LINETHICK2;
A12:=BACKSET(BARSTATUS=2,LLVBARS(L,N1)+1);
B12:=A12>REF(A12,1);
前低1:REF(L,BARSLAST(B12)),COLORFF00FF,LINETHICK2;
{DRAWTEXT(BARSTATUS=2,前低1,''+NUMTOSTRN(前低1,2)),COLORWHITE;}
F12:((前高1-前低1)*0.382)+前低1,COLORFF00FF,POINTDOT;
{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F12,''+NUMTOSTRN(F12,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F12,'(0.382)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F12,'(0.618)'),COLORFF00FF;
F13:((前高1-前低1)*0.5)+前低1,COLORRED;
{DRAWTEXT(BARSTATUS=2,F13,''+NUMTOSTRN(F13,2)),COLORFF00FF,ALIGN2;}
F14:((前高1-前低1)*0.618)+前低1,COLORFF00FF,POINTDOT;
{LINEDASHDOT};
{DRAWTEXT(BARSTATUS=2,F14,''+NUMTOSTRN(F14,2)),COLORFF00FF,ALIGN2;}
DRAWTEXT(BARSLAST(B1)>BARSLAST(B12) AND BARSTATUS=2,F14,'(0.618)'),COLORFF00FF;
DRAWTEXT(BARSLAST(B1)<BARSLAST(B12) AND BARSTATUS=2,F14,'(0.382)'),COLORFF00FF; 谢谢老师 来源 程序化久久网
有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友
可联系技术人员 QQ: 262069696 或微信号:cxh99cxh99 进行 有偿收费 编写!
(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)
相关文章
-
没有相关内容