模型策略源码:  目前金字塔已经与信达证券开通了合作协议,并可以直接对接信达证券的网上交易柜台,用户只要开户就可以直接使用金字塔进行下单了  下载地址       目前来说,对于股票交易,市面上的量化软件还没有真正的接口级别的自动交易,本人目前借助自制的一个中间软件,接收某软件传过来的公式信号,按照某软件传过来的证券代码和价格与及数量(或者买入金额),自动下单到券商的同花顺核新下单终端里,基本实现准确的静默模式的自动交易.  ● 将选股公式改写一下,将原来用于预警的买入信号的条件当做触发开关,该条件满足后。中间软件就会接收到这个信号按照指定的代码价格数量进行买卖委托。  ●通常软件选股公式
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                              这里以1分钟引用3分钟的macd为例,常规方法只能在1分钟k线上显示3分钟k线的macd走势,至于3分钟内部每根1分钟k线的macd走势不知道  方法原理:获取上一根3分钟的diff、Dea、Macd,然后配合1分钟的close计算出实际的diff、Dea、Macd  第一步、首先在macd指标里加入以下2句:  Ema12: Ema(C,12),Linethick0;  Ema26: Ema(C,26),Linethick0;  第二步、复制以下代码即可  Runmode:1;  Em1:=Stkindi(Stklabel,Macd.Ema12,0,17,-1);  Em2:=Stkin
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                              //定义参数  Input:N(81,1,100,10),P1(14,2,40,4),P2(14,2,40,4),P3(36,10,100,2);  //中间变量&     Variable:Ls=0,Gl=0,Dl=0;  Num:=2;  Em:Ema(Close,34);  //收盘价34期EMA  Sm:Sma(Close,8,1);  //收盘价8期SMA  Rsv:=(Close-Llv(Low,N))/(Hhv(High,N)-Llv(Low,N))*100;  K:Sma(RSV,P1,1),NOAXIS;  D:Sma(K,P2,1),Noaxis;  Tp:=Value
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                            模型策略源码:Runmode:0;    Variable:Stopline=0;    Entrylongcond:=Ref(High,1)>Ref(High,2) And Ref(High,2)>Ref(High,3) And Ref(Low,2)Entryshortcond:=Ref(Low,1)Ref(High,3) And Ref(Low,2)   Atr:=3*Ma(Tr,15);    Hh:=Ref(High,1);    Ll:=Ref(Low,1);    If Holding=0 Then Begin   If Entrylongcond Then Begi...
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                            模型策略源码:N:=84;  TYP:=(HIGH+LOW+CLOSE)/3;  CCI:(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N));  天线:200,COLORGREEN;  逃顶线:100,COLORRED,LINETHICK3;  趋势线:CCI,COLORGRAY,LINESTICK,LINETHICK1;  零轴线: 0,COLORYELLOW,CIRCLEDOT,LINETHICK1;  抄底线:-100,COLORWHITE;  地线:-200,COLORGREEN;  DRAWTEXT(CROSS(CCI,-100),-100,\●抄底\),LI
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                              前言:  这是一个代码框架,其中部分灵感来自阿火的策略、Guotx2010的vba教程和王峰的一句话(如果你注重效率,那么金字塔提供的全局变量数据库的速度完全可以超越INI文件的),所以在此向各位前辈致谢!    适用本框架的前提:  不使用金字塔规定不能用于if ... Then中的函数(如统计函数、未来函数等)、采用走完K线、且K线走完后信号就固定下来的(即未来不会发生改变)、使用新图表交易函数、勾选ldquo;  仅刷最后一根k线rdquo;    步骤:    第一步:创建3个自定义函数,创建方法在此不详述,VBA代码如下:  \定义4个动态数组保存信号和信号发生日期和时间  Di
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                              模型策略源码:N:=3;  RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;  背离值:SMA(RSV,3,1),STICK,LINETHICK2;  下降:DRAWLINE(背离值>=HHV(背离值,6),背离值,背离值=HHV(背离值,6),背离值,0),COLORYELLOW;  点击复制上述代码粘贴到到公式管理器  &   
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                              Ss:=1;  //手数  Extgbdataset(T1_Position,0);  //0表示没有仓位,1表示持有多头, -1表示持有空头  Extgbdataset(T1_Holding,0);  //0表示没有仓位,>0表示持有多头, 1 Then Exit;  //如果当是最后一根k线,执行  IF Islastbar Andtime0then Begin  Tsell(1,Ss,Mkt);  Tbuyshort(1,Ss,Mkt);  Extgbdataset(T1_Position,-1);  Extgbdataset(T1_Holding,-Ss);  Extgbdatas
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                            模型策略源码:VAR2:=REF(LOW,1);  VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;  VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);  VAR5:=LLV(LOW,30);  VAR6:=HHV(VAR4,30);  VAR7:=IF(MA(CLOSE,58),1,0);  VAR8:=EMA(IF(LOW100,100,VAR8);  STICKLINE(VAR9>-150,0,VAR9,0.3,0),COLORFF00FF;  底部吸筹指标...
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
                    
                        
                        
                            模型策略源码:Input:P(26,20,100,8);  Input:S(12,5,40,4);  Input:B1(26,5,300,30);  Input:B2(2,0.1,10,1);  Input:N2(10,1,120,12);  Input:N3(20,1,200,20);  Input:N4(60,1,200,20);  Ma2:=Ma(C,N2);  Ma3:=Ma(C,N3);  Ma4:=Ma(C,N4);  MID := MA(CLOSE,B1);  UPPER:= MID + B2*STD(CLOSE,B1);  LOWER:= MID - B2*STD...
                        
                        
                            分类:
金字塔   时间:
                                2018/7/5 15:50:45   
                         
                     
                
               [1]  [2]  3