Маленький Fix для DosX'a (Dickie Mailer)...

ZXNet эхоконференция «real.speccy»

От Felix Knajzev Кому All 16.08.2000

Приветствую тебя, All!

Сабж. Для тех, кто компилит свои DosX'ы из сорцов Олега Григорьева (ZXASM.
недавно тут пролетали). Фиксит неправильное число месяца (после августа,
включительно) в описателях файлов, создаваемых самИм Dickie.

1. Hаходим в файлах 'MR_*****.C' процедуру:


=============== тут мы начнем файл "MR_*****.C" ================
; *** proc
RTC_GetDosTime ld a, #37
ld (IntISR_rtc), a
call _rtc_corr_time
push af
ld hl, _rtc_year
ld a, (hl)
dec hl
sub 80
jr nc, not_y2000
add a, 100
not_y2000 add a, a
ld d, a
ld a, (hl)
dec hl
inc a
add a, a
add a, a
add a, a
add a, a
add a, a
or (hl)
inc a
ld e, a
dec hl
dec hl
ld b, (hl)
dec hl
ld c, (hl)
dec hl
ld a, (hl)
add a, a
add a, a
rr c
rra
rr c
rra
rr c
rra
ld l, a
ld a, b
add a, a
add a, a
add a, a
or c
ld h, a
ld a, #AF
ld (IntISR_rtc), a
pop af
ret
; *** end proc


=============== тут мы кончим файл "MR_*****.C" ================

2. Заменяем её на:

=============== тут мы начнем файл "MR_**fix.C" ==============
; *** proc
RTC_GetDosTime ld a, #37
ld (IntISR_rtc), a
call _rtc_corr_time
push af
ld hl, _rtc_year
ld a, (hl)
dec hl
sub 80
jr nc, not_y2000
add a, 100
not_y2000 ld d, a
ld a, (hl)
dec hl
inc a
add a, a
add a, a
add a, a
add a, a
add a, a
rl d
or (hl)
inc a
ld e, a
dec hl
dec hl
ld b, (hl)
dec hl
ld c, (hl)
dec hl
ld a, (hl)
add a, a
add a, a
rr c
rra
rr c
rra
rr c
rra
ld l, a
ld a, b
add a, a
add a, a
add a, a
or c
ld h, a
ld a, #AF
ld (IntISR_rtc), a
pop af
ret
; *** end proc


=============== тут мы кончим файл "MR_**fix.C" ===============

С уважением, Felix.

[I ZX]

От Oleg Grigoriev Кому All 17.08.2000


Пусть враги твои, Felix, умрут без сыновей!

16 Aug 2000 at 17:11, Felix Knajzev ═> All:

FK> Сабж. Для тех, кто компилит свои DosX'ы из сорцов Олега Григорьева (ZXASM.
FK> недавно тут пролетали). Фиксит неправильное число месяца (после августа,
FK> включительно) в описателях файлов, создаваемых самИм Dickie.

в смысле - это мой глюк что ли? не бывает такого. :-)

[ WBR, Oleg. ]
[ 14:08 17 August XXXV A.S. ]


От Felix Knajzev Кому All 18.08.2000

Приветствую тебя, Oleg!

[Четверг 17 Август 2000] в [14:08:39] Oleg Grigoriev начертал письмецо к Felix
Knajzev.
Обсуждали они тему "Маленький Fix для DosX'a (Dickie Mailer)...". Продолжим
начатое...