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


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

   

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


  共有4585人关注过本帖树形打印复制链接

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

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


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

            IF POSITION = 1 AND BARPOS > t20 AND H > L THEN
                BEGIN
                    N             := avgTR ;  
                    entryPrice  := IF( OPEN > t20H + MINDIFF , OPEN , t20H + MINDIFF ) ;
                    WHILE ( H > entryPrice + 0.5 * N ) AND ( turtleUnits < 4 ) DO
                        BEGIN
                                                                entryPrice     := entryPrice + 0.5 * N ;
                                                                turtleUnits := turtleUnits + 1 ;
                                                                TBUY( _debug , posNum , LMT , entryPrice ) ;
                                                                flag        := 1 ;
                        END
                        
                    exitByStd     := L < t10L ;
                    IF exitByStd {AND flag = 0 }THEN
                        BEGIN
                                                                exitPrice    := IF( OPEN < t10L - MINDIFF , OPEN , t10L - MINDIFF ) ;
                                                                TSELL( _debug , 0  , LMT , exitPrice ) ;
                                                                POSITION    := 0 ;
                                                                turtleUnits    := 0 ;
                        END
                   
                    exitByCut     := L < entryPrice - 2 * N ;
                    IF exitByCut AND POSITION <> 0 {AND flag = 0 } THEN
                        BEGIN
                                                                exitPrice     := IF( OPEN < entryPrice - 2 * N , OPEN , entryPrice - 2 * N ) ;
                                                                TSELL( _debug , 0 , LMT , exitPrice  ) ;
                                                                POSITION    := 0 ;
                                                                turtleUnits    := 0 ;                                    //  此处报错!!!!!!!!!
                        END

 回到顶部
帅哥哟,离线,有人找我吗?
wenarm
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:26632 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2017/6/2 11:15:02    Post IP:180.169.30.6[只看该作者]

你代码复制少了吧?缺少end.

你把你的公式以文件形式上传吧



编程无捷径,技巧靠积累。
 回到顶部
帅哥哟,离线,有人找我吗?
QuantMe
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

                END
            ELSE IF POSITION = -1 AND BARPOS > t20 AND H > L THEN
                BEGIN
                    N     := avgTR
                    entryPrice     := IF( OPEN < t20L - MINDIFF , OPEN , t20L - MINDIFF ) ;
                    WHILE ( L < entryPrice - 0.5 * N ) AND ( turtleUnits < 4 ) DO
                        BEGIN
                                                                entryPrice  := entryPrice - 0.5 * N ;
                                                                turtleUnits := turtleUnits + 1 ;
                                                                TBUYSHORT( _debug , posNum , LMT , entryPrice ) ;
                                                                flag        := 1 ;
                        END
                    
                    exitByStd     := H > t10H ;
                    IF exitByStd {AND flag = 0} THEN
                        BEGIN
                                                                exitPrice     := IF( OPEN > t10H + MINDIFF , OPEN , t10H + MINDIFF ) ;
                                                                TSELLSHORT( _debug , 0 , LMT , exitPrice ) ;
                                                                POSITION    := 0 ;
                                                                turtleUnits    := 0 ;
                        END
                   
                    exitByCut    := H > entryPrice + 2 * N ;
                    IF exitByCut AND POSITION <> 0 { AND flag = 0 } THEN
                        BEGIN
                                                                exitPrice     := IF(    OPEN > entryPrice + 2 * N , OPEN , entryPrice + 2 * N ) ;
                                                                TSELLSHORT( _debug , 0 , LMT , exitPrice ) ;
                                                                POSITION    := 0 ;
                                                                turtleUnits := 0 ;
                        END
                   
                END
               
    END

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


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

 你好!
报错信息在11楼注释处,我试了一下上传附件,没有显示选择文件的窗口,请问一下上传文件是怎么操作的呢?

之前我发图片是截图后直接贴在发言框里的

 回到顶部
帅哥哟,离线,有人找我吗?
wenarm
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:26632 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2017/6/2 11:28:50    Post IP:180.169.30.6[只看该作者]

没看到你第三段代码。

你第三段代码中缺少分号,;另外你策略中有变量定义使用的是系统函数。需要你自己修改

 

    END
            ELSE IF POSITION = -1 AND BARPOS > t20 AND H > L THEN
                BEGIN
                    N     := avgTR
                    entryPrice     := IF( OPEN < t20L - MINDIFF , OPEN , t20L - MINDIFF ) ;
                    WHILE ( L < entryPrice - 0.5 * N ) AND ( turtleUnits < 4 ) DO
                        BEGIN



编程无捷径,技巧靠积累。
 回到顶部
帅哥哟,离线,有人找我吗?
QuantMe
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

 好的,谢谢,所以他报错的地点与出错地点不一定匹配是么?

 回到顶部
帅哥哟,离线,有人找我吗?
wenarm
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:26632 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2017/6/2 12:37:25    Post IP:180.169.30.6[只看该作者]

是的。有时候不能精准定位到某一行。


编程无捷径,技巧靠积累。
 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2017/6/2 13:06:14    Post IP:180.169.30.6[只看该作者]

自己学会用注释法,从代码结尾开始一大段的注视然后看是否还有提示错误

然后逐步定位到错误位置就好

这个是编程的一个常规排查发


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