Script: forge_dis_p4
// Pick disenchant slot 4 and stage its name in token 6118 for the confirm.
#include "forge_inc"
void main()
{
object oPC = GetPCSpeaker();
SetLocalInt(oPC, "FORGE_DIS_PICK", 4);
SetCustomToken(6118, ForgePropName(ForgeGetPermPropByIndex(
GetLocalObject(oPC, "FORGE_DIS_ITEM"), 4)));
}