RandSex.html

<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=Windows-1252">
<BASE HREF="http://darekun.twilightparadox.com/">
<TITLE>RandSex</TITLE>
<LINK REL="stylesheet" TYPE="text/css" HREF="D.css">
<LINK REL="stylesheet" TYPE="text/css" HREF="/DLook.css">
<STYLE TYPE="text/css"><!--

UL { margin: 0; padding: 0; }
LI { margin: 1em 0; padding: 0; list-style-type: none; }

--></STYLE>
<SCRIPT TYPE="text/javascript;version=1.7"><!--
"use strict";
let DebugDiv;

let ResultList;

function DoGenerate()
{
    let CharStr, Gynosexuality, Androsexuality, Kinsey, Libido;
    let bInvert = Math.random() >= 1/2;
    if ( bInvert )
        CharStr = "Male";
    else
        CharStr = "Female"
    ;

    //Genetic.
    Gynosexuality = Math.random();
    Androsexuality = Math.random();
    Libido = Math.max(Gynosexuality, Androsexuality);
    Kinsey = Math.min(Gynosexuality, Androsexuality) / Libido * 3;
    if ( (Gynosexuality > Androsexuality) ^ bInvert ) Kinsey = 6 - Kinsey;
    CharStr += "<BR>Genetic: Kinsey " + Kinsey.toFixed(1) + ", Libido " + Math.round(Libido * 100) + "%";

    //Socialization.
    let Socialization = Math.random();
    CharStr += "<BR>Socialization: " + Math.round(Socialization * 100) + "%";

    //Effective.
    if ( bInvert )
        Androsexuality *= 1-Socialization;
    else
        Gynosexuality *= 1-Socialization
    ;
    Libido = Math.max(Gynosexuality, Androsexuality);
    Kinsey = Math.min(Gynosexuality, Androsexuality) / Libido * 3;
    if ( (Gynosexuality > Androsexuality) ^ bInvert ) Kinsey = 6 - Kinsey;
    CharStr += "<BR>Effective: Kinsey " + Kinsey.toFixed(1) + ", Libido " + Math.round(Libido * 100) + "%";

    let CharItem = document.createElement("li");
    CharItem.innerHTML = CharStr;
    ResultList.appendChild(CharItem);
}

// --></SCRIPT>
</HEAD>
<BODY>

<UL ID="ResultList">
</UL>

<BUTTON OnClick="DoGenerate()">Generate</BUTTON>

<DIV ID="DebugDiv"></DIV>

<SCRIPT TYPE="text/javascript"><!--
    DebugDiv = document.getElementById("DebugDiv");

    ResultList = document.getElementById("ResultList");
// --></SCRIPT>

</BODY>
</HTML>