Logoprogrammering: Skillnad mellan sidversioner

Från Wikiskola
Hoppa till navigering Hoppa till sök
VisuellWikitext
 
(26 mellanliggande sidversioner av samma användare visas inte)
Rad 1: Rad 1:
== Erfarenheter ==
== Erfarenheter ==
[[File:Remi turtlegrafik.png|thumb|Remi turtlegrafik. Om man klickar bilden till Commons hittar man Logokoden för att generera bilden.]]


Programmering kan vara enkelt - man lär sig
Programmering kan vara enkelt - man lär sig
logo på en lektion
logo på en lektion


Jag har använt MS Logo på Johan Skyteskolan. Det är gratis och enkelt att
Jag har använt MS Logo på Johan Skytteskolan. Det är gratis och enkelt att
installera. Man kan h&auml;mta hem det <A HREF="http://www.softronix.com/logo.html">h&auml;r</A>.</P>
installera. Man kan h&auml;mta hem det [http://www.softronix.com/logo.html Softronix]
== Länkar ==


== Övningar ==
Triangeln kan du flytta. Det är så du gör bilder. Tänk dig att triangeln är en penna som ritar på skärmen. I Logo kallas den för turtle (sköldpadda).
{{clear}}


<HTML><P CLASS="western" STYLE="margin-bottom: 0cm; widows: 0; orphans: 0">Mike
== Exempel ==
Koss har <A HREF="http://mckoss.com/logo/"><U><FONT COLOR="#0000ff">ett
antal bra &ouml;vningar </FONT></U></A>som han tilll&aring;ter
kopiering av f&ouml;r undervisnings&auml;ndam&aring;l. Anv&auml;nd
g&auml;rna dessa. F&ouml;lj l&auml;nkarna och testa &ouml;vningarna.
Om du f&ouml;ljer l&auml;nkarna en i taget i ordning s&aring; kommer
du att l&auml;ra dig grunderna p&aring; nolltid.
</P>
<P CLASS="western" STYLE="margin-bottom: 0cm; widows: 0; orphans: 0"><BR>Jag
har skrivit om en del av dem till svenska och lagt till en del:</P>
<P CLASS="western" STYLE="margin-bottom: 0cm; widows: 0; orphans: 0"><A HREF="grunderna.doc">Grunderna</A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm; widows: 0; orphans: 0">En
<A HREF="./Pappersovning till Logoprogrammering.doc">pappers&ouml;vning</A>
i att tolka Logokommandon.<BR>Vidare finns en <A HREF="./HEL skojiga  mysko monster i Logo.doc">lista
med exempel </A>p&aring; logokommandon som ger kul m&ouml;nster. Det
&auml;r bara att kopiera in i Logo, klicka return och se vad som
h&auml;nder.</P>
<H3 CLASS="western">Programkod till Logo</H3>
<P CLASS="western">Mike Koss har n&aring;gra program (Fun
Programs)som man kan lada till MS Logo. Det g&aring;r till s&aring;
att man h&ouml;gerklickar p&aring; filen och sparar ned den p&aring;
sin h&aring;rddisk. Sedan klickar man p&aring; File/Load och v&auml;ljer
filen ifr&aring;ga. Sedan beh&ouml;vs ett kommndo f&ouml;r att starta
filen samt en siffra; exempelvis pumpkin 200. Mina egenh&auml;ndigt
sparade filer nedan funkar inte av n&aring;n anledning.</P>
<P CLASS="western"><A HREF="pumpkin.lgo">Pumpkin 200</A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><A HREF="player.lgo"><U><FONT COLOR="#0000ff">player</FONT></U></A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><A HREF="test1.LGO"><U><FONT COLOR="#0000ff">test1</FONT></U></A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><A HREF="towers.lgo"><U><FONT COLOR="#0000ff">towers</FONT></U></A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><A HREF="programkod.logo"><U><FONT COLOR="#0000ff">programkod</FONT></U></A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><A HREF="rLogoSample.logo"><U><FONT COLOR="#0000ff">rLogosample</FONT></U></A></P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><BR>
</P>
<P CLASS="western" STYLE="margin-bottom: 0cm"><BR>
</P>
</BODY>
</HTML>


== Exempelkod ==
=== Mitt mönster ===
=== första exemplet===
to box
pendown
repeat 4 [fd 20 left 90]
end
home
cs
box


=== eller snygg "blomma" ===
clear


repeat 40 [rt 10 REPEAT 5 [FD 100 RT 72]]
make "r 1


=== Osäker varifrån exemplet kommer ===
repeat 36 [ COLOR [:r 12 122]  fw 20  lt 10 repeat 8 [ fw 100 rt 90 fw 50 rt 90 fw 30 rt 45 fw 60
<code>
make "r :r + 1
to drawdisk :disk :peg :height :fDraw
] ]
pu
setxy :peg*150-300 :height*10
ifelse :fDraw [penpaint] [penerase]
bk :disk*5
fd :disk*10
end


to move :from :to
=== Ett exempel från sajten att studera ===
make "moves :moves + 1
; (print :moves ". "Move "disk "on "peg :from "to "peg :to ".)


make "height (item :from :stacks)
http://logo.twentygototen.org/XSs519ll
make "disk (item :height (item :from :pegs))
setitem :height (item :from :pegs) ".
setitem :from :stacks (item :from :stacks)-1
drawdisk :disk :from :height "false


make "height (item :to :stacks)+1
setitem :to :stacks :height
setitem :height (item :to :pegs) :disk
drawdisk :disk :to :height "true


; show :stacks
<pre>
; show :pegs
home
end


to start :disks
to square :sides
cs
make "green 0
ht
make "sides 10
make "moves 0
make "greener 255/:sides
rt 90
setpensize [5 5]
make "stacks (array 3)
setitem 1 :stacks :disks
setitem 2 :stacks 0
setitem 3 :stacks 0


make "pegs (array 3)
repeat :sides
repeat 3 [setitem repcount :pegs (array :disks)]
[
make "firstPeg (item 1 :pegs)
make "green :green + :greener
repeat :disks [setitem repcount :firstPeg :disks-repcount+1]
color [0 :green 0]
repeat :disks [drawdisk :disks-repcount+1 1 repcount "true]
fd 50
rt 360/:sides
]
end
end


to tower :disks :from :to :using
to shape
if :disks = 1 [move :from :to stop]
repeat 36
tower :disks-1 :from :using :to
[
move :from :to
square 5
tower :disks-1 :using :to :from
rt 10
]
end
end


to towers :disks
setxy 80 80
start :disks
shape
tower :disks 1 3 2
setxy 240 80
end
shape
</code>
setxy 400 80
shape
setxy 80 240
shape
setxy 240 240
shape
setxy 400 240
shape
setxy 80 400
shape
setxy 240 400
shape
setxy 400 400
shape
</pre>
 
== Länkar ==
 
* [http://en.wikipedia.org/wiki/Logo_%28programming_language%29 Logo på Wikipedia]
* [http://www.wolframalpha.com/input/?i=turtle+fd+99%2C+rt+90%2C+fd+88%2C+rt+90%2C+fd+77%2C+rt+90%2C+fd+66%2C+rt+90%2C+fd+55%2C+rt+90%2C+fd+44%2C+rt+90%2C+fd+33 Turtle i WolframAlpha]
* [http://www.mathplayground.com/mathprogramming.html Turtle för grundskolan]
* [http://ultimateide.com/tutorials/logo/ Tutorial för Logo Turtle i ActionScript 3]
* Här kan man [http://www.mathcats.com/gallery/logodownloadinfo.html ladda ner] MSWLogo och andra varianter.
* [http://homepage.mac.com/troy_stephens/TinyJavaLogo/ TinyJavaLogo] fick jag en massa felmeddelande när jag testade...
* [http://sourceforge.net/projects/jturtle/ The Java Turtle Package]
* [http://education.mit.edu/starlogo/gettingstarted/getting_started.html StarLogo] är något helt annat men på samma grund. Här programmerar man massor av turtles som agerar självständigt i ett decentraliserat system.
 
== Övningar ==
 
[http://mckoss.com/logo/ Mike Koss] har ett
antal bra &ouml;vningar som han tilll&aring;ter
kopiering av f&ouml;r undervisnings&auml;ndam&aring;l. Anv&auml;nd
g&auml;rna dessa. F&ouml;lj l&auml;nkarna och testa &ouml;vningarna.
Om du f&ouml;ljer l&auml;nkarna en i taget i ordning s&aring; kommer
du att l&auml;ra dig grunderna p&aring; nolltid.
 
Jag har skrivit om en del av dem till svenska och lagt till en del:
 
== Pappersinstruktioner ==
 
* [[Media:grunderna.doc|instruktion]]. Bilder i denna fil kommer från Mike Koss.
* [[Media:Pappersovning_till_Logoprogrammering.doc|Öva på papper]]
* Många fina [[Logoexempel]] och samma [[Media:Logokodexempel.doc|exempel i Word]]
 
== Exempelkod ==
 
=== eller snygg "blomma" ===
 
repeat 40 [rt 10 REPEAT 5 [FD 100 RT 72]]

Nuvarande version från 7 februari 2014 kl. 14.47

Erfarenheter

Remi turtlegrafik. Om man klickar bilden till Commons hittar man Logokoden för att generera bilden.

Programmering kan vara enkelt - man lär sig logo på en lektion

Jag har använt MS Logo på Johan Skytteskolan. Det är gratis och enkelt att installera. Man kan hämta hem det Softronix

Triangeln kan du flytta. Det är så du gör bilder. Tänk dig att triangeln är en penna som ritar på skärmen. I Logo kallas den för turtle (sköldpadda).

Exempel

Mitt mönster

clear

make "r 1

repeat 36 [ COLOR [:r 12 122] fw 20 lt 10 repeat 8 [ fw 100 rt 90 fw 50 rt 90 fw 30 rt 45 fw 60 make "r :r + 1 ] ]

Ett exempel från sajten att studera

http://logo.twentygototen.org/XSs519ll 


home

to square :sides
make "green 0
make "sides 10
make "greener 255/:sides

repeat :sides
[
make "green :green + :greener
color [0 :green 0]
fd 50
rt 360/:sides
]
end

to shape
repeat 36
[
square 5
rt 10
]
end

setxy 80 80
shape
setxy 240 80
shape
setxy 400 80
shape
setxy 80 240
shape
setxy 240 240
shape
setxy 400 240
shape
setxy 80 400
shape
setxy 240 400
shape
setxy 400 400
shape

Länkar

Övningar

Mike Koss har ett antal bra övningar som han tilllåter kopiering av för undervisningsändamål. Använd gärna dessa. Följ länkarna och testa övningarna. Om du följer länkarna en i taget i ordning så kommer du att lära dig grunderna på nolltid.

Jag har skrivit om en del av dem till svenska och lagt till en del:

Pappersinstruktioner

Exempelkod

eller snygg "blomma"

repeat 40 [rt 10 REPEAT 5 [FD 100 RT 72]]
Hämtad från ”https://wikiskola.se/index.php?title=Logoprogrammering&oldid=26048”