止損出現錯誤

作者：開拓者 TB 來源：cxh99.com 發布時間：2016年11月14日

咨詢內容： 今天在用數據庫測試時發現開倉不正確，根據輸出的日志發現一個問題。
程序如下，本程序在價格突破前6根Bar的高低點時建倉，止損設置為4跳。但是在09:29:01時開空后立即止損，止損價格就是開倉價格，并且止損單買入平倉失敗。我沒有發現程序的問題，所以請版主解答一下，謝謝！
1. Params
2. Numeric L1(6);
3. Numeric Stoploss(4);
4. Vars
5. Bool upbreak;
6. Bool lowbreak;
7. String orderstate;
8. Numeric protectprice;
9. Numeric Mx;
10. Numeric Mn;
11. Numeric i;
12. Begin
13. //求最值------------------------------------------------------------------------
14. Mx=High[1];
15. Mn=Low[1];
16. For i=2 To L1
17. {
18. If(High[i]>Mx)
19. Mx=High[i];
20. If(Low[i]<Mn)
21. Mn=Low[i];
22. }
23. PlotNumeric("最大值",Mx);
24. PlotNumeric("最小值",Mn);
26. If(BarStatus==2)
27. {
28. orderstate=GetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單");
29. Commentary("已發單："+orderstate);
30. If(orderstate=="0" Or orderstate==InvalidString)
31. {
32. If(Q_Last>Mx)
33. {
34. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"，開多前orderstate為："+orderstate+"，開多前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
35. A_SendOrder(Enum_Buy,Enum_Entry,1,Q_AskPrice);
36. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(1));
37. }
38. If(Q_Last<Mn)
39. {
40. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"開空前orderstate為："+orderstate+"，開空前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
41. A_SendOrder(Enum_Sell,Enum_Entry,1,Q_BidPrice);
42. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(-1));
43. }
44. }
45. If(orderstate=="1")
46. {
47. protectprice=A_BuyAvgPrice-Stoploss;
48. If(Q_Last<protectprice)
49. {
50. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"多單止損前orderstate為："+orderstate+"止損前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
51. A_SendOrder(Enum_Sell,Enum_Exit,1,Q_BidPrice);
52. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(0));
53. }
54. Else If(Q_Last<Mn)
55. {
56. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"平多前orderstate為："+orderstate+"平倉前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
57. A_SendOrder(Enum_Sell,Enum_Exit,1,Q_BidPrice);
58. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(0));
59. }
60. }
61. If(orderstate=="-1")
62. {
63. protectprice=A_SellAvgPrice+Stoploss;
64. If(Q_Last>protectprice)
65. {
66. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"空單止損前orderstate為："+orderstate+"止損前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
67. A_SendOrder(Enum_Buy,Enum_Exit,1,Q_AskPrice);
68. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(0));
69. }
70. Else If(Q_Last>Mx)
71. {
72. FileAppend("C:\\breaktest記錄.log",TimeToString(CurrentTime)+"平空前orderstate為："+orderstate+"平倉前持倉為："+Text(A_TotalPosition)+"，發單價格："+Text(Q_Last));
73. A_SendOrder(Enum_Buy,Enum_Exit,1,Q_AskPrice);
74. SetTBProfileString2File("C:\\breaktest.log","開倉控制","已發單",Text(0));
75. }
76. }
77. }
78. End
TB技術人員： 買入平倉失敗的原因是前面的開空單尚未成交，因此平倉會失敗。但是不明白為什么止損條件未達到就發了止損單
TB客服：
zhoucx 發表于 2016-7-14 14:23
買入平倉失敗的原因是前面的開空單尚未成交，因此平倉會失敗。但是不明白為什么止損條件未達到就發了止損單 ...

現有的日志可以確認是滿足了哪一個條件而進行的平倉動作。
可以在日志里再加上內容，判斷當時的條件分別是什么從而滿足了人工認為不應該滿足的條件。。
上述出現問題的是條件是If(Q_Last>protectprice)，可以在日志里將q_last,protectprice的值都分別寫日志里再觀察。。
在使用A函數交易中，在沒有經過一段時間的實時交易測試確認策略能完全按自己的需求執行前，建議在必要的地方（特別是開平倉時）都寫日志吧。這樣有助于及時排查問題，減少測試周期。
網友回復：
小米發表于 2016-7-14 15:19
現有的日志可以確認是滿足了哪一個條件而進行的平倉動作。
可以在日志里再加上內容，判斷當時的條件分別 ...

剛才加入了你說的這些，不過只進行了三次交易，沒有錯誤，明天再試試吧
網友回復：
小米發表于 2016-7-14 15:19
現有的日志可以確認是滿足了哪一個條件而進行的平倉動作。
可以在日志里再加上內容，判斷當時的條件分別 ...

問題解決了，謝謝小米
確實是開倉單未成交的原因，因為已經發出了開空單，orderstate已經變成-1，下一tick到來時由于A_SellAvgPrice=0，所以protectprice=4，觸發了平倉動作，造成多開一單