ConwayLife.com

Code: Select all

C:\repos\golly-code\Scripts\Lua>git apply toHistory.patch
error: corrupt patch at line 17

C:\repos\golly-code\Scripts\Lua>git apply toSuper.patch

Code: Select all

-- Fast [Rule] or [Rule]Super to [Rule]History converter,
--   intended to be mapped to a keyboard shortcut, e.g., Alt+H
-- Sanity checks and Lua translation by Dave Greene, May 2017
-- Creates special rule and runs it for one generation, then switches to Life 
-- Replace 2k + 1-> 1 and 2k -> 0
-- Preserves step and generation count
-- v1.1: skip the SuperToHistory conversion unless the current name has a "Super" suffix

local g = golly()

local rule = g.getrule()
local algo = g.getalgo()

ruletext = [[@RULE SuperToHistory
@TABLE
n_states:26
neighborhood:oneDimensional
symmetries:none
var a={0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25}
var b={a}
var withtrailON ={9,11}
var withtrailOFF={10,12}
var notrailON   ={13,15,17,19,21,23,25}
var notrailOFF  ={14,16,18,20,22,24}
var markedON    ={7}
var markedOFF   ={8}

notrailOFF  ,a,b,0
withtrailON ,a,b,1
notrailON   ,a,b,1
withtrailOFF,a,b,2
markedON    ,a,b,3
markedOFF   ,a,b,4]]

local function CreateRule()
    local fname = g.getdir("rules").."SuperToHistory.rule"
    local f=io.open(fname,"r")
    if f~=nil then
        io.close(f)  -- rule already exists
    else 
        local f = io.open(fname, "w")
        if f then
            f:write(ruletext)
            f:close()
        else
            g.warn("Can't save SuperToHistory rule in filename:\n"..filename)
        end
    end
end

-- deal with bounded-universe syntax appropriately
suffix = ""
baserule = rule
ind = string.find(rule, ":")
if ind then
    suffix = rule:sub(ind)
    baserule = rule:sub(1,ind-1)
end

-- No effect if the current rule ends with "History"
if algo == "Super" and baserule:sub(-7) == "History" then
    g.exit("The current rule is already a [Rule]History rule.")
end

