Ver. 1.0 Beta, Nie masz kompilatora? Teraz mo¿esz pisaæ skrypty ONLINE! Wersja podstawowa -nie zawiera wszystkich poleceñ Pascala. S³u¿y do nauki podstaw

Modu³ Crt


Modu³ Crt zawiera procedury i funkcje przydatne w prostych operacjach u¿ywanych przewa¿nie w trybie tekstowym. Polecenia modu³u Crt pomagaj± te¿ w odczytywaniu stanu klawiatury.



ClrScr; -Procedura powoduj±ca wyczyszczenie zawarto¶ci ekranu i ustawienie kursora graficznego w lewym górnym rogu.


ClrEol; -Procedura która czy¶ci liniê tekstu od pozycji kursora do koñca lini.


Delay(czas: Word) -Procedura, która czeka tyle milisekund (milisekunda=1/1000 sekundy) ile wynosi zmienna czas. Zmienna Czas musi byæ typu WORD (word to liczba ca³kowita od 0 do 65535).


DelLine; -Procedura czy¶ci ca³± linie, w której znajduje siê kursor


GotoXY(X,Y: Byte); przenosi kursor do pozycji X i Y. Pozycja 1,1 oznacza lewy górny róg ekranu.


HighVideo; -Rozja¶nia kolory, tzn. je¿eli wpiszesz ciemny czerwony i co¶ chcesz nim narysowaæ, bêdzie narysowane to jasnym czerwonym.


InsLine; Wstawia pust± liniê tam, gdzie siê znajduje kursor a resztê przenosi w dó³.


KeyPressed - Funkcja która zwraca warto¶æ TRUE je¿eli zosta³ naci¶niêty klawisz lub FALSE je¿eli nie.


LowVideo -Przyciemnia kolory patrz HighVideo.


NormVideo -Przywraca normalne kolory.


NoSound; -Wy³±cza d¼wiêk ze SPEAKERA (g³o¶niczka wbudowanego w komputer).


ReadKey; -Wczytuje wci¶niêty klawisz z klawiatury.


Sound(Hz:Word); -W³±cza d¼wiêk w SPEAKERZE o czêstotliwo¶ci Hz, np. aby wydaæ d¼wiêk o czêstotliwo¶ci 200Hz musisz wpisaæ: Sound(200); Najmniejsz± liczb± jaka mo¿e byæ u¿yta jako d¼wiêk mo¿e byæ warto¶æ oko³o 60 Hz!


TextBackground(kolor:Byte); Ustawia kolor t³a pod tekstem. Standardowo jest czarne. Poni¿ej podano jaki kolor odpowiada jakiej liczbie. Przyk³ad u¿ycia : TextBackground(5);


TextColor(kolor:Byte); Ustawia kolor liter na warto¶æ jak± przyjmuje zmienna kolor. Przyk³ad u¿ycia : TextColor(15); lub je¶li masz jak±¶ zmienn± np. k:=15; piszesz TextColor(k);


TextMode(mode:integer); Ustawia specyficzny tryb tekstowy. Normalny ma 80 znaków w pozycji X i 25 w pozycji Y. Instrukcja ta zmienia ten tryb.


WhereX; -Funkcja, która przyjmuje warto¶æ typu Byte zawieraj±c± pozycjê poziom± (inaczej pozycja X) kursora tekstowego.


WhereY; -Funkcja przyjmuje pozycjê Y kursora.


Window(X1,Y1,X2,Y2:Byte); Procedura ta ustawia w pamiêci okno, w którym mo¿na pisaæ. Od tej pory ka¿dy tekst bêdzie wypisywany w tym oknie. X1 oznacza od którego znaku w poziomie ma siê zaczynaæ okno, Y1 -od którego ma siê zaczynaæ okno w pozycji Y, a X2 i Y2 to wspó³rzêdne koñcowe, np. Window(10,10,70,15); Pozycja 1,1 to górny lewy róg ekranu.


Warto¶ci kolorów

Kolory podane w poni¿szej tabelce s± wykorzystywane w procedurach TextBackGround i TextColor a tak¿e w trybie graficznym modu³u Graph.




Numer

Nazwa koloru

Kolor

0

czarny


1

niebieski


2

zielony


3

cyan


4

czerwony


5

fioletowy


6

br±zowy


7

j. szary


8

szary


9

j. niebieski


10

j. zielony


11

j. cyan


12

j. czerwony


13

j. fiolet


14

¿ó³ty


15

bia³y

Programy ON-LINE!

Strona korzysta z plików cookie w celu ¶wiadczenia us³ug Google (reklamy, statytyki) oraz Facebook. Je¶li chcesz zablokowaæ pliki cookies wy³acz je w swojej przegl±darce. Potrzebujesz pomocy? kliknij