未定義的標識符?
請教最後這一行出現標識符未定義 ?
是我那裡沒有設定好.請指正.謝謝~
tbsTmp:="TBS系統設置子公式#YEAR"(2,tbsStkValue,tbsInFee,tbsInTax,tbsOutFee,tbsOutTax,多控盈衰率,多控盈始率,多控盈均週,多控損率,多強平週數,空控盈衰率,空控盈始率,空控盈均週,空控損率,空強平週);
//========================================================
//【設定計算的等級模式】單值
UMode:=0; {0.一般:採用內定基準價,量採單值決定,耗時較短}
{1.中階:支援自定基準價,量採單值決定,耗時中等}
{2.高階:支援自定基準價,量採數列決定,耗時較長}
//【設定適用的板塊】字串
//決定當前設定適用於那些板塊中的商品
適用板塊:='台指期貨;台當月';
//【交易訊號導入】數列
多方攻擊價:=AAAA;
多方防守價:=BBBB;
空方攻擊價:=CCCC;
空方防守價:=DDDD;
BB:=2222; //買多//
BS:=3333; //賣多//
SS:=4444; //作空//
SB:=5555; //補空//
S1BB:=BB;//作多條件
S1BS:=BS;//賣多條件
S2SS:=SS;//作空條件
S2SB:=SB;//補空條件
多頭進:=S1BB*1; //多頭進場{0.無 1.進場} EnterLong
多頭平:=S1BS*1; //多頭平倉{0.無 1.平倉} ExitLong
多頭加:=C*0; //多頭加碼{0.無 1.加碼}
多頭減:=C*0; //多頭減碼{0.無 1.減碼}
空頭進:=S2SS*1; //空頭進場{0.無 1.進場} EnterShort
空頭平:=S2SB*1; //空頭平倉{0.無 1.平倉} ExitShort
空頭加:=C*0; //空頭加碼{0.無 1.加碼}
空頭減:=C*0; //空頭減碼{0.無 1.減碼}
//【設定進場訊號處理】單值
控連訊:=0; {0.連續進場訊號不再買進,自定加碼減碼訊號無效}
{1.連續進場訊號不再買進,自定加碼減碼訊號有效}
{2.連續進場訊號加碼買進,自定加碼減碼訊號無效}
//【設定加碼減碼過濾】單值
//若於進場點或平倉點, 加碼訊號和減碼訊號將被視為無訊號
//模式:{0.不過濾, -1.連續相鄰訊號僅保留首根, >0.過濾後面 N 個週期內的相同訊號}
加碼濾:=0; //加碼訊號過濾模式
減碼濾:=0; //減碼訊號過濾模式
//【設定交易價格】數列
//設置多方和空方之進場、平倉、強制平倉、加碼、減碼的交易價格
多控價:=if(多頭進,多方攻擊價,多控價); //在多進場訊號處,設置進場價格
多控價:=if(多頭平,多方防守價,多控價); //在多平倉訊號處,設置平倉價格
空控價:=if(多頭進,空方攻擊價,多控價); //在空進場訊號處,設置進場價格
空控價:=if(多頭平,空方防守價,多控價); //在空平倉訊號處,設置平倉價格
//【設定交易數量】單值or數列 {非零之正整數}
//一般模式和中階模式僅支援用單值來設定量
//要用數列來設定量,必須將計算等級設為高階模式
多進量:1; //多頭進場數量
多加量:0; //多頭加碼數量
多減量:1; //多頭減碼數量
空進量:1; //空頭進場數量
空加量:0; //空頭加碼數量
空減量:1; //空頭減碼數量
//【設定測試時段】單值
//需為奇狐專屬日期格式(自1900年以來的年月日)
//例如: 2008年03月25日要輸入 1080325 這數值 (20080325-19000000=1080325)
始日:=0; //若輸入零,會自動設為第一根K棒日期
終日:=0; //若輸入零,會自動設為最末根K棒日期
//【設定交易類別】單值
交易類:=3; {1.做多 2.做空 3.雙向}
//【設定平盤以下是否可以放空】單值
平下可空:=1; {0.不可空 1.可空}
//【設定最終倉位處理方式】單值
//※若評測之最終K棒為進場點,系統將視其為無效訊號
算終倉:=1; //評測之最終K棒有持倉且尚未平倉, 該回{0.不計收益 1.平倉計算收益}
//【設定商品每點價值、手續費、稅費】單值 (台指期貨)//
tbsInFee:=-70; //[多進&空出]單口繳70 元手續費
tbsInTax:=0.01; //[多進&空出]繳百分之0.01 的稅(千分之0.1)
tbsOutFee:=-70; //[多出&空進]單口繳70 元手續費
tbsOutTax:=0.01; //[多出&空進]繳百分之0.01 的稅(千分之0.1)
//【設定基準價】數列
//僅中階模式和高階模式支援本項中的設定
//一般模式會採用系統預設值(不受這裡設定的影響)
前控基價:O; //前控盈和前控損計算盈虧使用之基準價
後控基高價:H; //做空:後控盈和後控損計算盈虧使用之基準價
後控基低價:L; //做多:後控盈和後控損計算盈虧使用之基準價
後控基價:C; //未達控盈控損標準且尚未平倉結算時,會用此基準價計算當根K棒報酬
//【設定控盈控損】單值
多控盈衰率:=0;
多控盈始率:=0;
多控盈均週:=0; //多方M值
多控損率:=0;
多強平週數:=0;
空控盈衰率:=0;
空控盈始率:=0;
空控盈均週:=0; //空方M值
空控損率:=0;
空強平週數:=0;
//=================================================================
//= 以下的程式碼用於傳遞前面的設定給 [TBS交易評測] 系統公式使用 =
//= 請絕對不要做任何的更動增刪,若有異動將導致評測無法正常運行 =
//=================================================================
多空訊:(多頭進 or barpos=0)*1000+(空頭進 or barpos=0)*2000;
多空訊:=多空訊+(多頭平 or barpos=0)*100+(空頭平 or barpos=0)*200;
多空訊:=多空訊+(多頭加 or barpos=0)*10+(空頭加 or barpos=0)*20;
多空訊:=多空訊+(多頭減 or barpos=0)*1+(空頭減 or barpos=0)*2;
tbsErrBlk:1 linethick0;
tbsSPos1:=1;
if STRRIGHT(適用板塊,1)<>';' then 適用板塊:=適用板塊+';';
while 1 do begin
tbsSPos2:=STRFIND(適用板塊,';',tbsSPos1);
if tbsSPos2=0 then break;
kk:=strmid(適用板塊,tbsSPos1,tbsSPos2-tbsSPos1);
if stkinblock(stklabel,strmid(適用板塊,tbsSPos1,tbsSPos2-tbsSPos1)) then begin
tbsErrBlk:=0; break;
end;
tbsSPos1:=tbsSPos2+1;
end;
多進量i:=strtonum(numtostr(多進量,0));
多加量i:=strtonum(numtostr(多加量,0));
多減量i:=strtonum(numtostr(多減量,0));
空進量i:=strtonum(numtostr(空進量,0));
空加量i:=strtonum(numtostr(空加量,0));
空減量i:=strtonum(numtostr(空減量,0));
tbsTmp:="TBS系統設置子公式#YEAR"(1,if(tbsErrBlk,-1,UMode),控連訊,加碼濾,減碼濾,多進量i,多加量i,多減量i,空進量i,空加量i,空減量i,始日,終日,交易類,平下可空,算終倉);
tbsTmp:="TBS系統設置子公式#YEAR"(2,tbsStkValue,tbsInFee,tbsInTax,tbsOutFee,tbsOutTax,多控盈衰率,多控盈始率,多控盈均週,多控損率,多強平週數,空控盈衰率,空控盈始率,空控盈均週,空控損率,空強平週數);
//=================================================================
__________________
人外有人 天外有天 不懼不貪 亦富亦安
|