Subversion Repositories pentevo

Rev

Rev 801 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?

  1.  
  2. ;LAST UPDATE: 06.07.2019 savelij
  3.  
  4.         TITLE "addon2.a80 ROM_RST80"
  5.  
  6.                 PHASE CPU0
  7.                 JP $
  8.  
  9.                 DUPL 0X0008-$,0XFF
  10.                 JP $
  11.  
  12.                 DUPL 0X0010-$,0XFF
  13.                 JP $
  14.  
  15.                 DUPL ADR_SEL_ROM-$,0XFF
  16.                 OUT (C),A                       ;0014
  17.                 NOP
  18.                 RET
  19.  
  20.                 DUPL 0X0018-$,0XFF
  21.                 JP $
  22.  
  23.                 DUPL 0X0020-$,0XFF
  24.                 JP $
  25.  
  26.                 DUPL 0X0028-$,0XFF
  27.                 JP $
  28.  
  29.                 DUPL 0X0030-$,0XFF
  30.                 JP CALL2PAGE
  31.  
  32.                 DUPL 0X0038-$,0XFF              ;0038
  33.                 EI
  34.                 RET
  35.  
  36.                 DUPL 0X003E-$,0XFF
  37.                 EI
  38.                 RET
  39.  
  40.                 DUPL 0X0080-$,0XFF
  41.                 binclude ../../dec40.bin
  42.  
  43.                 DUPL 0X00FF-$,0XFF
  44.                 DW 0X0038
  45.  
  46. UNP_MICRO_BOOT  LD HL,MICRO_BOOT
  47.                 LD DE,DRV_VAR+0X300
  48.                 CALL UNPACK                     ;РАСПАКОВАЛИ FAT BOOT
  49.                 LD HL,BUF_TEKVOL
  50.                 LD DE,(RREG_L)
  51.                 LD BC,0X100
  52.                 LDIR                            ;СКОПИРОВАЛИ ПЕРЕМЕННЫЕ FAT ДРАЙВЕРА ВЫБРАННОГО РАЗДЕЛА
  53.                 RET
  54.  
  55.                 include fontread.a80
  56.  
  57. MICRO_BOOT      binclude ../../fat_boot/micro_boot_fat_pack.rom
  58.  
  59. CP866_FONT      binclude 866_code_pack.bin
  60. ATM_FONT        binclude atm_code_pack.bin
  61.  
  62. FREE_ADDON2     EQU 0X3FF6-$
  63.  
  64.                 DUPL FREE_ADDON2,0XFF
  65.                 DW FREE_ADDON2                  ;РАЗМЕР СВОБОДНОГО МЕСТА
  66.                 DB "ADDON2"
  67.                 DW DATA_VERS
  68.