新手学习TB，麻烦老师帮忙看下程序哪里出了问题吧，谢谢

1. 程序开仓大概率会报信号闪烁，明明已经在开仓指令里用了常量，是哪里出了问题呢？2. 模拟的时候大部分时候不会运行平仓指令（一个平仓指令都不会下，但有时候又正常），在相应工作区打开K线图开平仓是正常的没有问题，平仓指令对应的条件用commentary在图上核对也都应该触发了，不知何故。3. 偶尔在没有任何仓位的情况会出现平仓自动，这个是不是因为开始运行的时候读取了当前交易时间段之前的数据，而又触发了平仓条件呢？但是明明有marketposition限制，空仓为什么会下平仓指令呢？Params Numeric tp(0); Numeric sl(0); Numeric mintoout(0); Numeric atrzhouqi(14); Numeric atrbeishu(1); Vars Global Integer N; Global Integer M; series <Numeric> sl_price; series <Numeric> tp_price; Series <Integer> j_close; Series <Integer> comp; Global Bool jiu_uptodown(false); Global Bool jiu_downtoup(false); Series <Numeric> openshort_atr; Series <Numeric> MP;OnBarOpen(ArrayRef<Integer> indexs) { Commentary(onbaropen N = +text(N)); Commentary(onbaropen M = +text(M)); Commentary(仓位 = +text(MarketPosition)); Range[1:1] { Commentary(text(CurrentBar)); } Range[2:2] { Commentary(CurrentBar = +text(CurrentBar)); Integer i(1); Integer k(1); j_close = Close; If(j_close[4] <> 0) { if(J_close > j_close[4]) comp = 1; Else if(j_close < j_close[4]) comp = -1; Else if(j_close == j_close[4]) comp = 0; } While(CurrentBar - N > 8 and comp[i]==comp[i+1] And comp[1]==1) {i=i+1;} If(i==8) { N = CurrentBar; Integer j =1; For j=1 to 8 PlotString(上升九转,text(j),H[9-j]+10*MinMove*PriceScale,Cyan,9-j); PlayWavSound(D:\\\\notify.wav); alert(symbolName+出现九转上升转下跌信号（第八根）↓↓↓+Text(CurrentBar)); jiu_uptodown = true; } If(CurrentBar == N+1 And comp[1] == 1) { PlotString(上升九转,text(9),H[1]+10*MinMove*PriceScale,Cyan,1); } While(CurrentBar - M > 8 and comp[k]==comp[k+1] And comp[1]==-1) {k=k+1;} If(k==8) { M = CurrentBar; Integer j =1; For j=1 to 8 PlotString(下跌九转,text(j),L[9-j]-5*MinMove*PriceScale,Magenta,9-j); PlayWavSound(D:\\\\notify.wav); alert(symbolName+出现九转下跌转上升信号（第八根）↑↑↑+Text(CurrentBar)); jiu_downtoup = true; } If(CurrentBar == M+1 And comp[1] == -1) { PlotString(下跌九转,text(9),L[1]-5*MinMove*PriceScale,Magenta,1); } Commentary(N = +text(N)); Commentary(M = +text(M)); } } //Bar更新事件函数，参数indexs表示变化的数据源图层ID数组 OnBar(ArrayRef<Integer> indexs) { MP = MarketPosition; Numeric ii; Numeric result(1); for ii = 0 to DataSourceSize - 1 { result = result * data[ii].BarExistStatus; } if (result <> 1) Return; If (data2.CurrentBar == N) { If (MP == 0 And jiu_uptodown == true) { SellShort(1,Open - 2 * MinMove * PriceScale); jiu_uptodown = false; if (sl == 0) sl_price = max(Data2.High[1],data2.High[2]) + intpart(atrbeishu * data2.AvgTrueRange(atrzhouqi)); Else sl_price = EntryPrice + sl; If (tp == 0) tp_price = entryprice - intpart(atrbeishu * data2.AvgTrueRange(atrzhouqi)); Else tp_price = EntryPrice - tp; Commentary(止损价格设置 = + text(sl_price)); Commentary(止赢价格设置 = + text(tp_price)); } } If(MP == -1) { Commentary(MP = + text(MP) + data2.CurrentBar = + text(data2.CurrentBar)+N = +Text(N)); if(data2.CurrentBar >N) { if(High>sl_price) { BuyToCover(1,High + 2 * MinMove * PriceScale); Commentary(已止损); } If(Data1.High>data1.High[1] Or Low < tp_price) { BuyToCover(1,High + 2 * MinMove * PriceScale); commentary(已止盈); } } } If (data2.CurrentBar == M) { If (MP == 0 And jiu_downtoup == true) { Buy(1,open + 2 * MinMove * PriceScale); jiu_downtoup = false; if (sl == 0) sl_price = Min(Data2.Low[1],data2.Low[2]) - intpart(atrbeishu * data2.AvgTrueRange(atrzhouqi)); Else sl_price = EntryPrice - sl; If (tp == 0) tp_price = entryprice + intpart(atrbeishu * data2.AvgTrueRange(atrzhouqi)); Else tp_price = EntryPrice + tp; Commentary(止损价格设置 = + text(sl_price)); Commentary(止赢价格设置 = + text(tp_price)); } //If (data1.Close>data1.close[1]) } If (MP == 1) { If(data2.CurrentBar>M) { Commentary(MP = + text(MP)+data2.CurrentBar = +text(data2.CurrentBar)+M = +Text(M)); if(Low<sl_price) { Sell(1,Low - 2 * MinMove * PriceScale); Commentary(已止损); } If(Data1.Low<data1.low[1] || High>tp_price) { Sell(1,Low - 2 * MinMove * PriceScale); commentary(已止盈); } } } }