Pascal

Zbiór moich kilku bardziej udanych, prostych programów, napisanych w TurboPascalu. Przejdź do sekcji download

Postanowiłem umieścić zbiór moich kilku bardziej udanych programów w napisanych w TurboPascalu wraz z ich kodami źródłowymi (znajdują się w katalogach src). Większość z nich została napisana chyba jeszcze w podstawówce, pozostałe w czasie gdy chodziłem do gimnazjum i liceum. Zapewne są pełne błędów, mogą wywalać się zupełnie bez powodu, powodować pożary itp. - odpowiedzialności za straty moralne i fizyczne nie biorę. Umieszczam je tu jedynie w ramach ciekawostki. Były one pisane gdy - patrząc z dzisiejszej perspektywy - o poważnym programowaniu nie miałem jeszcze za bardzo pojęcia. Dlatego też kody źródłowe mogą być (w zasadzie na pewno są) napisane dziwnie/niezrozumiale lub po prostu głupio. Na studiach na szczęście definitywnie przerzuciłem się na nowocześniejsze języki programowania takie jak C/C++ czy Java, chociaż pewien sentyment do Pascala pozostał.

Angielski

Prosty program do nauki angielskiego. Zawiera bazę słówek, do której można dodawać pary wyrazów, a następnie ćwiczyć ich znajomość lub używać jako słownika. Dołączona jest baza ponad 1000 słówek którą przygotowałem sobie kiedyś do nauki języka.

Angielski: tryb ćwiczeń znajomości słówekAngielski: tryb ćwiczeń znajomości słówek

Balony

Bardzo prosta gierka polegająca na zestrzeliwaniu uciekających balonów. Sterowanie celownikiem - strzałki, Enter - strzał.

Balony: w trakcie gryBalony: w trakcie gry

Kasyno

Zebrane w jednym miejscu kilka prostych gier: Totolotek, Jednoręki bandyta, Pamięć, Strzał oraz Refleks. Gra rozpoczyna się ze startową pulą pieniędzy, którą następnie można wydawać na dowolną z gier i zarabiać (lub tracić) pieniądze. Dokładne informacje i zasady każdej z gier są zamieszczone w info programu.

Kasyno: jedna z gier w zestawie - Jednoręki BandytaKasyno: jedna z gier w zestawie - Jednoręki Bandyta

Matematyka

Pakiet 4 programów: Matematyka - oblicza pola i obwody figur płaskich na podstawie podanych danych, Matematyka2 - oblicza objętości i pola powierzchni brył, Miary - konwerter miar, Wykresy - generator kolorowych wykresów. Wszystkie programy zostały napisane w trybie graficznym, więc wszystkie "rysunki" są w postaci prymitywnych ASCII-artów. Niestety nie mam kodu źródłowego tych programów.

Matematyka: obliczanie objętości ostrosłupa ściętegoMatematyka: obliczanie objętości ostrosłupa ściętego

Mors Koder

Prosty program do kodowania i dekodowania plików tekstowych zapisanych w kodzie Morse'a. Posiada również funkcję dziękowego odtwarzania zapisanego kodu przez systemowy buzzer.

Mors Koder: kodowanie tekstuMors Koder: kodowanie tekstu

Radiowęzeł

Program napisany do szkolnego radiowęzła w II LO w Ostrołęce. Miał za zadanie zautomatyzować odtwarzanie muzyki na przerwach i tym samym ułatwić pracę kolegom opiekującym się szkolną rozgłośnią. Z tego względu godziny przerw, kiedy odtwarzana jest muzyka są wpisane na sztywno i nie da się ich zmienić. Pliki do odtwarzania powinny znajdować się w tym samym katalogu co program i mieć koniecznie format WAV 8-bit mono. Tylko takie pliki muzyczne powinny znaleźć się w katalogu z programem. Program dość dobrze pełnił swoją rolę, nie zdarzyło się żeby zaczął odtwarzanie muzyki w czasie lekcji (istotne jest precyzyjne ustawienie zegara systemowego w komputerze). Niestety ze względu na to, że nie odtwarza plików mp3 jest nieco uciążliwy w praktyce, gdyż za każdym razem trzeba konwertować piosenki do formatu rozpoznawanego przez program.

Radiowęzeł: układanie listy piosenekRadiowęzeł: układanie listy piosenek

Rally Racer 2008

Wyścigi samochodowe w widoku znanym z pierwszych części GTA. Dostępnych jest 20 tras oraz edytor, umożlwiający ich modyfikowanie. Niestety można ścigać się jedynie z czasem i próbować bić rekordy na każdej z tras. Sterowanie jest dość nietypowe, gdyż jednokrotne wciśnięcie strzałki w lewo lub w prawo powoduje natychmiastowy obrót samochodu o 45° w żądanym kierunki. Nie jest jednak aż tak łatwo, gdyż występują poślizgi i dość łatwo jest wylecieć z trasy. Różne typy nawierzchni mają różne właściwości, szczególnie uważać należy na lodzie i śniegu.

Rally Racer 2008: podczas wyściguRally Racer 2008: podczas wyścigu

Trygonometria

Mój pierwszy program napisany w trybie graficznym. Prezentuje cztery podstawowe funkcje trygonometryczne w postaci estetycznych wykresów. Posiada również kalkulator obliczający wartości tych funkcji dla podanego kąta.

Trygonometria: wykres funkcji sinusTrygonometria: wykres funkcji sinus

Twarze 2

Prosty progamik tworzący zabawne twarze z wybranych elementów (oczy, nos, usta). Napisany jest w trybie tekstowym, więc twarze tworzone są jako ASCII-art.

Twarze 2: twarz z elementów ASCIITwarze 2: twarz z elementów ASCII

Twarze 3

Nowa wersja poprzedniego programu, tym razem w prawdziwym trybie graficznym. Dzięki temu można m.in. zmieniać kolory rożnych elementów. Program posiada również więcej opcji (dodawanie brody, wąsów itp.)

Twarze 3: twarz stworzona w trybie graficznymTwarze 3: twarz stworzona w trybie graficznym

Wszystkie programy spakowane są w jednym pliku:

Pobierz PascalPascal.zip (408KB)

W przypadku problemów z uruchomieniem któregoś z programów polecam zastosowanie emulatora DOSBox

Copyright © 2005-, Michał Bemowski