курсор и прерывания теперь работают через дос

This commit is contained in:
Tolik 2025-04-26 02:32:08 +10:00
parent 6ddb8e2890
commit c64bb6b285
5 changed files with 3197 additions and 3171 deletions

2882
DIALOG.ASM

File diff suppressed because it is too large Load Diff

View File

@ -52,8 +52,8 @@ Start: ld sp,Stack
; ¢ë¤¥«ï¥¬ ¡«®ª ¢ 8 áâà ­¨æ
ld bc,8*256 + Dss.GetMem ;!HARDCODE
RST ToDSS
jr c,err_mem ; ­¥â ¯ ¬ïâ¨
ld (hBlock),a ; åí­¤« ¡«®ª 
jr c,err_mem ; ­¥â ¯ ¬ïâ¨
ld (hBlock),a ; åí­¤« ¡«®ª 
; á®§¤ âì ᯨ᮪ ¢ë¤¥«. áâà ­¨æ
ld hl,hPages
ld c,0C5h
@ -118,7 +118,7 @@ SBuff2: db 0 ; 䠩
Begin: ; á®åà. íªà ­
call SaveScreen
; á®åà. ¯®«®¦. ªãàá®à  á¨áâ. íªà ­ 
ld c,8Eh
ld c,BIOS.LP_GET_PLACE
RST ToBIOS
ld (sys_cursor_coords),de
; ¨­¨æ. ¤à ©¢¥à ¬ë誨
@ -148,23 +148,23 @@ continue: call ReadInit ;
; ¢¥ªâ®à ¤«ï ®â®¡à ¦¥­¨ï ªãàá®à 
rst38: di
push iy
push ix
push hl
push de
push bc
push af
ld a,(CurILFl)
or a
call nz,PrnILCr
pop af
pop bc
pop de
pop hl
pop ix
pop iy
vect: jp 0x0000 ;  ¤à¥á á¨áâ. ¢¥ªâ®à 
; rst38: di
; push iy
; push ix
; push hl
; push de
; push bc
; push af
; ld a,(CurILFl)
; or a
; call nz,PrnILCr
; pop af
; pop bc
; pop de
; pop hl
; pop ix
; pop iy
; vect+1: jp 0x0000 ;  ¤à¥á á¨áâ. ¢¥ªâ®à 
@ -188,7 +188,7 @@ NoMouse: db "Driver mouse not installed",0Dh,0Ah,0
Title: db " Floppy disk formatting utility Version "
db major_version + "0","."
db (minor_version / 10) + "0",(minor_version % 10) + "0"
db " (c) 2005-2007 "
db " (c) 2005-2025 "
;
ds 562 ; 565 + start2 = 672 (_2 -_1)

3440
RADIO.ASM

File diff suppressed because it is too large Load Diff

@ -1 +1 @@
Subproject commit 2b1e30c6108f0a5c271f84558e1e5f804a6d623a
Subproject commit a6c50f572424e88f6199d639fa8109d53b71142c

View File

@ -3,4 +3,4 @@
; ¢¥àá¨ï ¯à®£à ¬¬ë
major_version equ 1
minor_version equ 14
minor_version equ 15