Форум «Всё о Паскале» > Делаю игрушку на паскале

SkIv

26.04.2007 22:30

Ну вот приближается врем сдачи курсовой, а я вот не могу разобраться с такой проблеммой: "у меня есть уровень который прорисовывается около 3 секунд, ну это очень долго, и поэтому я решил повесить табличку "загрузка...", и весь процесс прорисовки спрятать на другой видео странице и все бы ничего, только вот получается так что за отображаемой страницей, где написанно "загрузка", "вылазит" страница с уровнем.
Как от этого избавится я не знаю, помогите пожалуйста

мисс_граффити

27.04.2007 0:58

может, ты покажешь, как все это реализовано?
или разработка курсовой идет по заказу спецслужб и является государственной тайной?

SkIv

27.04.2007 11:44

Вот код:

Код

assign(f,path_level1);
reset(f);
  SetActivePage(1);
    setcolor(15);
    Outtextxy(245,270,'loading...');
  setactivepage(0);
  SetVisualPage(1);
  for i:= 1 to 479 do
   begin
     for j:=1 to 639 do
      begin
       if j=638 then
         readln(f,color) else
        read(f,color);
        putpixel(j,i,color);
      end;
   end;
close(f);
konsole;                               {vivod konsoli}
setvisualpage(0);

на нулевой странице выводится изображение, а на первой надпись, а на деле почему-то часть нулевой страницы видно

volvo

27.04.2007 12:54

У тебя что, стандартный режим 640*480*16? Там же только одна видеостраница...

SkIv

27.04.2007 18:01

volvo, да, спасибо теперь буду знать. Сразу же вопрос, а можно ли не меняя видео режима справиться с такой задачей

SkIv

28.05.2007 20:25

Вот сделал, смотрите, правда там еще есть пара косячков
Зы совсем забыл, сказать, перед компиляцией поменяйте пути, все пути находятся в списке констант.

SkIv

30.05.2007 23:48

Прошу высказывать любые мнения.

Gonz

31.05.2007 23:18

Цитата(SkIv @ 30.05.2007 20:48)

Прошу высказывать любые мнения.

что-то 4 уровень глючит у меня конкретно - поле поднимается наверх, когда ставлю "галочку" внизу

SkIv

1.06.2007 0:02

Цитата(Gonz @ 31.05.2007 23:18)

что-то 4 уровень глючит у меня конкретно - поле поднимается наверх, когда ставлю "галочку" внизу

Блин тоже заметил, этот косяк, он появляется если несколько раз ошибся: экран начинает уползать вверх, но как избавиться от него не знаю. Может кто подскажет с чем это межет быть связано.

TarasBer

1.06.2007 2:16

После слова инитграпх я приписал SetTextStyle(2, 0, 4) - и стало гораздо лучше выглядеть, потому что у меня стандартный шрифт вместо цифр и пробелов иероглифы рисует...
А так - игра супер! Красиво сделано!

Gonz

1.06.2007 22:14

Цитата(SkIv @ 31.05.2007 21:02)

Блин тоже заметил, этот косяк, он появляется если несколько раз ошибся: экран начинает уползать вверх, но как избавиться от него не знаю. Может кто подскажет с чем это межет быть связано.

Замени readln, который стоит между появлением и стиранием сообщения об ошибке, на readkey или repeat ch:=readkey; until ch = #13; - мне помогло
вообще, по-моему readln в гравике лучше не использовать...

Gonz

2.06.2007 15:14

еще небольшой глюк - когда вводишь свое имя( при создании нового профиля), если поле пустое и нажать backspace, то появляется "ненужный" символ

Гость

2.06.2007 20:19

Цитата

Замени readln, который стоит между появлением и стиранием сообщения об ошибке, на readkey или repeat ch:=readkey; until ch = #13; - мне помогло
вообще, по-моему readln в гравике лучше не использовать...

О спасибо, так на много лучше.

Цитата

еще небольшой глюк - когда вводишь свое имя( при создании нового профиля), если поле пустое и нажать backspace, то появляется "ненужный" символ

А если еще раз нажать, то он опять исчезнет

Понимаю, что неприятно, бум исправлять, я вообще планирую при вводе ограничить все символы не буквенные и не символьные, а то если ESC нажать, то он тоже его вы водит