// WL-816q 3회차 — 띠 가장자리 「톱니 윤곽」의 촘촘함을 데모 수준으로.
// 지렛대 = 풀 높이(scale) · 밀도. 인스턴스 수를 늘리지 않는 쪽(scale)부터 본다. 에셋 무변경.
public static class WL816q_Fringe
{
    public static void Start()
    {
        var go = UnityEngine.GameObject.Find("~WL816qFringe");
        if (go != null) UnityEngine.Object.DestroyImmediate(go);
        go = new UnityEngine.GameObject("~WL816qFringe");
        go.AddComponent<WL816q_FringeRunner>();
    }
}

public class WL816q_FringeRunner : UnityEngine.MonoBehaviour
{
    static System.Text.StringBuilder sb;
    const int TS = 768;
    static string Dir = "Screenshots_WL/WL816q";

    void Start() { StartCoroutine(Co()); }

    System.Collections.IEnumerator Co()
    {
        sb = new System.Text.StringBuilder();
        System.IO.Directory.CreateDirectory(Dir);
        if (UnityEngine.SceneManagement.SceneManager.sceneCount < 2)
        {
            var op = UnityEngine.SceneManagement.SceneManager.LoadSceneAsync("Level01", UnityEngine.SceneManagement.LoadSceneMode.Additive);
            while (op != null && !op.isDone) yield return null;
        }
        for (int i = 0; i < 6; i++) yield return new UnityEngine.WaitForSeconds(1f);

        var g = UnityEngine.Object.FindFirstObjectByType<WL.Look.Farm.WLIslandGrass>(UnityEngine.FindObjectsInactive.Include);
        if (g == null) { L("grass 없음"); Flush(); yield break; }
        var rt = UnityEngine.Object.Instantiate(WL.Look.Farm.WLIslandLookSettings.Instance);
        var arr = new WL.Look.Farm.WLScatterDef[rt.scatter.Length];
        for (int i = 0; i < arr.Length; i++)
        {
            var s = rt.scatter[i];
            arr[i] = new WL.Look.Farm.WLScatterDef { enabled_ = s.enabled_, label = s.label, mesh = s.mesh, material = s.material,
                probability = s.probability, scale = s.scale, normalOffset = s.normalOffset, density = s.density };
        }
        rt.scatter = arr; g.cfg = rt; rt.viewCullEnabled = 0;

        var b = g.CalculateInstancesBounds();
        var cam = MakeTop(b.center.x, b.center.z, 6f);
        UnityEngine.Time.timeScale = 0f; yield return null;

        rt.grassEnabled = 0; g.Rebuild(); yield return null; yield return null;
        var A = Grab(cam, TS, TS); var apx = A.GetPixels32();
        System.IO.File.WriteAllBytes(Dir + "/fringe_ground.png", UnityEngine.ImageConversion.EncodeToPNG(A));
        L("바닥만 " + Metric(apx, TS, TS));
        L("데모 참고 : 단계 8 LF 16.27 HF 0.33 에지% 1.22 · 이 카메라 = 64 px/m");
        rt.grassEnabled = 1;

        float[] scales = { 0.35f, 0.5f, 0.7f, 0.9f, 1.2f };
        float[] dens = { 2.5f, 3.5f };
        for (int di = 0; di < dens.Length; di++)
        {
            for (int si = 0; si < scales.Length; si++)
            {
                for (int i = 0; i < arr.Length; i++)
                {
                    if (arr[i].label != null && arr[i].label.Contains("자갈")) continue;   // 자갈은 그대로
                    arr[i].scale = scales[si] * (arr[i].label != null && arr[i].label.Contains("꽃") ? 1f : 1f);
                    arr[i].density = dens[di];
                }
                g.Rebuild(); yield return null; yield return null;
                var B = Grab(cam, TS, TS); var bpx = B.GetPixels32();
                L(string.Format("scale={0:F2} density={1:F1} | {2} | 보이는 풀 {3:F2}% | 인스턴스 {4} 삼각형 {5}",
                    scales[si], dens[di], Metric(bpx, TS, TS), Cover(apx, bpx),
                    WL.Look.Farm.WLIslandGrass.Instances, WL.Look.Farm.WLIslandGrass.Triangles));
                System.IO.File.WriteAllBytes(Dir + "/fringe_s" + scales[si].ToString("F2") + "_d" + dens[di].ToString("F1") + ".png",
                    UnityEngine.ImageConversion.EncodeToPNG(B));
                UnityEngine.Object.DestroyImmediate(B);
            }
        }
        UnityEngine.Object.DestroyImmediate(A);
        UnityEngine.Time.timeScale = 1f;
        Flush();
    }

