Оберон-клуб «ВЄДАsoft»

Твердыня модульных языков
Текущее время: 18 июн 2025, 22:48

Часовой пояс: UTC + 2 часа




Начать новую тему Ответить на тему  [ Сообщений: 6 ] 
Автор Сообщение
 Заголовок сообщения: Lb
СообщениеДобавлено: 30 июн 2013, 15:15 
Не в сети

Сообщения: 104
GrSprite sounds good
You could steal the code from laser. Basic for this?


Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Lb
СообщениеДобавлено: 30 июн 2013, 15:41 
Не в сети
Аватара пользователя

Сообщения: 1019
Откуда: Днепропетровская обл.
slenkar писал(а):
GrSprite sounds good
:)
And maybe just GrSpr will be better?

slenkar писал(а):
You could steal the code from laser. Basic for this?
No, we need more efficient code. Laser Basic is too old and written not so effectively.

Maybe we'll may use ideas or small pieces of code from Laser Basic.

Btw, have you seen sprite examples from z88dk? Look to this, please. Their sprite pack library looks very interesting. But I keep thinking about how to design an uniform interface to work with sprites for different platforms, not only ZX.


Вложения:
ex1.tap [3.7 КБ]
Скачиваний: 1168
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Lb
СообщениеДобавлено: 03 июл 2013, 06:29 
Не в сети

Сообщения: 104
yes that is a good example,

could you make clear screen clear the bottom 3 rows please? When using non-ROM PRINT I can print on the bottom but CLS doesnt change them from BORDER to PAPER colour


Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Lb
СообщениеДобавлено: 03 июл 2013, 09:19 
Не в сети
Аватара пользователя

Сообщения: 1019
Откуда: Днепропетровская обл.
Just use:
Код: "OBERON"
  1. (* Save PEEK 23624, if needs *) borderAttr := Basic.PEEK(23624);
  2. Basic.POKE(23624, Basic.PEEK(23693)); Basic.CLS;
  3. (* Restore 23624, if needs *) Basic.POKE(23624, borderAttr);
I can, of course, make "right CLS", but it will be "not ZXBasic-like CLS". But your proposition is absolutely cool, we'll have right CLS for whole screen (with attrs) in module Console.


Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Lb
СообщениеДобавлено: 03 июл 2013, 10:04 
Не в сети
Аватара пользователя

Сообщения: 1019
Откуда: Днепропетровская обл.
I've added the option that extends CLS as you need:
Код: "C"
[ ZXDev/Obj/BasicCfg.h ]
/* Use CLS for whole screen (with PAPER attributes in bottom lines): */
#define CLS_FULLSCREEN
In principle, it implements the same logic (saving PEEK 23624, POKE'ing PEEK 23693 to 23624, old CLS (0D6BH), restoring 23624).


Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Lb
СообщениеДобавлено: 03 июл 2013, 20:10 
Не в сети

Сообщения: 104
yep that works thanks


Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 6 ] 

Часовой пояс: UTC + 2 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Создано на основе phpBB® Forum Software © phpBB Group
© VEDAsoft Oberon Club