Script: merit_sel_4

// merit_sel_4 — Reply action: select player in slot 4 for merit award.
void main()
{
    object oDM    = GetPCSpeaker();
    string sCdKey = GetLocalString(oDM, "merit_slot_4_cdkey");
    string sName  = GetLocalString(oDM, "merit_slot_4_name");
    SetLocalString(oDM, "merit_sel_cdkey", sCdKey);
    SetLocalString(oDM, "merit_sel_name",  sName);
    SetCustomToken(5011, sName);
}