Procedural Randomness

version 2 by Aaron Reed

  • Home page
  • Beginning
  • Previous



  • Section - With Procedural Randomness

    To say with procedural randomness -- ending say_one_of with marker I7_SOO_PRAN:
    (- {-close-brace} -).


    Include (-
    [ I7_SOO_PRAN oldval count seed choice;
    if (count <= 1) return count;
        seed = normalizedSeed((+ procedural seed +));
        choice = ( seed % count ) + 1;
        if (choice < 0) choice = choice * -1;
        varySeed();
        return choice;
    ];
    -)

    Procedural Randomness ends here.