Custom Unit Recruitment

/* Example object init

[this,
    [
        "B_soldier_AR_F",
        "B_Soldier_GL_F",
        "B_Soldier_F",
        "B_soldier_LAT_F"
    ]
] execVM "recruit.sqf"

*/

params ["_object", "_recruits"];

_colorWest = "<t color='#004D9A'>";
_colorEast = "<t color='#800000'>";

_object addAction [_colorWest + "<img size='1' image='\a3\ui_f\data\igui\cfg\simpleTasks\types\whiteboard_ca'/> " + "</t>" + "Open Recruitment Menu",
    {
        params ["_target", "_caller", "_actionId", "_arguments"];
        _caller setVariable ["RecruitMenuOpen", true, false];
    },
    nil,
    1.5,
    true,
    true,
    "",
    "!(_this getVariable ['RecruitMenuOpen', false])"
];

_object addAction [_colorEast + "<img size='1' image='\a3\ui_f\data\igui\cfg\simpleTasks\types\whiteboard_ca'/> " + "</t>" + "Close Recruitment Menu",
    {
        params ["_target", "_caller", "_actionId", "_arguments"];
        _caller setVariable ["RecruitMenuOpen", false, false];
    },
    nil,
    1.5,
    true,
    true,
    "",
    "(_this getVariable ['RecruitMenuOpen', false])"
];

{
    _x params ["_classname"];

    _icon = getText (configFile >> "CfgVehicles" >> _classname >> "icon") + "_ca'/>";
    _iconPath = "<img size='1' image='\a3\ui_f\data\Map\VehicleIcons\" + _icon;

    _role = getText (configFile >> "span class="re5"> CfgVehicles" >> _classname >> "span class="re5"> displayName");

    _object addAction ["  " + _colorWest + _iconPath + "</t>" + _role,
        {
            params ["_target", "_caller", "_actionId", "_arguments"];
            _arguments params ["_classname"];
            _group = group _caller;
            diag_log _caller + "span class="re5"> has recruited" + _classname;
            _group createUnit [_classname, getPos _caller, [], 10, "span class="re5"> NONE"];
        },
        [_classname],
        1.5,
        true,
        false,
        "",
        "(_this getVariable ['RecruitMenuOpen', false])"
    ]
} forEach _recruits;