matpva/mpva_test_initialization.m at master · slaclab/matpva · GitHub

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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
%% Matlab script to initialize the test PVs

% -----------------------------------------------------------------------------
% Title      : mpva test initialization
% -----------------------------------------------------------------------------
% File       : mpva_test_initialization.m
% Author     : Kuktae Kim, ktkim@slac.stanford.edu
% Created    : 2023-11-02
% Last update: 2023-11-02
% -----------------------------------------------------------------------------
% Description:
% Initialize the test PVs.
% -----------------------------------------------------------------------------
% This file is part of matpva. It is subject to the license terms in the
% LICENSE.txt file found in the top-level directory of this distribution
% and at: https://confluence.slac.stanford.edu/display/ppareg/LICENSE.html.
% No part of matpva, including this file, may be copied, modified,
% propagated, or distributed except according to the terms contained in
% the LICENSE.txt file.
% -----------------------------------------------------------------------------
% Initial Scalar PV Values
IntValue    = 0;
FloatValue  = 0.7;
BoolValue   = false;
ByteValue   = 1;
ShortValue  = 5;
StringValue = "empty string";

% Put Initial Scalar PV Values
mpvaPut("TEST:PVA:IntValue", IntValue);
mpvaPut("TEST:PVA:FloatValue", FloatValue);
mpvaPut("TEST:PVA:BoolValue", BoolValue);
mpvaPut("TEST:PVA:ByteValue", ByteValue);
mpvaPut("TEST:PVA:ShortValue", ShortValue);
mpvaPut("TEST:PVA:StringValue", StringValue);

% Initial Array PV Values
ai = [0, 0, 0, 0, 0];
ah = [1, 1, 1];
af = [0.1, 0.2, 0.3, 0.4];
ad = [0.0, 0.0, 0.0, 0.0];
ab = [false, true, false, false];
as = ["Zero", "Zero", "Zero"];

% Put Initial Array PV Values
mpvaPut("TEST:PVA:IntArray", ai);
mpvaPut("TEST:PVA:ShortArray", ah);
mpvaPut("TEST:PVA:DoubleArray", ad);
mpvaPut("TEST:PVA:FloatArray", af);
mpvaPut("TEST:PVA:BoolArray", ab);
mpvaPut("TEST:PVA:StringArray", as);

% Initial NTTable PV Values
Name    = ["device_1", "device_2"];
Number  = [1.1, 1.2];

% Put Initial NTTable PV Values
mpvaPut("TEST:PVA:NTTable", "name", Name, "number", Number);

% Initial TWISS NTTable Value Values
Element     = ["SOL9000", "XC99", "YC99"];
Device_name = ["SOL:IN20:111", "XCOR:IN20:112", "YCOR:IN20:113"];
S           = [1, 2, 3];
Z           = [10, 11, 12];
Length      = [100, 200, 300];
P0C         = [6, 16, 26];
Alpha_x     = [0.1, 0.2, 0.3];
Beta_x      = [0.1, 0.2, 0.3];
Eta_x       = [0.1, 0.2, 0.3];
Etap_x      = [0.1, 0.2, 0.3];
Psi_x       = [0.1, 0.2, 0.3];
Alpha_y     = [0.1, 0.2, 0.3];
Beta_y      = [0.1, 0.2, 0.3];
Eta_y       = [0.1, 0.2, 0.3];
Etap_y      = [0.1, 0.2, 0.3];
Psi_y       = [0.1, 0.2, 0.3];

% Put Initial TWISS NTTable PV Values
mpvaPut("TBLEM:SYS0:1:CU_HXR:LIVE:TWISS", "element", Element, "device_name", Device_name, "s", S, "z", Z, ...
    "length", Length, "p0c", P0C, "alpha_x", Alpha_x, "beta_x", Beta_x, "eta_x", Eta_x, "etap_x", Etap_x, ...
    "psi_x", Psi_x, "alpha_y", Alpha_y, "beta_y", Beta_y, "eta_y", Eta_y, "etap_y", Etap_y, "psi_y", Psi_y);