创建自定义模块

与通过策略图创建模块类似，也可以使用 F# 代码创建自定义模块。代码模块的功能比策略图模块更灵活。

要通过代码创建模块，请在 自定义元素 文件夹中创建该模块：

下面的示例模块继承自 DiagramExternalElement 类，代码如下：

/// <summary>
/// 示例图表元素演示输入和输出插槽的用法。
///
/// 更多详细信息：
/// https://doc.stocksharp.com/topics/designer/strategies/using_code/fsharp/creating_your_own_cube.html
/// </summary>
type EmptyDiagramElement() as this =
	inherit DiagramExternalElement()

	// 演示如何创建参数的示例属性
	let minValueParam =
		this.AddParam<int>("MinValue", 10)
			.SetBasic(true)  // make the parameter visible in basic mode
			.SetDisplay("参数", "最小值", "最小值参数说明", 10)

	// 输出插槽是带 DiagramExternal 特性的事件
	let output1Event = new Event<Unit>()
	let output2Event = new Event<Unit>()

	[<CLIEvent>]
	[<DiagramExternal>]
	member this.Output1 = output1Event.Publish

	[<CLIEvent>]
	[<DiagramExternal>]
	member this.Output2 = output2Event.Publish

	// 如果希望调用 Process 方法，请取消注释以下属性 
	// 使其在每次收到新参数时被调用
	// （无需等待接收所有输入参数）。
	//
	// 重写 this.WaitAllInput
	//     with get () = false

	// 输入插槽是带 DiagramExternal 特性的方法参数

	[<DiagramExternal>]
	member this.Process(candle: CandleMessage, diff: Unit) =
		let res = candle.ClosePrice + diff

		if diff >= minValueParam.Value then
			// 触发第一个输出事件
			output1Event.Trigger(res)
		else
			// 触发第二个输出事件
			output2Event.Trigger(res)

	override this.Start() =
		base.Start()
		// 如有需要，在启动前添加逻辑

	override this.Stop() =
		base.Stop()
		// 如有需要，在停止后添加逻辑

	override this.Reset() =
		base.Reset()
		// 如有需要，添加重置内部状态的逻辑

在这段代码中，模块包含两个输入端口和两个输出端口。对方法应用 DiagramExternalAttribute 特性，即可定义输入端口：

[<DiagramExternal>]
member this.Process(candle: CandleMessage, diff: Unit) =

对事件应用该特性即可定义输出端口。示例模块包含以下两个事件：

let output1Event = new Event<Unit>()
let output2Event = new Event<Unit>()

[<CLIEvent>]
[<DiagramExternal>]
member this.Output1 = output1Event.Publish

[<CLIEvent>]
[<DiagramExternal>]
member this.Output2 = output2Event.Publish

因此，模块也会包含两个输出端口。

示例还演示了如何为模块创建属性：

let minValueParam =
	this.AddParam<int>("MinValue", 10)
		.SetBasic(true)  // make the parameter visible in basic mode
		.SetDisplay("参数", "最小值", "最小值参数说明", 10)

使用 DiagramElementParam 类后，系统会自动处理设置的保存和恢复。

最小值 属性被标记为基本属性，因此会显示在基本属性模式中。

已注释的 WaitAllInput 属性控制何时根据输入端口的数据调用方法：

// 重写 this.WaitAllInput
//     with get () = false

取消注释后，只要至少有一个值到达，进程 方法就会立即被调用。在本例中，该值可以是K线或数值。

要将创建的模块添加到策略图，请在组件面板的 自定义元素 部分选择该模块：

另请参阅

创建指标