when [ swag] key pressed
if <swag> then 
go to [ swag land]
  
be happy

else
set [ dead] to [1]
end

([ dripieness] of (swag))

call (((5) x () :: operators)with input names ((#1) :: grey)@delInput@addInput :: ring grey) @addInput :: control reporter
when <> :: control hat
map (()@addInput) over (list) :: list reporter
pen down? :: pen boolean

when green flag clicked
set [clone v] to [0]
repeat (2)
change [clone v] by (1)
create clone of [myself v]
end
set y to (0)
forever
set x to (mouse x)
end

when I start as a clone
next costume
if <(clone) = [1]> then
forever
set x to ((mouse x) - (360))
end
end
if <(clone) = [2]> then
forever
set x to ((mouse x) + (360))
end
end

when green flag clicked
say [Sorry, Let's close the topic]
play sound [Game Over v] until done

Fancade-Arcade-Games wrote:

when green flag clicked
say [Sorry, Let's close the topic]
play sound [Game Over v] until done

when topic is [closed v] :: hat sensing
wait until <[scratchblocks testing topic 5] has [come v] :: operators> :: control

script :: hat :: sound // The script that say's hi. :)
Hi  <hi:: looks> (hi :: pen){
turn script :: motion
}{
change [meow v] effect by (25)}{
scratch :: events} :: pen :: cap

define pen poo
set pen color to [#964B00]
set pen size to (50)
go to x: (0) y: (0)
pen down
glide (1) secs to x: (60) y: (0)
set volume to (1000) %
play sound [plop v]
pen up

Fancade-Arcade-Games wrote:

when green flag clicked
say [Sorry, Let's close the topic]
play sound [Game Over v] until done

wait wat?
wait until <??::#758efb>

MInecraft_textures wrote:

//So... I made custom blocks in Snap!
//Btw, some of you may say, "Hey, there's already a <() contains ()?> block!".
//Well, technically, you guys are right, it is in SCRATCH.  But NOT in Snap!

<((text1) :: #00c290) contains ((text2) :: #00c290)? :: #00c290> :: control hat
set [? contains ? List v] to (list [] @delInput @addInput :: list)
set [? contains ? Variable v] to [0]
repeat (length of text (text1) :: operators)
change [? contains ? Variable v] by [1]
add (letter (? contains ? Variable :: variables) of (text1)) to (? contains ? List)
end
if <(? contains ? List) contains (text2) :: list> then
report <<true⠀(:: #dedede) :: #23ed21> :: operators> :: control cap
else
report <<(:: #dedede)⠀false:: #c90c0c> :: operators> :: control cap
end

//This next block requires the one I made above
(point towards x: ((X) :: #00c290) y: ((Y) :: #00c290) :: stack #00c290) :: control hat
point in direction ((<((X) - (x position)) contains [-] :: #00c290> * (180)) - ([atan v] of (((Y) - (y position)) / ((X) - (x position))))

//These next five are simple
<X position is equal to ((X) :: #00c290) :: #00c290> :: control hat
if <(x position) = (X)> then
report <<true⠀(:: #dedede) :: #23ed21> :: operators> :: control cap
else
report <<(:: #dedede)⠀false:: #c90c0c> :: operators> :: control cap
end

<Y position is equal to ((Y) :: #00c290) :: #00c290> :: control hat
if <(y position) = (Y)> then
report <<true⠀(:: #dedede) :: #23ed21> :: operators> :: control cap
else
report <<(:: #dedede)⠀false:: #c90c0c> :: operators> :: control cap
end

(previous costume :: stack #00c290) :: control hat
switch costume to ((costume #) - (1))

(((reporter) :: #00c290) reporter :: #00c290) :: control hat
report (reporter) :: control cap

<((input) :: #00c290) boolean :: #00c290> :: control hat
report (input) :: control cap

//And finally, the last one.
(draw shape with ((sides) :: #00c290) sides and a length of ((length):: #00c290) :: stack #00c290) :: control hat
set [percentage done v] to [0]
show variable [percentage done v]
pen down
repeat (sides)
change [percentage done v] by ((100) / (sides))
move ((length) * (2.5)) steps
turn @turnLeft ((360) / (sides)) degrees
end
pen up
wait (0.2) seconds
hide variable [percentage done v]

move (2) steps
say [hello!]
rest for (3) beats
when backdrop switches to [hi v]
if <(pick random (1) to (10)) > [5]> then
pen up
end

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

if <> then 
if <> then 
if <> then 
if <> then 
if <> then 
if <> then 
if <> then 
if <> then 
if <> then 

  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end
  

else

end

<test>

set pen color to [if <> then
end]
broadcast [<[17] = [17]> v]

when green flag clicked
end
wait until <()>
else
else
(mouse down?)
<mouse down?>
<distance to [ v]>
if <distance to [ v]> then

end
([] = [])
<() + (0)>
if <([] = []) + (0)> then

end

<x position>

(not <>)
<not ()>
(<> and <>)

when [children v] get [infected v] by [the v] [Cocomelon] [zombification v] :: hat events
make a cult of [stopping Cocomelon] :: #000000

when [script is run v]
add extension [serious dev blocks v]
print text [press any key to continue] in font [graffiti v]
forever if <pen down?>
change X by [5]
report [last X position v] to [last X v]
end

when [user types v]
play game and print countdown from [5]
print text [GO!] in font [pick random v]
forever if <(device) = [mobile]>
use [mobile v] mode

<volume>
(item <volume> of [list v] :: list)
<backdrop name> 
(video <x position>  on (backdrop #))
<timer> and <timer>
<pick random <> to <>>
([ v] contains [thing] ?)
if () then

end
else

(key (<x position> of [Sprite1 v]) pressed?)
rest for <y position> beats

wait until ()

wait <> secs

end