ÄIALOGUE128 V2.2D ÒÔÃ ÐATCH BY ÄAVID ÓCHMOLL

ÆOR USERS OF ÃÍÄ HARD DRIVES WITH REAL TIME CLOCK MODULE, THIS WILL ENABLE
AUTOMATIC SETTING OF ÄIALOGUE'S CLOCK DISPLAY.

ÐATCH THE FOLLOWING LINES INTO THE "DIALOGUE" BOOT FILE ON YOUR ×ORK ÄISK:

460 POKE SA+5,0:REM DISABLE TOD CLEARING
470 REM PLACE CLOCK CARD/CHIP HANDLING CODE HERE
471 OPEN15,U,15:PRINT#15,"T-RB":REM COMMAND CMD HD TO GIVE TIME IN BCD FORMAT
472 FORI=0TO3:GET#15,A$:NEXT:REM DISCARD WEEK/YEAR/MONTH/DAY
473 FORI=0TO3:GET#15,A$(I):NEXT:GET#15,A$:CLOSE15:REM GET TIME IN BCD FORMAT
474 IF(ASC(A$(0))AND18)-18=0THENA$(3)=CHR$(1-SGN(ASC(A$(3)))):REM FIX TOD BUG
475 A$(0)=CHR$((SGN(ASC(A$(3)))*128)ORASC(A$(0))):REM SET AM/PM
476 FORI=0TO2:POKEDEC("DD0B")-I,ASC(A$(I)):NEXT:REM STORE TIME IN TOD REGIST'S
477 POKEDEC("DD08"),0:REM START CLOCK
480 REM DIALOGUE USES CIA#2 REGISTERS $DD08-$DD0B FOR TOD CLOCK
               ------------------------------------