Zadanie zaliczeniowe nr 9 (2 trymestr), 5 II 2003
  (zadanie jest za 4 punkty, dwa tygodnie na jego wykonanie)


      Napisz   program  sàuæ•cy  do  wyòwietlania  na   ekranie
zawartoòci  pliku  tekstowego - nazwa tego pliku  jest  jedynym
parametrem  wywoàania programu. ZawartoòÜ caàego pliku  powinna
zostaÜ   wczytana   do   dwukierunkowej  listy   zadeklarowanej
nast©puj•co:

CONST
   Max_d = 80;
TYPE
   Wsk = Element;
   Element = RECORD
                Wiersz: String[Max_d];
                Nast: Wsk;
              Pop: Wsk
             END;

     Jeòli  jakiò  wiersz pliku tekstowego zawiera  wi©cej  niæ
Max_d znak¢w, to powinien on zostaÜ przy wczytywaniu podzielony
na  wiersze nie dàuæsze niæ Max_d tak, by kaæde sàowo  mieòciào
si©  w jednym wierszu (moæna przyj•Ü, æe kaæde sàowo ma dàugoòÜ
nie wi©ksz• niæ Max_d).

      ZawartoòÜ  listy  powinna  byÜ  wyòwietlana  na   ekranie
(kaædorazowo  wyòwietlane powinny byÜ 24  wiersze).  Uæytkownik
powinien mieÜ moæliwoòÜ wykonywania nast©puj•cych operacji:
     przewijanie   tekstu  o  jeden  wiersz  w  g¢r©   (poprzez
     wciòni©cie strzaàki w g¢r©),
   przewijanie tekstu o jeden wiersz w d¢à (poprzez
wciòni©cie strzaàki w d¢à),
   przewijanie tekstu o jedn• stron© w g¢r© (poprzez
wciòni©cie PgUp),
   przewijanie tekstu o jedn• stron© w d¢à (poprzez
wciòni©cie PgDn),
   zako‰czenie pracy programu (poprzez wciòni©cie Esc),
   wyszukiwania wprowadzonego sàowa w tekòcie (poprzez
wciòni©cie F2).
  
    Najniæszy   wiersz   ekranu  nie   jest   przeznaczony   do
wyòwietlania  zawartoòci listy. Powinien sàuæyÜ do wyòwietlania
menu  (czyli  informacji o dost©pnych do wykonania operacjach),
do  wprowadzania  przez  uæytkownika  wzorca  do  wyszukania  w
tekòcie   (po   uprzednim  wciòni©ciu  F2)  oraz   do   dalszej
komunikacji. Po zatwierdzeniu wzorca przez wciòni©cie  klawisza
Enter  lub  spacji, powinien byÜ on poszukiwany w  tekòcie  (od
samego  pocz•tku  listy). Jeòli zostanie  znaleziony,  powinien
pojawiÜ  si©  w  pierwszym wyòwietlanym na  ekranie  wierszu  i
dodatkowo   byÜ  zaznaczony  innym  kolorem.  Uæytkownik   moæe
zdecydowaÜ si© na wyszukiwanie kolejnego wyst•pienia  wzorca  w
tekòcie,  lub  tego  zaniechaÜ. Jeòli  wzorzec  w  tekòcie  nie
wyst©puje, powinien pojawiÜ si© stosowny komunikat.
    
    Uwaga.  Przydatne  mog• byÜ nast©puj•ce  funkcje  z  moduàu
Crt:
ClrScr, GotoXY, InsLine, TextBackground, TextColor, ReadKey.

Powodzenia!