Projekt badawczy Polska-Namibia 2010
A fe... Kolega keruseykaryu ostro pojechał po bandzie Gdyż...
Hm. Patrzę na zawartość książki: spokojne i konsekwentne wprowadzanie czytelnika w tajniki obsługi mikrokontrolerów, 400 ilustracji, prawie 100 programów przykładowych, z czego połowa omówiona w książce, a pozostałe w formie rozwiązania ćwiczeń na nośniku CD, przeanalizowane 4 języki programowania, także zupełnie nieistniejące w Polsce Pascal dla AVR i asembler dla ARM. Masa informacji, które zielonego w sprawach mikrokontolerów uczynią ich programistą...
Się kolega keruseykaryu nie postarał zbytnio. To tak w skrócie
Chciałbym polecić Wam darmowy do użytku domowego program PC MIDletPascal 2.02, za pomocą którego w (prostym) języku Pascal napiszecie własną aplikację... microjava.
Dodatkowe informacje w opisie poniżej.
Zachęcam do pisania i wrzucania na forum własnych programów
MIDletPascal 2.02
Link: [Pobierając ten plik uszanuj wolę kupującego/tłumacza i jeśli chcesz wstawić ten plik na inne forum nie zapomnij wspomnieć o nim] Aby zobaczyć link należy się zarejestrować!
Opis: Znasz Pascala? Może dopiero się go uczysz? Albo zdajesz maturę z informatyki i wybrałeś ten język do rozwiązywania zadań? To aplikacja dla Ciebie! Teraz dzięki tej aplikacji możesz napisać własny program na komórkę, a MIDletPascal przekonwertuje go na mobilną microjavę. Tak przygotowana aplikacja ruszy na każdym telefonie obsługującym J2ME.
Bo tak między Bogiem a prawdą, to jeżeli ktoś porywa się na C++/PHP/Javę (bo wszyscy z tego korzystają) nie wiedząc co to jest obiektowość czy klasa, to obiera złą drogą. Dlaczego? Bo programowanie to sztuka znajdowania optymalnego rozwiązania, a nie stukanie w klawiaturę. Żeby brać się za coś większego trzeba posiadać chociaż minimum wiedzy ze struktur, algorytmów itepe. Dla przykładu, jeżeli ktoś chce mi napisać program, który ma stanowić dajmy na to książkę telefoniczną i wybierze do tego c++ i zastosuje STLowy vector, to znaczy że kiepski z niego programista, bo nie ogarnia tego co kompilator robi i nie widzi różnicy.
To co napisales tutaj jest prawda :) Mowisz jak moj znajomy i jego dziewczyna :) Pracuja w Comarchu xD bo sa tak dobrzy xD wiele wlasnie nauczysz sie polegajac na wiedzy innych... ale najwazniejsze sa solidne podstawy i tak jak powiedzial kolega Lukasz to nie rzucajmy sie z motyka na slonce tylko zacznijmy od czegos latwiejszego aby zrozumiec cos trudniejszego... ja chyba przerzuce sie na PHP i Asp.Net bo C# ostatnio mnie nie pociaga xD w szkole robimy C++ po zmudnej nauce Pascala i z C++ jestem bardzo zadowolony ;]
Bardzo dobra strona o prograwowaniu w Turbo Pascal'u:
http://turbopascal.skryptoteka.pl/index-noflash.html
EDIT:
Turbo Pascal - jedna z popularniejszych implementacji kompilatorów języka Pascal, zintegrowane środowisko programistyczne, produkt firmy Borland International dla procesorów Z-80 (system CP/M) oraz rodziny Intel 80x86 i nowszych. Nie jest obecnie już rozwijany.
W paczce znajduje się:
- program tp70.exe;
- Turbo Pascal.doc - kurs;
- KursPasCZ1pocz.doc - kurs drugi z opracowaniem;
- Operatory arytmetyczne i typy danych. doc - opis typów arytmetycznych, relacyjnych, logicznych; typy danych w pascalu oraz kolejność działań w wyrażeniu.
http://rapidshare.com/files/69173861/turbo_pascal_by_lisu.rar
Jeżeli ktoś chce to mogę wrzucić także zadania do rozwiązania.
Zadanie
Przeprowadzić analizę (podając specyfikację i ciąg kroków) rozwiązania:
a) równania liniowego ax+b=0 (a,b ϵ R)
b) nierówności liniowej
- ax+b>0 (a,b ϵ R) dla osób z numerem nieparzystym w dzienniku lekcyjnym
- ax+b<0 (a,b ϵ R) dla osób z numerem parzystym w dzienniku lekcyjnym
c) układu równać liniowych
a1x+b1y=c1
a2x+b2y=c2
gdzie (a1,b1,c1,a2,b2,c2 ϵ R)
wykorzystując metodę wyznacznikową oraz algorytm przedstawić w postaci schematu blokowego i programu z procedurami zapisanego w języku Turbo Pascal.
POMOCY! Jest mi to baaaardzo potrzebne:(
[Pascal] Obliczanie równania
siema wszystkim.
musze zrobic dwa programy z ponizszych czterech tematow:
1. napisz program obliczajacy rozwiazanie rownania: a x + b = c, gdzie a, b, c to dowolne liczby rzeczywiste. do przechowywania wartosci wspolczynnikow rownania i rozwiazania wykorzystaj zmienne dynamiczne.
2. napisz program, ktory czyta imiona i nazwiska osob z twojego semestru, umieszcza je w tablicy (tablicach) a nastepnie drukuje imie i nazwisko osoby o podanej liczbie porzadkowej.
3. napisz program symulujacy w trybie znakowym ruch pileczki odbijajacej sie pionowo od podlogi. pileczka w kolejnym odbiciu osiaga wysokosc nizsza o 1/4 od poprzedniej wysokosci. poczatkowa wysokosc jest rowna wysokosci ekranu.
4. napisz funkcje obliczajaca a do potegi b. napisz program wyznaczania poteg dla dowolnej ilosci par lub liczb rzeczywistych a i b. program powinien pytac uzytkownika czy chce obliczac potege kolejnej liczby.
co prawda znam podstawy pascala ale wogole nie wiem jak sie zabrac za ktorys z tych programow. moglby ktos naprowadzic mnie na wlasciwy kierunek?
licze na was.
nazwa-rekordu.nazwa-pola, czyli tablica[indeks elementu].pole-wewnątrz-rekodru
co do sortowania to jesli nie wymagaja, zeby program byl wydajny to olej kłiksorta, zrob sobie tablice rekordow, nastepnie napisz procedure, ktora znajduje najwiekszy element z tej tablicy z pliku i ustawia na 1 miejscu w tej nowej tablicy, kasuje ten element najwiekszy z tablicy z plikow i szuka kolejnego najwiekszego i tak az do ostatniego. Gdy zmieni sie kryterium, to czyscisz ta nowa tablice i sortujesz wedlug nowego kryterium.
o ile dobrze pamietam pascala
t1 : array[1..n] of TRekTest;
t2 : array[1..n] of TRekTest;
for j:=1 to n do
begin
for i:=1 to n do
t1[i+1].poleI1 > t1[i].poleI1 then begin max:=i+1; t1[i+1].poleI1:=0;end;
t2[j]:=t1[max]; {jakos dalo sie przepisac caly rekord}
end; {prostszego rozwiazania nie ma :D}
Coś w stylu AVT 3500 ?
Witam,
Czy są jakieś alternatywne zestawy względem AVT 3500 ?
http://sklep.avt.com.pl/go/_info/?id=45401
Wprawdzie AVT 3500 mi odpowiada, ale przed kupnem chciałbym porównać z
innymi tego typu
zestawami a takich nie udało mi się znaleźć.
Szukam zestawu do nauki mikrokontrolerów no i żeby coś się dało z tego
zrobić. Chodzi mi o rozwiązania typu All-In-One - żebym nie musiał jeździć
po sklepach i kompletować podzespoły... Najlepiej jeszcze z jakimś kursem
programowania w komplecie.
Na PC dużo programuję, znam Pascal i Basic, mam podstawy C i Assemblera.
Elektroniką też się trochę bawiłem.
Pozdrawiam
Tygrysek
PS.
Z tego co widzę procesor 90S2313 zastosowany w AVT 3500 ma 2MB pamięci
programu, a Bascom demo ma limit 4B, więc fakt wersji demo w niczym nie
umniejsza zestawowi?. Czy tak jest rzeczywiście? Czy mogę w AVT 3500 (lub
inny tego typu zestaw) włożyć odpowiedni procesor z większa pamięcią?
Połączyłem komputer z układzikiem z atmega8.
Po stronie pc program terminal v1.9b, po stronie elektroniki układ USB-CDC który działa napewno. Ogólnie wszystko gra. Układ odbiera dane, problem pojawia się przy ich wysyłaniu.
Mianowicie wysyłając kolejne znaki (wg procedury z datasheeta atmega) przechodzą tylko niektóre. Jest to zależne od rozmiaru ramki danych. Dla tego samego zestawu wysyłanych znaków (dokładnie: "abcdefgh...") odbieram:
dla 7 bitowej ramki: abxdxxghx... gdzie x to krzak
dla 8 bitowej ramki: cefijl... bez krzaków
Co interesujące znaki dla 8bit ramki pasują w miejsce krzaków ramki 7-bitowej.
Kto to wyjaśni?
Udało mi się odkryć tylko tyle że układ nadaje znaki raz w kodzie szesnastkowym a raz w oktalnym - w zależności od przesyłanego znaku.
PROCEDURA NADAWCZA z datasheeta:
void USART_Transmit( unsigned char data )
{
/* Wait for empty transmit buffer */
while ( !( UCSRA & (1<<UDRE)) )
;
/* Put data into buffer, sends the data */
UDR = data;
}
WYSYŁANIE ZNAKÓW:
USART_Transmit(0x61); // 'a'
USART_Transmit(0x62); // 'b'
USART_Transmit(0x63);
USART_Transmit(0x64);
USART_Transmit(0x65);
USART_Transmit(0x66);
USART_Transmit(0x67);
USART_Transmit(0x68);
USART_Transmit(0x69);
USART_Transmit(0x6A);
USART_Transmit(0x6B);
USART_Transmit(0x6C);
Wszystko standardowo.
Powtarzam pytanie: dlaczego w zależności od rozmiaru ramki danych znaki są wysyłane w dwóch różnych systemach?
Na tej stronie jest tablica znaków:
http://www.pascal.webpack...dzial=26&id=180
Proszę o pomoc bo nie mogę się doszukać rozwiązania.. to napewno nie wina jakiegoś bitu w tych znakach. Wszystko powinno działać dla 7bitowej ramki bo znaki jakie chce przesłać mieszczą się w 7 bitach (7bit to zawsze zero dla mojego kompletu danych).
Z góry dziękuje komuś kto już się z tym spotkał lub ma jakiś pomysł.
[ Dodano: 2009-06-30, 20:49 ]