;[]=========================================================================[] ;[] Данные монитора-отладчика DemoN [] ;[] v0.01 - последние изменения 10.10.2004 [] ;[] v0.02 - последние изменения 11.03.2005 [] ;[] v0.03 - последние изменения 05.02.2006 [] ;[] v0.10 - последние изменения 10.09.2006 [] ;[]=========================================================================[] SymbolNoPrint DB 0xB0;"." ; символы < пробела ClockOn DB On ; признак вывода часов DemonScreen DB 0 ; номер экрана отладчика OSScreen DB 0 ; Номер экрана ОСи OSGrafMode DB 0 ; Графический режим оси BufPage DB 255 ; Номер страницы с оконным буфером Hello DB "\r\n" ; DB "Версия откомпилирована специально для Василия Иванова!",13,10,10 IFDEF DSS_1_70 DB "Demon for DSS 1.70+ v" ELSE DB "DemoN v" ENDIF INCBIN "VERSION/major.bin" DB "." INCBIN "VERSION/minor.bin" DB " build " INCBIN "VERSION/build.bin" DB " (alpha) \r\n" DB "Last edition " INCBIN "VERSION/date.bin" DB " (BLR " INCBIN "VERSION/time.bin" DB ")\r\n" DB "FidoNet: Igor Zhadinets 2:454/5.18; " DB "e-mail: igor_ast@tut.by",13,10,10,0 Str: .Load DB "Load file ...\r\n",0 .DA DB "\r\n",0 PauseFlash EQU 16 ; частота мигания прогр.курсора Color: .Screen DB 00000111b ; основной цвет экрана .Border DB 00000011b ; цвет рамки .TextStrReg DB 00000010b ; цвет регистровых пар .TextStrWin DB 00000101b ; цвет номеров окон ._SP DB 00000110b ; подсветка вершины стека ._PC DB 01110001b ; подсветка выполняемой стр. .RezArea DB 00001110b ; подсветка резидента .TextStrLogo DB 00000100b ; цвет лого программы .Cursor DB 00011101b ; цвет курсора-указателя .InLine DB 00111111b ; цвет строки ввода .InLineEd DB 00110001b ; цвет строки ввода при ред. StackDebug DS 2 ; адрес стека отладчика BankDebug DS 1 ; номер банки отладчика BankOS DS 1 ; номер банки с OS RezAdr DW 0x7000 ; адрес посадки резидента StackDown DS 1 ; глубина стека StackDump DW 0x800A ; начало дампа стека Reg: ; значение регистровых пар ._IX DW 0 ._IY DW 0 ._HL DW 0 ._DE DW 0 ._BC DW 0 ._AF DW 0 ._HL_ DW 0 ._DE_ DW 0 ._BC_ DW 0 ._AF_ DW 0 ._IR DW 0 ._SP DW 0x7FFE ._PC DW 0 WinPage: DB 0xFF,0xFF,0xFF,0xFF ; адреса подключенных страниц Dump1 DW 0x4000 ; адрес начала динамического дампа Dump: ; адреса начала строк дампа DW KEYB.InputLine.Buffer;0x4100 DW KEYB.InputLine.Buffer+16;0x8100 DW KEYB.PutCode.Buffer;0xC100 DW 0x5280 DW 0x9280 DW 0xD280 DW 0x6000 DW 0xA000 ListAddr DS 40 ; буфер хранения адресов листинга ListFormat DB -1 ; форматный вывод листинга ; -1 - да; 0 - нет DecHex DB 0 ; 0-HEX FF-DEC система ;======== Констатнты ====== On EQU 0xFF Off EQU 0 Ins EQU 0 Ovr EQU 0xFF SysSymb EQU 0x1B ; системный знакогенератор ;печать через п/п биоса IFDEF D_PRINTCH_BIOS Demon.Bios_Win DB 0 ; идентификатор окна биоса MainWin DB 80,32,0,0,00110000b,0,0,0 DS 26,0 ENDIF ;-------------------------------------- ;Диалоговое окно для пп выхода ;-------------------------------------- ExitDlg DB 6,22,13,32,6,#40 DB "Confirmation",0 DB " You really want to quit?" DB 0x16,32,17,"OK Cancel",0 DB 2 DB 29,17,8,2 ;Ok DW 0,0 DB 39,17,8,2 ;Cancel DW 0,KEYB.Keyb.NoExit