From 9f3a12a1c6640eba59c2a7b2df23658602af1845 Mon Sep 17 00:00:00 2001 From: Tolik <85737314+Tolik-Trek@users.noreply.github.com> Date: Mon, 19 Jan 2026 03:44:35 +1000 Subject: [PATCH] =?UTF-8?q?=D0=A4=D0=BE=D1=80=D0=BC=D0=B0=D1=82=D0=B8?= =?UTF-8?q?=D1=80=D0=BE=D0=B2=D0=B0=D0=BD=D0=B8=D0=B5=201.2Mb=205.25=20?= =?UTF-8?q?=D0=B4=D0=B8=D1=81=D0=BA=D0=B5=D1=82?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- DIALOG.ASM | 6 +-- FMAIN.ASM | 2 +- FORMAT.ASM | 24 ++++++------ LISTBOX.ASM | 24 ++++++------ MAP.ASM | 98 ++++++++++++++++++++++++------------------------- RADIO.ASM | 8 ++-- Shared_Includes | 2 +- Version.inc | 2 +- 8 files changed, 84 insertions(+), 82 deletions(-) diff --git a/DIALOG.ASM b/DIALOG.ASM index 15fb0f8..8de4073 100755 --- a/DIALOG.ASM +++ b/DIALOG.ASM @@ -407,12 +407,12 @@ DialCyc: LD A,(HL) ;Next get includes objects CP ListBox JP Z,PListBox ;Put List box CP Button - JP Z,PButton ; вставить бутон + JP Z,PButton ; вставить кнопку CP Frame JP Z,PFrame ; POP DE -DialExt: LD (IY+0),80h ;+5 End dialog table +DialExt: LD (IY+0),80h ;+5 End dialog table POP AF OUT (SLOT3),A CALL PutDial ;Put dialog window @@ -423,7 +423,7 @@ SelLast: LD HL,DialTab+5 LD B,0 LD C,(HL) LD A,C - LDIR ; заполн. буфера DialTab+5 + LDIR ; заполн. буфера DialTab+5 LD C,A DEC HL LD E,L diff --git a/FMAIN.ASM b/FMAIN.ASM index 25722eb..a26c857 100755 --- a/FMAIN.ASM +++ b/FMAIN.ASM @@ -137,7 +137,7 @@ Title: db " Floppy disk formatting utility. Version " db major_version + "0","." db (minor_version / 10) + "0",(minor_version % 10) + "0" ;db " (c) 2005-2025 " - db " (c) 2005-2025 Sprinter Team " + db " (c) 2005-2026 Sprinter Team " ; ;ds 562 ; 565 + start2 = 672 (_2 -_1) ;[]==============================================================[] diff --git a/FORMAT.ASM b/FORMAT.ASM index 012487b..17efec9 100755 --- a/FORMAT.ASM +++ b/FORMAT.ASM @@ -11,7 +11,8 @@ L4000 equ 0xC000 ; ; Форматилка -FFORMAT:ld a,2 ; число попыток иниц. ВГ93 после глюков +FFORMAT: + ld a,2 ; число попыток иниц. ВГ93 после глюков ld (try_init),a FFORM1: call ClearMap ; очистить карту call Fresh ; обновить константы окна форм-ния @@ -360,7 +361,7 @@ SysWR: ld a,(density) _msdos: ld a,(MS_Boot.media5) ; число секторов на FAT ld e,a ld hl,0 - ld bc,512 + ld bc,512 ; !HARDCODE .loc0: add hl,bc dec a jr nz,.loc0 @@ -995,9 +996,9 @@ L0B21: in a,(SLOT3) call FILL ; c -> (hl), dec b ld bc,0C00h ; 12 синхро-байт call FILL - ld bc,03F6h ; 3 байта F6 | - call FILL ; | IAM - ld (hl),0FCh ; 1 байт FC | + ld bc,03F6h ; 3 байта F6 (C2) | + call FILL ; | IAM + ld (hl),0FCh ; 1 байт FC | inc hl ; начало сектора (+96 первого сектора от нач. дорожки) L0B3E: ; GAP1, 50 байт @@ -1008,7 +1009,7 @@ GAP: ld b,GAP1 ; GAP1/GAP3 ld bc,0C00h ; 12 синхро-байтов call FILL ; - ld bc,03F5h ; 3 байта F5 маркера | + ld bc,03F5h ; 3 байта F5 маркера (A1) | call FILL ; | IDAM ld (hl),0FEh ; и FE, его идентификатор | inc hl @@ -1024,7 +1025,7 @@ SecCode:ld (hl),2 ; ld bc,0C00h ; 12 синхро-байтов call FILL ; DATA AM - ld bc,03F5h ; 3 байта маркера + ld bc,03F5h ; 3 байта F5 маркера (A1) call FILL ld (hl),0FBh ; и его идентификатор inc hl @@ -1065,6 +1066,7 @@ FILL: ld (hl),c ret +;!FIXIT вот нахера стеком? ; Заполнение буфера структуры дорожки кодом 0x4E CLEAR: ld (L0ACD),sp ld sp,0 ; заполнение с 0xFFFF @@ -1135,7 +1137,7 @@ FSETUP: ld a,(_OS) .sectorsPerCluster+1: ld a,1 ; секторов на кластер ld (MS_Boot.media1),a -frm4: ld a,0xF0 ; байт формата +frm4: ld a,BOOT_SECTOR.Floppy_3x5_1x44 ; байт формата ld (MS_Boot.media4),a frm5: ld hl,16896 ; размер FAT-ов + Root dir ld (loc07+1),hl @@ -1496,11 +1498,11 @@ CalcTime: ; для 720kB см. метку '#' | ;-------------------------------------------------+ MS_Boot: -.pc_code: db 0xEB,0xFE,0x00 ; 3 байта, код перехода на загрузчик +.pc_code: db 0xEB,0xFE,0x00 ; 0-2. 3 байта, код перехода на загрузчик ; 8 байт, OEM ID db "DSS " .dss_major_ver: db "1." -.dss_minor_ver: db "71" +.dss_minor_ver: db "71" ;3-10 ;BPB, 17 байт .BPB: dw 512 ; байт на сектор .media1: db 1 ; # 2, секторов на кластер @@ -1508,7 +1510,7 @@ MS_Boot: .fat_num: db 2 ; число FAT-ов .media2: dw 224 ; # 112, записей в корне .media3: dw 2880 ; # 1440, всех секторов на диске -.media4: db 0xF0 ; # 0xF9, байт формата +.media4: db BOOT_SECTOR.Floppy_3x5_1x44 ; # 0xF9, байт формата .media5: dw 9 ; # 3, секторов на FAT .media6: dw 18 ; # 9, секторов на сторону dw 2 ; кол-во сторон диска diff --git a/LISTBOX.ASM b/LISTBOX.ASM index bc2deec..ec5751b 100755 --- a/LISTBOX.ASM +++ b/LISTBOX.ASM @@ -1178,18 +1178,18 @@ ItemList: db " 1.44 Mb 80 18 DS/HD",0Dh ; 0 db " 1.52 Mb 80 19 DS/HD",0Dh ; 1 db " 1.60 Mb 80 20 DS/HD",0Dh ; 2 - db " 1.64 Mb 82 20 DS/HD",0Dh ; - db " 1.66 Mb 83 20 DS/HD",0Dh ; - db " 1.68 Mb 80 21 DS/HD",0Dh ; - db " 1.72 Mb 82 21 DS/HD",0Dh ; - db " 1.74 Mb 83 21 DS/HD",0Dh ; - db " 720 kB 80 09 DS/DD",0Dh ; - db " 800 kB 80 10 DS/DD",0Dh ; - db " 820 kB 82 10 DS/DD",0Dh ; - db " 830 kB 83 10 DS/DD",0Dh ; - db " 636 kB - 80 - 16 TR-DOS",0Dh ; - db " 800 kB - 80 - 05 CPM-80",0Dh ; - db " 1.2 Mb 80 15 DS/HD",0Dh ; + db " 1.64 Mb 82 20 DS/HD",0Dh ; 3 + db " 1.66 Mb 83 20 DS/HD",0Dh ; 4 + db " 1.68 Mb 80 21 DS/HD",0Dh ; 5 + db " 1.72 Mb 82 21 DS/HD",0Dh ; 6 + db " 1.74 Mb 83 21 DS/HD",0Dh ; 7 + db " 1.2 Mb 80 15 DS/HD",0Dh ; 8 + db " 720 kB 80 09 DS/DD",0Dh ; 9 + db " 800 kB 80 10 DS/DD",0Dh ; 10 + db " 820 kB 82 10 DS/DD",0Dh ; 11 + db " 830 kB 83 10 DS/DD",0Dh ; 12 + db " 636 kB - 80 - 16 TR-DOS",0Dh ; 13 + db " 800 kB - 80 - 05 CPM-80",0Dh ; 14 db 0 diff --git a/MAP.ASM b/MAP.ASM index 10cce59..f0febb2 100755 --- a/MAP.ASM +++ b/MAP.ASM @@ -156,9 +156,9 @@ Setup_Map: xor a jr z,.loc4 cp 7 jr z,.loc4 - cp 10 + cp 11 ;B 820 kB jr z,.loc4 - cp 11 + cp 12 ;C 830 kB jr z,.loc4 ; 80 дорожек ld a,0FFh @@ -219,7 +219,7 @@ Setup_Map: xor a ld a,h add a,l ld hl,.loc52 ; " " - cp 13 ; пункт CPM-80 ? + cp 14 ; пункт CPM-80 ? jr z,.loc21 ; ms-dos, tr-dos ld hl,.loc29 ; "Optimize sectors" @@ -236,21 +236,21 @@ Setup_Map: xor a ldir ret ; -.loc6: dw .loc7 - dw .loc8 - dw .loc9 - dw .loc10 - dw .loc11 - dw .loc12 - dw .loc13 - dw .loc14 - dw .loc15 - dw .loc16 - dw .loc17 - dw .loc18 - dw .loc50 - dw .loc51 - dw .loc052 +.loc6: dw .loc7 ;0 1.44 Mb + dw .loc8 ;1 1.52 Mb + dw .loc9 ;2 1.60 Mb + dw .loc10 ;3 1.64 Mb + dw .loc11 ;4 1.66 Mb + dw .loc12 ;5 1.68 Mb + dw .loc13 ;6 1.72 Mb + dw .loc14 ;7 1.74 Mb + dw .loc052 ;8 1.2 Mb + dw .loc15 ;9 720 kB + dw .loc16 ;A 800 kB + dw .loc17 ;B 820 kB + dw .loc18 ;C 830 kB + dw .loc50 ;D TR-DOS + dw .loc51 ;E CP/M-80 ; .loc7: db "1.44 Mb" .loc8: db "1.52 Mb" @@ -260,13 +260,13 @@ Setup_Map: xor a .loc12: db "1.68 Mb" .loc13: db "1.72 Mb" .loc14: db "1.74 Mb" +.loc052: db " 1.2 Mb" .loc15: db "720 kB " .loc16: db "800 kB " .loc17: db "820 kB " .loc18: db "830 kB " .loc50: db "TR-DOS " .loc51: db "CP/M-80" -.loc052: db " 1.2 Mb" ; .loc19: db "(Standart mode) " .loc29: db "(Optimize sectors)" @@ -307,21 +307,21 @@ Space: push af pop af ret -.loc1: dw .loc2 - dw .loc3 - dw .loc4 - dw .loc5 - dw .loc6 - dw .loc7 - dw .loc8 - dw .loc9 - dw .loc10 - dw .loc11 - dw .loc12 - dw .loc13 - dw .loc15 - dw .loc16 - dw .loc17 +.loc1: dw .loc2 ; 1.44Mb + dw .loc3 ; 1.52Mb + dw .loc4 ; 1.60Mb + dw .loc5 ; 1.64Mb + dw .loc6 ; 1.66Mb + dw .loc7 ; 1.68Mb + dw .loc8 ; 1.72Mb + dw .loc9 ; 1.74Mb + dw .loc17 ; 1.2Mb 5.25 + dw .loc10 ; 720kB + dw .loc11 ; 800kB + dw .loc12 ; 820kB + dw .loc13 ; 830kB + dw .loc15 ; TR-DOS 16 сект. по 256 байт + dw .loc16 ; CP/M-80 5 сект. по 1024 байт ; .loc2: db "1457664" ; 1.44Mb .loc3: db "1539584" ; 1.52Mb @@ -332,12 +332,12 @@ Space: push af .loc8: db "1745408" ; 1.72Mb .loc9: db "1765888" ; 1.74Mb .loc10: db " 730112" ; 720kB +.loc17: db "1228800" ; 1.2Mb 5.25 .loc11: db " 812032" ; 800kB .loc12: db " 832512" ; 820kB .loc13: db " 842752" ; 830kB .loc15: db " 651264" ; TR-DOS 16 сект. по 256 байт .loc16: db " 819200" ; CP/M-80 5 сект. по 1024 байт -.loc17: db "1228800" ; 1.2Mb 5.25 ; .loc14: db " 0" ; сбросить число bad-секторов @@ -349,13 +349,13 @@ SetCyl: push af jr z,.loc2 cp 6 jr z,.loc2 - cp 10 + cp 11 ; 820kB jr z,.loc2 cp 4 jr z,.loc3 cp 7 jr z,.loc3 - cp 11 + cp 12 ; 830kB jr z,.loc3 ld a,80-1 ; 80 дорожек .loc1: ld (TRACKS+1),a @@ -387,6 +387,8 @@ SetMedia: dec a jp z,.loc8 ; 1.74Mb dec a + jp z,.loc17 ; 1.2Mb + dec a jp z,.loc9 ; 720kB dec a jp z,.loc10 ; 800kB @@ -396,9 +398,7 @@ SetMedia: jp z,.loc14 ; 830kB dec a jp z,.trdos ; TR-DOS - dec a - jp z,.cpm ; 1.2Mb - jp .loc17 ; CPM-80 + jp .cpm ; CPM-80 ;1.44Mb .loc1: ld hl,108 ; размер межсект. пробела @@ -419,7 +419,7 @@ SetMedia: ld (ASect+1),hl ld hl,9 ; секторов на FAT ld (FSect+1),hl -.loc13: ld a,0F0h ; байт формата +.loc13: ld a,BOOT_SECTOR.Floppy_3x5_1x44 ; байт формата .l1_2: ld (frm4+1),a ld a,1 ; секторов на кластер ld (FSETUP.sectorsPerCluster),a @@ -586,7 +586,7 @@ SetMedia: ld (FSETUP.lastSector),a ld hl,3 ; секторов на FAT ld (FSect+1),hl - ld a,0F9h ; байт формата + ld a,BOOT_SECTOR.Floppy_5x25_720 ; байт формата ld (frm4+1),a ld a,2 ; секторов на кластер ld (FSETUP.sectorsPerCluster),a @@ -662,7 +662,7 @@ SetMedia: jp .loc12 ; 5.25 1,2Mb -.loc17: ld hl,54 ; размер межсект. пробела +.loc17: ld hl,84 ;54 ; размер межсект. пробела ld (GAP3),hl ld hl,#0012 ld (Avail+2),hl ; 4 байта размера формата @@ -672,15 +672,15 @@ SetMedia: ld (FSETUP.sectorsAll),a ld hl,15 ; секторов на сторону ld (FSETUP.sectorsSide),hl - ld a,32 ; посл. служ. сектор + ld a,30 ; посл. служ. сектор ld (FSETUP.lastSector),a ld hl,14848 ; размер FAT-ов + Root dir ld (frm5+1),hl ld hl,2400 ; секторов на диске ld (ASect+1),hl - ld hl,8 ; секторов на FAT + ld hl,7 ; секторов на FAT ld (FSect+1),hl - ld a,#F9 ; байт формата + ld a,BOOT_SECTOR.Floppy_5x25_1x20 ; байт формата jp .l1_2 @@ -896,7 +896,7 @@ SetDrive: .d1440: ld hl,(CurElem1) ; тек. полож. указателя формата ld a,h add a,l - cp 8 ; пункт 720kB и ниже + cp 9 ; пункт 720kB и ниже ;!HARDCODE jr nc,.loc2 ld a,13h jr .loc3 ; форматы 1.44Mb..1.52Mb @@ -1209,8 +1209,8 @@ CreateSerialNumber: DWORD #0012C000 ; 4 байта размера формата BYTE 15 ; число секторов WORD 15 ; секторов на сторону - BYTE 32 ; посл. служ. сектор - WORD 14848 ; размер FAT-ов + Root dir + BYTE 30 ; 32 ; посл. служ. сектор + WORD 14848 ; 15872 ; размер FAT-ов + Root dir WORD 2400 ; секторов на диске WORD 7 ; секторов на FAT BYTE #F9 ; байт формата diff --git a/RADIO.ASM b/RADIO.ASM index 2ca441b..97584c1 100755 --- a/RADIO.ASM +++ b/RADIO.ASM @@ -858,10 +858,10 @@ EIkeys: BIT 7,(IX+1) JR NZ,ILwork LD A,(HL) ; what+1 RES 5,A -; CP 9 ; Tab -; JR Z,SetInLn -; cp 0Dh ; $$$ -; jr z,SetInLn + CP 9 ; Tab + JR Z,SetInLn + cp 0Dh ; $$$ + jr z,SetInLn CP (IX+7) ;Hot key RET NZ SetInLn: CALL MoveObj ;Select Input line diff --git a/Shared_Includes b/Shared_Includes index 6073b87..9969d69 160000 --- a/Shared_Includes +++ b/Shared_Includes @@ -1 +1 @@ -Subproject commit 6073b8787867fe5d217d064c9f5f77972303148c +Subproject commit 9969d693207ce7705386b622be41fa243585f4d9 diff --git a/Version.inc b/Version.inc index fb87ea5..cc1ebbd 100644 --- a/Version.inc +++ b/Version.inc @@ -3,4 +3,4 @@ ; версия программы major_version equ 1 -minor_version equ 16 \ No newline at end of file +minor_version equ 17 \ No newline at end of file