Оберон-клуб «ВЄДАsoft»
https://zx.oberon.org/forum/

Lb
https://zx.oberon.org/forum/viewtopic.php?f=10&t=124
Страница 1 из 1

Автор:  slenkar [ 30 июн 2013, 15:15 ]
Заголовок сообщения:  Lb

GrSprite sounds good
You could steal the code from laser. Basic for this?

Автор:  Zorko [ 30 июн 2013, 15:41 ]
Заголовок сообщения:  Re: Lb

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

Автор:  slenkar [ 03 июл 2013, 06:29 ]
Заголовок сообщения:  Re: Lb

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

Автор:  Zorko [ 03 июл 2013, 09:19 ]
Заголовок сообщения:  Re: Lb

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.

Автор:  Zorko [ 03 июл 2013, 10:04 ]
Заголовок сообщения:  Re: Lb

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).

Автор:  slenkar [ 03 июл 2013, 20:10 ]
Заголовок сообщения:  Re: Lb

yep that works thanks

Страница 1 из 1 Часовой пояс: UTC + 2 часа
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/