Turbo Pascal.. HELP!

[uki1]

Witam

Potrzebuje pomocy w napisaniu tych programów w Turbo Pascalu jak by ktoś był miły i mi pomógł był bym bardzo wdzięczny.

1. Napisz program, który podzieli ekran na cztery części i każdą z nich obramuje ramką złożoną z odpowiednich znaków (odnośnik 1). Kolejne ramki powinny się pojawiać po naciśnięciu przez użytkownika klawisza „Tab” (kod ASCII = 29). Jeśli na ekranie pojawią się już wszystkie ramki, to kolejne naciśnięcia „Tab” powinny spowodować wymazywanie ramek, począwszy od tej która została wyświetlona najwcześniej. Działanie programu powinno dać się przerwać w dowolnym momencie poprzez naciśniecie klawisza „Esc” (kod ASCII = 27).

odnośnik 1:
Kody ASCII odpowiednich znaków można poznać pisząc prosty program, który wypisze wszystkie znaki wraz z ich kodami. Edytor IDE Turbo Pascala pozwala na wprowadzenie dowolnego znaku przez wciśnięcie prawego klawisza Alt, wpisanie na klawiaturze numerycznej kodu odpowiedniego znaku i puszczenie klawisza Alt.


2. Napisz program, który pokaże w jaki sposób działają procedury insline, delline i clreol. Ćwiczenie należy wykonać dla trybu 80x25 i 40x25.

[tom]

tzn. co rozumiesz przez pomoc ?

Napisanie ci gotowca, czy cos innego. Jak to pierwsze to nie licz nawet na to...

To zapewne jakies zadanie do szkoly itp. wiec albo olewales lekcje i bedziesz mial problem. A jak nie olweales to wklej kod ktory udalo ci sie napisac i powiedz czego ewentualnie nie rozumiesz. Na takie pytania moge ci zapewne odpowiedziec.

[Kenay145]

Dzielenie obrazu w trybie tekstowym nie jest jakoś przesadnie trudne. Należy wykorzystać rekurencje lub po prostu podzielić ekran na 4 cześći, po tym pętlę FOR do oddzielenia okienek. A jeśli chodzi o pojawianie się poszczególnych okien to po prostu wczytywanie readkey (bez echo) oraz później wykorzystanie to w rekurencji IF zmienna=#29 Then ... nie ma tutaj czegoś bardzo trudnego. natomiast z wymazywaniem mam pomysł być może trochę chaotyczny z użyniem window. A jeśli chodzi o przerwanie programu to cały kod zaczynąć od bloku instrukcji Begin kończąc przed end repeat (jakiś kod) until (zmienna typu char, jak i w innych wypadkach). Czyli skracając repeat (kod) until zmienna=#27 zakładając, że nie pisałeś tego w procedurach

Serdecznie pozdrawiam