Fire JS Bin - FDNA - 4

You can jump to the latest bin by adding /latest to your URL

z

Find

⟲

Replace

⊗ All Replace

var r = /^\s*([LRC])\s+([\d]+)\s+([\d]+)\s+([\d\.E\-+]+)\s*$/i,
    u = /^\s*([IV])\s+([\d]+)\s+([\d]+)\s+([\d\.E\-+]+)\s+([\d\.E\-+]+)\s*$/i,
    v = /^\s*F\s+([\d]+)\s+([\d\.E\-+]+)\s+([\d\.E\-+]+)\s*$/i,
    w = /^\s*P\s+([\d]+)\s*$/i,
    x = /^\s*E\s*$/i,
    y = /^\s*#(.*)$/;
pF = parseFloat;
pI = parseInt;

function z(e, b) {
  return {
    b: e,
    a: b
  }
}
function A(e, b) {
  var g = e.b,
      a = e.a;
  return z((g * b.b + a * b.a) / (b.b * b.b + b.a * b.a), (a * b.b - g * b.a) / (b.b * b.b + b.a * b.a))
}
function B(e, b) {
  var g = e.b,
      a = e.a;
  return z(g * b.b - a * b.a, g * b.a + a * b.b)
}

function C(e, b) {
  var g = {
    b: e.e.b,
    a: e.e.a
  };
  g.a *= b;
  return g
}
function D(e, b) {
  var g = {
    b: e.e.b,
    a: e.e.a
  };
  g.a *= 1 / b;
  return g
}

function E(e) {
  var b = [],
      g = 'Zid="sCs" X"big" style="top:-45px">J<p>',
      a = e.split("\n"),
      f = a.length;
  e = {
    f: {
      u: 0,
      n: 0,
      q: 0
    },
    j: [],
    z: []
  };
  for (var d = 0; d < f; d++) {
    g += 'ZX"ln">' + (d - 10 < 0 ? "0" : "") + d + ".J";
    if (a[d] == "" || a[d].match(/^\s*$/)) g += "B";
    else if (a[d].match(r)) {
      var h = RegExp,
          m;
      g += "ZXK" + h.$1 + "JZXN" + h.$2 + "JZXN" + h.$3 + "JZXY" + h.$4 + "JB";
      switch (h.$1) {
      case "R":
      case "r":
        m = {
          type: "R",
          value: pF(h.$4),
          i: Array(pI(h.$2), pI(h.$3)),
          e: z(1 / pF(h.$4), 0)
        };
        break;
      case "C":
      case "c":
        m = {
          type: "C",
          value: pF(h.$4),
          i: Array(pI(h.$2), pI(h.$3)),
          e: z(0, pF(h.$4))
        };
        break;
      case "L":
      case "l":
        m = {
          type: "L",
          value: pF(h.$4),
          i: Array(pI(h.$2), pI(h.$3)),
          e: z(0, -1 / pF(h.$4))
        };
        break
      }
      e.j.push(m)
    } else if (a[d].match(u)) {
      h = RegExp;
      g += "ZXK" + h.$1 + "JZXN" + h.$2 + "JZXN" + h.$3 + "JZXY" + h.$4 + "JZXY" + h.$5 + "JB";
      switch (h.$1) {
      case "I":
      case "i":
        e.j.push({
          type: "I",
          A: pF(h.$4),
          B: pF(h.$5),
          i: Array(pI(h.$2), pI(h.$3)),
          e: z(-1 * h.$4 * Math.cos(h.$5), -1 * h.$4 * Math.sin(h.$5))
        });
        break;
      case "V":
      case "v":
        e.j.push({
          type: "V",
          A: pF(h.$4),
          B: pF(h.$5),
          i: Array(pI(h.$2), pI(h.$3)),
          e: z(h.$4 * Math.cos(h.$5), h.$4 * Math.sin(h.$5))
        });
        break
      }
    } else if (a[d].match(v)) {
      h = RegExp;
      g += "ZXKFJZXY" + h.$1 + "JZXY" + h.$2 + "JZXY" + h.$3 + "JB";
      e.f.u = pI(h.$1);
      e.f.n = pF(h.$2);
      e.f.q = pF(h.$3)
    } else if (a[d].match(w)) {
      g += "ZXKPJZXN" + RegExp.$1 + "JB";
      e.z.push({
        C: RegExp.$1
      })
    } else if (a[d].match(x)) {
      g += "ZXKEJB";
      break
    } else if (a[d].match(y)) g += 'ZX#060"># ' + RegExp.$1 + "JB";
    else {
      g += 'ZX#fff;background:#900;">' + a[d] + "J<br>";
      b.push({
        H: d
      })
    }
  }
  m = ['style="color:', "<span ", "</span> ", 'navy">', '#8b4513">', '#000">', "<br>"];
  for (d = 0; d < 7; d++) g = g.replace(RegExp("XZJKNYB".charAt(d), "g"), m[d]);
  return {
    w: b,
    o: e,
    source: g + "</p>"
  }
}
function F(e) {
  $("cir").value = e ? "L 1 2 5.00E-03\nR 2 3 500\nC 3 0 4.70E-09\nI 1 0 1.0 0.0\nF 50 30E+03 40E+03\nP 2\nE\n" : "R 0 1 50\nL 1 2 9.552e-6\nL 2 3 7.28e-6\nL 3 4 4.892e-6\nL 1 5 6.368e-6\nL 3 6 12.94e-6\nL 4 7 6.368e-6\nC 0 5 636.5e-12\nC 0 2 2122e-12\nC 0 6 465.8e-12\nC 0 7 636.5e-12\nR 0 4 50\nI 1 0 1.0 0.0\nF 100 10e3 4e6\nP 4\nE"
}

