recorder.ps1

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
. $PSScriptRoot\meta.ps1

class Recorder {
    # Constructor
    Recorder()
    {
        AddActionMembers -PARAMS @('play', 'stop', 'pause', 'replay', 'record', 'ff', 'rw')
        AddChannelMembers
    }

    [Single] Getter($cmd) {
        return Param_Get -PARAM $cmd -IS_STRING $false
    }

    [void] Setter($param, $val) {
        if ($val -is [Boolean]) {
            Param_Set -PARAM $param -VALUE $(if ($val) {1} else {0})
        }
        else {
            Param_Set -PARAM $param -VALUE $val
        }
    }

    [String] cmd ($arg) {
        return "Recorder.$arg"
    }

    hidden $_loop = $($this | Add-Member ScriptProperty 'loop' `
        {
            return Write-Warning("ERROR: " + $this.cmd('mode.loop') +  " is write only")
        }`
        {
            param( [bool]$arg )
            $this._loop = $this.Setter($this.cmd('mode.loop'), $arg)
        }
    )

    [void] load([String]$filename) {
        $this.Setter($this.cmd('load'), $filename)
    }
}

Function Make_Recorder {
    return [Recorder]::new()
}