    static float Cover(UnityEngine.Color32[] a, UnityEngine.Color32[] b)
    {
        int n = 0, tot = 0;
        for (int i = 0; i < a.Length; i++)
        {
            var p = a[i]; if (!Gr(p)) continue; tot++;
            var q = b[i]; if (q.g <= q.b + 4) continue;
            if (System.Math.Abs(p.r - q.r) + System.Math.Abs(p.g - q.g) + System.Math.Abs(p.b - q.b) > 6) n++;
        }
        return tot == 0 ? 0f : 100f * n / tot;
    }
    static string Metric(UnityEngine.Color32[] px, int w, int h)
    {
        int bs = 8, bw = w / bs, bh = h / bs;
        var bm = new float[bw * bh]; var bok = new bool[bw * bh];
        double hf = 0; int hfn = 0;
        for (int by = 0; by < bh; by++) for (int bx = 0; bx < bw; bx++)
        {
            double s = 0; int n = 0;
            for (int y = 0; y < bs; y++) for (int x = 0; x < bs; x++)
            { var p = px[(by * bs + y) * w + (bx * bs + x)]; if (!Gr(p)) continue; s += Lum(p); n++; }
            if (n < bs * bs / 2) continue;
            float mean = (float)(s / n); bm[by * bw + bx] = mean; bok[by * bw + bx] = true;
            for (int y = 0; y < bs; y++) for (int x = 0; x < bs; x++)
            { var p = px[(by * bs + y) * w + (bx * bs + x)]; if (!Gr(p)) continue; hf += System.Math.Abs(Lum(p) - mean); hfn++; }
        }
        double s1 = 0, s2 = 0; int bn = 0; var lv = new int[40];
        for (int i = 0; i < bm.Length; i++) { if (!bok[i]) continue; s1 += bm[i]; s2 += (double)bm[i] * bm[i]; bn++; int q = (int)(bm[i] / 8f); if (q >= 0 && q < 40) lv[q]++; }
        if (bn == 0 || hfn == 0) return "지면 0";
        double mu = s1 / bn, lf = System.Math.Sqrt(System.Math.Max(0, s2 / bn - mu * mu));
        int levels = 0; for (int i = 0; i < 40; i++) if (lv[i] >= bn * 0.005) levels++;
        int ed = 0, edn = 0;
        for (int y = 0; y < h - 1; y++) for (int x = 0; x < w - 1; x++)
        {
            var p = px[y * w + x]; if (!Gr(p)) continue; var r = px[y * w + x + 1]; var d = px[(y + 1) * w + x]; edn++;
            if ((Gr(r) && System.Math.Abs(Lum(p) - Lum(r)) > 8) || (Gr(d) && System.Math.Abs(Lum(p) - Lum(d)) > 8)) ed++;
        }
        return string.Format("단계={0} LF={1:F2} HF={2:F2} 에지%={3:F2} 밝기={4:F1}", levels, lf, hf / hfn, 100.0 * ed / System.Math.Max(1, edn), mu);
    }
    static bool Gr(UnityEngine.Color32 p) { return p.g > p.b + 8 && p.g > 45; }
    static float Lum(UnityEngine.Color32 p) { return 0.299f * p.r + 0.587f * p.g + 0.114f * p.b; }

    static UnityEngine.Camera MakeTop(float cx, float cz, float size)
    {
        var go = UnityEngine.GameObject.Find("~816qTop");
        if (go == null) go = new UnityEngine.GameObject("~816qTop");
        var c = go.GetComponent<UnityEngine.Camera>();
        if (c == null) c = go.AddComponent<UnityEngine.Camera>();
        c.orthographic = true; c.orthographicSize = size; c.nearClipPlane = 0.1f; c.farClipPlane = 200f;
        c.transform.rotation = UnityEngine.Quaternion.Euler(90f, 0f, 0f);
        c.transform.position = new UnityEngine.Vector3(cx, 60f, cz);
        c.enabled = false; return c;
    }
    static UnityEngine.Texture2D Grab(UnityEngine.Camera cam, int w, int h)
    {
        var rt = new UnityEngine.RenderTexture(w, h, 24, UnityEngine.RenderTextureFormat.ARGB32, UnityEngine.RenderTextureReadWrite.sRGB);
        rt.Create(); cam.targetTexture = rt; cam.Render();
        var prev = UnityEngine.RenderTexture.active; UnityEngine.RenderTexture.active = rt;
        var tex = new UnityEngine.Texture2D(w, h, UnityEngine.TextureFormat.RGB24, false);
        tex.ReadPixels(new UnityEngine.Rect(0, 0, w, h), 0, 0); tex.Apply();
        UnityEngine.RenderTexture.active = prev; cam.targetTexture = null;
        rt.Release(); UnityEngine.Object.DestroyImmediate(rt);
        return tex;
    }
    static void L(string s) { sb.AppendLine(s); Flush(); }
    static void Flush()
    {
        System.IO.File.WriteAllText("AgentScripts/WL816q_FRINGE.txt", sb.ToString());
        UnityEngine.Debug.Log("[816q fringe]\n" + sb.ToString());
    }
}