Scratch

CheckItNow12 · 2012-09-21 18:57:07

when gf clicked
EAT ALL THE COOKIES!

bullelk12 · 2012-09-21 19:37:14

when gf clicked
set [question # v] to (1)
broadcast [question v]

when i receive [question v]
if <(question #) = (1)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = item [1 v] of [possible answer v]>
broadcast [correct v]
else
broadcast [incorrect v]
end
end
if <(question #) = (2)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = item [1 v] of [possible answer v]>
broadcast [correct v]
else
broadcast [incorrect v]

when i receive [correct v]
say [correct!] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

when i receive [incorrect v]
say [ohhhh, sorry. incorrect] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

Last edited by bullelk12 (2012-09-21 19:55:56)

ctjet · 2012-09-22 02:00:35

[scratchblocks]
when gf clicked
Broadcast (pizza)
[scratchblocks]

Splodgey · 2012-09-22 04:25:22

ctjet wrote:

when gf clicked
Broadcast [pizza v]

[/scratchblocks] at the end not [scratchblocks]. [scratchblocks] only goes at the beginning.

Code:

[scratchblocks]
when gf clicked
Broadcast [pizza v]
[/scratchblocks]

Last edited by Splodgey (2012-09-22 04:26:01)

maxamillion321 · 2012-09-22 10:51:40

when gf clicked
if <(test) = [pop quiz]>
say [NOOOOOOOO!!!]
start [test v]
set [all questions v] to [all right answers]
end
if <(test) = (done)>
say [I'm Done!!!]
give [test v] to [teacher v]
end
if <(test) = (100% A)>
say [Yay!!!]
run out of [school v]
go to [house v]
end

Last edited by maxamillion321 (2012-09-22 10:52:49)

maxamillion321 · 2012-09-22 10:56:27

when gf (not) clicked
repeat (not) until <(timer) > [10]>
go (not) to [mouse-pointer v]
end
think (not) [Scripts in your posts!] for (3) sec

Last edited by maxamillion321 (2012-09-22 10:58:48)

3sal2 · 2012-09-22 11:42:42

bullelk12 wrote:

when gf clicked
set [question # v] to (1)
broadcast [question v]

when i receive [question v]
if <(question #) = (1)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = (item [1 v] of [possible answers v])>
broadcast [correct v]
else
broadcast [incorrect v]
end
end
if <(question #) = (2)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = (item [1 v] of [possible answers v])>
broadcast [correct v]
else
broadcast [incorrect v]

when i receive [correct v]
say [correct!] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

when i receive [incorrect v]
say [ohhhh, sorry. incorrect] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

Fixed cool

BLU_Spy · 2012-09-22 12:46:53

when gf clicked
if<hurt?>
broadcast (MEDIC!)
else
point towards [enemy intelligence]
move (30) steps
end
forever if <touching [enemy intelligence]?
go to [base]
broadcast (victory)
end

when gf clicked
forever
wait until < (enemy) = [distracted] >
say [Surprise!]
backstab

Last edited by BLU_Spy (2012-09-22 12:55:12)

MrFlash67 · 2012-09-22 16:43:42

BLU_Spy wrote:

when gf clicked
if<hurt?>
broadcast (MEDIC!)
else
point towards [enemy intelligence]
move (30) steps
end
forever if <touching [enemy intelligence v] ?>
go to [base]
broadcast (victory)
end

when gf clicked
forever
wait until < (enemy) = [distracted] >
say [Surprise!]
backstab

Fixed.

gfchll · 2012-09-22 16:56:51

MrFlash67 wrote:

BLU_Spy wrote:

when gf clicked
if<hurt?>
broadcast (MEDIC!)
else
point towards [enemy intelligence v]
move (30) steps
end
forever if <touching [enemy intelligence v] ?>
go to [base v]
broadcast (victory)
end

when gf clicked
forever
wait until < (enemy) = [distracted] >
say [Surprise!]
backstab

Fixed.

fixed again

3sal2 · 2012-09-22 17:01:48

gfchll wrote:

MrFlash67 wrote:

BLU_Spy wrote:

when gf clicked
if<hurt?>
broadcast (MEDIC!)
else
point towards [enemy intelligence v]
move (30) steps
end
forever if <touching [enemy intelligence v] ?>
go to [base v]
broadcast (victory)
end

when gf clicked
forever
wait until < (enemy) = [distracted] >
say [Surprise!]
backstab

Fixed.

fixed again

Is that too violent?

maxamillion321 · 2012-09-22 19:45:33

3sal2 wrote:
gfchll wrote:
MrFlash67 wrote:

Fixed.
fixed again
Is that too violent?

I think so...

maxamillion321 · 2012-09-22 19:47:37

<<<=>=> = <<=>=>>

Last edited by maxamillion321 (2012-09-22 19:48:28)

maxamillion321 · 2012-09-22 19:50:41

when gf clicked
if <(blah) = (blah)>
repeat [blah]
repeat [40000000]
say [blah]

Last edited by maxamillion321 (2012-09-22 19:51:08)

ErnieParke · 2012-09-22 19:51:23

3sal2 wrote:

bullelk12 wrote:

when gf clicked
set [question # v] to (1)
broadcast [question v]

when i receive [question v]
if <(question #) = (1)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = (item [1 v] of [possible answers v])>
broadcast [correct v]
else
broadcast [incorrect v]
end
end
if <(question #) = (2)>
add (correct answer) to [possible answers v]
add (answer 2) to [possible answers v]
add (answer 3) to [possible answers v]
ask [question] and wait
if <(answer) = (item [1 v] of [possible answers v])>
broadcast [correct v]
else
broadcast [incorrect v]
end
end

when i receive [correct v]
say [correct!] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

when i receive [incorrect v]
say [ohhhh, sorry. incorrect] for (2) secs
change [question # v] by (1)
delete [all v] of [possible answers v]
broadcast [question v]

Fixed cool

Fixed.

bullelk12 wrote:

when i receive [change scene v]
go to x: ((x position) * (-.95)) y: (y position)

Fixed.

Last edited by ErnieParke (2012-09-22 19:54:33)

maxamillion321 · 2012-09-22 19:53:18

when green flag clicked
point in direction (90)
set [PlayerX v] to (0)
set [PlayerY v] to (0)
set [LevelNumber v] to (1)
set [Dir v] to (0)
set [Xvel v] to (0)
set [Yvel v] to (0)
forever  
clear
go to x: (0) y: (0)
switch to costume ((LevelNumber)+(1))
stamp
switch to costume [Marble v]
if <(Dir)=(0)>  
go to x: ((PlayerX)*(30)) y: ((PlayerY)*(30))
else
if <(Dir)=(1)> 
go to x: ((PlayerY)*(30)) y: ((PlayerX)*(-30))
else
if <(Dir)=(2)> 
go to x: ((PlayerX)*(-30)) y: ((PlayerY)*(-30))
else
go to x: ((PlayerY)*(-30)) y: ((PlayerX)*(30))
stamp
if <key [right arrow v] pressed?> 
switch to costume ((LevelNumber)+(1))
go to x: (0) y: (0)
clear
set [Dir v] to (((Dir)+(1)) mod (4))
set [PlayerX v] to (round (PlayerX))
set [PlayerY v] to (round (PlayerY))
repeat (10)  
turn ccw (9) degrees
if <key [left arrow v] pressed?> 
switch to costume ((LevelNumber)+(1))
go to x: (0) y: (0)
clear
set [Dir v] to (((Dir)-(1)) mod (4))
set [PlayerX v] to (round (PlayerX))
set [PlayerY v] to (round (PlayerY))
repeat (10)  
turn ccw (-9) degrees
if <<(Dir)=(0)> and <(0)=(letter((((round (PlayerX))+(0))+(4))+((((round ((PlayerY)+(0.5)))+ (-1))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerY v] by (-0.1)
if <<(Dir)=(1)> and <(0)=(letter((((round ((PlayerX)-(0.5)))+(1))+(4))+((((round ((PlayerY)+(0.5)))+(0))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerX v] by (0.1)
if <<(Dir)=(2)> and <(0)=(letter((((round (PlayerX))+(0))+(4))+((((round ((PlayerY)-(0.5)))+(1)) -(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerY v] by (0.1)
if <<(Dir)=(3)> and <(0)=(letter((((round ((PlayerX)+0.5))+(-1))+(4))+((((round ((PlayerY)-(0.5)))+(0))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerX v] by (-0.1)
end

ErnieParke · 2012-09-22 19:56:37

maxamillion321 wrote:

when green flag clicked
point in direction (90)
set [PlayerX v] to (0)
set [PlayerY v] to (0)
set [LevelNumber v] to (1)
set [Dir v] to (0)
set [Xvel v] to (0)
set [Yvel v] to (0)
forever  
clear
go to x: (0) y: (0)
switch to costume ((LevelNumber)+(1))
stamp
switch to costume [Marble v]
if <(Dir)=(0)>  
go to x: ((PlayerX)*(30)) y: ((PlayerY)*(30))
else
if <(Dir)=(1)> 
go to x: ((PlayerY)*(30)) y: ((PlayerX)*(-30))
else
if <(Dir)=(2)> 
go to x: ((PlayerX)*(-30)) y: ((PlayerY)*(-30))
else
go to x: ((PlayerY)*(-30)) y: ((PlayerX)*(30))
stamp
if <key [right arrow v] pressed?> 
switch to costume ((LevelNumber)+(1))
go to x: (0) y: (0)
clear
set [Dir v] to (((Dir)+(1)) mod (4))
set [PlayerX v] to (round (PlayerX))
set [PlayerY v] to (round (PlayerY))
repeat (10)  
turn ccw (9) degrees
if <key [left arrow v] pressed?> 
switch to costume ((LevelNumber)+(1))
go to x: (0) y: (0)
clear
set [Dir v] to (((Dir)-(1)) mod (4))
set [PlayerX v] to (round (PlayerX))
set [PlayerY v] to (round (PlayerY))
repeat (10)  
turn ccw (-9) degrees
if <<(Dir)=(0)> and <(0)=(letter((((round (PlayerX))+(0))+(4))+((((round ((PlayerY)+(0.5)))+ (-1))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerY v] by (-0.1)
if <<(Dir)=(1)> and <(0)=(letter((((round ((PlayerX)-(0.5)))+(1))+(4))+((((round ((PlayerY)+(0.5)))+(0))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerX v] by (0.1)
if <<(Dir)=(2)> and <(0)=(letter((((round (PlayerX))+(0))+(4))+((((round ((PlayerY)-(0.5)))+(1)) -(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerY v] by (0.1)
if <<(Dir)=(3)> and <(0)=(letter((((round ((PlayerX)+0.5))+(-1))+(4))+((((round ((PlayerY)-(0.5)))+(0))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerX v] by (-0.1)
end
end
end
end
end
end
end
end
end
end
end

Fixed.

maxamillion321 · 2012-09-22 20:02:30

bullelk12 wrote:

when gf clicked
set [question # v] to (1)
broadcast [question v]

when i receive [question v]
if <(question #) = (1)>
add (correct answer) to [question v]
add (answer 2) to [question v]
add (answer 3) to [question v]
ask [question] and wait
if <(answer) = ([1 v] of [question v])>
broadcast [incorrect v]
end
end
if <(question #) = (2)>
add (correct answer) to [question v]
add (answer 2) to [question v]
add (answer 3) to [question v]
ask [question] and wait
if <(answer) = ([1 v] of [question v])>
broadcast [incorrect v]

when i receive [correct answer v]
say [Correct!] for (2) secs
change [question # v] by (1)
delete [all v] of [answers v]
broadcast [wrong answer v]

when i receive [incorrect anwser v]
say [Ohhhh, sorry incorrect answer] for (2) secs
delete [all v] of [incorrect answers v]
change by [question # 1 v]
change by [question # 2 v]
change by [question # 3 v]
broadcast [right answers v]

Fixed.

Last edited by maxamillion321 (2012-09-22 20:13:38)

maxamillion321 · 2012-09-22 20:15:52

say [rainbow :)]
set pen color to [#ff0000]
set pen color to [#ffa800]
set pen color to [#fcff00]
set pen color to [#73ff00]
set pen color to [#00ff9a]
set pen color to [#00ffee]
set pen color to [#0014ff]
set pen color to [#8400ff]
set pen color to [#f900ff]
set pen color to [#ff0000]
set pen color to [#ffa800]
set pen color to [#fcff00]
set pen color to [#73ff00]
set pen color to [#00ff9a]
set pen color to [#00ffee]
set pen color to [#0014ff]
set pen color to [#8400ff]
set pen color to [#f900ff]
set pen color to [#ff0000]
set pen color to [#ffa800]
set pen color to [#fcff00]
set pen color to [#73ff00]
set pen color to [#00ff9a]
set pen color to [#00ffee]
set pen color to [#0014ff]
set pen color to [#8400ff]
set pen color to [#f900ff]

tate88 · 2012-09-22 20:55:14

 when gf clicked
 repeat until <(timer) > [10]>
   go to [mouse-pointer v]
 end
 think [Scripts in your posts!] for (3) secs

tate88 · 2012-09-22 20:59:59

when gf clicked
forever
if <[My dad] = [Not paying attention]>
say [Pay attention!]
play sound [Dad getting slapped in the face v]

ErnieParke · 2012-09-22 21:06:42

tate88 wrote:

when gf clicked
forever
if <[My dad] = [Not paying attention]>
 say [Pay attention!]
 play sound [Dad getting slapped in the face v]
end

Fixed.

3sal2 · 2012-09-22 22:04:26

say [Bananas!] for (OVER 9000!!!) secs

thebriculator · 2012-09-22 23:20:35

ErnieParke wrote:

maxamillion321 wrote:

when green flag clicked
insert large section
if <<(Dir)=(3)> and <(0)=(letter((((round ((PlayerX)+(0.5)))+(-1))+(4))+((((round ((PlayerY)-(0.5)))+(0))-(3))*(-7))) of (item (LevelNumber) of [LevelData v]))>> 
change [PlayerX v] by (-0.1)
end

Fixed.

30-1 · 2012-09-23 06:55:32

go to [somewhere v]//where?
say (variable) for <list> secs

Last edited by 30-1 (2012-09-23 07:07:45)

Scratch

archived forums

#1451 2012-09-21 18:57:07

Re: Official [Scratchblocks] Testing Play Area

#1452 2012-09-21 19:37:14

Re: Official [Scratchblocks] Testing Play Area

#1453 2012-09-22 02:00:35

Re: Official [Scratchblocks] Testing Play Area

#1454 2012-09-22 04:25:22

Re: Official [Scratchblocks] Testing Play Area

ctjet wrote:

Code:

#1455 2012-09-22 10:51:40

Re: Official [Scratchblocks] Testing Play Area

#1456 2012-09-22 10:56:27

Re: Official [Scratchblocks] Testing Play Area

#1457 2012-09-22 11:42:42

Re: Official [Scratchblocks] Testing Play Area

bullelk12 wrote:

#1458 2012-09-22 12:46:53

Re: Official [Scratchblocks] Testing Play Area

#1459 2012-09-22 16:43:42

Re: Official [Scratchblocks] Testing Play Area

BLU_Spy wrote:

#1460 2012-09-22 16:56:51

Re: Official [Scratchblocks] Testing Play Area

MrFlash67 wrote:

BLU_Spy wrote:

#1461 2012-09-22 17:01:48

Re: Official [Scratchblocks] Testing Play Area

gfchll wrote:

MrFlash67 wrote:

BLU_Spy wrote:

#1462 2012-09-22 19:45:33

Re: Official [Scratchblocks] Testing Play Area

3sal2 wrote:

gfchll wrote:

MrFlash67 wrote:

#1463 2012-09-22 19:47:37

Re: Official [Scratchblocks] Testing Play Area

#1464 2012-09-22 19:50:41

Re: Official [Scratchblocks] Testing Play Area

#1465 2012-09-22 19:51:23

Re: Official [Scratchblocks] Testing Play Area

3sal2 wrote:

bullelk12 wrote:

bullelk12 wrote:

#1466 2012-09-22 19:53:18

Re: Official [Scratchblocks] Testing Play Area

#1467 2012-09-22 19:56:37

Re: Official [Scratchblocks] Testing Play Area

maxamillion321 wrote:

#1468 2012-09-22 20:02:30

Re: Official [Scratchblocks] Testing Play Area

bullelk12 wrote:

#1469 2012-09-22 20:15:52

Re: Official [Scratchblocks] Testing Play Area

#1470 2012-09-22 20:55:14

Re: Official [Scratchblocks] Testing Play Area

#1471 2012-09-22 20:59:59

Re: Official [Scratchblocks] Testing Play Area

#1472 2012-09-22 21:06:42

Re: Official [Scratchblocks] Testing Play Area

tate88 wrote:

#1473 2012-09-22 22:04:26

Re: Official [Scratchblocks] Testing Play Area

#1474 2012-09-22 23:20:35

Re: Official [Scratchblocks] Testing Play Area

ErnieParke wrote:

maxamillion321 wrote:

#1475 2012-09-23 06:55:32

Re: Official [Scratchblocks] Testing Play Area

Board footer