Recipe: Quake

created by joshmiller

Profile

• Name: Quake
• ID: 104142
• Shared with: Public
• Parent: None
• Children:
  • Quake (COPY)
  • Quake (COPY)
  • Quake (COPY)
• Created on: November 24, 2020 at 22:39 PM UTC
• Updated on: November 24, 2020 at 22:39 PM UTC
• Description:

  Originally by Grom from https://fold.it/portal/recipe/1853, Converted to Lua by joshmiller

Code

-- Quake by Grom
-- from https://fold.it/portal/recipe/1853
-- original description: Used 37909 times with an average impact of 4195 points.
-- conversion by joshmiller

function BandByStride (firstStride, firstIndex, secondStride, secondIndex)
    local segCnt = structure.GetCount ()
    for ii = firstIndex, segCnt, firstStride do
        for jj = secondIndex, segCnt, secondStride do
                if (ii >= jj) then
                    band.AddBetweenSegments (ii, jj)
                end
        end
    end
end

function SetAllRecipeBandStrength(strength)
    local numBands = band.GetCount ()
    for i = 1, numBands do
        if band.IsRecipeBand(i) then
            band.SetStrength(i, strength)
        end
    end
end

function Quake()
    structure.WiggleAll (2)

    band.DeleteAll (true)

    structure.ShakeSidechainsAll (2)

    structure.WiggleAll (10)

    structure.ShakeSidechainsAll (1)

    structure.WiggleAll (7)

    structure.WiggleAll (10)

    structure.ShakeSidechainsAll (1)

    structure.WiggleAll (7)
end


band.DeleteAll (true)

recentbest.Save()

BandByStride(30, 1, 30, 15)

SetAllRecipeBandStrength(0.16)

Quake()

recentbest.Restore ()

recentbest.Save()

BandByStride(30, 5, 30, 20)

SetAllRecipeBandStrength(0.24)

Quake()

recentbest.Restore ()

recentbest.Save()

BandByStride(30, 10, 30, 25)

SetAllRecipeBandStrength(0.24)

Quake()

recentbest.Restore ()

recentbest.Save()

BandByStride(100, 5, 100, 30)

SetAllRecipeBandStrength(0.40)

Quake()

recentbest.Restore ()

recentbest.Save()

BandByStride(100, 15, 100, 40)

SetAllRecipeBandStrength(0.40)

Quake()

recentbest.Restore ()

recentbest.Save()

BandByStride(100, 25, 100, 50)

SetAllRecipeBandStrength(0.40)

Quake()

recentbest.Restore ()