Script: merit_sel_1

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