function G(e, b, g, a) {
  e = e.getContext("2d");
  var f = 0,
      d = [0, 25, 5, 25, 7.5, 30, 12.5, 20, 17.5, 30, 22.5, 20, 27.5, 30, 32.5, 20, 37.5, 30, 42.5, 20, 45, 25, 50, 25, "e", 0, 25, 22.5, 25, "m", 22, 15, 22, 35, "m", 28, 15, 28, 35, "m", 28, 25, 50, 25, "e", 0, 25, 5, 25, "a", 10, 25, 5, 1, "a", 20, 25, 5, 1, "a", 30, 25, 5, 1, "a", 40, 25, 5, 1, 50, 25, "e", 0, 25, 15, 25, "m", 35, 25, 50, 25, "a", 25, 25, 10, 2, "e", 0, 25, 30, 20, 30, 30, 0, 25, "e", 0, 25, 30, 25, "m", 30, 15, 30, 35, "m", 35, 20, 35, 30, "m", 40, 22, 40, 27, "e", 0, 25, 50, 25, "e", 0, 25, 50, 25, "e", 25, 50, 25, 25, 50, 25, "e", 25, 50, 25, 0, "m", 25, 25, 50, 25, "e", 25, 50, 25, 0, "m", 0, 25, 50, 25, "e"];
  b = {
    r: 0,
    c: 25,
    l: 45,
    s: 72,
    p: 87,
    g: 96,
    h: 116,
    v: 121,
    k: 126,
    t: 133,
    x: 143
  }[b.charAt(0)];
  e.translate(25, 25);
  switch (pI(g)) {
  case 1:
    e.rotate(1.57);
    break;
  case 2:
    e.rotate(4.71);
    break;
  case 3:
    e.rotate(3.14);
    break
  }
  e.beginPath();
  for (e.moveTo(d[b] - 25, d[1 + b] - 25); d[f + b] != "e" && typeof d[f + b] != "undefined";) if (d[f + b] == "m") {
    e.moveTo(d[f + b + 1] + 0.5 - 25, d[f + 2 + b] + 0.5 - 25);
    f += 3
  } else if (d[f + b] == "a") {
    e.arc(d[f + b + 1] + 0.5 - 25, d[f + 2 + b] + 0.5 - 25, d[f + 3 + b], Math.PI * d[f + 4 + b], 0, false);
    f += 5
  } else {
    e.lineTo(d[f + b] + 0.5 - 25, d[f + 1 + b] + 0.5 - 25);
    f += 2
  }
  e.stroke();
  a > 0 && e.fillText("" + a, -15, -15)
}
imgCode = "var cim = [ArhBCDAlhBCDAchBCDAshBCDAhBCDAplBC-2Jl:-1}),AglBC-2Jl:0}),ArvBCZAlvBCZAcvBCZAsvBC-1Kl:-2F,AptBC-1Jl:-2F,AgtBC0Jl:-2F,AvBCZAkbrBC-2Ll:-2}),AktlBC-1Jl:-1GAktrBC-1,r:-1,b:-2,l:-2HAkblBC-2Kl:-1F,AtrBC-1Ll:-2}),AtlBC-1Kl:-1GAttBC-1,r:-1,b:-2,l:-1HAtbBC-2Ll:-1F,AxBC-1Ll:-1F];";
imgSearch = "ABCDZFGHJKL";
imgReplace = ["new Element('canvas', { e:'", "', width:50, height:50, ", " t:", "-2,r:-1,b:-2,l:-1 }),", "-1Kl:-2, 'rot':1}),", ", 'rot':1})", ", 'rot':3}),", ", 'rot':2}),", ",r:-2,b:-2,", ",r:-2,b:-1,", ",r:-1,b:-1,"];
for (i = 0; i < imgSearch.length; i++) imgCode = imgCode.replace(RegExp(imgSearch.charAt(i), "g"), imgReplace[i]);
eval(imgCode);
gridSize = 8;
fromToolbox = /^tb(\d+)/;
globid = -1;
griddiv = new Element("div", {
  style: "width:50px;height:50px;float:left;font-size:11px;border:1px solid #aaa;background:#eee;",
  draggable: "true",
  ondragstart: "drag(this, event);",
  ondragenter: "return false;",
  ondragover: "return false;",
  ondrop: "drop(this, event);"
});
offsets = ["t", "r", "b", "l", "b", "l", "t", "r", 0, 1, 0, -1, -1, 0, 1, 0];

