Исправлен баг с полоской прогресса для verify

This commit is contained in:
Tolik 2024-08-05 04:54:59 +10:00
parent 64dceaeb23
commit 5c6e91aa48
3 changed files with 10 additions and 19 deletions

Binary file not shown.

Binary file not shown.

View File

@ -251,8 +251,7 @@ TEST_CHIP: CALL SET_ROM_MODE.Flash
CALL NUMBER_COPY CALL NUMBER_COPY
CALL DrawProgress.done CALL DrawProgress.done
REWRITE: REWRITE: IN A,(SLOT1)
IN A,(SLOT1)
LD (SV_PG1),A LD (SV_PG1),A
;-----------[PAUSE for reROM]-----------; ;-----------[PAUSE for reROM]-----------;
.pause+1: LD A,0 .pause+1: LD A,0
@ -624,27 +623,17 @@ SST29EE020: CALL ROM_PIC._29EE020
CALL ERASE._29EE020 CALL ERASE._29EE020
CALL WRITE_29EE020 CALL WRITE_29EE020
CALL Pause._200msek CALL Pause._200msek
;
LD A,DrawProgress.Verify
CALL DrawProgress.start
CALL VERIFY CALL VERIFY
;
JP RESET JP RESET
SST39SF020: CALL ROM_PIC._39SF020 SST39SF020: CALL ROM_PIC._39SF020
LD HL,1000 LD HL,1000
LD (Pause.Erase),HL ; mem patch LD (Pause.Erase),HL ; mem patch
CALL ERASE._39SF020 CALL ERASE._39SF020
CALL WRITE_39SF020 CALL WRITE_39SF020
LD A,DrawProgress.Verify
CALL DrawProgress.start
CALL VERIFY CALL VERIFY
JP RESET JP RESET
;COUNT_ALL: DB 0
COUNT_ALL: DB 0
;********************************* ;*********************************
@ -688,9 +677,12 @@ vf_loop:
CALL Pause._50msek CALL Pause._50msek
CALL WAIT_TOGGLE CALL WAIT_TOGGLE
CALL Pause._50msek CALL Pause._50msek
LD A,DrawProgress.Verify
CALL DrawProgress.start
; ¥á«¨ ¡ã¤¥â ®è¨¡ª  ¢ á ¬®¬ ­ ç «¥ ®¡à §  ¯à¨ ¢¥à¨ä¨ª æ¨¨ § ¯¨á¨, â® å®âì ­¥¬­®£® ¯®¤ñ࣠¥âáï ¯à®£à¥áá¡ à
CALL DrawProgress.next
LD A,#10 LD A,#10
TST_X: TST_X: EX AF,AF' ;!!!!!
EX AF,AF' ;!!!!!
LD HL,#4000 LD HL,#4000
LD DE,0 LD DE,0
LOOP_VF1X: LOOP_VF1X:
@ -754,16 +746,15 @@ error_xx: LD A,COLORS.CGA.BORDER.CYAN
DEC A DEC A
LD (vf_num),A LD (vf_num),A
JR NZ,vf_loop JR NZ,vf_loop
JR ERROR_X POP BC ; ¡ « ­á á⥪ 
;***************
vf_num: DB 3
;**********************************
ERROR_X: ERROR_X:
HALTS: LD BC,0 HALTS: LD BC,0
OUT (C),C OUT (C),C
SV_PG1+1: LD A,0 SV_PG1+1: LD A,0
OUT (SLOT1),A OUT (SLOT1),A
JP REWRITE JP REWRITE
vf_num: DB 3
; ;
SET_DCP_PORT: SET_DCP_PORT: