void main()
{
    object oGM = GetPCSpeaker();
    
    if (!GetIsObjectValid(oGM))
    {
        SendMessageToPC(oGM, "No valid speaker found.");
        return;
    }

    object oArea = GetArea(oGM);
    if (!GetIsObjectValid(oArea))
    {
        SendMessageToPC(oGM, "Could not determine player's area.");
        return;
    }

    object oTrap = GetFirstObjectInArea(oArea);
    object oValidTrap = OBJECT_INVALID;

    // Loop through all placeables in the area
    while (GetIsObjectValid(oTrap))
    {
        if (GetObjectType(oTrap) == OBJECT_TYPE_PLACEABLE && GetTag(oTrap) == "CAS_PLC_VFXTRAP")
        {
            oValidTrap = oTrap;
            break; // Stop at the first valid hazard found
        }

        oTrap = GetNextObjectInArea(oArea);
    }

    if (!GetIsObjectValid(oValidTrap))
    {
        SendMessageToPC(oGM, "No hazard found in this area.");
        return;
    }

    // Get dialogue node selection
    int nNode = GetSelectedNodeID();
    float fSpacing;

    // Calculate the spacing based on the node selection
    fSpacing = 0.5 + (float)nNode * 0.5;

    // Apply the new spacing value
    SetLocalFloat(oValidTrap, "fSpacing", fSpacing);

    // Fetch updated hazard settings
    int nDC = GetLocalInt(oValidTrap, "nDC");
    string sDamage = GetLocalString(oValidTrap, "sDamage");
    int nDamageType = GetLocalInt(oValidTrap, "nDamageType");
    float fFrequency = GetLocalFloat(oValidTrap, "fFrequency");

    // Convert damage type to a readable string
    string sType;
    switch (nDamageType)
    {
        case DAMAGE_TYPE_ACID:        sType = "Acid"; break;
        case DAMAGE_TYPE_COLD:        sType = "Cold"; break;
        case DAMAGE_TYPE_DIVINE:      sType = "Divine"; break;
        case DAMAGE_TYPE_ELECTRICAL:  sType = "Electrical"; break;
        case DAMAGE_TYPE_FIRE:        sType = "Fire"; break;
        case DAMAGE_TYPE_NEGATIVE:    sType = "Negative"; break;
        case DAMAGE_TYPE_POSITIVE:    sType = "Positive"; break;
        case DAMAGE_TYPE_SONIC:       sType = "Sonic"; break;
        case DAMAGE_TYPE_MAGICAL:     sType = "Magical"; break;
        case DAMAGE_TYPE_PIERCING:    sType = "Piercing"; break;
        case DAMAGE_TYPE_BLUDGEONING: sType = "Bludgeoning"; break;
        case DAMAGE_TYPE_SLASHING:    sType = "Slashing"; break;
        default:                      sType = "Unknown"; break;
    }

    // Send final message with updated hazard details
    SendMessageToPC(oGM, "=== Current Hazard Settings ===\n" +
                          "DC: " + IntToString(nDC) + "\n" +
                          "Damage: " + sDamage + "\n" +
                          "Damage Type: " + sType + "\n" +
                          "Spacing: " + FloatToString(fSpacing) + "\n" +
                          "Rate: Every " + FloatToString(fFrequency) + " seconds.");
}