欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 【新手上路】报错缺少分号,麻烦看一下是什么情况

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有4617人关注过本帖平板打印复制链接

主题:【新手上路】报错缺少分号,麻烦看一下是什么情况

帅哥哟,离线,有人找我吗?
QuantMe
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:新手上路 帖子:27 积分:0 威望:0 精华:0 注册:2017/5/22 10:09:51
  发帖心情 Post By:2017/6/2 11:11:36    Post IP:180.169.105.40[只看该作者]

                            ELSE IF POSITION = -1 THEN
                                BEGIN
                                            entryPrice     :=    EXTGBDATA( strPreEntryPrice ) ;
                                            turtleUnits :=     EXTGBDATA( strTurtleUnits ) ;
                                            IF ( BARPOS > t20 ) AND ( H > L ) THEN
                                            BEGIN
                                                WHILE ( L < entryPrice - 0.5 * N ) AND ( turtleUnits < 4 )  DO
                                                    BEGIN
                                                                entryPrice     :=    IF( OPEN < entryPrice - 0.5 * N , OPEN , entryPrice - 0.5 * N ) ;
                                                                turtleUnits :=    turtleUnits + 1 ;
                                                                entryPrice  :=  FLOOR( entryPrice / MINDIFF ) * MINDIFF ;
                                                                N            :=  avgTR ;
                                                                
                                                                EXTGBDATASET( strEntryBarPos , BARPOS ) ;
                                                                EXTGBDATASET( strTurtleUnits , turtleUnits ) ;
                                                                EXTGBDATASET( strPreN , N ) ;
                                                                EXTGBDATASET( strPreEntryPrice , entryPrice ) ;                                                                
                                                    END
                                            END
                                            exitByStd     :=  H > t10H ;
                                            IF ( exitByStd ) AND ( EXTGBDATA( strEntryBarPos ) <> BARPOS )    THEN
                                            BEGIN
                                                                POSITION     := 0  ;
                                                                turtleUnits := 0  ;
                                                                exitPrice     := IF( OPEN > t10H + MINDIFF , OPEN , t10H + MINDIFF ) ;
                                                                exitPrice    := CEILING( exitPrice / MINDIFF ) * MINDIFF ;
                                                                
                                                                TSELLSHORT( _debug , 0 , LMT , exitPrice ) ;
                                                                
                                                                EXTGBDATASET( strExitBarPos , BARPOS ) ;
                                                                EXTGBDATASET( strPosition , POSITION ) ;
                                                                EXTGBDATASET( strTurtleUnits , turtleUnits ) ;                                                
                                                
                                            END
                                            exitByCut    :=  H > entryPrice + 2 * N ;
                                            IF ( POSITION = -1 ) AND ( exitByCut ) AND ( EXTGBDATA( strEntryBarPos ) <> BARPOS ) THEN
                                            BEGIN
                                                                POSITION     := 0 ;
                                                                turtleUnits := 0 ;
                                                                exitPrice     := IF( OPEN > entryPrice + 2 * N , OPEN , entryPrice + 2 * N ) ;
                                                                exitPrice    := CEILING( exitPrice / MINDIFF ) * MINDIFF ;
                                                                
                                                                TSELLSHORT( _debug , 0 , LMT , exitPrice ) ;
                                                                
                                                                EXTGBDATASET( strExitBarPos , BARPOS ) ;
                                                                EXTGBDATASET( strPosition , POSITION ) ;
                                                                EXTGBDATASET( strTurtleUnits , turtleUnits ) ;        
                                            END
                                END

 回到顶部
总数 18 1 2 下一页