Subversion Repositories pentevo

Rev

Rev 605 | Rev 646 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.  
  2. ;LAST UPDATE: 11.09.2013 savelij
  3.  
  4.                 PHASE CPU0
  5.                 JP $
  6.  
  7.                 DUPL 0X0008-$,0XFF
  8.                 JP $
  9.  
  10.                 DUPL 0X0010-$,0XFF
  11.                 JP $
  12.  
  13.                 DUPL ADR_SEL_ROM-$,0XFF
  14.                 OUT (C),A                       ;0014
  15.                 NOP
  16.                 RET
  17.  
  18.                 DUPL 0X0018-$,0XFF
  19.                 JP $
  20.  
  21.                 DUPL 0X0020-$,0XFF
  22.                 JP $
  23.  
  24.                 DUPL 0X0028-$,0XFF
  25.                 JP $
  26.  
  27.                 DUPL 0X0030-$,0XFF
  28.                 JP CALL2PAGE
  29.  
  30.                 DUPL 0X0038-$,0XFF              ;0038
  31. ;               PUSH HL
  32. ;               LD HL,(ADR_INT)
  33. ;               EX (SP),HL
  34. ;               RET
  35.  
  36.                 EI
  37.                 RET
  38.  
  39.                 DUPL 0X003E-$,0XFF
  40.                 EI
  41.                 RET
  42.  
  43.                 DUPL 0X0080-$,0XFF
  44.                 binclude ../../dec40.bin
  45.  
  46.                 DUPL 0X00FF-$,0XFF
  47.                 DW 0X0038
  48.  
  49. UNPACK_STS      LD BC,WIN_P1
  50.                 LD A,PAGE_STS
  51.                 OUT (C),A
  52.                 IF BUILD_DEBUG=1
  53.                 LD HL,PACK_STS
  54.                 LD DE,CPU1
  55.                 JP UNPACK
  56.  
  57. PACK_STS        binclude ../../sts/sts_pack.rom
  58.                 ELSE
  59.                 RET
  60.                 ENDIF
  61.  
  62. UNP_MICRO_BOOT  LD HL,MICRO_BOOT
  63.                 LD DE,DRV_VAR+0X300
  64.                 CALL UNPACK                     ;РАСПАКОВАЛИ FAT BOOT
  65.                 LD HL,BUF_TEKVOL
  66.                 LD DE,(RREG_L)
  67.                 LD BC,0X100
  68.                 LDIR                            ;СКОПИРОВАЛИ ПЕРЕМЕННЫЕ FAT ДРАЙВЕРА ВЫБРАННОГО РАЗДЕЛА
  69.                 RET
  70.  
  71.                 include fontread.a80
  72.  
  73. MICRO_BOOT      binclude ../../fat_boot/source/micro_boot_fat_pack.rom
  74.  
  75.                 DUPL 0X3FF8-$,0XFF
  76.                 DB "ADDON2"
  77.                 DW DATA_VERS
  78.