10.01.2013 / 14:37 | |
Maxxxl123 Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| BegzoDchik, begin
while(true) do begin
fillrect(0,0,screenwidth,screenheight);
drawimage("",a,50);
a:=a+1;
repaint();
end;
|
10.01.2013 / 14:38 | |
Maxxxl123 Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| BegzoDchik, сойдет?
|
10.01.2013 / 14:41 | |
BegzoDchik Пользователь Сейчас: Offline
Имя: Begzod Откуда: Ташкент Регистрация: 15.11.2012
| ща заценю
|
10.01.2013 / 14:43 | |
Maxxxl123 Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| ток FillRect DrawImage
|
10.01.2013 / 14:45 | |
BegzoDchik Пользователь Сейчас: Offline
Имя: Begzod Откуда: Ташкент Регистрация: 15.11.2012
| getwidth,getheight не надо?
|
10.01.2013 / 14:46 | |
Maxxxl123 Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| getwidth,getheight не надо? как хочеш, вместо них свои размері екрана подставь |
10.01.2013 / 15:23 | |
vl@volk Пользователь Сейчас: Offline
Имя: Владислав Откуда: Земля Регистрация: 26.12.2012
| program name;
var
x:integer;
begin
x:=0;
while true do begin
x:=x+2;
setcolor(0,0,255);
fillrect(x,5,50,50);
delay(200);
repaint;
if x>200 then x:=0;
if getkeyclicked=KE_KEY5 then break;
end;
end.
вот наподобе такого что-то попробуй __________________
знает толк |
10.01.2013 / 16:14 | |
gtasase Пользователь Сейчас: Offline
Имя: Влад Откуда: Карадарас Регистрация: 05.12.2011
| как сделать пиксельный движок?
|
10.01.2013 / 16:20 | |
Maxxxl123 Пользователь Сейчас: Offline
Имя: Макс Откуда: Чернигов Регистрация: 13.10.2011
| gtasase, по подробнее что именно ты собрался делать
|
10.01.2013 / 16:35 | |
vl@volk Пользователь Сейчас: Offline
Имя: Владислав Откуда: Земля Регистрация: 26.12.2012
| Я там чуть в растановке ошибся. И как очистку экрана в мп делать?
__________________
знает толк |