ZXNet эхоконференция «code.zx»

Привет, All !

Далее идет сама Сабжевая п/п, но я почему-то думаю,
что она работать не будет... Смотрите сами:

================BRED#1=================

Для програмистов

Павел Стахов / Studio Stall

Предлагаю доработанню мною процедру вы-
вода спрайта размером 2*2 знакоместа.

;b=y c=x
;a=номер спрайта

SPRITE1 DI
LD (WSP1+1),SP
LD H,0
LD L,A
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
ADD HL,HL
LD DE,S_ADR
ADD HL,DE
LD C,A
CALL 8880 ;#22B0
NEG
ADD A,8
LD (LSB+2),A
LD SP,HL
LD A,16

S15 EX AF,AF'
LD A,D
CP #58
JR NC,WSP1
POP HL
POP IX
XOR A

LSB LD BC,#00FF

S_LP1 ADD HL,HL
SET 0,L
RL C
ADD IX,IX
RLA
DJNZ S_LP1
LD B,A
LD A,(DE)
AND C
OR B
LD (DE),A
INC E
LD A,(DE)
AND B
OR HX
LD (DE),A
INC E
LD A,(DE)
AND L
OR LX
LD (DE),A
DEC E
DEC E
INC D
LD A,D
AND 7
JR NZ,S14
LD A,E
ADD A,#20
LD E,A
JR C,S14
LD A,D
SUB 8
LD D,A

S14 EX AF,AF'
DEC A
JR NZ,S15

WSP1 LD SP,0
EI
RET

S_SDR INCBIN "SPRITE.C" ;ЗАГРУЖАЕМ СПРАЙТ...


═══Disassem PZU 8880dec.═══
LD B,A
AND A
RRA
SCF
RRA
AND A
RRA
XOR B
AND 248 ;#F8
XOR B
LD H,A
LD A,C
RLCA
RLCA
RLCA
XOR B
AND 199 ;#C7
XOR B
RLCA
RLCA
LD L,A
LD A,C
AND 7
RET
═════════

═════════

Привет, Alexander.
Ср 30 Окт 02 Alexander Shushkov -> Paul Stahov:

AS> Пpавильно Паша, она pаботает. Я сам ее пpовеpял:)
AS> Alexander

Смайл тут тебе не поможет, ты проверь ещё раз.

В обе координаты x,y там попадает номер спрайта.

Спасибо за внимание.

On 19 Oct 02 23:59:39 Evgeny Goljakov (500:95/462.8) wrote to All:
EG> Привет, All !

EG> Далее идет сама Сабжевая п/п, но я почему-то думаю,
EG> что она работать не будет... Смотрите сами:
А почему тебе кажется, что не будет ? Ж:)

Пpивет Paul!

Пpавильно Паша, она pаботает. Я сам ее пpовеpял:)
Alexande

Привет, Alexander.
Вс 10 Hоя 02 Alexander Shushkov -> Evgeny Goljakov:

AS> Пpоца, котоpая y меня в Абзаце опyбликована pаботает! Hо
AS> что-то непонятное там было, сейчас yже не помню. А здесь
AS> вpоде пpиведена пpоца как pаз от тyда (Абзац).

Если такая как субж-то я уже писал как она будет работать :)

Собсно, хотелось получить сюда от автора bugfix.


Спасибо за внимание.

Пpивет Evgeny!

Пpоца, котоpая y меня в Абзаце опyбликована pаботает! Hо что-то непонятное там
было, сейчас yже не помню. А здесь вpоде пpиведена пpоца как pаз от тyда
(Абзац).

Alexande

||*()*|| Привет тебе, _/Evgeny/_!

09 ноября 2002 04:14, Evgeny Goljakov писал(а) Alexander Shushkov:

AS>> Пpоца, котоpая y меня в Абзаце опyбликована pаботает! Hо
AS>> что-то непонятное там было, сейчас yже не помню. А здесь
AS>> вpоде пpиведена пpоца как pаз от тyда (Абзац).

EG> Если такая как субж-то я уже писал как она будет работать :)
EG> Собсно, хотелось получить сюда от автора bugfix.

От автора Бреда, Абзаца, или процедуры? ;)

Всего наилучшего! С вами был /*Gandalf*/ *Grey*. ||*()*||

Пpивет Evgeny!

Автоp вpоде пpизнал ошибкy.

Alexande

Привет, Aleksey.
Вт 19 Hоя 02 Aleksey Senilov -> Evgeny Goljakov:

EG>> Собсно, хотелось получить сюда от автора bugfix.

AS> От автора Бреда, Абзаца, или процедуры? ;)

Тот кто допустил дезу

Спасибо за внимание.

Привет, Alexander.

AS> Автоp вpоде пpизнал ошибкy.

В умышленно вами затертом оригинале была просьба увидеть
исправленную версию данного алгоритма.

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

Спасибо за внимание.

||*()*|| Привет тебе, _/Evgeny/_!

23 ноября 2002 00:03, Evgeny Goljakov писал(а) Aleksey Senilov:

EG>>> Собсно, хотелось получить сюда от автора bugfix.
AS>> От автора Бреда, Абзаца, или процедуры? ;)
EG> Тот кто допустил дезу

Для начала б выяснить, кто именно допустил :)

Всего наилучшего! С вами был /*Gandalf*/ *Grey*. ||*()*||

Привет, Aleksey.
Вт 26 Hоя 02 Aleksey Senilov -> Evgeny Goljakov:

EG>>>> Собсно, хотелось получить сюда от автора bugfix.
AS>>> От автора Бреда, Абзаца, или процедуры? ;)
EG>> Тот кто допустил дезу

AS> Для начала б выяснить, кто именно допустил :)

AS> + Origin: Кто я? (ФЗ/СЛ) (500:8332/1)
^^^^^^
Отдельные элементы даже не знают кто они есть, собсно :)

ps. Hе плохое (читай хорошее) интервью в какой-то газете #2
пролетело, но так и не понял о каких методах/приемах оптнмизации кроме
call/ret там упоминалось, может чуть
раскроешь завесу для общественности?

Спасибо за внимание.

||*()*|| Привет тебе, _/Evgeny/_!

29 ноября 2002 04:30, Evgeny Goljakov писал(а) Aleksey Senilov:

AS>> + Origin: Кто я? (ФЗ/СЛ) (500:8332/1)

EG> ^^^^^^
EG> Отдельные элементы даже не знают кто они есть, собсно :)

Ага, например Император :) "ФЗ" = "Фальшивые зеркала", читал?

EG> ps. Hе плохое (читай хорошее) интервью в какой-то газете #2
EG> пролетело, но так и не понял о каких методах/приемах оптнмизации
EG> кроме call/ret там упоминалось, может чуть
EG> раскроешь завесу для общественности?

Антиоффтопик, да? :) А что за газета? Могу, конечно, поискать, особенно если
этот второй номер и был последним :)
Поискал, навскидку ничего не нашёл...

Всего наилучшего! С вами был /*Gandalf*/ *Grey*. ||*()*||

Привет, Aleksey.
Вт 3 Дек 02 Aleksey Senilov -> Evgeny Goljakov:

AS> Ага, например Император :) "ФЗ" = "Фальшивые зеркала",
AS> читал?

Ты ешо в этой эхе спроси хожу ли я в музей :))

AS> Поискал, навскидку ничего не нашёл...

Так я и говорю не нашел :)

Спасибо за внимание.