Advertisement
Under_Koen

Logo test code

Nov 2nd, 2018
127
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.44 KB | None | 0 0
  1. 10 + 10.0000
  2. 10 + 10*(30)
  3. 10 + 10*(30+-10)
  4. 10 + 10*(30+-10)
  5. 10 + 10*(30+-10*(2 +1))
  6. 31 * 0.2 + 1
  7. 3 + 4 //dab3+1
  8. 31 * -0.2 + 1 / 20 * (4/2) / (2 * -1)
  9. repeat 3[ repeat 3[forward 1]]
  10. repeat 3[ repeat 3[forward 1]][]
  11. 210 * 1.0 / (32.2 * 2) * 3.31 + 30*(-10.2/3)
  12. "10 = "10
  13. (10) = "10
  14.  
  15. setRGB 16[0 1 0]
  16.  
  17. //Opdracht - 1
  18. reset repeat 4 [fd 40 rt 90] ht
  19.  
  20. //Opdracht - 2
  21. reset repeat 4 [fd 175 rt 90] setPenColour 2 fillCurrentPath ht
  22.  
  23. //Opdracht - 3
  24. reset rt 30 fd 40 rt 120 fd 40 rt 120 fd 40 setPenColour 2 fillCurrentPath rt 180 PU fd 100 PD repeat 4 [fd 80 lt 90] setPenColour 16 fillCurrentPath setPenColour 1 PU fd 150 PD repeat 5 [fd 80 lt 72] setPenColour 3 fillCurrentPath ht
  25.  
  26. //Opdracht - 4
  27. reset setPosition[20, -80] setPosition[60, -40] setPosition[60, -80] setPosition[20, -40] setPosition[-20, -40] setPosition[-60, -80] setPosition[-60, -40] setPosition[-20, -80] setPosition[0, 0] ht
  28.  
  29. //Opdracht - 5
  30. reset lt 90 figur 3 40 2 rt 180 PU fd 150 PD rt 180 figur 4 100 16 rt 180 PU fd 150 rt 180 PD figur 5 100 3 ht
  31.  
  32. //Opdracht - 6,1
  33. reset repeat 3 [rt 15 figur 4 80 16 fd 80 lt 30 fd 80 lt 150 fd 80 lt 30 fd 80 setPenColour 2 fillCurrentPath rt 75] ht
  34.  
  35. //Opdracht - 6,2
  36. reset lt 90 figur 3 100 4 rt 60 fd 100 figur 3 50 9 rt 120 figur 3 50 9 rt 120 figur 3 50 9 rt 60 figur 3 100 4 rt 120 figur 3 100 4 fd 50 lt 120 figur 3 50 4 rt 60 fd 50 figur 3 25 9 rt 120 figur 3 25 9 rt 120 figur 3 25 9 rt 60 figur 3 50 4 rt 120 figur 3 50 4 fd 25 lt 120 figur 3 25 4 rt 60 fd 25 lt 60 figur 3 25 4 rt 120 figur 3 25 4 rt 60 figur 3 10 9 rt 120 figur 3 10 9 rt 120 figur 3 10 9 ht
  37.  
  38. //Opdracht - 7
  39. //Had ik direct al gedaan
  40.  
  41. //Opdracht - 8
  42. reset repeat 36 [rt 10 fd 100 rt 160 fd 100] ht
  43.  
  44. //Opdracht - 9
  45. reset lt 90 make "zijde 100 repeat 50 [figur 4 :zijde 16 make "zijde :zijde+-2 rt 8] ht
  46.  
  47. //Opdracht - 10
  48. //Had ik dirdct al gedaan
  49.  
  50. //Opdracht - 11
  51. reset lt 90 figur 3 100 4 rt 60 fd 100 lt 60 figur 3 100 4 rt 120 figur 3 100 4 lt 60 figur 3 50 6 rt 60 fd 50 lt 120 figur 3 50 4 lt 60 fd 50 rt 150 SetTypeSize 20 GraphicsType [gemaakt door Koen] ht
  52.  
  53. //Opdracht - 11
  54. reset repeat 9 [repeat 45 [figurNC 4 50 rt 8] fd 100 lt 40] ht
  55.  
  56. //Opdracht - 12
  57. make "rows 5 // <-- params
  58. reset repeat :rows [repeat 7 [fd 40 rt 20 fd 30 rt 140 fd 30 rt 110 fd 20 rt 180 fd 20 rt 90 fd 40 rt 90 fd 20 rt 180 fd 20 PU fd 20 PD lt 90] lt 90 PU fd 284 lt 90 fd 80 rt 180 PD] ht
  59.  
  60. //Eind Opdracht
  61. reset penUp setPosition[-300, 200] penDown rt 30 repeat 5 [repeat 2 [repeat 8 [hex inner_hex] penUp fd 120 repeat 2 [lt 60 fd 120 rt 60 fd 120] penDown] lt 60 fd 40 rt 60 penUp fd 40 penDown] penUp rt 150 fd 30 rt 90 fd 120 setPenColour 9 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] rt 90 fd 525 rt 90 fd 60 rt 180 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] rt 90 fd 600 lt 90 fd 30 setPenColour 4 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] rt 90 fd 525 rt 90 fd 60 rt 180 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] rt 90 fd 565 lt 90 fd 60 setPenColour 1 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] rt 90 fd 525 rt 90 fd 60 rt 180 repeat 4 [repeat 4 [fillIn fd 120] fillIn lt 90 fd 70 lt 90 repeat 4 [fillIn fd 120] fillIn rt 90 fd 70 rt 90] ht
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement