当前位置:→ 公式网 > 飞狐公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是时间周期(无源码的请下载附件导入)
C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
- {时间周期}
- drawtext(BARPOS=SYSPARAM(2),3,'菲波纳齐数:=1
- 2
- 3
- 5
- 8
- 13
- 21
- 34
- 55
- 89
- 144
- 233
- 377
- 610;
- 鲁 卡斯 数:=1
- 2
- 3
- 4
- 7
- 11
- 18
- 29
- 47
- 76
- 123
- 199
- 322
- 521
- 843 \n
- (*9or 平方):=1
- 4
- 9
- 16
- 18
- 25
- 27
- 36
- 45
- 49
- 63
- 64
- 72
- 81
- 99
- 117
- 162
- 189
- 261
- 306
- 423
- 495
- 684
- 801'),colorblue;
- drawtext(BARPOS=SYSPARAM(2),2.5,'神奇 数 字:=1 2 3 4 5 7 8 9
- 11
- 13
- 16
- 18
- 21
- 25
- 27
- 29
- 34
- 36
- 45
- 47
- 49
- 55
- 63
- 64
- 72
- 76
- 81
- 89
- 99
- 117
- 123
- 144
- 162
- 189
- 199
- 233
- 261
- 306
- 322
- 377
- 423
- 495
- 521
- 610
- 684
- 801'),colorblue;
- if datatype=6 then begin
- //顶时间
- 顶时间0:=1071016; //最重要的顶
- 顶时间1:=1090804; //浪1@A
- 顶时间2:=1091124; //浪2@B
- 顶时间3:=1071016; //浪3@C
- 顶时间4:=1071016; //浪4
- 顶时间5:=1071016; //浪5
- 顶时间6:=1091207; //次重要时间点
- 顶时间7:=1071016; //次重要时间点
- 顶时间8:=1071016; //次重要时间点
- 顶时间9:=1071016; //次重要时间点
- //底时间
- 底时间0:=1081028; //最重要的底
- 底时间1:=1090901; //浪1@A
- 底时间2:=1081028; //浪2@B
- 底时间3:=1081028; //浪3@C
- 底时间4:=1081028; //浪4
- 底时间5:=1081028; //浪5
- 底时间6:=1090924;
- //次重要时间点
- 底时间7:=1091102;
- //次重要时间点
- 底时间8:=1091127;
- //次重要时间点
- 底时间9:=1081028;
- //次重要时间点
- //顶
- 顶时间尺0:=BARSLAST(DATE=顶时间0)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺1:=BARSLAST(DATE=顶时间1)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺2:=BARSLAST(DATE=顶时间2)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺3:=BARSLAST(DATE=顶时间3)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺4:=BARSLAST(DATE=顶时间4)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺5:=BARSLAST(DATE=顶时间5)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺6:=BARSLAST(DATE=顶时间6)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺7:=BARSLAST(DATE=顶时间7)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺8:=BARSLAST(DATE=顶时间8)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- 顶时间尺9:=BARSLAST(DATE=顶时间9)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORCYAN;
- DRAWTEXT(date=顶时间0,2,''+numtostr(顶时间尺0,0)),COLORCYAN;
- DRAWTEXT(date=顶时间1,2,''+numtostr(顶时间尺1,0)),COLORCYAN;
- DRAWTEXT(date=顶时间2,2,''+numtostr(顶时间尺2,0)),COLORCYAN;
- DRAWTEXT(date=顶时间3,2,''+numtostr(顶时间尺3,0)),COLORCYAN;
- DRAWTEXT(date=顶时间4,2,''+numtostr(顶时间尺4,0)),COLORCYAN;
- DRAWTEXT(date=顶时间5,2,''+numtostr(顶时间尺5,0)),COLORCYAN;
- DRAWTEXT(date=顶时间6,2,''+numtostr(顶时间尺6,0)),COLORCYAN;
- DRAWTEXT(date=顶时间7,2,''+numtostr(顶时间尺7,0)),COLORCYAN;
- DRAWTEXT(date=顶时间8,2,''+numtostr(顶时间尺8,0)),COLORCYAN;
- DRAWTEXT(date=顶时间9,2,''+numtostr(顶时间尺9,0)),COLORCYAN;
- //底
- 底时间尺0:=BARSLAST(DATE=底时间0)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺1:=BARSLAST(DATE=底时间1)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺2:=BARSLAST(DATE=底时间2)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺3:=BARSLAST(DATE=底时间3)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺4:=BARSLAST(DATE=底时间4)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺5:=BARSLAST(DATE=底时间5)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺6:=BARSLAST(DATE=底时间6)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺7:=BARSLAST(DATE=底时间7)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺8:=BARSLAST(DATE=底时间8)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- 底时间尺9:=BARSLAST(DATE=底时间9)-BARSLAST(BARPOS=SYSPARAM(1))+1,COLORMAGENTA;
- DRAWTEXT(date=底时间0,1,''+numtostr(底时间尺0,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间1,1,''+numtostr(底时间尺1,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间2,1,''+numtostr(底时间尺2,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间3,1,''+numtostr(底时间尺3,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间4,1,''+numtostr(底时间尺4,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间5,1,''+numtostr(底时间尺5,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间6,1,''+numtostr(底时间尺6,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间7,1,''+numtostr(底时间尺7,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间8,1,''+numtostr(底时间尺8,0)),COLORMAGENTA;
- DRAWTEXT(date=底时间9,1,''+numtostr(底时间尺9,0)),COLORMAGENTA;
- //到现在的时间
- DRAWTEXT(BARPOS=SYSPARAM(3),1.5,''+numtostr((SYSPARAM(3)-SYSPARAM(1))+1,0)),Color0095BC,shift0,align2;
- 降1升0:=1;//或是0
- if 降1升0=1 then begin
- stickline(date=顶时间1,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间2,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间3,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间4,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间5,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间1,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间2,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间3,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间4,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间5,1.1,1.8,1,0),COLORgray;
- drawline(date=顶时间1,1.5,date=底时间1,1.5,0),COLORCYAN;
- drawline(date=底时间1,1.5,date=顶时间2,1.5,0),COLORMAGENTA;
- drawline(date=顶时间2,1.5,date=底时间2,1.5,0),COLORCYAN;
- drawline(date=底时间2,1.5,date=顶时间3,1.5,0),COLORMAGENTA;
- drawline(date=顶时间3,1.5,date=底时间3,1.5,0),COLORCYAN;
- drawline(date=底时间3,1.5,date=顶时间4,1.5,0),COLORMAGENTA;
- drawline(date=顶时间4,1.5,date=底时间4,1.5,0),COLORCYAN;
- drawline(date=底时间4,1.5,date=顶时间5,1.5,0),COLORMAGENTA;
- drawline(date=顶时间5,1.5,date=底时间5,1.5,0),COLORCYAN;
- DRAWTEXT(date=底时间1,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间1)-BARSLAST(DATE=底时间1)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=顶时间2,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间1)-BARSLAST(DATE=顶时间2)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=底时间2,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间2)-BARSLAST(DATE=底时间2)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=顶时间3,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间2)-BARSLAST(DATE=顶时间3)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=底时间3,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间3)-BARSLAST(DATE=底时间3)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=顶时间4,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间3)-BARSLAST(DATE=顶时间4)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=底时间4,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间4)-BARSLAST(DATE=底时间4)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=顶时间5,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间4)-BARSLAST(DATE=顶时间5)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=底时间5,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间5)-BARSLAST(DATE=底时间5)+1,0)),COLORCYAN,PXDN15,align2;
- end;
- if 降1升0=0 then begin
- stickline(date=底时间1,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间2,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间3,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间4,1.1,1.8,1,0),COLORgray;
- stickline(date=底时间5,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间1,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间2,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间3,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间4,1.1,1.8,1,0),COLORgray;
- stickline(date=顶时间5,1.1,1.8,1,0),COLORgray;
- drawline(date=底时间1,1.5,date=顶时间1,1.5,0),COLORCYAN;
- drawline(date=顶时间1,1.5,date=底时间2,1.5,0),COLORMAGENTA;
- drawline(date=底时间2,1.5,date=顶时间2,1.5,0),COLORCYAN;
- drawline(date=顶时间2,1.5,date=底时间3,1.5,0),COLORMAGENTA;
- drawline(date=底时间3,1.5,date=顶时间3,1.5,0),COLORCYAN;
- drawline(date=顶时间3,1.5,date=底时间4,1.5,0),COLORMAGENTA;
- drawline(date=底时间4,1.5,date=顶时间4,1.5,0),COLORCYAN;
- drawline(date=顶时间4,1.5,date=底时间5,1.5,0),COLORMAGENTA;
- drawline(date=底时间5,1.5,date=顶时间5,1.5,0),COLORCYAN;
- DRAWTEXT(date=顶时间1,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间1)-BARSLAST(DATE=顶时间1)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=底时间2,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间1)-BARSLAST(DATE=底时间2)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=顶时间2,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间2)-BARSLAST(DATE=顶时间2)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=底时间3,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间2)-BARSLAST(DATE=底时间3)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=顶时间3,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间3)-BARSLAST(DATE=顶时间3)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=底时间4,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间3)-BARSLAST(DATE=底时间4)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=顶时间4,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间4)-BARSLAST(DATE=顶时间4)+1,0)),COLORCYAN,PXDN15,align2;
- DRAWTEXT(date=底时间5,1.8,' '+NUMTOSTR(BARSLAST(DATE=顶时间4)-BARSLAST(DATE=底时间5)+1,0)),COLORMAGENTA,PXDN15,align2;
- DRAWTEXT(date=顶时间5,1.8,' '+NUMTOSTR(BARSLAST(DATE=底时间5)-BARSLAST(DATE=顶时间5)+1,0)),COLORCYAN,PXDN15,align2;
- end;
- end;
- //时间尺
- GB:=SYSPARAM(1);
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift5;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift8;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift13;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift21;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift34;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift55;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift89;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift144;
- stickline(BARPOS=GB,0,0.6,1,0),POINTDOT,Color0095BC,shift233;
- DRAWTEXT(BARPOS=GB,0.5,'5'),Color0095BC,shift5;
- DRAWTEXT(BARPOS=GB,0.5,'8'),Color0095BC,shift8;
- DRAWTEXT(BARPOS=GB,0.5,'13'),Color0095BC,shift13;
- DRAWTEXT(BARPOS=GB,0.5,'21'),Color0095BC,shift21;
- DRAWTEXT(BARPOS=GB,0.5,'34'),Color0095BC,shift34;
- DRAWTEXT(BARPOS=GB,0.5,'55'),Color0095BC,shift55;
- DRAWTEXT(BARPOS=GB,0.5,'89'),Color0095BC,shift89;
- DRAWTEXT(BARPOS=GB,0.5,'144'),Color0095BC,shift144;
- DRAWTEXT(BARPOS=GB,0.5,'233'),Color0095BC,shift233;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift28;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift42;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift47;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift28;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift42;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift47;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift63;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift68;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift76;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift97;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift102;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift110;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift123;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift152;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift157;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift165;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift178;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift199;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift241;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift246;
- stickline(BARPOS=GB,0,0.3,1,0),POINTDOT,Color0095BC,shift254;