This is a read-only archive of the old Scratch 1.x Forums.
Try searching the current Scratch discussion forums.

Pages: 1 2

Topic closed

#1 2012-10-16 19:58:23

ScratchContest2012
New Scratcher
Registered: 2012-10-16
Posts: 4

Who can make the Best Script with ScratchBlocks???(scratch contest)

Welcome to the 2012 and first annual Scratch Contest! The contest is to make the best script with ScratchBlocks! Anyone can enter!!!

Leaderboards
- no one yet
-no one yet
- no one yet
- no one yet

Offline

 

#2 2012-10-16 20:30:15

Epicness123
Scratcher
Registered: 2011-11-12
Posts: 100+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

Finally a scratch block contest

when gf clicked
Become [ a chocobo]
Go get [Gobo]
go get [Cat]
Make an announcement

I am Epicness123,and I rock!

Offline

 

#3 2012-10-16 20:37:03

zubblewu
Scratcher
Registered: 2011-02-17
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

when gf clicked

go to x: (0) y: (130)
set [xv v] to [0]
set [yv v] to [0]
set [tempcoststorage v] to [1]
set [walking v] to [no]
set [can walljump? v] to [no]
forever  

show
switch to costume [sense v]
set [bleh v] to [0]
change y by (-1)
if <key [left arrow v] pressed?> 

