;; marfa.txt, (tar) to switch situations
{
;; 1: slippery (listen)
(srate 16)
(jump(tar 1))
(lights(togo))
(togo(dust) 70 44)
(left(right
(wave(water(dust(sauce 40(saw 1 127 60))) 100(add(horn) 30)))
(horn(add(water)(dust)) 12(sauce))
(hornb 28 20(sauceb 10(saw)))
(hornc(togo) 20(sauce))
(smoke(dustb 10 2))
))
}
{
;; 2: bellsprout (listen)
(srate 16)
(jump(tar 1))
(lights(togob))
(togo(sauce 1(dust 2)) 24 18 26 32)
(togob(sauce) 32 24 26 18)
(left(right
(water(saw 1 127) 10 40)
(waterb(sawb 1 123) 10 120 60)
(horn(togo) 24(sauceb 4(pulse(sauce) 127)))
(hornb 24(togob)(saw))
))
}
{
;; 3: chym (hold buttons to set pitch)
(srate 32)
(jump(tar 1))
(lights(and(wheel)(wheelb)(wheelc)(wheeld)))
(left
(horn(wheel(major)(minor)) 24(sauce 4(pulse(dust 10) 100)))
(hornb(wheelb(majorb)(minorb)) 24(sauceb 4(pulseb(dustb 10) 100))))
(right
(hornc(wheelc(majorc)(minorc)) 24(saucec 4(pulsec(dustc 10) 100)))
(hornd(wheeld(majord)(minord)) 24(sauced 4(pulsed(dustd 10) 100))))
}
{
;; 4: restabilizer (squish me, wait for re-stasis)
(srate(add(saw) 32))
(jump(tar 1))
(lights(togob))
(togob(dustb 1)(saw)(horn))
(togo(dust 1)(horn(add(barb)(togob))(corp))(saw(add(barc)(corpb))(togob)))
(togoc(dustc 1)(togo(bar))(togob(bard)))
(left(right
(horne 40 40(add(pulse(dust) 127)(mount(dustb) 20 20)))
(waterb(sawd(add(togob) 1) 127)(add 10(togo))(add 30(togoc 80)))
(water(sawc(add(togo) 1) 127)(add 10(togoc))(add 30(togob 80)))))
}
{
;; 5: horsemorpher (hold buttons to set pitch)
(jump(tar))
(srate 16)
(left(right
(wave
(horse(wheel(major)(minor))(wheelb(majorb)(minorb))(wheelc(majorc)(minorc))(wheeld(majord)(minord)))
 10
(slew(corp 40 20) 20 20))
(waveb
(horseb(wheelb)(wheeld)(wheelc)(wheel))
 10
(slewb(corpb 40 20) 20 20))
))
}