launch is-dos-hdd-smak
ZXNet echo conference «code.zx»
From Mihail Zharov → To All 24 February 2000
Greetings, All!
I would like to insert the subject into my software.
The following code seems to be correct, and even runs, but it itself is "is"
starts to glitch.
=== Cut ===
org 24576
ld hl,BUFF1024 ;partition table
ld c,#26 ;read table
push hl
rst 8 : db #81
pop hl
ret c ;error - exit
ld b,e ;b = number of partitions
FIND ld a,(hl)
cp 3 ;is-dos section?
jr nz,SKIP
push bc : push hl
ld e,10 ;offset
add hl,de ;found partition name
ex de,hl
ld c,#23 ;conn. section
ld a,15 ;%1111 - name,?!,D
rst 8 : db #81
jr c,INIT ;was there an error?
ld hl,BUFF512
ld de,1 ;from the first sector
ld b,1 ;one sector
ld c,#24 ;direct reading
rst 8 : db #81
INIT pop hl : pop bc
ret c ;error - return
ld a,(BUFF512)
cp 24 ;launchable?-"jr$"
jr z,RUN
SKIP ld de,16 ;offset
add hl,de ;found a trace. section
djnz FIND
ret;no.
RUN ld hl,BUFF512
BUFF512
ds 512
; JR...
BUFF1024
ds 1024
=== Cut ===
What else is required for a bug-free subject?
Happily. Michael.
From Oleg Grigoriev → To Mihail Zharov 26 February 2000
Let your enemies, Mihail, die without sons!
Thu 24 Feb 2000 at 20:10, Mikhail Zharov ═> All:
MZ> I would like to insert a subject into my software.
MZ> The following code seems to be correct, and even runs, but it is "is"
MZ> starts to fail.
[censored]
MZ> What else is required for a bug-free subject?
There's a bootloader somewhere at the end of the crap below. loads very successfully.
──{Begin} ───────────────────── ────────────────────── {Rhddscon.a} ──
ORG #5E00
L2 EQU #2
L8 EQU #8
L12 EQU #12
L20 EQU #20
LFE EQU #FE
L100 EQU #100
L10D EQU #10D
L10E EQU #10E
L144 EQU #144
L1FFD EQU #1FFD
L5C00 EQU #5C00
L5C3A EQU #5C3A
LD C,#43
L5E01 EQU $-#1
RST #10
RET C
RET NZ
EXX
LD DE,L6003
PUSH DE
LD BC,L8
L5E0D LD A,(HL)
CP #20
JR Z,L5E1B
CP#D
JR Z,L5E1B
LDI
JP PE,L5E0D
L5E1B BIT 2,C
JR Z,L5E26
L5E1F LD HL,L5F04
LD C,#4
LDIR
L5E26 POP HL
XOR A
LD C,#50
RST #10
JR C,L5E61
L5E2D LD C,#34
RST #10
L5E30 JR C,L5E61
L5E32 PUSH HL
EXX
POP DE
LD BC,L20
L5E37 EQU $-#1
LDIR
LD A,(L600E)
BIT 6,A
LD HL,L5F1A
JR Z,L5E65
LD DE,L2
LD IX,L5F04
XOR A
LD L,A
LD H,A
LD C,#29
RST #10
LD HL,L5F2D INC (IX+#0)
JR NZ,L5E65
DEC (IX+#1)
JR NZ,L5E65
CALL L5E90
L5E61 LD C,#41
RST #10
RET
L5E65 PUSH HL
LD HL,L6003
LD DE,L5F0D
L5E6A EQU $-#2
LD C,#4F
RST #10
; EX DE,HL
LD HL,L100
LD C,#C
RST #10
; EX DE,HL
LD HL,L5F08 ;!
LD C,#6C
RST #10
POP HL
RST #10
LD C,#8
RST #10
DEC C
RST #10
OR #FF
JR L5E61
L5E85 LD A,#D
LD (L5F08),A
POP HL
LD HL,L5F3B
JR L5E65
L5E90 LD C,#10
RST #10
EXX
LD DE,LFFF8
ADD HL,DE
LD E,(HL)
INC HL
LD D,(HL)
LD (L5EDE),DE
LD C,#13
RST #10
INC C
RST #10
RET C
EXX
LD BC,#0010
ADD HL,BC
LD A,#AD
CPI
JR NZ,L5E85
LD A,#DE
CP (HL)
JR NZ,L5E85
LD DE,0
LD HL,L6023
LD BC,L10D
RST #10
RET C
LD HL,L6003
LD DE,L6043
XOR A
LD BC,L20
L5ECA XOR (HL)
LDI
JP PE,L5ECA
LD (L603E),A
LD HL,L5F63
LD DE,L6073
LD C,L6003-L5F63
LDIR
LD HL,0
L5EDE EQU $-#2
LD (L603F),HL
LD C,#45
RST #10
EXX
DEC HL
DEC HL
LD B,(HL)
DEC HL
LD C,(HL)
LD (L6041),BC
LD HL,L6024
LD (HL),#4E
DEC HL
LD (HL),#18
LD DE,0
LD BC,L10E
RST #10
RET C
LD C,#1
RST #10
RET
L5F04 DEFM "_dos"
L5F08 DEFM "File "
L5F0D DEFM " "
; DEFB #20
DEFB #0D ;!
L5F1A DEFM " isn't contiguous!"
DEFB #0D
L5F2D DEFM " isn't valid!"
DEFB #0D
L5F3B DEFM "Did't you knew what is HARD DISK DRIVE?"
DEFB #0D
L5F63 LD DE,#5E01
LD B,E
LDIR
JP #5E5A
LD BC,L1FFD
XOR A
OUT (C),A
LD B,#7F
LD A,#10
OUT (C),A
LD A,(L5E37)
LD I,A
LD HL,(L5E2D)
LD DE,(L5E32)
LD A,(L5E30)
SRL D
RR E
INC DE
JR NC,L5F90
DEC H
INC A
L5F90 SRL A
ADC A,#0
LD B,A
LD C,#24
RST #8
ADD A,C
DI
JR NC,L5FA1
L5F9C OUT (LFE),A
DEC A
JR L5F9C
L5FA1 LD HL,(L5E2D)
LD A,(HL)
INC A
JR NZ,L5F9C
INC HL
LD A,#1
SUB (HL)
JR NZ,L5F9C
INC HL
LD IY,L5C3A
LD DE,L5C00
LD BC,L144
LDIR
IM 2
EI
LD C,#73
RST #10
LD C,#10
RST #10
EXX
DEC HL
LD B,(HL)
DEC HL
DEC HL
DEC HL
DEC HL
DEC HL
LD A,(HL)
LD C,#0
RST #10
LD C,#1C
RST #10
JR C,L6000
LD C,#0F
RST #10
JR C,L6000
LD C,#20
RST #10
LD C,#93
JR NC,L6002
L6000 LD C,#84
L6002 RST #10
L6003 DEFM " swp"
L600E EQU $
L6023 EQU L6003+#20
L6024 EQU L6003+#21
L603E EQU L6003+#3B
L603F EQU L6003+#3C
L6041 EQU L6003+#3E
L6043 EQU L6003+#40
L6073 EQU L6003+#70
LFFF8 EQU #FFF8
── { End } ───────────────────────────────────────────── { Rhddscon.a } ──
[ WBR, Oleg. ]
[ 13:53 26 February XXXV A.S. ]
From Vladimir Larkov → To Sergey Zotov 23 March 2000
Hello, Sergey!
Mon 06-Mar-2000 16:30, you (500:8462/1) wrote a letter to me:
SZ>>> I tried using ZHDD + Run_Me! But after each
SZ>>> loading from the IsDOS screw got stuck after a while.
VL>> How exactly?
SZ> Gives an error message 87,9,7,86, etc. Those. that the iS-DOS partition is on
SZ> Vinte got screwed. How? I didn't do anything special - I read help
SZ> copied files from the screw to RAM, etc.
_____^^^^^^^^^^^^^^^^^^^^^^^^^^^^^___ here it is. What the hell(s)?
And your ramdisk, of course, is Skoppovsky, for the entire memory (832 blocks), right?
You copy a bunch of files into the frame, overwrite the eighth jar, and Winch dies.
Try again, but without a ramdisk, or create a smaller ramdisk, 320 blocks
for starters (until we find out which Ram driver you are using and which one
size you create a ramdisk).
VL>> and how (and most importantly - why?) can be configured in
VL>> zhdd? I downloaded it once, after which I posted it once
SZ> Link the partition on the screw to any drive. zhddserv.com
Well, one time.
VL>> partition service by letter, after which I saved the system and VL>> connected it, isn't it easier?
SZ> Simpler. But the connection of the partitions will not remain. :(
Where the hell will it go? I downloaded the driver, placed letters on it, on letters
hung up the partitions, saved the system, connected the system. Everything. Loading like
white man from Vincha, before you have time to say “one”, everything is already in place.
Yes, if you don’t wet the eighth jar, the winch won’t crash. It's simple.
With best wishes, Vladimir.