step = g.getstep()
-- If rulestring contains "Super" suffix, remove it and continue
if algo == "Super" and baserule:sub(-5) == "Super" then
    baserule = baserule:sub(1,#baserule-5)
    CreateRule()
    g.setrule("SuperToHistory")
    g.run(1)
    g.setgen("-1")
end

-- attempt to set the new History rule to see if it is valid
local function tryrule()
    g.setrule(baserule.."History"..suffix)
end
local status, err = pcall(tryrule)
if err then
    g.note("Conversion failed. This '"..baserule.."' rule is not supported by the Super algo.\n"
           .. "To revert to the original rule, please click OK, then press Z to undo the rule change.")
    g.exit("Press Z to revert to the original rule.")
end

g.setstep(step)

Code: Select all

-- [Rule] or [Rule]History to [Rule]Super converter,
--   intended to be mapped to a keyboard shortcut, e.g., Alt+G

local g = golly()

local rule = g.getrule()
local algo = g.getalgo()

-- deal with bounded-universe syntax appropriately
suffix = ""
baserule = rule
ind = string.find(rule, ":")
if ind then
    suffix = rule:sub(ind)
    baserule = rule:sub(1,ind-1)
end

-- No effect if the current rule ends with "Super"
if algo == "Super" and baserule:sub(-5) == "Super" then
    g.exit("The current rule is already a [Rule]Super rule.")
end

step = g.getstep()
-- If rulestring contains "History" suffix, remove it and continue
if algo == "Super" and baserule:sub(-7) == "History" then
    baserule = baserule:sub(1, #baserule-7)
end

-- attempt to set the new Super rule to see if it is valid
local function tryrule()
    g.setrule(baserule.."Super"..suffix)
end
local status, err = pcall(tryrule)
if err then
    g.note("Conversion failed. This '"..baserule.."' rule is not supported by the Super algo.\n"
           .. "To revert to the original rule, please click OK, then press Z to undo the rule change.")
    g.exit("Press Z to revert to the original rule.")
end

g.setstep(step)

Code: Select all

<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<svg
 version="1.0"
 width="128"
 height="128"
 xmlns="http://www.w3.org/2000/svg"
 xmlns:svg="http://www.w3.org/2000/svg">
 <defs>
  <radialGradient id="radialGradient1">
   <stop style="stop-color:#bbbbff;stop-opacity:1" offset="0"/>  <!--#a8a8e6-->
   <stop style="stop-color:#0000aa;stop-opacity:1" offset="1"/>  <!--#000099-->
  </radialGradient>
 </defs>
 <rect fill="#ffff00" width="128" height="128" rx="7"/> <!--#f9da22-->
 <g transform="matrix(0.24,0,0,-0.24,6.4,121.6)"
  style="fill:url(#radialGradient1);fill-opacity:1">
  <circle cx="40" cy="440" r="20"/>
  <circle cx="90" cy="440" r="20"/>
  <circle cx="140" cy="440" r="20"/>
  <circle cx="190" cy="440" r="20"/>
  <circle cx="240" cy="440" r="20"/>
  <circle cx="290" cy="440" r="20"/>
  <circle cx="390" cy="440" r="20"/>
  <circle cx="440" cy="440" r="20"/>
  <circle cx="40" cy="390" r="20"/>
  <circle cx="90" cy="390" r="20"/>
  <circle cx="140" cy="390" r="20"/>
  <circle cx="190" cy="390" r="20"/>
  <circle cx="240" cy="390" r="20"/>
  <circle cx="290" cy="390" r="20"/>
  <circle cx="390" cy="390" r="20"/>
  <circle cx="440" cy="390" r="20"/>
  <circle cx="390" cy="340" r="20"/>
  <circle cx="440" cy="340" r="20"/>
  <circle cx="40" cy="290" r="20"/>
  <circle cx="90" cy="290" r="20"/>
  <circle cx="40" cy="240" r="20"/>
  <circle cx="90" cy="240" r="20"/>
  <circle cx="390" cy="290" r="20"/>
  <circle cx="440" cy="290" r="20"/>
  <circle cx="390" cy="240" r="20"/>
  <circle cx="440" cy="240" r="20"/>
  <circle cx="40" cy="190" r="20"/>
  <circle cx="90" cy="190" r="20"/>
  <circle cx="390" cy="190" r="20"/>
  <circle cx="440" cy="190" r="20"/>
  <circle cx="40" cy="140" r="20"/>
  <circle cx="90" cy="140" r="20"/>
  <circle cx="40" cy="90" r="20"/>
  <circle cx="90" cy="90" r="20"/>
  <circle cx="190" cy="90" r="20"/>
  <circle cx="240" cy="90" r="20"/>
  <circle cx="290" cy="90" r="20"/>
  <circle cx="340" cy="90" r="20"/>
  <circle cx="390" cy="90" r="20"/>
  <circle cx="440" cy="90" r="20"/>
  <circle cx="40" cy="40" r="20"/>
  <circle cx="90" cy="40" r="20"/>
  <circle cx="190" cy="40" r="20"/>
  <circle cx="240" cy="40" r="20"/>
  <circle cx="290" cy="40" r="20"/>
  <circle cx="340" cy="40" r="20"/>
  <circle cx="390" cy="40" r="20"/>
  <circle cx="440" cy="40" r="20"/>
 </g>
</svg>

Code: Select all

<html>
    <head>
        <title>Golly Help: Multistate INT</title>
    </head>
    <body bgcolor="FFFFCE">
        <p>Multistate INT is a family of non-totalistic cellular automata that obey D8 [sic] symmetry on the range-1 moore neighborhood. Transitions from one state to any other state can be specified.</p>

        <h2>Overview</h2>
        <p>The notation used for this rulespace is a series of constraints that a neighborhood configuration must fulfill for a non-default state transition to occur. By default, every cell will transition to state 0.</p>

        <h3>Transitions</h3>
        <p>Transitions signify a cell's state will change to upon advancing the universe a generation, given a constraint is met. A transition from state <i>a</i> to state <i>n</i> is notated as <i>aTn</i>, with <i>a</i> and <i>n</i> standing in for numbers. Also note <i>Bn</i> and <i>Sn</i>, which are shorthand for <i>0Tn</i> and <i>nTn</i> respectively.</p>
        <p>Transitions may be included and omitted freely, and in any order. As conflicting transitions are possible, transitions specified earlier in the rulestring will take priority.</p>
        <p>Transitions are delimited by a '/' in front of them, except at the beginning of the rulestring, where it must be omitted.</p>

        <h3>Constraints</h3>
        <p>Constraints are the conditions under which a transition is allowed. Under a transition, only one full constraint needs to be satisfied for a state change to occur. Constraints work by specifying the a series of configurations that cells of specific states in the neighborhood must adhere to.</p>
        <p>In a constraint, configurations are listed one after another, delimited by ';'. Configurations are specified in the format <i>x+y+z:nh</i>, with <i>x</i>, <i>y</i>, and <i>z</i> representing the cell states being considered, <i>n</i> representing the number of those cells in the neighborhood, <i>h</i> representing a specific shape as defined in hensel notation, and ':' acting as a delimiter between states and configuration. <i>n</i> and <i>h</i> can be omitted if you don't want it to be considered in the configuration.</p>
        <p>States don't have to be specified explicitly: in a constraint, state 0, then 1, then 2... is assumed in configurations where states aren't explicitly specified. However, once a state is explicitly specified in a configuration, all following configurations must also be explicitly specified.</p>
        <p>Constraints are delimited on both sides by '.', but these may be replaced by either '-' or '/'. '/' may only replace the end delimiter.</p>
        <p>An example constraint: <i>.;2a;1c;1+2:3i;2+3:3i;1+2+3:5a;3:2a.</i></p>
        <p>-state 0 cells are unconstrained<br>
        -state 1 cells must occur in the 2a configuration<br>
        -state 2 cells must occur in the 1c configuration<br>
        -state 3 cells must occur in the 2a configuration<br>
        -state 1 and 2 cells must occur in the 3i configuration<br>
        -state 2 and 3 cells must occur in the 3i configuration<br>
        -state 1, 2, and 3 cells must occur in the 5a configuration<br></p>
        <p>This is the only neighborhood that satifies this constraint:<br>
        1 1 2<br>
        0 o 3<br>
        0 0 3</p>

        <h3>Subconfigurations</h3>
        <p>After a constraint, but before its delimiter, you may specify additional constrains in a series of parens ('(', ')'), which means that any neighborhood that satifies the main constraint must also have subconfigurations that would satisfy the constraints within each set of parens.</p>

        <p>As an example: <i>.(;2a;1c;1+2:3i;2+3:3i;1+2+3:5a;3:2a).</i> (note: an empty constraint means that all neighborhoods satisfy it) represents<br>
            1 1 2<br>
            x o 3<br>
            x x 3<br>
        where <i>x</i> may be any state.</p>

        <h3>Negation</h3>
        <p>Under a transition, a '-' may be used to specify that neighborhoods that satisfy the constraints after it will not cause the transition to occur. These takes priority over non-negated constrains.</p>

        <h2>Example Rules</h2>
        <p><b>B1.;3/S1.;2.;3</b> - Life</p>
        <p><b>B1.;2/1T2.</b> - Brian's Brain</p>
        <p><b>B1.;3;0/B2.;0;3/S1.;;1.;;2.;;3.;;4.;;5.;;6.;;7.;;8.;2.;3./S2.;1.;2.;3.;4.;5.;6.;7.;8.;;2.;;3</b> - Symbiosis</p>

    </body>
</html>

Code: Select all

x = 37, y = 38, rule = //7
24.2A$24.A$21.A4.A2.2A$21.5A.A2.A$7.2A16.B.2A.A.2A$8.A10.4AB3AB2.A2.A
$8.A.AB7.A2.A.A3B2A.A$9.2AB.3B4.7B2.A.2A$11.7B3.7B.A$11.16B.2A$12.15B
$11.16B$9.18B$7.19B$7.2BE15B3.2A$6.3BEBE4B.7B5.A$7.2B3E4B2.7B4.A.2A$
6.5BE4B2.8B4.A.A$5.10B4.7B5.B$4.4B10.8B2.B.3B$4.3B11.8B.7B$2.4B12.17B
$2.2C14.18B$3.C13.20B$3C15.19B$C17.19B$19.17B$20.11B$24.6B$24.7B$23.
8B$24.6B$25.5BD$25.4BDBD$25.5B2D$25.6B$26.4B$27.2B!

Code: Select all

 x = 3, y = 3, rule = B3/S23
bo$2bo$3o!

Code: Select all

 #C
x = 3, y = 3, rule = B3/S23
bo$2bo$3o!

Code: Select all

 
x = 3, y = 3, rule = B3/S23
bo$2bo$3o!

Code: Select all

x = 28, y = 23, rule = B3/S23
bobobo2bobobo2b4obob6o$2o10b3o10b3o9$b2o$obobo2bobobo2b4obob6o$2o10b3o
10b3o9$obobo2bobobo2b4obob6o$2o10b3o10b3o!

Code: Select all

x = 10, y = 10, rule = B3/S23
2$4bo$5bo$3b3o!