<if (likes pie) = [yes]> [broadcast [eat pie]

 (this is (weird))

when gf clicked
if < (You like minigames) = [True.] 
 say [Come check out my game] //http://scratch.mit.edu.ezproxyberklee.flo.org/projects/11757769/
else
 say [Please play anyway] //http://scratch.mit.edu.ezproxyberklee.flo.org/projects/11757769/
end

 [when (green flag) clicked

 [if (Masquerola) = [awesome] and [%c.sprite] = [yellow]] [broadcast [hi]]

everybodyedit wrote:

So THIS is in Scratch_Marziale's backpack!

key [? v] pressed?
wait (0.1) secs
O
S
broadcast [Beeman v]
when I receive [is v]
I
S
wait (0.1) secs
R
A
wait (0.2) secs
N
I
N
T
A
wait (0.2) secs
O
S
broadcast [Tech v]
repeat (10)
	change [ghost v] effect by (10)
end
switch costume to [O2 v]
localMotionAmount
when I receive [6 v]
switch costume to [costume6 v]
clear graphic effects
repeat (8)
	change [pixelate v] effect by (25)
end
repeat (8)
	change [pixelate v] effect by (-25)
end
if ([6] > (Dance Moves Done)) then
when gf clicked
forever
	change [x v] by (10)
end
go to x:((round ((mouse x) / (32))) * (32)) y:((round ((mouse y) / (32))) * (32))
hi
move (10) steps
repeat (2)
	switch costume to [O v]
	wait (0.01) secs
	switch costume to [O v]
	wait (0.01) secs
end
when I receive [8 v]
point in direction (90)
set size to (2)%
show
forever
	turn right (5) degrees
	change size by (4)
	if ((size) > [150]) then
		hide
		stop [this script v].stop
	end
end
when gf clicked
forever
	if (key [right arrow v] pressed?) then
		change [Xvel v] by (1)
	end
	if (key [left arrow v] pressed?) then
		change [Xvel v] by (-1)
	end
	if (key [up arrow v] pressed?) then
		change [Yvel v] by (1)
	end
	if (key [down arrow v] pressed?) then
		change [Yvel v] by (-1)
	end
	set [Xvel v] to ((Xvel) * (0.8))
	set [Yvel v] to ((Yvel) * (0.8))
end
when backdrop switches to [home v]
play sound [  Hello! I'm mike ono 1 o 3 v]
wait (0.04) secs
play sound [  Hello! I'm mike ono 1 o 2 v]
when gf clicked
set [scroll terget v] to [180]
set [scroll v] to [0]
hide variable [scroll terget v]
hide variable [scroll v]
set [color v] effect to (0)
wait (0.5) secs
forever
	if ((backdrop name) = [home]) then
		change [scroll v] by (((scroll terget) - (scroll)) * (0.3))
	end
	set [color v] effect to (scroll terget)
end
when gf clicked
go to x:(0) y:(0)
point in direction (90)
set size to (50)%
set [brightness v] effect to (-100)
repeat (30)
	change size by (1)
	change [brightness v] effect by (3.33333)
end
forever
	go to x:((mouse x) / ((-100) / (size))) y:((mouse y) / ((-100) / (size)))
	if (mouse down?) then
end
when gf clicked
go to x:(-220) y:(159)
hide
if ((!) = [0]) then
	clear
end
set [! v] to [0]
forever
	ask [] and wait
	if ((answer) = []) then
end
when gf clicked
clear
set pen color to 
show
go to x:(0) y:(0)
point in direction (90)
play sound [Pokémon Title v]
set pen color to 
pen down
clear
forever
	if on edge, bounce
	move (1) steps
	if (touching [_edge_ v]?) then
		change y by (1)
	end
	if ((y position) > [170]) then
		pen up
		go to x:(0) y:(-160)
		change pen color by (25)
		pen down
	end
end
when gf clicked
if (not ([All viewers v] contains (username))) then
	add (username) to [All viewers v]
end
when gf clicked
forever
	delete (all) of [Current viewers v]
	if (not ([Current viewers v] contains (username))) then
		add (username) to [Current viewers v]
	end
end

everybodyedit wrote:

So THIS is in Scratch_Marziale's backpack!

key [? v] pressed?
wait (0.1) secs
O
S
broadcast [Beeman v]
when I receive [is v]
I
S
wait (0.1) secs
R
A
wait (0.2) secs
N
I
N
T
A
wait (0.2) secs
O
S
broadcast [Tech v]
repeat (10)
	change [ghost v] effect by (10)
end
switch costume to [O2 v]
localMotionAmount
when I receive [6 v]
switch costume to [costume6 v]
clear graphic effects
repeat (8)
	change [pixelate v] effect by (25)
end
repeat (8)
	change [pixelate v] effect by (-25)
end
if ([6] > (Dance Moves Done)) then
when gf clicked
forever
	change [x v] by (10)
end
go to x:((round ((mouse x) / (32))) * (32)) y:((round ((mouse y) / (32))) * (32))
hi
move (10) steps
repeat (2)
	switch costume to [O v]
	wait (0.01) secs
	switch costume to [O v]
	wait (0.01) secs
end
when I receive [8 v]
point in direction (90)
set size to (2)%
show
forever
	turn right (5) degrees
	change size by (4)
	if ((size) > [150]) then
		hide
		stop [this script v].stop
	end
end
when gf clicked
forever
	if (key [right arrow v] pressed?) then
		change [Xvel v] by (1)
	end
	if (key [left arrow v] pressed?) then
		change [Xvel v] by (-1)
	end
	if (key [up arrow v] pressed?) then
		change [Yvel v] by (1)
	end
	if (key [down arrow v] pressed?) then
		change [Yvel v] by (-1)
	end
	set [Xvel v] to ((Xvel) * (0.8))
	set [Yvel v] to ((Yvel) * (0.8))
end
when backdrop switches to [home v]
play sound [  Hello! I'm mike ono 1 o 3 v]
wait (0.04) secs
play sound [  Hello! I'm mike ono 1 o 2 v]
when gf clicked
set [scroll terget v] to [180]
set [scroll v] to [0]
hide variable [scroll terget v]
hide variable [scroll v]
set [color v] effect to (0)
wait (0.5) secs
forever
	if ((backdrop name) = [home]) then
		change [scroll v] by (((scroll terget) - (scroll)) * (0.3))
	end
	set [color v] effect to (scroll terget)
end
when gf clicked
go to x:(0) y:(0)
point in direction (90)
set size to (50)%
set [brightness v] effect to (-100)
repeat (30)
	change size by (1)
	change [brightness v] effect by (3.33333)
end
forever
	go to x:((mouse x) / ((-100) / (size))) y:((mouse y) / ((-100) / (size)))
	if (mouse down?) then
end
when gf clicked
go to x:(-220) y:(159)
hide
if ((!) = [0]) then
	clear
end
set [! v] to [0]
forever
	ask [] and wait
	if ((answer) = []) then
end
when gf clicked
clear
set pen color to 
show
go to x:(0) y:(0)
point in direction (90)
play sound [Pokémon Title v]
set pen color to 
pen down
clear
forever
	if on edge, bounce
	move (1) steps
	if (touching [_edge_ v]?) then
		change y by (1)
	end
	if ((y position) > [170]) then
		pen up
		go to x:(0) y:(-160)
		change pen color by (25)
		pen down
	end
end
when gf clicked
if (not ([All viewers v] contains (username))) then
	add (username) to [All viewers v]
end
when gf clicked
forever
	delete (all) of [Current viewers v]
	if (not ([Current viewers v] contains (username))) then
		add (username) to [Current viewers v]
	end
end

Serkrou wrote:

i typed in “RealMovieMaker9000”
& i got this

switch costume to [costume8 v]
wait (0.01) secs
switch costume to [costume9 v]
wait (0.01) secs
when gf clicked
forever
	play sound [My Little Pony - What My Cutie Mark is Telling Me v] until done
end
wait (2) secs
repeat (10)
	change [ghost v] effect by (25)
end
wait (2) secs
repeat (10)
	change [ghost v] effect by (25)
end
when gf clicked
forever
	go to front
end
when gf clicked
forever
	go to front
end
when gf clicked
forever
	go to front
end
forever
	change [whirl v] effect by (50)
end
wait (0.5) secs
play sound [a month v] until done
play sound [is not v] until done
wait (0.5) secs
play sound [a month v] until done
when I receive [3 v]
wait (0.6) secs
repeat (2)
	switch costume to [costume4 v]
	wait (0.08) secs
	next costume
	wait (0.08) secs
	switch costume to [costume3 v]
	wait (0.3) secs
end
broadcast [4 v]
hide
when I receive [3 v]
wait (0.6) secs
repeat (2)
	switch costume to [costume4 v]
	wait (0.08) secs
	next costume
	wait (0.08) secs
	switch costume to [costume3 v]
	wait (0.3) secs
end
broadcast [4 v]
hide
switch backdrop to ['is mayonnise an v]
change [  v] by (-1)
play sound [is v] until done
play sound [a month v] until done
play sound [an insturment v] until done
switch backdrop to [bandicam 2012-1 v]
play sound [no patrick v] until done
play sound [a month v] until done
play sound [is not a instrum v] until done
switch backdrop to ['is mayonnise an v]
change [  v] by (-1)
play sound [is v] until done
play sound [DoTheFlop v] until done
play sound [an insturment v] until done
switch backdrop to [bandicam 2012-1 v]
play sound [no patrick v] until done
play sound [DoTheFlop v] until done
play sound [is not a instrum v] until done
switch backdrop to ['is mayonnise an v]
change [  v] by (-1)
play sound [is v] until done
play sound [sandvich v] until done
play sound [an insturment v] until done
switch backdrop to [bandicam 2012-1 v]
play sound [no patrick v] until done
play sound [sandvich v] until done
play sound [is not a instrum v] until done
hide variable [  v]
switch backdrop to [backdrop1 v]
forever
	play sound [Level 49 v] until done
end
switch backdrop to ['is mayonnise an v]
play sound [is v] until done
play sound [DrOctogonapus1 v] until done
play sound [an insturment v] until done
repeat (100)
	change [ghost v] effect by (-1)
end
wait (0.5) secs
repeat (100)
	change [ghost v] effect by (1)
end
repeat (100)
	change [ghost v] effect by (-1)
end
wait (0.5) secs
repeat (100)
	change [ghost v] effect by (1)
end
repeat (100)
	change [ghost v] effect by (-1)
end
wait (0.5) secs
repeat (100)
	change [ghost v] effect by (1)
end
say [Hello!] for (2) secs
say [Hello!] for (2) secs
play sound [is not v] until done
wait (0.5) secs
play sound [a month v] until done
play sound [is not v] until done
wait (0.5) secs
play sound [a month v] until done
wait (0.5) secs
play sound [a month v] until done
wait (0.5) secs
play sound [a month v] until done
when gf clicked
clear
forever
	stamp
	go to x:(pick random (-480) to (480)) y:(pick random (-640) to (640))
end
when gf clicked
clear
forever
	stamp
	go to x:(pick random (-480) to (480)) y:(pick random (-640) to (640))
end
when gf clicked
clear
forever
	stamp
	go to x:(pick random (-480) to (480)) y:(pick random (-640) to (640))
end
play sound [what is love (sh v] until done
repeat (20)
	change [ghost v] effect by (5)
end
broadcast [flying car v]
hide
when [left arrow v] key pressed
switch backdrop to ((backdrop #) - (1))
when [right arrow v] key pressed
next backdrop
when [right arrow v] key pressed
next backdrop
when [right arrow v] key pressed
next backdrop
when [left arrow v] key pressed
switch backdrop to ((backdrop #) - (1))
when [left arrow v] key pressed
switch backdrop to ((backdrop #) - (1))
repeat (109)
	switch backdrop to ((backdrop #) - (1))
	wait (0) secs
end
repeat (109)
	switch backdrop to ((backdrop #) - (1))
	wait (0) secs
end
repeat (109)
	switch backdrop to ((backdrop #) - (1))
	wait (0) secs
end
repeat (109)
	next backdrop
	wait (0) secs
end
wait (2) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
play sound [kcartdnuos ewe v]
wait (0.1) secs
play sound [ewe soundtrack2 v]
wait (0.1) secs
when I receive [ok now that were here v]
repeat until ((?) = [1])
	switch backdrop to [background7 v]
	wait (0.05) secs
	switch backdrop to [background8 v]
	wait (0.05) secs
end
when gf clicked
show
broadcast [flying car v]
hide

when I receive [begin v]
hide
set [explosionSound v] to [0]
set [TNTClones v] to [0]
set volume to (20)%
forever
    run all requests
end


define run all requests
repeat until <not <(length of [explodeID v]) > [0]>>
    explode ID: (item (1 v) of [explodeID v])
    if <<(item (item (1 v) of [explodeID v]) of [worldBlockVisibility v]) = [1]> and <(pick random (1) to ((TNTClones) + (1))) = [1]>> then
        go to x:((item (item (1 v) of [explodeID v]) of [worldx v]) + (blocksposx)) y:((item (item (1 v) of [explodeID v]) of [worldy v]) + (blocksposy))
        if <not <(explosionSound) < [4]>> then
            set [explosionSound v] to [1]
        else
            change [explosionSound v] by (1)
        end
        set [explosionPositionID v] to (item (1 v) of [explodeID v])
        create clone of [myself v]
    end
    delete (1 v) of [explodeID v]
end


when I start as a clone
change [TNTClones v] by (1)
switch costume to [explosion1 v]
set size to (200)%
go to front
play sound (explosionSound)
show
wait (0.05) secs
repeat (7)
    next costume
    wait (0.05) secs
end
change [TNTClones v] by (-1)
delete this clone

when I start as a clone
forever
    go to x:((item (explosionPositionID) of [worldx v]) + (blocksposx)) y:((item (explosionPositionID) of [worldy v]) + (blocksposy))
end


define explode ID: (eID)
destroy block at ID: (((eID) - (2)) - (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) - (32)) y: ((item (eID) of [worldy v]) + (32)) with mode: (1)
destroy block at ID: (((eID) - (1)) - (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) - (16)) y: ((item (eID) of [worldy v]) + (32)) with mode: (0)
destroy block at ID: ((eID) - (([sqrt v] of (length of [world v])) * (2))) x: (item (eID) of [worldx v]) y: ((item (eID) of [worldy v]) + (32)) with mode: (0)
destroy block at ID: (((eID) + (1)) - (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) + (16)) y: ((item (eID) of [worldy v]) + (32)) with mode: (0)
destroy block at ID: (((eID) + (2)) - (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) + (32)) y: ((item (eID) of [worldy v]) + (32)) with mode: (1)
destroy block at ID: (((eID) - (2)) - ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) - (32)) y: ((item (eID) of [worldy v]) + (16)) with mode: (0)
destroy block at ID: (((eID) - (1)) - ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) - (16)) y: ((item (eID) of [worldy v]) + (16)) with mode: (0)
destroy block at ID: ((eID) - ([sqrt v] of (length of [world v]))) x: (item (eID) of [worldx v]) y: ((item (eID) of [worldy v]) + (16)) with mode: (0)
destroy block at ID: (((eID) + (1)) - ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) + (16)) y: ((item (eID) of [worldy v]) + (16)) with mode: (0)
destroy block at ID: (((eID) + (2)) - ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) + (32)) y: ((item (eID) of [worldy v]) + (16)) with mode: (0)
destroy block at ID: ((eID) - (2)) x: ((item (eID) of [worldx v]) - (32)) y: (item (eID) of [worldy v]) with mode: (0)
destroy block at ID: ((eID) - (1)) x: ((item (eID) of [worldx v]) - (16)) y: (item (eID) of [worldy v]) with mode: (0)
destroy block at ID: (eID) x: (item (eID) of [worldx v]) y: (item (eID) of [worldy v]) with mode: (2)
destroy block at ID: ((eID) + (1)) x: ((item (eID) of [worldx v]) + (16)) y: (item (eID) of [worldy v]) with mode: (0)
destroy block at ID: ((eID) + (2)) x: ((item (eID) of [worldx v]) + (32)) y: (item (eID) of [worldy v]) with mode: (0)
destroy block at ID: (((eID) - (2)) + ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) - (32)) y: ((item (eID) of [worldy v]) - (16)) with mode: (0)
destroy block at ID: (((eID) - (1)) + ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) - (16)) y: ((item (eID) of [worldy v]) - (16)) with mode: (0)
destroy block at ID: ((eID) + ([sqrt v] of (length of [world v]))) x: (item (eID) of [worldx v]) y: ((item (eID) of [worldy v]) - (16)) with mode: (0)
destroy block at ID: (((eID) + (1)) + ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) + (16)) y: ((item (eID) of [worldy v]) - (16)) with mode: (0)
destroy block at ID: (((eID) + (2)) + ([sqrt v] of (length of [world v]))) x: ((item (eID) of [worldx v]) + (32)) y: ((item (eID) of [worldy v]) - (16)) with mode: (0)
destroy block at ID: (((eID) - (2)) + (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) - (32)) y: ((item (eID) of [worldy v]) - (32)) with mode: (1)
destroy block at ID: (((eID) - (1)) + (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) - (16)) y: ((item (eID) of [worldy v]) - (32)) with mode: (0)
destroy block at ID: ((eID) + (([sqrt v] of (length of [world v])) * (2))) x: (item (eID) of [worldx v]) y: ((item (eID) of [worldy v]) - (32)) with mode: (0)
destroy block at ID: (((eID) + (1)) + (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) + (16)) y: ((item (eID) of [worldy v]) - (32)) with mode: (0)
destroy block at ID: (((eID) + (2)) + (([sqrt v] of (length of [world v])) * (2))) x: ((item (eID) of [worldx v]) + (32)) y: ((item (eID) of [worldy v]) - (32)) with mode: (1)


define destroy block at ID: (dID) x: (x) y: (y) with mode: (mode)
if <<not <<(dID) < [1]> or <(dID) > (length of [world v])>>> and <<[worldx v] contains (x)> and <[worldy v] contains (y)>>> then
    if <(mode) = [0]> then
        if <<(item (dID) of [world v]) = [26]> or <(item (dID) of [world v]) = [27]>> then
            if <(item (dID) of [world v]) = [26]> then
                replace item (dID) of [worldData v] with (pick random (2) to (6))
                replace item (dID) of [world v] with [27]
            end
        else
            replace item (dID) of [world v] with [1]
        end
    end
    if <(mode) = [1]> then
        if <(pick random (1) to (2)) = [1]> then
            if <<(item (dID) of [world v]) = [26]> or <(item (dID) of [world v]) = [27]>> then
                if <(item (dID) of [world v]) = [26]> then
                    replace item (dID) of [worldData v] with (pick random (2) to (6))
                    replace item (dID) of [world v] with [27]
                end
            else
                replace item (dID) of [world v] with [1]
            end
        end
    end
    if <(mode) = [2]> then
        if <(item (dID) of [world v]) = [26]> then
            replace item (dID) of [worldData v] with (pick random (2) to (6))
            replace item (dID) of [world v] with [27]
        else
            replace item (dID) of [world v] with [1]
        end
    end
end

when green flag clicked
if <(username) = []> then
    switch backdrop to [backdrop4 v]
    stop [all v]
end
switch backdrop to [backdrop3 v]
delete (all v) of [alphabet v]
set [str v] to [abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890-_+=]
set [counter v] to [0]
repeat (length of (str))
    change [counter v] by (1)
    add (letter (counter) of (str)) to [alphabet v]
end
delete (all v) of [who voted v]
set [big counter v] to [-1]
set [current item v] to []
repeat (length of ((☁ voted) / (2)))
    change [big counter v] by (2)
    set [current letter combo v] to (join (letter (big counter) of (☁ voted)) (letter ((big counter) + (1)) of (☁ voted)))
    if <(current letter combo) = [00]> then
        decode number (current item)
        add (temp output) to [who voted v]
        set [current item v] to []
    else
        set [current item v] to (join (current item) (current letter combo))
    end
end
decode number (current item)
add (temp output) to [who voted v]
set [current item v] to []
if <[who voted v] contains (username)> then
    switch backdrop to [backdrop2 v]
    stop [all v]
else
    switch backdrop to [backdrop1 v]
    broadcast [let the voting begin! v]
end


define encode (string)
set [temp output v] to []
set [counter v] to [0]
repeat (length of (string))
    change [counter v] by (1)
    set [counter2 v] to [0]
    repeat until <(item (counter2) of [alphabet v]) = (letter (counter) of (string))>
        change [counter2 v] by (1)
    end
    if <(length of (counter2)) = [1]> then
        set [counter2 v] to (join [0] (counter2))
    end
    set [temp output v] to (join (temp output) (counter2))
end


define decode number (number)
set [temp output v] to []
set [counter v] to [-1]
repeat (length of ((number) / (2)))
    change [counter v] by (2)
    set [counter2 v] to (join (letter (counter) of (number)) (letter ((counter) + (1)) of (number)))
    set [counter2 v] to (item (counter2) of [alphabet v])
    set [temp output v] to (join (temp output) (counter2))
end


when I receive [voted v]
wait (1) secs
encode (username)
set [☁ voted v] to ((join (☁ voted) (join [00] (temp output))) * (1))
switch backdrop to [backdrop2 v]
stop [all v]


define decode number (number)
set [temp output v] to []
set [counter v] to [-1]
repeat (length of ((number) / (2)))
    change [counter v] by (2)
    set [counter2 v] to (join (letter (counter) of (number)) (letter ((counter) + (1)) of (number)))
    set [counter2 v] to (item (counter2) of [alphabet v])
    set [temp output v] to (join (temp output) (counter2))
end


when I receive [let the voting begin! v]
wait until <<mouse down?> and <touching [mouse-pointer v]?>>
change [☁ safari v] by (1)
broadcast [voted v]


when I receive [let the voting begin! v]
wait until <<mouse down?> and <touching [mouse-pointer v]?>>
change [☁ ie v] by (1)
broadcast [voted v]


when I receive [let the voting begin! v]
wait until <<mouse down?> and <touching [mouse-pointer v]?>>
change [☁ firefox v] by (1)
broadcast [voted v]


when I receive [let the voting begin! v]
wait until <<mouse down?> and <touching [mouse-pointer v]?>>
change [☁ chrome v] by (1)
broadcast [voted v]

when I start as a clone
repeat (10)
	move (10) steps
end
when I start as a clone
forever
	move (10) steps
end
(x)
when I start as a clone
forever
	move (x) steps
end
touching [ v]?
(x)
define decode number (number)
set [temp output v] to []
set [counter v] to [-1]
repeat (number)
	change [counter v] by (x)
	set [counter2 v] to []
	repeat (round (1))
		set [x v] to (direction)
	end
	set [counter2 v] to (x)
	set [temp output v] to []
end

curiouscrab wrote:

Duplicate of this, which was made way before this one. Should be closed.

blob8108 wrote:

curiouscrab wrote:

Duplicate of this, which was made way before this one. Should be closed.

This is stickied and has 5x the replies. I think jvvg won.

curiouscrab wrote:

professional