Subversion Repositories pentevo

Rev

Rev 775 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?

  1.  
  2. ;LAST UPDATE: 12.04.2018 savelij
  3.  
  4. ORG_SYS         EQU 0XE800;DE00                         ;адрес работы *dos.sys
  5.  
  6.         IFNDEF JUMP_SIZE
  7. JUMP_SIZE       EQU 3
  8.         ENDIF
  9.  
  10. ;[общие переменные]
  11.  INIT_VAR 0xF000                                        ;адрес таблицы переходов DOS
  12.  SETVAR BDOS_RAM_JUMPS,0
  13.  SETVAR _ALLOC_SEGMENT,JUMP_SIZE                        ;00 выделение 1 страницы памяти
  14.  SETVAR _FREE_SEGMENT,JUMP_SIZE                         ;01 освобождение страницы памяти по номеру
  15.  SETVAR _SET_WIN0,JUMP_SIZE                             ;02 включение страницы озу в 0 окно
  16.  SETVAR _SET_WIN1,JUMP_SIZE                             ;03 включение страницы озу в 1 окно
  17.  SETVAR _SET_WIN2,JUMP_SIZE                             ;04 включение страницы озу в 2 окно
  18.  SETVAR _SET_VIDEOMODE,JUMP_SIZE                        ;05 включение видеорежима
  19.  SETVAR _READ_BYTE,JUMP_SIZE                            ;06 чтение байта из страницы BDOS
  20.  SETVAR _WRITE_BYTE,JUMP_SIZE                           ;07 запись байта в страницы BDOS
  21.  SETVAR _TRANSFER_PAGE0,JUMP_SIZE                       ;08 передача байт в/из страницы BDOS
  22.  SETVAR _JMP_BDOS,JUMP_SIZE                             ;09 вызов BDOS в страницах BDOS
  23.  SETVAR _BDOS_RAM,JUMP_SIZE                             ;0A включение конфига BDOS
  24.  SETVAR _USER_RAM,JUMP_SIZE                             ;0B включение конфига пользователя
  25.  SETVAR _GET_VARS_KEYS,JUMP_SIZE                        ;0C получение адреса переменных клавиатуры
  26.  SETVAR _GET_ADR_PAGES,JUMP_SIZE                        ;0D получение адреса номеров страниц конфигурации
  27.  ADDVAR JUMP_SIZE                                       ;0E резерв
  28.  ADDVAR JUMP_SIZE                                       ;0F резерв
  29.  
  30.  SETVAR END_JUMP_TABLE,0
  31.  
  32. ;[номера функций вызова дискового драйвера]
  33.  INIT_VAR
  34.  SETVAR _DSKIO_READ                                     ;00
  35.  SETVAR _DSKIO_WRITE                                    ;01
  36.  SETVAR _DSKIO_DSKCHG                                   ;02
  37.  SETVAR _DSKIO_GETDPB                                   ;03
  38.  SETVAR _DSKIO_CHOICE                                   ;04
  39.  SETVAR _DSKIO_DSKFMT                                   ;05
  40.  SETVAR _DSKIO_ABSREAD                                  ;06
  41.  SETVAR _DSKIO_ABSWRITE                                 ;07
  42.  SETVAR _DSKIO_INIT                                     ;08
  43.