TFR script stuff

/*
Works great in combination with the 'wowFUCKTFR' script found here;
http://pastebin.com/ScR3nNgs
*/

//Wait until TFR is done converting radios to unique radios so the script at the end doesn't break
//Script halts until item in radio slot is equal to a TFR radio
waituntil {sleep 0.1;
    ([(Assigneditems player select 3),"tf_anprc152"] call TFAR_fnc_isSameRadio) ||
    ([(Assigneditems player select 3),"tf_anprc148jem"] call TFAR_fnc_isSameRadio)} ||
    ([(Assigneditems player select 3),"tf_fadak"] call TFAR_fnc_isSameRadio)} ||
    ([(Assigneditems player select 3),"tf_rf7800str"] call TFAR_fnc_isSameRadio) ||
    ([(Assigneditems player select 3),"tf_anprc154"] call TFAR_fnc_isSameRadio)} ||
    ([(Assigneditems player select 3),"tf_pnr1000a"] call TFAR_fnc_isSameRadio)};
    };


    //set the default channel for the players - thanks, >>95335962
    //Also sets the default ear to left
    //Set group ID with setGroupId
    //ex. "  (group this) setGroupId ["alpha"]; " in the init of a sql
    switch (groupID group player) do {
        case "Alpha": {
        [(call TFAR_fnc_activeSwRadio), 0] call TFAR_fnc_setSwChannel;
        [(Call TFAR_fnc_ActiveSWRadio), 1] call TFAR_fnc_setSwStereo;
        };

        case "Bravo": {
        [(call TFAR_fnc_activeSwRadio), 1] call TFAR_fnc_setSwChannel;
        [(call TFAR_fnc_ActiveSWRadio), 1] call TFAR_fnc_setSwStereo;
        };

        case "Charlie": {
        [(call TFAR_fnc_activeSwRadio), 2] call TFAR_fnc_setSwChannel;
        [(call TFAR_fnc_ActiveSWRadio), 1] call TFAR_fnc_setSwStereo;
        };
    };


//For squad leaders and other long-range equipped folk that don't have a pack radio;
//Sets channel 7 (highest channel on a normal radio) to the LR channel And sets it active on the additional channel.
//Also sets the additional channel to the right ear.
/*
    [(call TFAR_fnc_activeSwRadio), 7] call TFAR_fnc_setAdditionalSwChannel;
    [(call TFAR_fnc_ActiveSWRadio), 2] call TFAR_fnc_setAdditionalSwStereo;
    hint "Your radio's additional channel is set to the long-range channel. Default keybind to speak on the additional channel: T";
*/