HEALTHY POLITICS

Assalamu'alaikum Wr.Wb.
Regards pascal mania, good morning lovers Turbo Pascal, on this happy occasion I will write code to set the size of the display mode in turbo pascal 7.0. screen mode generally have memperunik function only for our program that initially large and then become small. . straight course. follow the following steps carefully.

How to make the program display mode (CO40):

1. Please open your program Turbo Pascal 7.0.
2. Select the file - new.
3. Then write the code below:
program modelayar;
Uses CRT;
begin
TextMode(CO40);
Writeln('A Real BIG Characters on screen !');
Readln;
TextMode(CO80);
Writeln('Back to normal');
Readln;
end.
4. Then compile - compile or alt + f9 to make sure there are no errors in your program code.
5. If there are no errors please select run - run.
6. You can safely create their own programs screen mode.

* Greeting pascal mania and may be useful.

Assalamu'alaikum Wr.Wb.
Regards pascal mania, good afternoon lovers Turbo Pascal, on this happy occasion I will write code to make our writing will be on the middle of the page program in turbo pascal 7.0. text placement amid we usually use to write a program title that we make, in our text positioned at the center position is not difficult, we just asked to enter the code "gotoxy." and write in the columns and rows later to how we write a text. just follow these steps carefully.

How to create a writing program at the center / center:

1. Please open your program Turbo Pascal 7.0.
2. Select the file - new.
3. Then write the code below:
program gotoxy;
uses crt;
begin
clrscr;
gotoxy(18,2);
writeln('I'm learning to make the writing is in the middle');
gotoxy(25,3);
writeln('In NewsBlogs21.blogspot.com');
readln;
end.
4. Then compile - compile or alt + f9 to make sure there are no errors in your program code.
5. If there are no errors please select run - run.
6. Congratulations you can make your program into position in the middle of text.

Description:

• marked in red is the core code of the program, which is to insert columns and rows which one we will use to put the text.
• marked with a blue column layout to what is the position that we will put the text we create later.
• marked with a green line to what is the location of the position that we will put the text we create later.

* Greeting pascal mania and may be useful.

Assalamu'alaikum Wr.Wb.
Regards pascal mania, good afternoon lovers Turbo Pascal, on this happy occasion I will write program code to give color to the text and background in turbo pascal 7.0. staining on the turbo pascal program is essential in beautifying our programs and become more appealing to the eye. straight course. follow the following steps carefully.

How to make colored paper program :

1. Please open your program Turbo Pascal 7.0.
2. Select the file - new.
3. Then write the code below:
colored program;
uses crt;
begin
textcolor(15);
textbacground(4);
clrscr;
writeln('I'm learning how to make colored paper');
writeln('Di NewsBlogs21.blogspot.com');
readln;
end.
4. Then compile - compile or alt + f9 to make sure there are no errors in your program code.
5. If there are no errors please select run - run.
6. Congratulations you can make your program become colored.

information: the core of the code coloring in this program lies in the code that I gave a red color. you can change the color with your own desires on the code I marked earlier. The following are numbers that represent the color of each color: 0 (black), 1 (blue), 2 (green), 3 (​​cyan), 4 (red), 5 (magenta), 6 (brown), 7 (lightgray ), 8 (DarkGray), (9) lightblue, 10 (lightgreen), 11 (lightcyan), 12 (lightred), 13 (lightmagenta), 14 (yellow), 15 (White).



* Greeting pascal mania and may be useful.

Assalamu'alaikum Wr.Wb.
Regards pascal mania, good morning lovers Turbo Pascal, on this happy occasion I will write the code for the login program in turbo pascal 7.0. log in turbo pascal function if we do not write / fill in what is provided by the user on the program then we will not get into the program content, and vice versa if the user can fill in what is provided by the user then we will be able to enter into the program content. straight course. follow the following steps carefully.

How to make program LOGIN:

1. Please open your program Turbo Pascal 7.0.
2. Select the file - new
3. then write the code below:
program login;
uses crt;
var
user,password,dtuser,dtpassword,kembali: string[30];
begin
clrscr;
write ('email: '); readln(user);
write ('password: '); readln(password);

dtuser:='newsblogs21.blogspot.com';
dtpassword:='1234567';

if (dtuser=user) and (dtpassword=password) then
   begin write ('selamat datang ...'); readln; end
else
   begin writeln ('user dan password yang anda masukkan tidak cocok...');
   readln; end;
readln;
end.
4. Then compile - compile or alt + f9 to make sure there are no errors in your program code.
5. If there are no errors please select run - run.
6. Congratulations you can make program LOGIN own.

* Greeting pascal mania and may be useful.