if <touching color [#FF9500]?>

change [xv v] by (-1)
else

change [xv v] by (-0.7)
end

end

if <key [right arrow v] pressed?> 

if <touching color [#FF9500]?>

change [xv v] by (1)
else

change [xv v] by (0.7)
end

end

set [xv v] to ((xv) * (0.9))
if <touching color [#FF9500]?>

if <(xv) > [5]> 

set [xv v] to [5]
end

if <(xv) < [-5]> 

set [xv v] to [-5]
end

change x by ((xv) * (1.5))
else

change x by (xv)
end

change y by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
change [bleh v] by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
change [bleh v] by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
change [bleh v] by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
change [bleh v] by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
change [bleh v] by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>>

change x by ((xv) * (-1))
set [xv v] to [0]
change y by (-5)
if <(can walljump?) = [yes]> 

if <key [up arrow v] pressed?>

change x by (5)
set [c n v] to [-5]
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>>

set [xv v] to [-10]
set [yv v] to [12]
else

change x by (-10)
set [c n v] to [5]
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

set [xv v] to [10]
set [yv v] to [12]
end

end

change x by (c n)
else

end

end

else

set [xv v] to [0]
end

end

end

end

end

end

set [yv v] to ((yv) * (0.9))
change y by (yv)
if <touching color [#00CECE]?>

change y by ((yv) * (-1))
set [yv v] to ((yv) * (-2))
else

if <touching color [#000008]?> 

change y by ((yv) * (-1))
set [yv v] to [0]
end

end

change y by (-4)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>>

change y by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
if <<touching color [#000008]?> or <<touching color [#00CECE]?> or <touching color [#FF9500]?>>> 

change y by (1)
end

end

end

change y by (-1)
if <touching color [#00CECE]?>

if <key [up arrow v] pressed?>

set [yv v] to [24]
else

set [yv v] to ((yv) * (-2))
end

else

set [yv v] to [0]
end

change y by (1)
else

change y by (4)
end

change y by (-1)
if <key [up arrow v] pressed?> 

if <touching color [#00CECE]?>

set [yv v] to [24]
change y by (4)
else

if <<touching color [#000008]?> or <touching color [#FF9500]?>> 

set [yv v] to [12]
change y by (4)
end

end

end

change y by (1)
if <(yv) < [4]> 

change y by (-1)
if <<touching color [#000008]?> or <touching color [#FF9500]?>>

set [yv v] to [0]
else

if <not <touching color [#00CECE]?>> 

change [yv v] by (-1)
end

end

change y by (1)
end

if <( [abs v] of (xv)) > [0.1]>

if <(xv) > [0.1]>

set [dir v] to [L]
else

if <(xv) < [-0.1]> 

set [dir v] to [R]
end

end

if <(timer) > [0.05]> 

if <(tempcoststorage) = [0]>

set [tempcoststorage v] to [1]
else

if <(tempcoststorage) > [3]>

set [tempcoststorage v] to [1]
else

change [tempcoststorage v] by (1)
end

end

set [walking v] to [yes]
reset timer
end

else

set [tempcoststorage v] to [1]
reset timer
set [walking v] to [no]
end

if <(yv) < [-0.3]>

set [tempcoststorage v] to [5]
else

if <(yv) > [0.3]> 

set [tempcoststorage v] to [6]
end

end

switch to costume (tempcoststorage)
end
A real script  tongue

........................................................................................................................................................................................................................................

Offline

 

#4 2012-10-16 21:16:22

ScratchContest2012
New Scratcher
Registered: 2012-10-16
Posts: 4

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

Above,Very good! Your on the Leaderboards with 78 points.

Offline

 

#5 2012-10-16 21:19:44

ScratchContest2012
New Scratcher
Registered: 2012-10-16
Posts: 4

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

Leaderboards
- 1st is zubblewu with 78 Points!
- 2nd is Epicness123 with 12 Points!
- no one yet
- no one yet

How many people have entered:2

Offline

 

#6 2012-10-16 21:30:21

fg123
Scratcher
Registered: 2008-11-13
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)


when gf clicked

set [doRedraw? v] to [true]

set [appPageIndex v] to [0]

forever  

if <(doRedraw?) = [true]> 

clear

hide

go to x: ((((length of [AppName v] ) / (28)) + ((1) - (((length of [AppName v] ) / (28)) mod (1)))) * (-5)) y: (-100)

set x to (0)

set [i v] to [0]

repeat (((length of [AppName v] ) / (28)) + ((1) - (((length of [AppName v] ) / (28)) mod (1))))  

if <(appPageIndex) = (i)>

switch to costume [PageSelect v]

else

switch to costume [PageUnselect v]

end

stamp

change x by (10)

change [i v] by (1)

end

go to x: (0) y: (170)

switch to costume [TopBar v]

stamp

go to x: (0) y: (-154)

switch to costume [dock v]

stamp

set [i v] to (((appPageIndex) * (28)) + (1))

set [i_pos v] to [1]

repeat until <<(i) > (((appPageIndex) + (1)) * (28))> or <(item (i) of [AppName v] ) = []>>  

go to x: ((-180) + ((((i_pos) - (1)) mod (7)) * (60))) y: ((125) + (((((i_pos) - (1)) / (7)) - ((((i_pos) - (1)) / (7)) mod (1))) * (-60)))

switch to costume (item (i) of [AppCostume v] )

stamp

change [i_pos v] by (1)

change [i v] by (1)

end

set [i v] to [1]

repeat (6)  

go to x: ((-210) + ((i) * (60))) y: (-140)

switch to costume (item (i) of [DockCostume v] )

stamp

change [i v] by (1)

end

set [doRedraw? v] to [false]

end

set [NoClick v] to [0]

if <(mouse y) > [-100]>

set x to ((round ((((mouse x) + (20)) / (60)) - ((((mouse x) + (20)) / (60)) mod (1)))) * (60))

set y to (((round ((((mouse y) - (30)) / (60)) - ((((mouse y) - (30)) / (60)) mod (1)))) * (60)) + (65))

switch to costume [Blank v]

if <<(mouse y) > [150]> or <<(mouse y) < [-101]> or <<(mouse x) < [-199]> or <(mouse x) > [200]>>>> 

set [NoClick v] to [1]

end

set [App# v] to (((appPageIndex) * (28)) + ((((((mouse x) + (20)) / (60)) - ((((mouse x) + (20)) / (60)) mod (1))) + (4)) + (((1) - ((((mouse y) - (30)) / (60)) - ((((mouse y) - (30)) / (60)) mod (1)))) * (7))))

if <<not <touching [mouse-pointer v]?>> or <(item (App#) of [AppName v] ) = []>> 

set [NoClick v] to [1]

end

else

set [App# v] to [1]

set x to ((((round (((mouse x) / (60)) - (((mouse x) / (60)) mod (1)))) * (60)) + (25)) + (5))

set y to (-140)

if <<not <touching [mouse-pointer v]?>> or <<(mouse x) < [-175]> or <(mouse x) > [175]>>> 

set [NoClick v] to [1]

end

end

if <(NoClick) = [0]>

switch to costume [Help v]

if <(mouse y) < [-100]>

switch to costume (item ((((mouse x) / (60)) - (((mouse x) / (60)) mod (1))) + (4)) of [DockCostume v] )

else

switch to costume (item (App#) of [AppCostume v] )

end

if <not <(App#) > (length of [AppName v] )>> 

set [brightness v] effect to (10)

stamp

wait until <<mouse down?> or <not <touching [mouse-pointer v]?>>>

clear graphic effects

stamp

if <mouse down?> 

if <(mouse y) > [-110]> 

set [brightness v] effect to (-10)

stamp

set [oX v] to (mouse x)

set [oY v] to (mouse y)

set [doDrag? v] to [false]

reset timer

repeat until <not <mouse down?>>  

if <( [sqrt v] of ((((mouse y) - (oY)) * ((mouse y) - (oY))) + (((mouse x) - (oX)) * ((mouse x) - (oX))))) > [20]> 

set [doDrag? v] to [true]

set [AppData1 v] to (item (App#) of [AppName v] )

set [AppData2 v] to (item (App#) of [AppCostume v] )

set [OldApp# v] to (App#)

delete (App#) of [AppName v]

delete (App#) of [AppCostume v]

show

set [ghost v] effect to (35)

repeat until <not <mouse down?>>  

set [App# v] to (((appPageIndex) * (28)) + ((((((mouse x) + (20)) / (60)) - ((((mouse x) + (20)) / (60)) mod (1))) + (4)) + (((1) - ((((mouse y) - (10)) / (65)) - ((((mouse y) - (10)) / (65)) mod (1)))) * (7))))

go to x: (mouse x) y: (mouse y)

if <<touching [mouse-pointer v]?> and <<<(mouse y) < [150]> and <<(mouse y) > [-85]> and <<(mouse x) > [-201]> and <(mouse x) < [205]>>>> and <not <(App#) > (length of [AppName v] )>>>>

switch to costume (AppData2)

else

if <(mouse y) < [-100]>

switch to costume [Dockadd v]

else

switch to costume [No v]

end

end

end

hide

if <<touching [mouse-pointer v]?> and <<<(mouse y) < [150]> and <<(mouse y) > [-75]> and <<(mouse x) > [-201]> and <(mouse x) < [205]>>>> and <not <(App#) > (length of [AppName v] )>>>>

if <(item (App#) of [AppName v] ) = []>

repeat until <<not <(item (App#) of [AppName v] ) = []>> or <(App#) < ((appPageIndex) * (28))>>  

change [App# v] by (-1)

end

change [App# v] by (1)

if <(App#) > ((appPageIndex) * (28))> 

insert (AppData1) at (App#) of [AppName v]

insert (AppData2) at (App#) of [AppCostume v]

end

else

insert (AppData1) at (App#) of [AppName v]

insert (AppData2) at (App#) of [AppCostume v]

end

else

switch to costume (AppData2)

show

glide (0.4) secs to x: ((-180) + ((((OldApp#) - (1)) mod (7)) * (60))) y: ((125) + ((((((OldApp#) - (1)) mod (28)) / (7)) - (((((OldApp#) - (1)) mod (28)) / (7)) mod (1))) * (-60)))

hide

clear graphic effects

stamp

insert (AppData1) at (OldApp#) of [AppName v]

insert (AppData2) at (OldApp#) of [AppCostume v]

set [App# v] to (OldApp#)

end

end

if <<(timer) > [1.5]> and <(doDrag?) = [false]>> 

set [i_pos v] to [0]

set [i v] to (((appPageIndex) * (28)) + (1))

switch to costume [Delete v]

repeat until <<(i) > (((appPageIndex) + (1)) * (28))> or <(item (i) of [AppName v] ) = []>>  

go to x: ((-200) + (((i_pos) mod (7)) * (60))) y: ((145) + ((((i_pos) / (7)) - (((i_pos) / (7)) mod (1))) * (-60)))

stamp

change [i_pos v] by (1)

change [i v] by (1)

end

wait until <not <mouse down?>>

reset timer

switch to costume [DeleteOver v]

set [doRedraw? v] to [false]

repeat until <(doRedraw?) = [true]>  

if <not <mouse down?>> 

reset timer

end

set x to (((round ((((mouse x) + (30)) / (60)) - ((((mouse x) + (30)) / (60)) mod (1)))) * (60)) - (20))

set y to (((round ((((mouse y) + (20)) / (60)) - ((((mouse y) + (20)) / (60)) mod (1)))) * (60)) + (25))

if <<( [abs v] of (mouse x)) < [210]> and <<(mouse y) < [155]> and <(mouse y) > [-80]>>>

set [App# v] to (((appPageIndex) * (28)) + ((((((mouse x) + (30)) / (60)) - ((((mouse x) + (30)) / (60)) mod (1))) + (4)) + (((1) - ((((mouse y) - (30)) / (65)) - ((((mouse y) - (30)) / (65)) mod (1)))) * (7))))

if <<touching [mouse-pointer v]?> and <not <(item (App#) of [AppName v] ) = []>>>

show

if <mouse down?> 

set [doRedraw? v] to [true]

delete (App#) of [AppCostume v]

delete (App#) of [AppName v]

insert [] at (((appPageIndex) + (1)) * (28)) of [AppCostume v]

insert [] at (((appPageIndex) + (1)) * (28)) of [AppName v]

end

else

hide

end

else

hide

end

end

wait until <not <mouse down?>>

set [App# v] to [0]

set [OldApp# v] to [1]

end

if <(App#) = (OldApp#)>

set [doRedraw? v] to [false]

else

set [doRedraw? v] to [true]

end

end

if <touching [mouse-pointer v]?> 

set [AppData1 v] to (item (App#) of [AppName v] )

broadcast [OpenApp v]

end

end

end

end

clear graphic effects

else

if <mouse down?> 

if <(mouse y) > [-100]>

go to x: (0) y: (0)

set [oX v] to (mouse x)

set [ghost v] effect to (40)

switch to costume [Arrow v]

repeat until <not <mouse down?>>  

set y to (mouse y)

set [dX v] to ((mouse x) - (oX))

if <<(dX) > [60]> and <(appPageIndex) < (((length of [AppName v] ) / (28)) - (((length of [AppName v] ) / (28)) mod (1)))>>

point in direction (90 v)

show

else

if <<(dX) < [-60]> and <(appPageIndex) > [0]>>

point in direction (-90 v)

show

else

hide

end

end

end

hide

switch to costume [Blank v]

point in direction (90 v)

clear graphic effects

if <<(dX) > [60]> and <(appPageIndex) < (((length of [AppName v] ) / (28)) - (((length of [AppName v] ) / (28)) mod (1)))>>

change [appPageIndex v] by (1)

set [doRedraw? v] to [true]

else

if <<(dX) < [-60]> and <(appPageIndex) > [0]>>

change [appPageIndex v] by (-1)

set [doRedraw? v] to [true]

else

end

end

else

wait until <not <mouse down?>>

end

end

end

end
Real code as well, part of Photon, a 1sprite 1 script OS. :3

Last edited by fg123 (2012-10-16 21:32:21)

Hai.

Offline

 

#7 2012-10-16 23:07:09

luisaxpv
New Scratcher
Registered: 2012-10-16
Posts: 6

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

y cuales son los premios del concurso ?

and what are the prizes for the contest?

y otra pregunta cualquier persona puede participar, aun q sea un joven mayor edad o hay algun limite de edad ?

and another question anyone can participate, even q is a young or older there an age limit?

Offline

 

#8 2012-10-16 23:28:05

amcerbu
Scratcher
Registered: 2009-07-21
Posts: 500+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

How do you judge the "quality" of a script?  Sheer length and complexity?  I prefer simplicity.  

when gf clicked
set [Display v] to [Hello, world!]
show variable [Display v]

Offline

 

#9 2012-10-16 23:36:53

luisaxpv
New Scratcher
Registered: 2012-10-16
Posts: 6

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

bueno no  me referia exactamente a esto pero como dicen que es un concurso entonces cual serian los premios he ???

Offline

 

#10 2012-10-16 23:47:41

luisaxpv
New Scratcher
Registered: 2012-10-16
Posts: 6

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

well not exactly I meant to say this but as a contest prize then what would I have???

Offline

 

#11 2012-10-17 00:53:21

fg123
Scratcher
Registered: 2008-11-13
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

amcerbu wrote:

How do you judge the "quality" of a script?  Sheer length and complexity?  I prefer simplicity.  

when gf clicked
set [Display v] to [Hello, world!]
show variable [Display v]

Ahah, I can do you one better.

when gf clicked
switch to costume [helloWorld v]

Hai.

Offline

 

#12 2012-10-17 06:50:56

zubblewu
Scratcher
Registered: 2011-02-17
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

fg123 wrote:

amcerbu wrote:

How do you judge the "quality" of a script?  Sheer length and complexity?  I prefer simplicity.  

when gf clicked
set [Display v] to [Hello, world!]
show variable [Display v]

Ahah, I can do you one better.

when gf clicked
switch to costume [helloWorld v]

As can I. 

when gf clicked
show

........................................................................................................................................................................................................................................

Offline

 

#13 2012-10-17 07:00:12

Hardmath123
Scratcher
Registered: 2010-02-19
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

zubblewu wrote:

fg123 wrote:

amcerbu wrote:

How do you judge the "quality" of a script?  Sheer length and complexity?  I prefer simplicity.  

when gf clicked
set [Display v] to [Hello, world!]
show variable [Display v]

Ahah, I can do you one better.

when gf clicked
switch to costume [helloWorld v]

As can I. 

when gf clicked
show


( )
[ ]
< >

...............
(bad attempt at a smiley face.  tongue )

Last edited by Hardmath123 (2012-10-17 07:01:01)

Hardmaths-MacBook-Pro:~ Hardmath$ sudo make $(whoami) a sandwich

Offline

 

#14 2012-10-17 16:12:40

ScratchContest2012
New Scratcher
Registered: 2012-10-16
Posts: 4

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

Leaderboards
- 1st is fg123 with 307 Points!
- 2nd is zubblewu with 78 Points!
- 3rd is Epicness123 with 12 Points!
- 4th is amcerbu with 7 Points!
- 5th is HardMath123 with 4 Points!

How many people have entered:5

Offline

 

#15 2012-10-17 19:14:35

awesomeness321
Scratcher
Registered: 2012-08-10
Posts: 100+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

when gf clicked//This script goes in the sprite
set [v v] to (pick random (1) to (1010101010102981999979162387621876986198648172634961989999999999999999999999999999999999))
set [q v] to (join ([background # v] of [Stage v]) (v))
set [p v] to (join (join (join (join (v) (q)) (join (v) (q))) (w)))
set [w v] to (join (pick random (1) to (99999999999999999999999999999999999999999)) (v))
say (join (join (join (v) (q)) (p)) (w))


when gf clicked//in the stage
switch to background (pick random (1) to (however many you have (try to make a lot)))
This makes a sprite say random things.

Last edited by awesomeness321 (2012-11-06 20:52:58)

My newest project:http://blocks.scratchr.org/API.php?user=awesomeness321&amp;action=projects&amp;type=newest&amp;return=image&amp;num=1Color:#30F9A5 I am currently http://blocks.scratchr.org/API.php?user=awesomeness321&amp;action=onlineStatus&amp;type=text

Offline

 

#16 2012-10-17 19:28:02

Molybdenum
Scratcher
Registered: 2012-06-17
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

zubblewu wrote:

fg123 wrote:

amcerbu wrote:

How do you judge the "quality" of a script?  Sheer length and complexity?  I prefer simplicity.  

when gf clicked
set [Display v] to [Hello, world!]
show variable [Display v]

Ahah, I can do you one better.

when gf clicked
switch to costume [helloWorld v]

As can I. 

when gf clicked
show

Me too.


That's my script: The stage has hello world written on it.

"The Enrichment Center is required to remind you that you will be baked, and then there will be cake."
(|Balls and Platforms: Stay on!|) (|NaOS-H: An operating system... Or is it?|)

Offline

 

#17 2012-10-17 20:43:25

EzraB
Scratcher
Registered: 2012-03-06
Posts: 29

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

when gf clicked
repeat until <(length of [items v]) = (pick random [1] to [700])>
 add (pick random [1] to [700]) to [items v]
end
broadcast [24 v]
stop script

Last edited by EzraB (2012-10-17 20:43:43)

I think life should have a few simple meanings: Love. Pulled pork sandwiches. You. Me. Video Games. EzraB.  smile

Offline

 

#18 2012-10-18 00:41:55

luisaxpv
New Scratcher
Registered: 2012-10-16
Posts: 6

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

ScratchContest2012 wrote:

Leaderboards
- 1st is fg123 with 307 Points!
- 2nd is zubblewu with 78 Points!
- 3rd is Epicness123 with 12 Points!
- 4th is amcerbu with 7 Points!
- 5th is HardMath123 with 4 Points!

How many people have entered:5

-------
amigo administrador o ScratchContest2012 no me has respondio a mi pregunta dije en este foro que si se ganaba algún premio en este concurso?? por favor si me pudieras responder a mi pregunta.

administrator or ScratchContest2012 friend I've answered my question on this forum said that if you won a prize in this contest? if I could please answer my question.

Offline

 

#19 2012-10-18 08:51:05

dvd4
Scratcher
Registered: 2010-06-30
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

my (impossible) script  big_smile 

when <when gf clicked> clicked
forever <forever> //j
set [g v] to [sodjv]
say <join (g)[dpoiv]>
repeat <forever>
eat [pie]
end
say [hello]
end
show
never <forever>
fake blocks
end
if <if><say[hello!]><if>[pie] <if>
wrong !! <forever>
looooooooooooooooooooooooooooooooooooong
end
end
end
don't <never<no[necropost v]>>
end l
say [this is complicated !] <if<<true>=<true>>> //h
<<<<<:)>>>>> //k

I made a mod  big_smile  It's called blook!
http://i49.tinypic.com/16ia63p.png

Offline

 

#20 2012-10-18 10:14:01

Ideas
Scratcher
Registered: 2012-10-07
Posts: 100+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

My velocity with notes scripts.

When gf clicked 
forever
change x by (xv)//to move left/right.
change y by (yv)//to move up/down.
if<touching [ground v]?>//or the colour of the floor, exept for walls.
set [yv v] to [1]//to stay on top, depends on fall amount.
if<key [up v] pressed?>//or jump button.
set [yv v] to [6]//to jump, or any amount more than 0.
end
end
if <key [left v] pressed?>//or left button.
change [xv v] by [-0.98]//to move left can be -1 too or anything less, depends on the speed.
if <key [right v] pressed?>//or right button.
change [xv v] by [0.98]//to move right can be 1 too or anything greater, depends on the speed.
end
end
set [xv v] to (xv) * [0.85]//slow you down, the smaller the fraction, the rougher the distance, the bigger the fraction, the smother the distance. 
change [yv v] by [-0.3]//to fall, don't make larger than stay on top script or jump part.
end
end

http://img685.imageshack.us/img685/2010/screenshot20121110at132.pngI think that you must CLICK above

Offline

 

#21 2012-10-18 12:41:24

dvd4
Scratcher
Registered: 2010-06-30
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

Ideas wrote:

My velocity with notes scripts.

When gf clicked 
forever
change x by (xv)//to move left/right.
change y by (yv)//to move up/down.
if<touching [ground v]?>//or the colour of the floor, exept for walls.
set [yv v] to [1]//to stay on top, depends on fall amount.
if<key [up v] pressed?>//or jump button.
set [yv v] to [6]//to jump, or any amount more than 0.
end
end
if <key [left v] pressed?>//or left button.
change [xv v] by [-0.98]//to move left can be -1 too or anything less, depends on the speed.
if <key [right v] pressed?>//or right button.
change [xv v] by [0.98]//to move right can be 1 too or anything greater, depends on the speed.
end
end
set [xv v] to <(xv) * [0.85]>//slow you down, the smaller the fraction, the rougher the distance, the bigger the fraction, the smother the distance. 
change [yv v] by [-0.3]//to fall, don't make larger than stay on top script or jump part.
end
end

fixed

I made a mod  big_smile  It's called blook!
http://i49.tinypic.com/16ia63p.png

Offline

 

#22 2012-10-18 13:09:51

ahirbhairav
Scratcher
Registered: 2012-10-06
Posts: 100+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

It's interesting to see these scripts, but I am going to make a simple one

when gf clicked
show
  go to x: 0 y: -75
end
think [Scripts in your posts!] for (3) secs

Offline

 

#23 2012-10-18 14:35:49

dvd4
Scratcher
Registered: 2010-06-30
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

ahirbhairav wrote:

It's interesting to see these scripts, but I am going to make a simple one

when gf clicked
show
  go to x: [0] y: [-75]
end
think [Scripts in your posts!] for (3) secs

fixed

I made a mod  big_smile  It's called blook!
http://i49.tinypic.com/16ia63p.png

Offline

 

#24 2012-10-18 15:08:22

subzerostig
Scratcher
Registered: 2010-09-08
Posts: 100+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

How about this prime number calculator?

    when I receive [Check_if_prime]
        forever  
            change "Counter1" by 1
            if ((item (Counter1) of "Prime numbers" ) > ((round ( "sqrt" of (Number_being_worked_out))) + 1))
                add (Number_being_worked_out) to "List of Primes"
                add (Number_being_worked_out) to "Prime numbers"
                stop script
            if <((round ((Number_being_worked_out) / (item (Counter1) of "Prime numbers" ))) = ((Number_being_worked_out) / (item (Counter1) of "Prime numbers" ))) >
                stop script
    end

    when gf clicked
        set Number_being_worked_out to "5"
        delete "all" of "Prime numbers"
        delete "all" of "List of Primes"
        add "2" to "Prime numbers"
        add "3" to "Prime numbers"
        add "5" to "Prime numbers"
        add "2" to "List of Primes"
        add "3" to "List of Primes"
        add "5" to "List of Primes"
        forever  
            change "Number_being_worked_out" by 1
            set "Counter1" to "0"
            broadcast [Check_if_prime] and wait
    end
Sorry if blocks are a bit buggy. I haven't used the new format yet.
I ported the code from a previous Autoit3 script I made a while back.

Last edited by subzerostig (2012-10-18 15:33:43)

There are 10 types of people people in this world, those that understand binary and those that do not: My latest Project: Present catcher V2                          06/12/2012

Offline

 

#25 2012-10-18 15:58:58

dvd4
Scratcher
Registered: 2010-06-30
Posts: 1000+

Re: Who can make the Best Script with ScratchBlocks???(scratch contest)

subzerostig wrote:

How about this prime number calculator?

    when I receive [Check_if_prime v]
        forever  
            change [Counter1 v] by [1]
            if <<<item <Counter1> of [Prime numbers v] > > <round ( [sqrt] of (Number_being_worked_out>> + [1]>
                add (Number_being_worked_out v) to (List of Primes)
                add (Number_being_worked_out v) to (Prime numbers)
                stop script
                end
            if <<<round <<Number_being_worked_out> / <<item (Counter1> of [Prime numbers v] >>>> = <<Number_being_worked_out> / <item (Counter1> of [Prime numbers v] >>
                stop script
    end

    when gf clicked
        set [Number_being_worked_out v] to [5]
        delete [all v] of (Prime numbers)
        delete [all v] of (List of Primes)
        add [2] to (Prime numbers)
        add [3] to (Prime numbers)
        add [5] to (Prime numbers)
        add [2] to (List of Primes)
        add [3] to (List of Primes)
        add [5] to (List of Primes)
        forever  
            change [Number_being_worked_out v] by [1]
            set (Counter1 v) to [0]
            broadcast [Check_if_prime v] and wait
    end
Sorry if blocks are a bit buggy. I haven't used the new format yet.
I ported the code from a previous Autoit3 script I made a while back.

fixing ...

Last edited by dvd4 (2012-10-22 12:40:32)

I made a mod  big_smile  It's called blook!
http://i49.tinypic.com/16ia63p.png

Offline

 

Topic closed

Pages: 1 2

Board footer