function H() {
  for (var e = 0, b = 0, g = true; g;) {
    g = false;
    for (b = 0; b < gridSize; b++) for (e = 0; e < gridSize; e++) {
      c = $("g" + e + "" + b).firstChild;
      curnode = -1;
      if (c && c.getAttribute("e").match(/^[kvhtx]/)) for (var a = false, f = 0; f < 4; f++) {
        var d = c.getAttribute(offsets[f]);
        if (d != -2) if (d == -1) {
          curnode = $("g" + (e + offsets[f + 8]) + "" + (b + offsets[f + 12])).firstChild.getAttribute(offsets[f + 4]);
          if (a) g = true;
          if (curnode > -1) for (d = 0; d < 4; d++) c.getAttribute(offsets[d]) > -2 && c.setAttribute(offsets[d], curnode)
        } else a = true
      }
    }
  }
}
var I = null;

function J() {
  if (I == $("cir").value) return true;
  I = $("cir").value;
  var e = E(I),
      b = e.w.length;
  $("srC").innerHTML = e.source;
  $("sCs").innerHTML = b ? "x" : "✔";
  $("sCs").style.color = b ? "red" : "green";
  return b ? false : true
}
window.aC = function () {
  if (J()) {
    var e;
    a: {
      var b = E($("cir").value);
      if (b.w.length != 0) e = alert("Circuit failed to parse!");
      else {
        e = [];
        b = b.o;
        for (var g = b.j.length, a = 0, f = 0; f < g; f++) {
          var d = b.j[f].i[0],
              h = b.j[f].i[1];
          if (d == h) {
            e = {
              error: "Components cannot have their pins connected to the same node"
            };
            break a
          }
          if (d > a) a = d;
          if (h > a) a = h
        }
        for (var m = [], l = 0; l < a; l++) {
          m[l] = [];
          for (d = 0; d < a + 1; d++) m[l][d] = {
            input: [],
            m: []
          };
          for (var o = 0; o < g; o++) {
            var n = b.j[o];
            d = n.i[0] - 1;
            h = n.i[1] - 1;
            if (!(d != l && h != l)) if (d == l) if (n.type == "I") m[d][a].input.push(n);
            else {
              m[d][d].input.push(n);
              h >= 0 && m[d][h].m.push(n)
            } else if (h == l) if (n.type == "I") m[h][a].m.push(n);
            else {
              m[h][h].input.push(n);
              d >= 0 && m[h][d].m.push(n)
            }
          }
        }
        g = b.f.n;
        a = (b.f.q - b.f.n) / b.f.u;
        d = 0;
        for (h = Array(m.length); d < b.f.u; d++) {
          o = 2 * Math.PI * g;
          for (var j = 0, s; j < m.length; j++) {
            h[j] = Array(m[j].length);
            for (l = 0; l < m[j].length; l++) {
              h[j][l] || (h[j][l] = z(0, 0));
              var k = m[j][l];
              for (f = 0; f < k.input.length; f++) {
                n = k.input[f];
                switch (n.type) {
                case "I":
                  s = n.e;
                  break;
                case "R":
                  s = n.e;
                  break;
                case "L":
                  s = D(n, o);
                  break;
                case "C":
                  s = C(n, o);
                  break
                }
                h[j][l] =
                z(h[j][l].b + s.b, h[j][l].a + s.a)
              }
              for (f = 0; f < k.m.length; f++) {
                n = k.m[f];
                switch (n.type) {
                case "I":
                  s = n.e;
                  break;
                case "R":
                  s = n.e;
                  break;
                case "L":
                  s = D(n, o);
                  break;
                case "C":
                  s = C(n, o);
                  break
                }
                h[j][l] = z(h[j][l].b - s.b, h[j][l].a - s.a)
              }
            }
          }
          l = e;
          n = d;
          f = h;
          j = void 0;
          b: {
            j = void 0;
            var p = void 0;
            k = void 0;
            var q = f.length;
            for (j = 0; j < q; j++) {
              var t = j;
              for (p = j; p < q; p++) if (Math.sqrt(f[p][j].b * f[p][j].b + f[p][j].a * f[p][j].a) > Math.sqrt(f[t][j].b * f[t][j].b + f[t][j].a * f[t][j].a)) t = p;
              for (k = j; k < q + 1; k++) {
                p = {
                  b: f[j][k].b,
                  a: f[j][k].a
                };
                f[j][k] = f[t][k];
                f[t][k] =
                p
              }
              for (p = j + 1; p < q; p++) for (k = q; k > j; k--) if (f[j][j].b == 0 && f[j][j].a == 0) {
                j = false;
                break b
              } else f[p][k] = z(f[p][k].b - B(f[j][k], A(f[p][j], f[j][j])).b, f[p][k].a - B(f[j][k], A(f[p][j], f[j][j])).a)
            }
            j = true
          }
          if (j) {
            j = void 0;
            k = void 0;
            q = f.length;
            X = Array(f.length);
            for (j = 0; j < f.length; j++) X[j] = z(0, 0);
            for (j = q - 1; j >= 0; j--) {
              t = z(0, 0);
              for (k = j + 1; k < q; k++) {
                f[j][k] = B(f[j][k], X[k]);
                t = z(t.b + f[j][k].b, t.a + f[j][k].a)
              }
              X[j] = A(z(f[j][q].b - t.b, f[j][q].a - t.a), f[j][j])
            }
            X = X
          } else throw "Singular matrix in Gaussian Elimination! Your node numbers must be sequential without gaps.";l[n] = {
            F: X,
            G: g,
            I: o
          };g += a
        }
        e = {
          D: e,
          o: b
        }
      }
    }
    b = e;g = $("plots").select("canvas");e = b.o.f;s = b.o.z;b = b.D;
    for (m = 0; m < g.length; m++) g[m].remove();
    for (m = 0; m < s.length; m++) for (g = 0; g < 2; g++) {
      j = s[m].C - 1;
      d = new Element("canvas", {
        width: 600,
        height: 300,
        style: "margin-top:20px",
        id: "maggraph" + j
      });
      a = d.getContext("2d");
      $("plots").appendChild(d);
      a.beginPath();
      a.fillText("Node " + (j + 1) + (g ? " Phase" : " Magnitude"), 300, 10.5);
      a.moveTo(140.5, 30.5);
      a.lineTo(140.5, 269.5);
      a.moveTo(130.5, 259.5);
      a.lineTo(569.5, 259.5);
      a.stroke();
      o = [];
      l = b.length;
      n = l > 429 ? l / 429 : 1;
      f = l < 429 ? 429 / l : 1;
      d = 0;
      k = -10000;
      h = 1E4;
      for (d = 0; d < l; d++) {
        q = b[d].F[j];
        o[d] = g ? Math.atan(q.a / q.b) : Math.sqrt(q.b * q.b + q.a * q.a);
        if (o[d] > k) k = o[d];
        if (o[d] < h) h = o[d]
      }
      j = k - h;
      for (d = 0; d < l; d++) {
        o[d] -= h;
        if (j) o[d] /= j
      }
      a.moveTo(140.5, 259.5);
      for (d = k = 0; d < l / n; d += n) {
        a.lineTo(140.5 + f * k, 249.5 - o[Math.round(d)] * 209);
        k++
      }
      for (d = 0; d < 5; d++) {
        o = 249.5 - d / 4 * 209;
        l = 140.5 + d / 4 * 429;
        a.moveTo(132.5, o);
        a.lineTo(140.5, o);
        a.fillText(h + j / 5 * d, 5.5, o);
        a.moveTo(l, 267.5);
        a.lineTo(l, 259.5);
        a.fillText(e.n + (e.q - e.n) / 5 * d, l, 279.5)
      }
      a.fillText(g ? "Angle (Rad)" : "Voltage (V)", 30, 120.5);
      a.fillText("Freq (Hz)", 330.5, 297);
      a.stroke()
    }
  }
};
window.cS = J;
window.lEx = F;
window.cTx = function () {
  var e = 0,
      b = 0,
      g = 0;
  found = 0;
  for (nodenum = 1; b < gridSize; b++) for (e = 0; e < gridSize; e++) {
    var a = $("g" + e + "" + b).firstChild;
    if (a && a.id.charAt(0) == "g") {
      a.id.charAt(1) == "t" ? a.setAttribute("t", 0) : a.setAttribute("l", 0);
      found = 1
    } else for (g = 0; g < 4; g++) a && a.getAttribute(offsets[g]) > -2 && a.setAttribute(offsets[g], -1)
  }
  if (found) {
    H();
    for (b = 0; b < gridSize; b++) for (e = 0; e < gridSize; e++) {
      var f = $("g" + e + "" + b);
      a = f.firstChild;
      curnode = -1;
      if (a && a.getAttribute("e").match(/^[rlcsp]/)) for (g = 0; g < 4; g++) if (a && a.getAttribute(offsets[g]) > -2) try {
        curnode = $("g" + (e + offsets[g + 8]) + "" + (b + offsets[g + 12])).firstChild.getAttribute(offsets[g + 4]);
        if (curnode < 0) curnode = nodenum++;
        f.firstChild.setAttribute(offsets[g], curnode);
        H()
      } catch (d) {
        alert("The component at grid cell " + e + "," + b + " does not have a " + offsets[g + 4] + " connection");
        return
      }
    }
    g = "";
    for (b = 0; b < gridSize; b++) for (e = 0; e < gridSize; e++) {
      f = $("g" + e + "" + b);
      a = f.firstChild;
      f = "";
      if (a) {
        a.d = a.getAttribute;
        a.id.match(/^[^_]+\_([^_]+)\_?(.)*/);
        f = RegExp.$1;
        value2 = RegExp.$2
      }
      if (a && a.id.match(/^([rlc])([vh])/)) {
        var h =
        RegExp.$1;
        a = RegExp.$2 == "v" ? a.d("t") + " " + a.d("b") : a.d("l") + " " + a.d("r");
        g += h.toUpperCase() + " " + a + " " + f + "\n"
      } else if (a && a.id.match(/^s([vh])/)) {
        a = RegExp.$1 == "v" ? a.d("t") + " " + a.d("b") : a.d("l") + " " + a.d("r");
        g += "I " + a + " " + f + " " + value2 + "\n"
      } else if (a && a.id.match(/^p([tl])/)) {
        a = RegExp.$1 == "t" ? a.d("t") : a.d("l");
        g += "P " + a + "\n"
      }
    }
    $("cir").value = g + "F " + $("ft").value + " " + $("fs").value + " " + $("fe").value + "\nE";
    J()
  } else alert("Your circuit does not contain a reference node.")
};
window.drag = function (e, b) {
  try {
    b.dataTransfer.setData("text/plain", e.getAttribute("id"))
  } catch (g) {
    globid = e.id
  }
};
window.drop = function (e, b) {
  var g;
  try {
    g = b.dataTransfer.getData("text/plain")
  } catch (a) {
    g = globid
  }
  b.preventDefault();
  if (e.firstChild) e.id == "del" && $(g).firstChild.remove();
  else if (g.match(fromToolbox)) {
    g = pI(RegExp.$1);
    var f = cim[g].clone(),
        d, h = -1;
    f.d = f.getAttribute;
    d = f.d("e");
    if (g < 4 || g > 6 && g < 11) {
      h = prompt("Value (R=[ohms], L=[henry], C=[farads], I=[amps])", "1");
      if (g == 10 || g == 3) h += "," + prompt("Phase (I=[rad/s])", "0");
      if (!h) return;
      d += "_" + h.replace(",", "_").replace(" ", "")
    }
    f.setAttribute("id", d);
    G(f, f.d("e"), f.d("rot"), h);
    e.appendChild(f)
  } else e.appendChild($(g).firstChild.remove())
};
onload = function () {
  document.body.innerHTML = '<h1 style="font-family:"apolline-1";">Frequency Domain RLC Circuit Analysis</h1><p>Find the sinusoidal steady state Resistor, Inductor, Capacitor circuits over a range of frequencies. Draw and/or describe your circuit below. For usage see: <a href="http://www.stephenierodiaconou.com/">SI</a> and <a  href="http://github.com/stevegeek/fdna">GH</a></p><div id="plots" style="text-align:center"></div><div id="diag"><button onClick="return cTx()">Convert to Text Format »</button><br><br>F Steps: <input type="text" value="100" id="ft" size="4">| F Start (Hz):<input type="text" value=".001" id="fs" size="4">| F Stop (Hz):<input type="text" value="0.1" id="fe" size="4"><div id="tbx"></div><br><div id="diagram"></div></div><div id="txt"><button onClick="return aC()">Start Analysis »</button><p>Examples: <a href="#" onClick="lEx(0)">(1)</a>|<a href="#" onClick="lEx(1)">(2)</a></p><textarea id="cir" rows="11" cols="32" style="font:15px Courier;">

'; F(0); J(); var e = 0, b = 0, g; $("tbx").style.height = "150px"; for (e = 0; e < cim.length; e++) { var a = griddiv.clone(); a.setAttribute("id", "tb" + e); g = cim[e].clone(); G(g, g.getAttribute("e"), g.getAttribute("rot"), -1); a.appendChild(g); $("tbx").appendChild(a) } g = griddiv.clone(); g.setAttribute("id", "del"); g.innerHTML = "Drag here to Delete"; for ($("tbx").appendChild(g); b < gridSize; b++) { for (e = 0; e < gridSize; e++) { a = griddiv.clone(); a.setAttribute("id", "g" + e + "" + b); $("diagram").appendChild(a) } $("diagram").appendChild((new Element("br")).addClassName("row")) } setInterval("cS()", 200) };