Program total score is: 219
Output image
101mastrman - 4个月前
i made the score 200
Luigiman - 1年前
I have a program for Mario it's name is Mario it is #5
Darrel Brent - 8个月前
to centerStar :sides :big :small
make "myList [ ]
pu
for [ i 1 :sides ]
[
fd :big
queue "myList pos
bk :big
rt 360/2/:sides
fd :small
queue "myList pos
bk :small
rt 360/2/:sides
]
;print :myList
for [ point 2:sides 1 ]
[
setxy
item 1 (item :point :myList)
item 2 (item :point :myList)
pd
]
setxy
item 1 (item (count :mylist) :myList)
item 2 (item (count :mylist) :myList)
end
ht
for [ var 1000 20 -20 ]
[
filled random 16 [ centerStar 80 :var :var/1.1 ]
home
]
repeat 1000 [ repeat 40 [ fd 1000 rt 900 ] rt 1 ]
repeat 1000 [
setcolor 15 fill setcolor 3
ht
repeat 30 [
repeat 50 [
fd 5 rt (random 10) - 5
]
pu home pd
rt 12repcount
]
wait 0.5
]
Leovis - 2年前
Incredible
IFaulks - 2年前
Wow
Porgányi Bendegúz - 2年前
buuuuuggggg
7FOOTFRAMERATSALONGHISBACK - 3年前
h o w
bhone koko - 4年前
Cos tetch
Lyndsy Joie LALIC - 4年前
?
Lyndsy Joie LALIC - 4年前
NO BAD WORDS
Lucas Peng - 3个月前