Mình hướng dẫn pascal theo bình luận nhé:
Các câu lệnh cần dùng:
1. Di chuyển, đi đến:
gotoxy
2. Đồ họa đơn giản:
textcolor : tô màu chữ
3. Cách vẽ nhân vật (bạn hãy tự tập):
Bạn hãy dùng các kí tự để tạo hình..
Vd: máy bay.
- Qua phải: =[-
- Qua trái: -]=
Chương trình mẫu:
Điều khiển máy bay dễ cho đến khi nhấn phím 0:
uses crt;
var x,y:longint; k:char;
begin
clrscr;
x:=70;
repeat
k:=readkey;
if ord(k)=75 then dec(x);
if ord(k)=77 then inc(x);
clrscr;
gotoxy(x,1);
write('=|=');
until k='0';
end.
