Need a program!!!

ZXNet echo conference «real.speccy»

From Grigory Klimenko To All 25 February 2001


█│■
█┼│ All!

People, you need a program for 32k cache, otherwise there’s no point in driving it!

▌┘│ ■ ▐ ┬─┐▌ ┬──
Sorry, they brought fresh beer... ▌│└─│┌┬┐ ▌ ▌_│▌-┤▌_┬

From Kirill Frolov To All 26 February 2001

Press RESET immediately, Grigory!

25 Feb 01 22:59, Grigory Klimenko wrote to All:

GK> People, you need a program for 32k cache, otherwise there’s no point in running it!

I don’t know about 32. And under 16 Real Commander is old, but you need a second
Magic button specifically
for the cache. Well or CPU/M-ka.

From Grigory Klimenko To All 1 March 2001

KF> I don’t know about 32. And under 16 Real Commander is old, but you need a second
KF> Magic button specifically
KF> for the cache. Well, or CPU/M-ka.

I have all this done, and it works, but I’m not sure that the other half
works normally, and since I’m not good at coding, it’s
problematic for me to check it.

From Kirill Frolov To All 2 March 2001

KF>> the second Magic button is specifically for the cache. Well, or CPU/M-ka.
GK> I have all this done, and it works, but I’m just not sure that the second
GK> half works normally, and since I’m not good at coding, it’s problematic for me
GK> to check it.


The random number generator is no good (it’s not even an RNG), but for
“checking”
it’ll probably do. I have not tested this program at all on the spec (AS IS)...


ORG #6000

CALL #0D6B
LD A,2
CALL #1601
LD DE,MSG
XOR A
CALL #0C0A

DI
IN A,(#FB)

LD BC,#7FFD
LD DE,#0010
OUT (C),D
EXX
CALL SRAND
CALL FILL
EXX
OUT (C),E
EXX
CALL FILL
EXX
OUT (C),D
EXX
CALL SRAND
CALL CHECK
PUSH HL
EXX
OUT (C),E
EXX
CALL CHECK

IN A,(#7B)
EI

LD DE,MSG
LD A,1
CALL #0C0A
CALL TEST
LD DE,MSG
POP HL
LD A,2
CALL #0C0A
CALL TEST

RET

TEST LD DE,MSG
LD A,H
CP #40
LD A,3
JR NC,TEST1
INC A
TEST1 JP#0C0A


FILL LD HL,0
FILL1 CALL RAND
LD (HL),A
INC HL
LD A,H
CP #40
JR C,FILL1
RET

CHECK LD HL,0
CHECK1 CALL RAND
CP (HL)
RET NZ
INC HL
LD A,H
CP #40
JR C,CHECK1
RET

SRAND LD HL,0
LD (XRAND),HL
RET

RAND PUSH HL
LD HL,0
XRAND EQU $-2
INC HL
LD (XRAND),HL
LD A,H
XOR L
POP HL
RET

MSG DB #80
DB "Buggy cache test ver 0.1 alfa",#0D
DB "(C) Kirill Frolov 02-02-2001",#0D
DB "This programm is free software",#0D
DB "You can redistribute and modify",#0D
DB "it under the terms of the GNU",#0D
DB "General Public License version 2",#0D
DB "as published by the Free",#0D
DB "Software Foundation.",#0D
DB "This programm distributed AS IS",#0D
DB "WITHOUT ANY WARRANTY, see GNU",#0D
DB "General Public License for more",#0D
DB "details.",#0D,#8D
DB "Testing BANK 0 .......",#A0
DB "Testing BANK 1 .......",#A0
DB "Done",#8D
DB "Failed",#8D

From Grigory Klimenko To All 4 March 2001


KF>>> Under 32 I don’t know. And under 16 Real Commander is old, but you need
KF>>> a second Magic button specifically for the cache. Well, or CPU/M-ka.
GK>> I have all this done, and it works, but I’m just not sure that the second
GK>> half works normally, and since I’m “not alley” in coding, it’s difficult for me
GK>> to check it.