farbowanyaniol - 2010-10-17, 19:16 Temat postu: LOGO Czy ktoś może mi udzielić informacji jak pokolorować powierzchnię zawartą np. w kwadracie, żeby postał dajmy na to zamalowany kwadrat na zielono? shawnzy - 2010-10-17, 19:25 musisz "wejść" żółwiem do tego kwadratu potem wpisujesz setfc nr, gdzie numer to liczba od 0 - 15, a potem FILL, np. setfc 5 FILL http://davidlongman.com/l...NG%20COLORS.pdf farbowanyaniol - 2010-10-17, 21:01 Jak zrobić dach domu? Załóżmy, że jedna kratka to 25. Jestem w miejscu gdzie już potrzebuję tylko ten szczyt dachu czyli prawe i lewe ramię trójkąta. Stoję w prawym górnym rogu dużego kwadratu na wprost (jak na początku). Co dalej? Wiem, że trzeba wykorzystać jakoś to pozycjonowanie żółwia ale nie wiem jak 
e^x - 2010-10-17, 21:10 Ogólna funkcja na trójkąt: to trojkat :bok repeat 3 [ fd :bok rt 120 ] end aniut - 2010-10-17, 23:06 a grupa 9 ma jakieś zadanie domowe z laborek? wiem że druga część ma dopiero w tym tygodniu, ale zadał coś pierwszej? :) agnieszkaosw - 2010-10-18, 12:16 aniut, tak. mamy to samo co II grupa ;] mówił o tym zresztą w poniedziałek na laborkach tydzień temu. Sav1ola - 2010-10-18, 12:55 Agnieszka, mówisz o BO czy ASD?:P agnieszkaosw - 2010-10-18, 17:24 Sav1ola, dzięki  o BO, a na temat ASD nic nie wiem 
przepraszam. Kociania - 2010-10-19, 15:44 Skąd ściągnąc LOGO? shawnzy - 2010-10-19, 15:54 a.zietkowska, www.ue.wroclaw.pl/~shw/MicrosoftWindowsLogo.rar lub http://www.ue.wroclaw.pl/viewtopic.php?t=948 ,post Macioua. killaruna - 2010-10-19, 23:58 Albo ze strony oficjalnej - mswlogo.en.softonic.com 
Kocur - 2010-11-30, 20:25 jak tak patrzę na kalendarz na grudzień to tam jest coś o logo czy ktoś ma to już zrobione i by się podzielił? e^x - 2010-11-30, 21:00 Kocur, to się na czas obudziłeś, moja wersja: to przesun :poziom :pion PU setxy(xcor+:poziom)(ycor+:pion) PD end to piramida :bok :ile if :ile = -1 [stop] rt 60 fd :bok/2 lt 60 piramida :bok/2 :ile-1 rt 60 fd :bok/2 lt 60 fd :bok lt 60 fd :bok rt 60 przesun 0 -:bok piramida :bok/2 :ile-1 przesun 0 :bok lt 120 fd :bok lt 60 fd :bok lt 60 fd :bok/2 lt 120 piramida :bok/2 :ile-1 rt 120 fd :bok/2 lt 120 end Jerzu - 2010-11-30, 21:54 Kocur, a moja tak: to 6kat :b repeat 6 [fd :b rt 60] end to eleven :bok :ile if :ile=0 [stop] 6kat :bok 6kat :bok/2 fd :bok/2 rt 60 fd :bok/2 lt 60 6kat :bok/2 rt 120 fd :bok/2 rt 60 fd :bok/2 lt 180 6kat :bok/2 lt 120 fd :bok/2 rt 60 fd :bok/2 rt 60 eleven :bok/2 :ile-1 fd :bok/2 rt 60 fd :bok/2 lt 60 eleven :bok/2 :ile-1 rt 120 fd :bok/2 rt 60 fd :bok/2 lt 180 eleven :bok/2 :ile-1 lt 120 fd :bok/2 rt 60 fd :bok/2 rt 60 end nic - 2010-12-06, 01:05 czy ktoś umie pokolorować tą piramidę tak aby zrobić taki efekt? tzn chodzi mi o to ze niebieski kolor sie zmienia e^x - 2010-12-06, 01:44 nic, koloruje się FILL, kolor jest zapisany w formacie [R G B] (red green blue) każdy parametr przyjmuje wartości 0-255 np. [0 0 0] to czarny, [255 255 255] to biały, [0 0 255] to chyba powinien być "czysty" niebieski, więc zrób sobie funkcję która będzie ci kolorowała w danym odcieniu np. coś w stylu: wywołujesz piramida(rozmiar , ile) , bierzesz sobie ograniczenie ,że gdy np. ile > 20 to wypisze np: "zbyt duża wartość rekurencji" [i tak w tym stuleciu by nie narysowało, a tak mamy ograniczenie dla funkcji] , gdy ile<20 to wykonujemy program robisz sobie zmienną kolor:=0; przy każdym wejściu do procedury robimy kolor:=kolor+1; a przy kolorowaniu kolorujemy kolorem [255/20 * kolor 0 255] (akurat ta funkcja schodzi od błękitu do fioletu [ jeśli mi się barwy nie pomyliły ]). Musisz sobie takie funkcje znaleźć aby ci odpowiadały np. od fioletu do błękitu i z głowy, znalezienie ich nie jest trudne. maxdiaz - 2010-12-14, 11:59 http://eportal.ue.wroc.pl...kol.lab._B_.pdf umie ktoś to zrobić albo niech pomoże ;d?? e^x - 2010-12-14, 18:28 Ładne killaruna - 2010-12-14, 18:54 Ja zdążyłam zrobić 1 i zaczęłam 2, ale już mi czasu zabrakło ;P e^x - 2010-12-14, 19:11 w Zad 1 należy napisać: 1. Procedura ustawiająca (przyda się i ułatwia pracę). 2. Procedura malująca mały, czerwony kwadrat (te na rogach). 3. Funkcja malująca trójkąt (ten z brzegu) i pobierająca liczbę 0 (pomaluj na czerwono) lub liczbę 1 (pomaluj na czarno) Potem piszemy: Procedura wzorek: kwadrat, przesuń (w prawo), obróć, trójkąt(1), przesuń (w prawo), obróć, kwadrat, przesuń (w dół, w lewo), obróć, trójkąt(1), przesuń (w prawo), obróć, trójkąt(0), przesuń, obróć, trójkąt(0), przesuń (w prawo), obróć, trójkąt(1), przesuń (w dół, w lewo), kwadrat, przesuń (w prawo), obróć, trójkąt(1), przesuń (w prawo), obróć, kwadrat, przesuń (na górę w prawo) I finał: repeat 3[ repeat5[ wzorek, przesuń (w dół i na lewo) ]] i masz algorytm, wystarczy przełożyć to na kod tylko e^x - 2010-12-14, 19:18 W zad 2 napisałbym procedury 1. Małe T 2. Duże T 3. Przesuń 4. 3_T_male : maleT, przesun, maleT, przesun, maleT 5. 3_duze : duzeT, przesun, duzeT, przesun, duzeT 6.skrzydlo : 3_duze, przesun, 3_male I finał: skrzydło, przesuń, skrzydło, przesuń, skrzydło, przesuń (pominąłem obroty, ale to widać kiedy należy je zastosować) Kocur - 2011-01-17, 17:17 mógłby mi ktoś napisać jak stworzyć zegrarek zeby tylko wskazówka znikała jak się zmieni na następna sekundę ? e^x - 2011-01-17, 17:18 czyść ekran po każdym rysowaniu lukasznowak2803 - 2011-01-17, 17:26 to zegarek :a repeat 60 [ circle :a fd :a bk :a rt 6 wait 60 clean] Kocur - 2011-01-17, 17:36 dzięki ;) aniut - 2011-01-17, 18:36 kurde kto by pomyslal ze to takie proste;p minister - 2011-01-17, 19:06 ja mam trochę inaczej - z wymazywaniem wskazówki to zegar :a circle :a fd :a bk :a repeat 60[fd :a bk :a wait 60 pe fd :a bk :a ppt rt 6 ] end Kocur - 2011-01-17, 21:53 a wie ktoś jak wypisać liczby na odwrót np od najwiekszej do najmniejszej??? np. w tym przykladzie? to naturalne :od :ile repeat :ile[ print :od make "od :od+1] end Koordynator - 2011-01-17, 21:56 jednak nie. Jerzu - 2011-01-17, 21:57 Kocur, to liczby :od :ile make "z :od+:ile-1 repeat :ile [print :z make "z :z-1] end Kocur - 2011-01-17, 22:04 Koordynator, w sumie Twoje rozwiaznie tez było dobre:) Kocur - 2011-01-18, 13:20 
Zadanie mniej więcej polega na tym jak widać na zdjęciu z tym, ze ma być sterowany ten wielokąt to sze :d :n ... end gdzie :d to długośc boku a :n to ilość ścian. Z tymi kreskami po prawej stronie to ilość kresek maleje na każdej ścianie do 1 kreski jak jest kwadrat to zaczynamy od 4 kresek 3 kresek ... jakby ktoś to potrafił to byłbym wdzięczny. Jerzu - 2011-01-18, 13:35 Kocur, to krecha :n :v repeat :n [fd :v bk :v lt 90 pu fd 20 rt 90 pd] rt 90 pu fd :n*20 lt 90 fd :v pd end to ksztalt :b :d make "z :b+1 repeat :b [krecha :z :d rt 360/:b Make "z :z-1] end Używane: ksztalt 6 100 - rysuje szcześciokąt o boku 100. jopek379 - 2011-01-18, 17:55 super, działa! umie ktoś jeszcze to z kółkami zrobić? pit3r - 2011-01-18, 18:05 to wielokat :b :n repeat :n [fd :b lt 270/:n pu fd 40 pd circle 40 pu fd -40 rt 270/:n rt 360/:n pd] end :b - dlugosc boku :n - ilość kątów 40 - promień okręgu, wartość możesz sobie obrać dowolną Koordynator - 2011-01-18, 22:21 pit3r, a te koła nie miały byc czasen równo na czubkach? : ) pit3r - 2011-01-18, 22:32 Koordynator, a ja już sam nie wiem - podobno zaliczał takie rozwiązanie dzisiaj :D minister - 2011-01-18, 22:43 to wielokat :ile :bok :r repeat :ile[pd fd :bok lt ((:ile-2)*360)/(4*:ile) pu fd :r pd circle :r pu bk :r rt ((:ile-2)*360)/(4*:ile) rt 360/:ile] end Koordynator - 2011-01-18, 22:56 No bo poprawna wersja jest imo trudna, jak na poziom tych zajęć - w sensie geometrycznie, jak nie znasz wzoru na sume kątów wewnętrznych wieloboku. Bez wikipedii pewnie sam bym nie zrobił tego ;p. |
