打印本文
關閉窗口
本節講解如何應用公共（自編）函數，如何在公式中調用手工繪制的趨勢線產生交易信號，如何根據前次交易結果調整下單量，如何應用新的文本繪制函數，請跟隨本ID一探究竟。
首先在公式樹的【公共函數】下創建名為“顯示績效”的公式：
input:
NumericSeries MA1, //序列參數
Numeric 下單量, //數值參數
NumericRef 盈利因子, //數值型引用參量，裝載計算結果
NumericRef 盈虧比;
均線: MA1,Precision0;
單量: 下單量,Precision0, LineThick0;
勝率%: PercentProfit, Precision0, LineThick0;
盈利因子:= -GrossProfit/GrossLoss; //總盈利/總虧損
盈虧比:= -(GrossProfit/NumWinTrades)/(GrossLoss/NumLosTrades);
return (InitialCapital+NetProfit); //函數返回
編譯通過后，再創建以下智能交易公式：
//-------金魔方智能交易公式--------------
//例9_1 均線與趨勢線交叉加倉位管理策略
{策略：
1.均線與手工畫的趨勢線交叉作為交易信號
2.上次交易為'止盈'平倉或首次開倉，下單量為初始單量
3.上次交易為非'止盈'平倉的，下單量按加倉步長漸次增加
4.下單量增大到超過最大單量則回復為初始單量
}
input:
TL標識號(99), //手工繪制趨勢線的標識號，【設置畫線】標題欄可見
止盈價差(600),
止損價差(200),
初始單量(1),
加倉步長(1), //下單量漸次增加步長
最大單量(10),
轉折強度(15); //波峰波谷前后N周期最高最低
variable: 下單量(1),等量次數(1);
MA1 := MA(C,2);
TLV := TL_GetValue(TL標識號, Date, Time); //趨勢線數值序列
bEnterLong := CrossOver(MA1,TLV); //均線上叉趨勢線平空開多
bEnterShort:= CrossUnder(MA1,TLV); //均線下叉趨勢線平多開空
if bEnterLong or bEnterShort then begin
//上次平倉標識為'止盈'或沒有交易過
if ExitName(1) = '止盈' OR ExitName(1) = '' then
下單量 = 初始單量;
else begin //漸次增加下單量
if 下單量=初始單量 or 等量次數 = 2 then begin
下單量 = 下單量 + 加倉步長;
等量次數 = 1;
end else
等量次數 = 等量次數 +1;
if (下單量 > 最大單量) then 下單量 = 初始單量;
end
end
if bEnterLong then begin
Buy('',下單量);
ID1:=Text_New(Date,Time, L, 314, true); //繪制314號圖標-右上箭頭
Text_SetColor(ID1,ColorMagenta);
end
if bEnterShort then begin
SellShort('',下單量);
ID1:=Text_New(Date,Time, H, 316, true); //繪制316號圖標-右下箭頭
Text_SetColor(ID1,ColorCyan);
Text_SetStyle(ID1, 0, 1); //設置下對齊
end
if MarketPosition = 1 then begin //多頭持倉
Sell('',DEFAULT,EntryPrice+止盈價差,0,OT_LIMIT,OB_NEXTBAR,'止盈');
Sell('',DEFAULT,EntryPrice-止損價差,0,OT_STOP,OB_NEXTBAR,'止損');
end
if MarketPosition = -1 then begin //空頭持倉
BuyToCover('',DEFAULT,EntryPrice-止盈價差,0,OT_LIMIT,OB_NEXTBAR,'止盈');
BuyToCover('',DEFAULT,EntryPrice+止損價差,0,OT_STOP,OB_NEXTBAR,'止損');
end
//顯示波峰點
pos := SwingHighBar(1,High,轉折強度,轉折強度+1);//波峰位置
SWV := SwingHigh(1,High,轉折強度,轉折強度+1); //波峰數值
if pos = 轉折強度 then begin
ID1 :=Text_New(Date[pos],Time[pos], SWV, SWV);
Text_SetColor(ID1,ColorMagenta);
Text_SetStyle(ID1, 2, 1); //設置水平中對齊、垂直下對齊
end
//顯示波谷點
pos := SwingLowBar(1,Low,轉折強度,轉折強度+1); //波谷位置
SWV := SwingLow(1,Low,轉折強度,轉折強度+1); //波谷數值
if pos = 轉折強度 then begin
ID1 :=Text_New(Date[pos],Time[pos], SWV, SWV);
Text_SetColor(ID1,ColorBlue);
Text_SetStyle(ID1, 2, 0); //設置水平中對齊、垂直上對齊
end
//調用“顯示績效”公共函數顯示績效，并計算返回余額、盈利因子、盈虧比
variable: //公式中可以有多組input、variable聲明
PF(0),PR(0); //引用型變量，裝回計算結果
余額:顯示績效(MA1,下單量,PF,PR),Precision0,OwnerScale;
盈虧比:PR, Precision1, LineThick0;
盈利因子:PF, Precision1, LineThick0;
{
注解：
1.ExitName(1)取得上一回持倉的最后一次平倉的標識名
2.Text_*系列函數請參見【字典】中【新畫線函數】類里的說明
3.“顯示績效”為用戶自編的公共函數
}
如下圖所示，在主圖上手工繪制一條直線（圖中粗紫色線），選中它，右鍵菜單【設置畫線】，標題欄上#后面的數字即為該畫線的標識號，把公式的外部參數“TL標識號”的數值99改為這個數字，然后把公式拖放到圖上，即可讓公式跑出交易結果。
右鍵菜單【查看測評報告】-【交易明細】，因公式中等單量次數上限為2，所以下單量從1->2->2->3->，遇到止盈，再從1->2...，如圖所示：
新的文本繪制函數Text_New 不僅可以在圖上標出文本、數字，還能繪制680種圖標，圖標與數字標號對照表請見下圖：
上節的點數圖算法可以改寫成公共函數，這樣，其它公式就可以直接調用而不用寫繁雜的語句，可以把“轉向價”作為函數的return輸出，用引用型參數NumericRef定義“突破買價”、“突破賣價”，這樣可以同時輸出這三個計算結果，請各位自行試驗。
我們已經介紹了一些經典的策略和交易技巧及其金魔方公式實現，在研發交易策略時，如何評估策略的好壞、評估能否用于真實交易呢？
且聽下回分解！