mirror of
https://github.com/Tolik-Trek/ZX-SP-ROMs.git
synced 2026-06-15 09:21:45 +03:00
7672 lines
196 KiB
Plaintext
Executable File
7672 lines
196 KiB
Plaintext
Executable File
DEVICE ZXSPECTRUM128
|
||
INCLUDE "!AllConst.asm"
|
||
INCLUDE "!ram8.asm"
|
||
ORG #0000
|
||
ROMdisk equ #3300
|
||
|
||
;#0000 *NOT USED* (#08 ¡ ©â)
|
||
;#0008 rst #08 ¯¥ç âì á®®¡é¥¨ï ¯® ®¬¥àã ¢ BC
|
||
;#000B *NOT USED* (#05 ¡ ©â)
|
||
;#0010 rst #10 ¯¥ç âì ᨬ¢®« ¨§ A
|
||
;#0015 *NOT USED* (#0B ¡ ©â)
|
||
;#0020 rst #20 ¯¥ç âì áâப¨
|
||
;#0025 *NOT USED* (#0B ¡ ©â)
|
||
;#0030 rst #30 ¢ë§®¢ ¯à®æ¥¤ãàë ¨§ ¤à㣮£® rom
|
||
;#0033 *NOT USED* (#3D ¡ ©â)
|
||
;#0070 ¯¥à¥¬¥ë¥ ROM-disk
|
||
;#0073 § £à㧪 ¡«®ª ¨§ ROM-Disk
|
||
;#00AA *NOT USED* (#55 ¡ ©â)
|
||
;#00FF ¤à¥á ¯/¯ ®¡à ¡®âª¨ ¯à¥àë¢ ¨© im 2
|
||
;#0101 ®¬¥à ⥪ã饣® rom
|
||
;#0102 ¯à®æ¥¤ãà ®¡à ¡®âª¨ ¯à¥àë¢ ¨© im 2
|
||
;#0103 ¯¥ç âì áâப¨ (rst #20)
|
||
;#0110 ®¯à®á Break. cy=1 ¥ ¦ â
|
||
;#011C ®¯à®á ¬ ¨¯ã«ïâ®à®¢ ¨ ¯¥ç âì ªãàá®à
|
||
;#0169 ¯¥ç âì ªãàá®à ¬ëè¨
|
||
;#0176 ¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬ ¬ëè¨
|
||
;#021B ®¯à®á ¬ëè¨
|
||
;#0260 ®¯à®á kempston joystick
|
||
;#02A1 ®¡à ¡®âª § ¤¥à¦¥ª ¤«ï £à ä¨ç¥áª®£® ªãàá®à
|
||
;#0344 ®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
;#0381 ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è ¨ ®¡à ¡®âª ॠªæ¨¨ ¨å
|
||
;#0385 ®¡à ¡®âª ॠªæ¨¨ ¦ â¨ï ª« ¢¨è
|
||
;¥ ¨á¯®«ì§ã¥âáï #03C9 â ¡«¨æ ¤à¥á®¢ ¯à®æ¥¤ãà £à ä¨ç¥áª®£® ªãàá®à
|
||
;¥ ¨á¯®«ì§ã¥âáï #03DF § £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2 ¨§ hl
|
||
;¥ ¨á¯®«ì§ã¥âáï #03E4 § £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1 ¨§ hl
|
||
;¥ ¨á¯®«ì§ã¥âáï #03EF § £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2
|
||
;¥ ¨á¯®«ì§ã¥âáï #03F4 § £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1
|
||
;¥ ¨á¯®«ì§ã¥âáï #03FF ®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
;¥ ¨á¯®«ì§ã¥âáï #040D ®¯à®á ã¯à ¢«¥¨ï á § ¤ 묨 ¯ à ¬ âà ¬¨ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
;¥ ¨á¯®«ì§ã¥âáï #041D ®¯à®á ã¯à ¢«¥¨ï ¡¥§ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
;¥ ¨á¯®«ì§ã¥âáï #042C ç⥨¥ ª®®à¤¨ â ªãàá®à
|
||
;¥ ¨á¯®«ì§ã¥âáï #0431 ¯à®¢¥àª ¢ë室 ªãàá®à § ¨¦îî £à ¨æã íªà
|
||
;#043B Ž˜ˆ<CB9C>Š€!!!! ¢ë§®¢ ¯à®æ¥¤ãàë ¯® ®¬¥àã ¢ C
|
||
;#044A â ¡«¨æ ¤à¥á®¢ ¤¥áªà¨¯â®à®¢ ¬¥î
|
||
;#0468 á®®¡é¥¨ï ¤«ï ¯¥ç ⨠®¯æ¨© ¬¥î
|
||
;#0660 ¤¥áªà¨¯â®àë ¬¥î
|
||
;#08DD ¡«®ª ¯/¯ ®¯à¥¤¥«ïîé¨å ¤®áâ㯮áâì ®¯æ¨©
|
||
;#08EF ¤®áâ㯮áâì ®¯æ¨¨ K. kempston joystick
|
||
;¥ ¨á¯®«ì§ã¥âáï #098A ¯à®¢¥àª «¨ç¨ï à §¤¥« MFS ¢¨ç¥â¥à¥
|
||
;#09A0 ¯à®æ¥¤ãàë ®¡à ¡®âª¨ ¯ãªâ®¢ ¬¥î
|
||
;#0B4B ¢¢®¤ ¨ á®åà ¥¨¥ § 票© ¢à¥¬¥¨/¤ âë
|
||
;#0B61 ᬥ ¯ à ¬¥âà ®¯æ¨¨ ¯à®â¨¢®¯®«®¦®¥ á ®¡®¢«¥¨¥¬ ¬¥î (ON/OFF, normal/trubo ¨ â.¯.)
|
||
;#0B9B ¢¢®¤ ¯ à ¬¥âà ⥪ã饩 ®¯æ¨¨ (ç¨á«® 0..255)
|
||
;#0BD0 ¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
;#0BD9 ¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
;#0BF3 ¢¢®¤ áâப¨ ᨬ¢®«®¢
|
||
;#0CAA ¯¥ç âì ç¨á« bc ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;#0CB0 ¯¥ç âì ç¨á« A ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;#0CB9 ¯¥ç âì ç¨á« bc ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;#0CCA ®ç¨á⪠¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
;#0CDA ¯¥ç âì ç¨á« bc ¢ ¡ãä¥à hl
|
||
;#0CF6 ãáâ ®¢ª ¨ ¨¨æ¨ «¨§ æ¨ï ®ª ¤«ï ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
;#0D02 ®ç¨á⪠¨¦¥© áâப¨ ®ª ¬¥î
|
||
;#0D1A ®¯à¥¤¥«¥¨¥ ⨯ ¦ ⮩ ª« ¢¨è¨
|
||
;#0D2F ®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
;#0D42 ¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
;#0D45 ¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
;#0D52 ®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ®¯æ¨¨
|
||
;#0D60 ®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
;#0D6B ¯¥ç âì ⥪ã饣® ¬¥î
|
||
;#0E6F ¢ë¤¥«¥¨¥ âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
;#0E8C áï⨥ ¢ë¤¥«¥¨ï âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
;#0E98 ¯¥ç âì âਡã⮢ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
;#0EAE !!!Ž˜ˆ<CB9C>Š€!!! âãâ § ¢¨á ¨¥. ¤®«¦¥ ¡ëâì 宫®¤ë© á¡à®á????
|
||
;#0EB2 ®ç¨á⪠⥪ã饣® ®ª
|
||
;#0EB5 ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
;#0F51 ¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ¤®áâ㯮á⨠®¯æ¨¨
|
||
;#0F65 ¢ë¤¥«¥¨¥ áâ à襣® ¡ ©â ᬥ饨ï
|
||
;#0F6D ®¯à¥¤¥¨¥ ¤à¥á ®¯¨á ¨ï ®¯æ¨¨
|
||
;#0F95 ¯¥à¥¬¥é¥¨¥ ªãàá®à á«¥¤ãîéãî ®¯æ¨î (¢¨§)
|
||
;#0FA6 ¯¥à¥¬¥é¥¨¥ ªãàá®à ¯à¥¤ë¤ãéãî ®¯æ¨î (¢¢¥àå)
|
||
;#0FB6 ®¯à¥¤¥«¥¨¥ ®¯æ¨¨ ¯®¤ ªãàá®à®¬ ¬ëè¨ ¨ ¯¥à¥å®¤ ¥¥ ®¡à ¡®âªã
|
||
;#0FE3 ¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ¨ ¤à¥á ¬ ᪨ ¤«ï § ¤ ®© ®¯æ¨¨
|
||
;#0FE9 ¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ¨ ¤à¥á ¬ ᪨ ¤«ï § ¤ ®© ®¯æ¨¨
|
||
;#102E ¯à®¢¥àª ¤¨ ¯ §® ç¨á«
|
||
;#1033 ¯à®æ¥¤ãà ®¡à ¡®âª¨ ¦ ⨩ ª« ¢¨è
|
||
;#1047 ¯¥ç âì ª®«¨ç¥á⢠樫¨¤à®¢ HDD
|
||
;#105B ¯¥ç âì è ¯ª¨ ¬¥î ¬®¨â®à
|
||
;#1061 ¯¥ç âì § ª®¤¨à®¢ ®£® á®®¡é¥¨ï ¨§ hl
|
||
;#10C2 ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
;#10C7 Š®¯¨à®¢ ¨¥ ª â «®£ ROM-¤¨áª ¢ ram 8
|
||
;#10DB ®¡à ¡®âª ¯ãªâ ¬¥î: R. ROM disk
|
||
;#1150 ¢ë¢®¤ ®ª ¢ë¡®à ¤¨áª®¢®¤
|
||
;¥ ¨á¯®«ì§ã¥âáï #1181 ret
|
||
;#11A4 ¯®¨áª á®®¡é¥¨ï ¯® ®¬¥àã ¢ B[#01..#??]
|
||
;#11AF ãáâ ®¢ª ¡«®ª á«®¢/á®®¡é¥¨© ¯® ®¬¥àã ¢ A
|
||
;#11CD ¯¥ç âì á®®¡é¥¨ï ¯® ®¬¥àã ¢ BC
|
||
;#122D ¡«®ª á«®¢ 2 (#35 á«®¢)
|
||
;#1353 ¡«®ª á«®¢ 1 (#6A á«®¢)
|
||
;#1554 ¡«®ª á«®¢ 0 (#5E á«®¢)
|
||
;#176D <20>«®ª á®®¡é¥¨© 2
|
||
;#181A <20>«®ª á®®¡é¥¨© 1
|
||
;#1906 <20>«®ª á®®¡é¥¨© 0
|
||
;¥ ¨á¯®«ì§ã¥âáï #1A40 ¯ ã§ á ¨¤¨ª 樥© ¡®à¤îॠ¨ ¯¥ç âì ¤ âë ¨ ¢à¥¬¥¨ ¢ ®ª¥ ¬®¨â®à
|
||
;#1A4C ¯¥ç âì ¤ âë ¨ ¢à¥¬¥¨ ¢ ®ª¥ ¬®¨â®à
|
||
;#1AA6 ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;#1AAF ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;#1B05 ç⥨¥ ¤ âë ¨§ ¡ãä¥à ¨ à áç¥â ®¬¥à ¤ï ¥¤¥«¨
|
||
;#1B18 ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;#1B21 ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;#1B93 â ¡«¨æ ¤«ï ¢ëç¨á«¥¨ï ª®¤ ¬¥áïæ
|
||
;#1BAC à áç¥â ®¬¥à ¤ï ¥¤¥«¨
|
||
;#1C0D à ¡®â á ¬¨ªà®á奬®© CMOS (rst 8: db #89)
|
||
;#1C73 ¢¢®¤ ⥪á⮢®© áâப¨ ¢ ¨¦¥© áâப¥ íªà
|
||
;#1C84 ¨¨æ¨ «¨§ æ¨ï ®ª ¢¢®¤
|
||
;#1CB3 ¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
;#1CB8 ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
;#1D10 ¤®¡ ¢«¥¨¥ ᨬ¢®« ¢ ¢¢®¤¨¬ãî áâபã
|
||
;#1D40 㤠«¥¨¥ ᨬ¢®« ¯¥à¥¤ ªãàá®à®¬ (delete)
|
||
;#1D5A ¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢®¤¨¬®© áâப¥ ¢«¥¢®
|
||
;#1D64 ¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢¢®¤¨¬®© áâப¥ ¢¯à ¢®
|
||
;#1D70 ¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
;#1D98 ¯¥ç âì ¢¢®¤¨¬®© áâப¨ íªà ¥
|
||
;#1DB7 ¯®«ã票¥ ¤à¥á ¯®¤ ªãàá®à®¬ ¢ ¡ãä¥à¥ áâப¨
|
||
;#1DC2 ᬥ ०¨¬ ¢áâ ¢ª¨/§ ¬¥ë ¯à¨ ¢¢®¤¥ áâப¨
|
||
;#1DD6 ®ç¨á⪠¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
;#1DEC 㤠«¥¨¥ ª®¤ ¢®§¢à â ª à¥âª¨ ¨§ áâப¨
|
||
;#1E13 ¯®¬¥é¥¨¥ ᨬ¢®« ¢ áâப㠨 ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ áâப
|
||
;#1E18 横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
;#1E22 ¯®«ã祬 ¤à¥á ª®æ ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
;#1E2D á®åà ¥¨¥ ¢¢¥¤¥®© áâப¨ ¢ ¡ãä¥à¥ ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப
|
||
;#1E5B ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ ¯à¥¤¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
;#1E91 ª®¯¨à®¢ ¨¥ áâப¨ ¨§ ¡ãä¥à ¢¢¥¤¥ëå áâப ¢ ¡ãä¥à ¢¢®¤ áâப¨
|
||
;#1EC0 ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ á«¥¤ãî饩 ¢¢¥¤¥®© áâப¨
|
||
;#1EE1 ¯à®¢¥àª ᯨ᪠«¨ç¨¥ ¢¢¥¤¥ëå áâப
|
||
;#1EEE §¢®®ª á ãáâ ®¢ª®© ¡®à¤îà
|
||
;#1EF1 ¯¥ç âì ª â «®£ ¨ ¢ë¡®à ¯®§¨æ¨¨ ¢ ¥¬
|
||
;#2023 á«®¦¥¨¥ hl=hl+a
|
||
;#2028 ¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
;#202C ¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
;#203C à áç¥â à §¬¥à®¢ ¨ ¯¥ç âì ®ª ¯®¤ ª â «®£ ROM-disk
|
||
;#2054 ¯¥ç âì à ¬ª¨ ¢®ªà㣠®ª
|
||
;#205A ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
;#207A ¯¥ç âì à ¬ª¨ ¢®ªà㣠®ª
|
||
;#2133 ª®à४æ¨ï ª®®à¤¨ â ¨ à §¬¥à®¢ ®ª
|
||
;#213F ª®®à¤¨ âë Y ¨ X ¯®«¥© ¤«ï ®ª । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
;#2168 â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ®ª । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
;#2278 । ªâ¨à®¢ ¨¥ ¤ ¬¯ ¯ ¬ï⨠¢ ®ª¥ ¬®¨â®à
|
||
;#245E ¯¥à¥¨¬¥®¢ ¨¥ ¯®¤à §¤¥«
|
||
;<3B>¥ ¨á¯®«ì§ã¥âáï #247D ret
|
||
;#247E ¯¥ç âì ®¢®£® ¯ã⨠¯®á«¥ ¢ë¡®à ¯ãªâ®¢ ¬¥î mount/dismount DRIVE
|
||
;#249C ¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤ ¨«¨ ¯ãâ¨, ¥á«¨ íâ® ®¡à §
|
||
;#24CE ®¡à ¡®âª ¯ãªâ ¬¥î: Z. dismount.../Z. mount...
|
||
;#24F0 ¬®â¨à®¢ ¨¥ ®¡à § ª ¤¨áª®¢®¤ã
|
||
;#2503 ¬®â¨à®¢ ¨¥ ¢á¥å ®¡à §®¢ á ¢¨ç¥áâ¥à
|
||
;#2536 ¬®â¨à®¢ ¨¥/®âª«î票¥ ¯®¤à §¤¥« /®¡à § ¤¨áª
|
||
;#25EB ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠®¡à §®¢ ª®««¥ªæ¨¨
|
||
;#261A 㤠«¥¨¥ ¢á¥å ¯®¤à §¤¥«®¢
|
||
;#2620 ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠¯®¤à §¤¥«®¢ MFS
|
||
;#2671 á®àâ¨à®¢ª § ¯¨á¥© ¢ ¡ãä¥à¥ xEBF5 ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;#2683 ¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
;#26AC ¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãá⮩ § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
;#2707 § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠xE81B+1
|
||
;#270D § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠xE81B+8
|
||
;#271A ¯®¤áç¥â ª®«¨ç¥á⢠¯®¤à §¤¥«®¢ ¢ MFS
|
||
;#2733 㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR
|
||
;#2739 ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 á¯¨áª à §¤¥«®¢ MBR
|
||
;#2895 á®àâ¨à®¢ª ¤¢ãå ¤¥áªà¨¯â®à®¢ bc ¨ bc+1 ¯® ¤à¥áã à ᯮ«®¦¥¨ï (¤«ï § ¯¨á¥© MBR)
|
||
;#28B9 á®àâ¨à®¢ª ¤¢ãå ¤¥áªà¨¯â®à®¢ bc ¨ bc+1 ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;#28C6 㯫®â¥¨¥ ª â «®£ MBR (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
;¥ ¨á¯®«ì§ã¥âáï #2928 ¯®¤áç¥â ª®«¨ç¥áâ¢ à §¤¥«®¢/¯®¤à §¤¥«®¢ ¢ ª â «®£¥
|
||
;#2936 ¯®¤áç¥â ¯ãáâëå § ¯¨á¥© ¢ ª â «®£¥ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
;#2960 á®àâ¨à®¢ª ¤¥áªà¨¯â®à®¢ ¯®¤à §¤¥«®¢
|
||
;#2990 ¢áâ ¢«ï¥¬ ®¢ãî § ¯¨áì ¢ ᯨ᮪ § ¯¨á¥©
|
||
;#29C6 à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
;#29D0 ¯¥ç âì ®ª á ®¡à § ¬¨ ¤¨áª®¢ ¨ ¢ë¡®à ®¡à § ¢ ¥¬
|
||
;#29D5 ¯¥ç âì ®ª local partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;#29D7 ¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
;#29DC ¯¥ç âì ®ª global partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;#29F4 ¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
;#29FE ¡«®ª ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª® ᮠᯨ᪮¬ à §¤¥«®¢/¯®¤à §¤¥«®¢/®¡à §®¢
|
||
;#2AA4 ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
;#2AC0 ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
;#2ACC ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ª¨«®¡ ©âë
|
||
;#2AE7 㬮¦¥¨¥ dehl=de*#800
|
||
;#2AF5 㬮¦¥¨¥ dehl=de*2
|
||
;#2B03 ¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
;#2B05 ¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
;#2B12 ¯¥ç âì á®®¡é¥¨ï: Unused
|
||
;#2B8C ¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
;#2BB8 ¯®¤£®â®¢ª ª ¯¥ç ⨠®ª ¢ë¡®à à §¤¥«
|
||
;#2BCA ᮧ¤ ¨¥ à §¤¥« MFS
|
||
;#2C1F 㤠«¥¨¥ à §¤¥« MBR
|
||
;#2C37 ᮧ¤ ¨¥ ¯®¤à §¤¥«
|
||
;#2D2F ¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
;#2D45 㤠«¥¨¥ ¯®¤à §¤¥«
|
||
;#2D5D áà ¢¥¨¥ (hl) á #FF, cy=1 ¥á«¨ à ¢ë
|
||
;#2D63 ä®à¬¨à®¢ ¨¥ ª®««¥ªæ¨¨ ®¡à §®¢ ¢ ¯®¤à §¤¥«¥ TR-DOS
|
||
;#2DF0 ᮧ¤ ¨¥ ¯¥à¢®£® (á«ã¦¥¡®£®) ᥪâ®à ®¡à § ¨ ä®à¬¨à®¢ ¨¥ ¤ ëå ¢ ®¯¨á ⥫¥ ⥪ã饣® ¤¨áª®¢®¤
|
||
;#2E30 à áç¥â ª®«¨ç¥á⢠®¡à §®¢ ¨áå®¤ï ¨§ à §¬¥à®¢ ¯®¤à §¤¥«
|
||
;#2E5D áä®à¬¨à㥬 ¯ãá⮩ ᥪâ®à MBR ¢ ¡ãä¥à¥ xE5A9
|
||
;#2E71 ®ç¨á⪠¡ãä¥à xEBF5 ¨ ãáâ ®¢ª ᨣ âãàë à §¤¥« MFS
|
||
;#2E85 ¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
;#2EA7 ¯à®¢¥àª ¢¢¥¤¥®£® ¨¬¥¨
|
||
;#2F10 ¢ë¡®à ⨯ ¯®¤à §¤¥«
|
||
;#2F5D § ¯à®á á®åà ¥¨¥ ᥪâ®à MBR, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
;#2F66 ä®à¬¨à®¢ ¨¥ ¨ § ¯¨áì ᥪâ®à MBR
|
||
;¥ ¨á¯®«ì§ã¥âáï #2F94 ç⥨¥ ᥪâ®à ¢ ¡ãä¥à xE5A9
|
||
;#2FA8 § ¯à®á á®åà ¥¨¥ ª â «®£ MFS, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
;#2FB1 § ¯¨áì ª â «®£ MFS/¯®¤à §¤¥«
|
||
;#2FCA áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
;#2FCF ®¡ã«¥¨¥ ¯¥à¥¬¥®© xE9EB
|
||
;#2FDB ¨ªà¥¬¥¨â á«®¢ (xDD89)=(xDD89)+1
|
||
;#2FE5 ¤¥ªà¥¬¥â á«®¢ (xDD89)=(xDD89)-1
|
||
;#2FEF 㬮¦¥¨¥ bc=bc*#10
|
||
;#3000 ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
;#3005 § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+6 ¡ ©â ª ¤à¥áã hl
|
||
;#300A § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+12 ¡ ©â ª ¤à¥áã hl
|
||
;#300E § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
;#301C § £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
;#302A ¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
;#3035 ¢ëç¨â ¨¥ (hl)=(hl)-(de)
|
||
;#3047 ¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
;#3052 á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
;#3060 ¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
;#30B9 ¨¤¥â¨ä¨ª æ¨ï ¦¥á⪮£® ¤¨áª
|
||
;#30C6 ¯¥ç âì ®ª ¤«ï â¥áâ¨à®¢ ¨ï HDD
|
||
;#30F3 ¯¥ç âì ª®¤ ®è¨¡ª¨ ¢¨ç¥áâ¥à
|
||
;#3135 ¯¥ç âì á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¥á®¢¯ ¤¥¨ï ¤ ëå ¯à¨ ç⥨¨/§ ¯¨á¨ HDD
|
||
;#3163 ¯¥ç âì ⥪ã饣® ®¬¥à 樫¨¤à
|
||
;#31AA 㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR
|
||
;#31D4 ¥¨á¯®«ì§ã¥¬ ï ®¡« áâì
|
||
;#3200 ª â «®£ ROM-disk
|
||
;#3300 ROM-disk
|
||
|
||
|
||
;€„<E282AC>…‘: #0000 *NOT USED* (#08 ¡ ©â)
|
||
x0000 ds #08
|
||
|
||
;€„<E282AC>…‘: #0008 ¯¥ç âì á®®¡é¥¨ï ¯® ®¬¥àã ¢ BC
|
||
x0008 jp x11CD
|
||
|
||
;€„<E282AC>…‘: #000B *NOT USED* (#05 ¡ ©â)
|
||
x000B ds #05
|
||
|
||
;€„<E282AC>…‘: #0010 ¯¥ç âì ᨬ¢®« ¨§ A
|
||
x0010 rst #30
|
||
dw rom2_x2B12 ;¯¥ç âì ᨬ¢®« (rst #10)
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0015 *NOT USED* (#0B ¡ ©â)
|
||
x0015 ds #0B
|
||
|
||
;€„<E282AC>…‘: #0020 ¯¥ç âì áâப¨
|
||
x0020 ex (sp),hl
|
||
push af
|
||
jp x0103
|
||
|
||
;€„<E282AC>…‘: #0025 *NOT USED* (#0B ¡ ©â)
|
||
x0025 ds #0B
|
||
|
||
;€„<E282AC>…‘: #0030 rst #30 ¢ë§®¢ ¯à®æ¥¤ãàë ¨§ ¤à㣮£® rom
|
||
x0030 jp xE3D3
|
||
|
||
;€„<E282AC>…‘: #0033 *NOT USED* (#3D ¡ ©â)
|
||
x0033 ds #3D
|
||
|
||
;€„<E282AC>…‘: #0070 ¯¥à¥¬¥ë¥ ROM-disk
|
||
x0070 db #33 ;ᬥ饨¥ ç « ஬ ¤¨áª (¢ ¡«®ª å ¯® 256 ¡ ©â)
|
||
x0071 db #0D ;ª®«¨ç¥á⢮ ᢮¡®¤ëå ᥪâ®à®¢ ¢ áâà ¨æ¥
|
||
db #32 ;ᬥ饨¥ ¤® ç « ª â «®£
|
||
|
||
;€„<E282AC>…‘: #0073 § £à㧪 ¡«®ª ¨§ ROM-Disk
|
||
INCLUDE "!RomDisk.asm"
|
||
|
||
;€„<E282AC>…‘: #00AA *NOT USED* (#55 ¡ ©â)
|
||
x00AA ds #55
|
||
|
||
;€„<E282AC>…‘: #00FF ¤à¥á ¯/¯ ®¡à ¡®âª¨ ¯à¥àë¢ ¨© im 2
|
||
x00FF dw x0102
|
||
|
||
;€„<E282AC>…‘: #0101 ®¬¥à ⥪ã饣® rom
|
||
x0101 db #05
|
||
|
||
;€„<E282AC>…‘: #0102 ¯à®æ¥¤ãà ®¡à ¡®âª¨ ¯à¥àë¢ ¨© im 2
|
||
x0102 ret
|
||
|
||
;€„<E282AC>…‘: #0103 ¯¥ç âì áâப¨ (rst #20)
|
||
x0103 ld a,(hl)
|
||
rst #30
|
||
dw rom2_x2B0B ;¯¥ç âì ᨬ¢®« á® á¡à®á®¬ 7£® ¡¨â (rst #10)
|
||
db #02
|
||
and #80
|
||
inc hl
|
||
jr z,x0103
|
||
pop af
|
||
ex (sp),hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0110 ®¯à®á Break. cy=1 ¥ ¦ â
|
||
x0110 ld a,#FE
|
||
in a,(#FE)
|
||
rrca
|
||
ret c ;cs ¥ ¦ â
|
||
ld a,#7F
|
||
in a,(#FE)
|
||
rrca
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #011C ®¯à®á ¬ ¨¯ã«ïâ®à®¢ ¨ ¯¥ç âì ªãàá®à
|
||
;¢ëå: cy=1 ¦ â fire ¤¦®©á⨪¥/ª®¯ª ¬ëè¨
|
||
; a=#80 - ªãàá®à ¨§¬¥¨« ¯®«®¦¥¨¥
|
||
; a=#81 - ªãàá®à ¢ ¯à¥¤¥« å ⥪ã饣® ®ª
|
||
; a=#82 - ªãàá®à ¬ëè¨ ¢¥ ¯à¥¤¥«®¢ ⥪ã饣® ®ª
|
||
; cy=1 ¦ â ª®¯ª ¬ëè¨
|
||
; a=#91 - ¦ â «¥¢ ï ª®¯ª ¬ëè¨
|
||
; a=#92 - ¦ â ¯à ¢ ï ª®¯ª ¬ëè¨
|
||
; a=#93 - ¦ â á।ïï ª®¯ª ¬ëè¨
|
||
; a>=#94 - ªãàá®à ¢¥ ¯à¥¤¥«®¢ ⥪ã饣® ®ª
|
||
; cy=0 fire ¤¦®©á⨪¥/ª®¯ª¨ ¬ëè¨ ¥ ¦ âë
|
||
x011C or a
|
||
ld hl,xE03B
|
||
bit 7,(hl)
|
||
ret z ;¬ëèì ¨ ¤¦®©á⨪ ®âª«îç¥ë
|
||
ld c,#00
|
||
bit 6,(hl)
|
||
call nz,x0260 ;®¯à®á kempston joystick
|
||
bit 4,c
|
||
jr nz,x0149 ; ¦ â Fire
|
||
bit 5,(hl)
|
||
jr z,x0149 ;¬ëèì ®âª«îç¥
|
||
call x021B ;®¯à®á ¬ëè¨
|
||
jr z,x015E ;ª®¯ª¨ ¥ ¦ âë, ¯¥ç âì ªãàá®à
|
||
push hl
|
||
call x0344 ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
ld (xE008),hl ;ª®®à¤¨ âë ªãàá®à ¢ ®ª¥
|
||
pop hl
|
||
ld a,c ;á®áâ®ï¨¥ ª®¯®ª ¬ëè¨
|
||
or %10010000
|
||
scf
|
||
bit 2,(hl)
|
||
ret z
|
||
set 3,a
|
||
ret
|
||
; ¦ â Fire kempstone joy/¥ ¦ â Fire kempstone joy ¯à¨ ®âª«î祮© ¬ëè¨
|
||
;hl=xE03B
|
||
;c - á®áâ®ï¨¥ ª®¯®ª ¤¦®©á⨪
|
||
x0149 push hl
|
||
call x02A1 ;®¡à ¡®âª § ¤¥à¦¥ª ¤ï« £à ä¨ç¥áª®£® ªãàá®à
|
||
pop hl
|
||
scf
|
||
ld a,#80
|
||
bit 0,(hl)
|
||
res 0,(hl)
|
||
jr nz,x0163
|
||
inc a
|
||
bit 1,(hl)
|
||
res 1,(hl)
|
||
jr nz,x0163
|
||
x015E call x0169 ;¯¥ç âì ªãàá®à ¬ëè¨
|
||
or a
|
||
ret
|
||
x0163 bit 2,(hl)
|
||
ret z ;ªãàá®à ¢ ¯à¥¤¥« å ⥪ã饣® ®ª
|
||
ld a,#82
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0169 ¯¥ç âì ªãàá®à ¬ëè¨
|
||
;¢ëå: a - ᬥ饨¥ ªãàá®à ¢ § ª®¬¥áâ¥
|
||
;
|
||
x0169 set 7,(iy-#0A) ;ªãàá®à ¯¥ç â
|
||
ld ix,(xE12A) ; ¤à¥á ¤ ëå ªãàá®à
|
||
ld hl,x01C3 ;¯/¯ ¯¥ç ⨠ªãàá®à ¬ëè¨
|
||
jr x0186
|
||
|
||
;€„<E282AC>…‘: #0176 ¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬ ¬ëè¨
|
||
;¢ëå: a - ᬥ饨¥ ªãàá®à ¢ § ª®¬¥áâ¥
|
||
;
|
||
x0176 bit 7,(iy+#27)
|
||
ret z ;¬ëèì ¨ ¤¦®©á⨪ ®âª«îç¥ë
|
||
ld hl,xE00A
|
||
bit 7,(hl)
|
||
ret z ;ªãàá®à ¥ ¯¥ç â
|
||
res 7,(hl)
|
||
ld hl,x0212 ;¯/¯ ¢®ááâ ®¢«¥¨ï 3å ¡ ©â íªà
|
||
x0186 ld (xE51C+1),hl
|
||
ld de,xDFD2 ; ¤à¥á ¡ãä¥à
|
||
ld hl,(xE03C) ;ª®®à¤¨ âë ªãàá®à ¬ëè¨
|
||
ld b,h
|
||
ld a,#C0
|
||
sub b
|
||
ret z ;crd Y § ¯à¥¤¥« ¬¨ íªà
|
||
ret c ;crd Y § ¯à¥¤¥« ¬¨ íªà
|
||
cp #08
|
||
jr c,x019B
|
||
ld a,#08
|
||
x019B ld b,a ;¢ëá®â ¤«ï á®åà ¥¨ï/¢®ááâ ®¢«¥¨ï íªà
|
||
;á®åà ¥¨¥/¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬ ¬ëè¨
|
||
x019C push bc
|
||
ld c,l
|
||
ld b,h ;ª®®à¤¨ âë
|
||
push bc
|
||
ld a,b
|
||
or a
|
||
rra
|
||
scf
|
||
rra
|
||
or a
|
||
rra
|
||
xor b
|
||
and #F8
|
||
xor b
|
||
ld h,a
|
||
ld a,c
|
||
rlca
|
||
rlca
|
||
rlca
|
||
xor b
|
||
and #C7
|
||
xor b
|
||
rlca
|
||
rlca
|
||
ld l,a ; ¤à¥á íªà ¥
|
||
ld a,c
|
||
and #07 ;ᬥ饨¥ ¢ § ª®¬¥áâ¥
|
||
call xE51C ;á®åà ¨¬/¢®ááâ ®¢¨¬ 3 ¡ ©â
|
||
pop hl
|
||
inc h ;crd Y +1
|
||
pop bc
|
||
djnz x019C
|
||
ret
|
||
|
||
;¯¥ç âì ®¤®© «¨¨¨ ªãàá®à íªà ¥ á á®åà ¥¨¥¬ íªà ¢ ¡ãä¥à¥
|
||
x01C3 push hl ;á®åà ¨¬ ¢ ¡ãä¥à¥
|
||
ldi
|
||
ldi
|
||
ldi
|
||
pop hl
|
||
push de
|
||
push hl
|
||
ld b,(ix+0)
|
||
ld e,(ix+1)
|
||
ld h,#00 ;«¨¨ï ¤ ëå
|
||
ld c,(ix+#10)
|
||
ld d,(ix+#11)
|
||
ld l,#FF ;«¨¨ï ¬ ᪨
|
||
or a
|
||
jr z,x01F0 ;ªãàá®à ¯¥ç â ¥¬ á ç « § ª®¬¥áâ
|
||
x01E0 srl b ;à®â æ¨ï ¤ ëå ¨ ¬ ᪨
|
||
rr e
|
||
rr h
|
||
scf
|
||
rr c
|
||
rr d
|
||
rr l
|
||
dec a
|
||
jr nz,0x1E0
|
||
x01F0 ex (sp),hl ;hl ¤à¥á íªà ¥
|
||
ld a,c
|
||
and (hl)
|
||
or b
|
||
ld (hl),a ;1© ¡ ©â
|
||
inc hl
|
||
ld a,l
|
||
and #1F
|
||
jr z,x020B ;ªà © íªà
|
||
ld a,d
|
||
and (hl)
|
||
or e
|
||
ld (hl),a ;2© ¡ ©â
|
||
inc hl
|
||
ld a,l
|
||
and #1F
|
||
jr z,x020B ;ªà © íªà
|
||
pop de
|
||
push de
|
||
ld a,e
|
||
and (hl)
|
||
or d
|
||
ld (hl),a ;3© ¡ ©â
|
||
x020B pop de
|
||
inc ix
|
||
inc ix
|
||
pop de
|
||
ret
|
||
|
||
;¢®ááâ ®¢«¥¨¥ ®¤®© «¨¨¨ íªà ¯®¤ ªãàá®à®¬
|
||
x0212 ex de,hl
|
||
ldi
|
||
ldi
|
||
ldi
|
||
ex de,hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #021B ®¯à®á ¬ëè¨
|
||
;¢ëå: c - á®áâ®ï¨¥ ª®¯®ª ¬ëè¨
|
||
; z - ¥â ¦ âëå ª®¯®ª
|
||
;
|
||
x021B push hl
|
||
ld bc,#FBDF ;¯® ®á¨ X
|
||
in a,(c)
|
||
ld b,#FF ;ªà ©ïï ª®®à¤¨ â X
|
||
ld hl,xE12C ;¯à¥¤ë¤ã饥 á®áâ®ï¨¥ ¯®à⮢ ¬ëè¨
|
||
ld de,xE03C ;ª®®à¤¨ âë ªãàá®à ¬ëè¨
|
||
call x0244 ;ª®à४æ¨ï crd X ªãàá®à
|
||
ld b,#FF
|
||
in a,(c)
|
||
neg
|
||
ld b,#BF ;ªà ©ïï ª®®à¤¨ â Y
|
||
ex de,hl
|
||
inc hl
|
||
inc de
|
||
call x0244 ;ª®à४æ¨ï crd Y ªãàá®à
|
||
ld b,#FA
|
||
in a,(c)
|
||
cpl
|
||
and #07
|
||
ld c,a ; ¦ âë¥ ª®¯ª¨
|
||
pop hl
|
||
ret
|
||
;ª®à४æ¨ï crd X/Y ªãàá®à
|
||
x0244 push bc
|
||
ld b,(hl)
|
||
ld (hl),a
|
||
sub b ;a - +/- ¤¥«ìâ crd
|
||
ex de,hl
|
||
pop bc
|
||
ret z ;¥ ¡ë«® ¯¥à¥¬¥é¥¨ï
|
||
jp m,x0256 ;¤¢¨¦¥¨¥ ¢«¥¢®/¢¢¥àå
|
||
add a,(hl) ;¤¢¨¦¥¨¥ ¢¯à ¢®/¢¨§
|
||
jr c,x0254
|
||
cp b ;¯à ¢ë©/¨¦¨© ¯à¥¤¥« íªà
|
||
ld (hl),a
|
||
ret c
|
||
x0254 ld (hl),b ;¤®á⨣«¨ ¯à¥¤¥« íªà
|
||
ret
|
||
x0256 neg ;¤¢¨¦¥¨¥ ¢«¥¢®/¢¢¥àå
|
||
ld b,a ;ABS(delta Crd)
|
||
ld a,(hl)
|
||
sub b
|
||
ld (hl),a
|
||
ret nc
|
||
ld (hl),#00 ;¤®á⨣«¨ ¯à¥¤¥« íªà
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0260 ®¯à®á kempston joystick
|
||
;¢ëå: c - á®áâ®ï¨¥ ª®¯®ª ¤¦®©á⨪
|
||
;
|
||
x0260 ld bc,#FF1F
|
||
in c,(c)
|
||
ld d,(iy+#2E) ;è £ ¯¥à¥¬¥é¥¨ï
|
||
push hl
|
||
ld hl,(xE03C) ;crd Y/X
|
||
bit 1,c ; ¦ ⨥ ¢«¥¢®
|
||
jr z,x0276
|
||
ld a,l
|
||
sub d
|
||
jr nc,x0275
|
||
xor a
|
||
x0275 ld l,a
|
||
x0276 bit 0,c ; ¦ ⨥ ¢¯à ¢®
|
||
jr z,x0285
|
||
ld a,l
|
||
add a,d
|
||
jr c,x0282
|
||
cp #FC
|
||
jr c,x0284
|
||
x0282 ld a,#FC ;ªà ©ïï ª®®à¤¨ â X
|
||
x0284 ld l,a
|
||
x0285 bit 3,c ; ¦ ⨥ ¢¢¥àå
|
||
jr z,x028F
|
||
ld a,h
|
||
sub d
|
||
jr nc,x028E
|
||
xor a
|
||
x028E ld h,a
|
||
x028F bit 2,c ; ¦ ⨥ ¢¨§
|
||
jr z,x029C
|
||
ld a,h
|
||
add a,d
|
||
cp #BE
|
||
jr c,x029B
|
||
ld a,#BE ;ªà ©ïï ª®®à¤¨ â Y
|
||
x029B ld h,a
|
||
x029C ld (xE03C),hl
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #02A1 ®¡à ¡®âª § ¤¥à¦¥ª ¤ï« £à ä¨ç¥áª®£® ªãàá®à
|
||
;¢å: c - á®áâ®ï¨¥ ª®¯®ª ¤¦®©á⨪
|
||
x02A1 ld hl,xE00A
|
||
bit 4,c
|
||
jr nz,x02D8 ; ¦ â fire ¤¦®©á⨪¥
|
||
bit 6,(hl)
|
||
jr nz,x02C0 ;ãáâ ®¢ª § ¤¥à¦ª¨ second wait ¯à¨ ¥®¡å®¤¨¬®áâ¨
|
||
bit 5,(hl)
|
||
jr z,x02B5 ;á¡à®á § ¤¥à¦¥ª ¨ ãáâ ®¢ª ªãàá®à ü1
|
||
ld a,(hl)
|
||
and #1F
|
||
jr nz,x0322 ;㬥ì襨¥ áç¥â稪 § ¤¥à¦ª¨
|
||
;á¡à®á § ¤¥à¦¥ª ¨ ãáâ ®¢ª ªãàá®à ü1
|
||
x02B5 ld a,(hl)
|
||
and #80
|
||
ld (hl),a
|
||
;ãáâ ®¢ª ªãàá®à ü1
|
||
x02B9 ld hl,xE12E
|
||
ld (xE12A),hl
|
||
ret
|
||
;ãáâ ®¢ª § ¤¥à¦ª¨ second wait ¯à¨ ¥®¡å®¤¨¬®áâ¨
|
||
x02C0 bit 5,(hl)
|
||
jr nz,x02B5 ;á¡à®á § ¤¥à¦¥ª ¨ ãáâ ®¢ª ªãàá®à ü1
|
||
ld a,(hl)
|
||
and #1F
|
||
jr z,x02B5 ;á¡à®á § ¤¥à¦¥ª ¨ ãáâ ®¢ª ªãàá®à ü1
|
||
res 6,(hl)
|
||
set 5,(hl)
|
||
ld a,(iy+#2C) ;§ 票¥ second wait
|
||
;ãáâ ®¢ª ¢¥«¨ç¨ë § ¤¥à¦ª¨
|
||
x02D0 push af
|
||
ld a,#E0
|
||
and (hl)
|
||
pop de
|
||
or d
|
||
ld (hl),a
|
||
ret
|
||
;¥á«¨ ¦ â fire ¤¦®©á⨪¥
|
||
x02D8 bit 5,(hl)
|
||
jr nz,x0312 ;ãáâ ®¢ª ¨ ®¡à ¡®âª § ¤¥à¦ª¨ second debouncing
|
||
bit 6,(hl)
|
||
jr nz,x02FF
|
||
ld a,(hl)
|
||
and #1F
|
||
jr nz,x02EA
|
||
ld a,(iy+#2A) ;§ 票¥ first debouncing
|
||
jr x02D0 ;ãáâ ®¢ª ¢¥«¨ç¨ë § ¤¥à¦ª¨
|
||
x02EA dec (hl)
|
||
ld a,(hl)
|
||
and #1F
|
||
ret nz
|
||
set 6,(hl)
|
||
ld a,(iy+#2B) ;§ 票¥ before repeat
|
||
call x02D0 ;ãáâ ®¢ª ¢¥«¨ç¨ë § ¤¥à¦ª¨
|
||
ld hl,xE14E
|
||
ld (xE12A),hl
|
||
jr x0307
|
||
x02FF ld a,(hl)
|
||
and #1F
|
||
jr nz,x0322 ;㬥ì襨¥ áç¥â稪 § ¤¥à¦ª¨
|
||
call x02B9 ;ãáâ ®¢ª ªãàá®à ü1
|
||
x0307 call x0344 ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
ld (xE008),hl ;ª®®à¤¨ âë ªãàá®à ¬ëè¨ ¢ ⥪ã饬 ®ª¥ (¢ § ª®¬¥áâ å)
|
||
x030D set 0,(iy+#27)
|
||
ret
|
||
;ãáâ ®¢ª ¨ ®¡à ¡®âª § ¤¥à¦ª¨ second debouncing
|
||
x0312 bit 6,(hl)
|
||
jr nz,x031D
|
||
set 6,(hl)
|
||
ld a,(iy+#2D) ;§ 票¥ second debouncing
|
||
jr x02D0 ;ãáâ ®¢ª ¢¥«¨ç¨ë § ¤¥à¦ª¨
|
||
x031D ld a,(hl)
|
||
and #1F
|
||
jr z,x0324
|
||
x0322 dec (hl) ;㬥ì襨¥ áç¥â稪 § ¤¥à¦ª¨
|
||
ret
|
||
x0324 push hl
|
||
call x02B5 ;á¡à®á § ¤¥à¦¥ª ¨ ãáâ ®¢ª ªãàá®à ü1
|
||
pop hl
|
||
ld a,#1F
|
||
call x02D0 ;ãáâ ®¢ª ¢¥«¨ç¨ë § ¤¥à¦ª¨
|
||
call x0344 ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¢ £à ¨æë ⥪ã饣® ®ª
|
||
or a
|
||
ld de,(xE008) ;¯à¥¤ë¤ã騥 ª®®à¤¨ âë ªãàá®à ¢ ⥪ã饬 ®ª¥ (¢ § ª®¬¥áâ å)
|
||
ld (xE008),hl ;®¢ë¥ ª®®à¤¨ âë ªãàá®à ¢ ⥪ã饬 ®ª¥ (¢ § ª®¬¥áâ å)
|
||
sbc hl,de
|
||
ld a,h
|
||
or l
|
||
jr nz,x030D ;ª®®à¤¨ âë ¨§¬¥¨«¨áì
|
||
set 1,(iy+#27)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0344 ®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
;¢ëå: ¢® ä« £ å á®áâ®ï¨¥ ०¨¬ ¯à¥àë¢ ¨©
|
||
; hl - ª®®à¤¨ âë ªãàá®à ¬ëè¨ ¢ ®ª¥ ¢ § ª®¬¥áâ å ®ª
|
||
;
|
||
x0344 ld a,r
|
||
push af ;á®åà ¨¬ ०¨¬ ¯à¥àë¢ ¨©
|
||
di
|
||
res 2,(iy+#27)
|
||
ld hl,(xE03C) ;ª®®à¤¨ âë ªãàá®à ¬ëè¨
|
||
srl h
|
||
srl h
|
||
srl h
|
||
ld a,h
|
||
sub (ix+2)
|
||
jr c,x037B ;¢ëè¥ â¥ªã饣® ®ª
|
||
ld h,a ;ª®®à¤¨ â Y ¢ ®ª¥
|
||
cp (ix+4)
|
||
jr nc,x037B ;¨¦¥ ⥪ã饣® ®ª
|
||
ld a,(ix+3)
|
||
rlca
|
||
rlca
|
||
rlca
|
||
ld b,a
|
||
ld a,l
|
||
sub b
|
||
jr c,x037B ;«¥¢¥¥ ®ª
|
||
ld b,(ix+#0A)
|
||
ld l,#FF
|
||
x0371 inc l
|
||
sub b
|
||
jr nc,x0371
|
||
ld a,l
|
||
cp (ix+#0B)
|
||
jr c,x037F ;¢ ¯à¥¤¥« å ®ª
|
||
x037B set 2,(iy+#27)
|
||
x037F pop af
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0381 ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è ¨ ®¡à ¡®âª ॠªæ¨¨ ¨å
|
||
;¢ëå: cy=0 a=#0D ®¯æ¨ï ¢ë¡à
|
||
; cy=1, a=#03 ®â¬¥ á § ªàë⨥¬ ®ª
|
||
; cy=1, a=a ¥¨á¯®«ì§ã¥¬ë¥ ª®¬¡¨ 樨. ¥â ॠªæ¨¨
|
||
x0381 rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
|
||
;€„<E282AC>…‘: #0385 ®¡à ¡®âª ॠªæ¨¨ ¦ â¨ï ª« ¢¨è
|
||
;¢å: a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
;¢ëå: cy=0 a=#0D ®¯æ¨ï ¢ë¡à
|
||
; cy=1, a=#03 ®â¬¥ á § ªàë⨥¬ ®ª
|
||
; cy=1, a=a ¥¨á¯®«ì§ã¥¬ë¥ ª®¬¡¨ 樨. ¥â ॠªæ¨¨
|
||
x0385 cp #82
|
||
jr c,x03B0 ;a=[#00..#81]
|
||
jr z,x03AC ;a=#82 KempJoy fire ¢¥ ®ª
|
||
cp #91
|
||
ret c ;a=[#83..#90]
|
||
cp #A0
|
||
ccf
|
||
ret c ;a=[#A0..#FF] ???§ ¤¥« ¤«ï ª¨à¨««¨æë???
|
||
bit 3,a ;a=[#91..#9F] mouse
|
||
jr nz,x03AC ;ª®¯ª ¬ëè¨ ¢¥ ®ª
|
||
and #03
|
||
jr z,x03A8 ;¥ ¦ â ¨ «¥¢ ï, ¨ ¯à ¢ ï ª®¯ª ¬ëè¨
|
||
cp #03
|
||
jr z,x03A8 ;fire+cancel
|
||
rrca
|
||
jr nc,x03AC ;cancel ®ª¥
|
||
call x03BD ;ãáâ ¢«¨¢ ¥¬ ª®®à¤¨ âë ¢ ®ª¥ ¯® ªãàá®àã ¬ëè¨
|
||
ccf
|
||
ld a,#0D
|
||
ret
|
||
x03A8 or #94
|
||
scf
|
||
ret
|
||
x03AC ld a,#03
|
||
scf
|
||
ret
|
||
x03B0 cp #80
|
||
ret c ;a=[#00..#7F]
|
||
call x03BD ;ãáâ ¢«¨¢ ¥¬ ª®®à¤¨ âë ¢ ®ª¥ ¯® ªãàá®àã KempJoy
|
||
cp #81
|
||
ret c ;!!! Ž˜ˆ<CB9C>Š€ fire joy =#80 ¥ #81
|
||
ld a,#0D
|
||
or a
|
||
ret
|
||
;ãáâ ¢«¨¢ ¥¬ ª®®à¤¨ âë ¢ ®ª¥ ¯® ªãàá®àã ¬ëè¨
|
||
x03BD push af
|
||
call x0344 ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
ld (ix+0),h
|
||
ld (ix+1),l
|
||
pop af
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #03C9 â ¡«¨æ ¤à¥á®¢ ¯à®æ¥¤ãà £à ä¨ç¥áª®£® ªãàá®à
|
||
x03C9 dw x041D ;®¯à®á ã¯à ¢«¥¨ï ¡¥§ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
dw x040D ;®¯à®á ã¯à ¢«¥¨ï á § ¤ 묨 ¯ à ¬ âà ¬¨ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
dw x0385 ;®¡à ¡®âª ॠªæ¨¨ ¦ â¨ï ª« ¢¨è
|
||
dw x042C ;ç⥨¥ ª®®à¤¨ â ªãàá®à
|
||
dw x0431 ;¯à®¢¥àª ¢ë室 ªãàá®à § ¨¦îî £à ¨æã íªà
|
||
dw x03FF ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
dw x03F4 ;§ £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1
|
||
dw x03E4 ;§ £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1 ¨§ hl
|
||
dw x03EF ;§ £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2
|
||
dw x03DF ;§ £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2 ¨§ hl
|
||
dw x08FB ;¯à®¢¥àª «¨ç¨ï ¬ëè¨
|
||
|
||
;€„<E282AC>…‘: #03DF § £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2 ¨§ hl
|
||
;¢å: hl - ¤à¥á ¤ ëå ªãàá®à
|
||
x03DF ld de,xE14E
|
||
jr x03E7
|
||
|
||
;€„<E282AC>…‘: #03E4 § £à㧪 ¢ RAM8 £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1 ¨§ hl
|
||
;¢å: hl - ¤à¥á ¤ ëå ªãàá®à
|
||
x03E4 ld de,xE12E
|
||
x03E7 ld bc,#0020
|
||
rst #30
|
||
dw rom2_x0753 ;á®åà ¥¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #03EF § £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü2
|
||
;¢å: hl - ¤à¥á ¢ ¯ ¬ïâ¨
|
||
x03EF ld hl,xE14E
|
||
jr x03F7
|
||
|
||
;€„<E282AC>…‘: #03F4 § £à㧪 ¨§ RAM8 ¢ ¯ ¬ïâì hl £à ä¨ç¥áª®£® ¨§®¡à ¦¥¨ï ªãàá®à ü1
|
||
;¢å: hl - ¤à¥á ¢ ¯ ¬ïâ¨
|
||
x03F4 ld hl,xE12E
|
||
x03F7 ld bc,#0020
|
||
rst #30
|
||
dw rom2_x0749 ;¢®ááâ ®¢«¥¨¥ ®¡« á⨠¯ ¬ï⨠¨§ ram 8
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #03FF ®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
;¢ëå: de - ª®®à¤¨ âë ªãàá®à íªà ¥
|
||
; cy =0 ªãàá®à ¬ëè¨ ¢ ¯à¥¤¥« å ⥪ã饣® ®ª
|
||
; cy =1 ªãàá®à ¬ëè¨ ¢¥ ¯à¥¤¥«®¢ ⥪ã饣® ®ª
|
||
x03FF call x0344 ;®¯à¥¤¥«¥¨¥ ¯®¯ ¤ ¨ï ªãàá®à ¬ëè¨ ¢ £à ¨æë ⥪ã饣® ®ª
|
||
call x042C ;de - ª®®à¤¨ âë ªãàá®à íªà ¥
|
||
or a
|
||
bit 2,(iy+#27)
|
||
ret z ;ªãàá®à ¬ëè¨ ¢ ¯à¥¤¥« å ⥪ã饣® ®ª
|
||
scf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #040D ®¯à®á ã¯à ¢«¥¨ï á § ¤ 묨 ¯ à ¬ âà ¬¨ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
;¢å: 7-5,b - ®¢ë¥ § 票ï ãáâ ®¢®ª £à ä¨ç¥áª¨å ¬ ¨¯ã«ïâ®à®¢
|
||
;¢ëå: de - ª®®à¤¨ âë ªãàá®à
|
||
x040D ld hl,xE03B
|
||
push hl
|
||
ld a,b
|
||
and #E0
|
||
ld b,a
|
||
ld a,(hl)
|
||
push af
|
||
and #1F
|
||
or b
|
||
ld (hl),a
|
||
jr x0425
|
||
|
||
;€„<E282AC>…‘: #041D ®¯à®á ã¯à ¢«¥¨ï ¡¥§ ®¯à®á ¬ ¨¯ã«ïâ®à®¢
|
||
;¢ëå: de - ª®®à¤¨ âë ªãàá®à
|
||
x041D ld hl,xE03B
|
||
push hl
|
||
ld a,(hl)
|
||
res 7,(hl) ;®ª«î票¥ ¬ ¨¯ã«ïâ®à®¢
|
||
push af
|
||
x0425 rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
pop bc
|
||
pop hl
|
||
ld (hl),b
|
||
|
||
;€„<E282AC>…‘: #042C ç⥨¥ ª®®à¤¨ â ªãàá®à
|
||
;¢ëå: de - ª®®à¤¨ âë ªãàá®à
|
||
x042C ld de,(xE03C)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0431 ¯à®¢¥àª ¢ë室 ªãàá®à § ¨¦îî £à ¨æã íªà
|
||
;¢å: hl - ª®®à¤¨ âë £à ä¨ç¥áª®£® ªãàá®à
|
||
;¢ëå: (xE03C),hl - ®¢ë¥ ª®®à¤¨ âë ªãàá®à
|
||
x0431 ld a,#BF
|
||
cp h
|
||
jr nc,x0437
|
||
ld h,a
|
||
x0437 ld (xE03C),hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #043B Ž˜ˆ<CB9C>Š€!!!! ¢ë§®¢ ¯à®æ¥¤ãàë ¯® ®¬¥àã ¢ C
|
||
;¢å: c - ®¬¥à ¯à®æ¥¤ãàë
|
||
x043B push hl
|
||
rst #30
|
||
dw rom2_x300F ;ç⥨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà ix ®á®¢®© ¯à®£à ¬¬ë
|
||
db #02
|
||
ld hl,x03C9
|
||
ld b,#00 ;Ž˜ˆ<CB9C>Š€!!!! ¢ B ¬®¦¥â ¯¥à¥¤ ¢ âìáï ¯ à ¬¥âà
|
||
sla c
|
||
add hl,bc
|
||
ex (sp),hl ;Ž˜ˆ<CB9C>Š€!!!!
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #044A â ¡«¨æ ¤à¥á®¢ ¤¥áªà¨¯â®à®¢ ¬¥î
|
||
x044A dw x0660 ;®ª® 0 (main menu)
|
||
dw x06B6
|
||
dw x06CD
|
||
dw x068B
|
||
dw x0882
|
||
dw x06F8
|
||
dw 0
|
||
dw x0737
|
||
dw x0797
|
||
dw x0762
|
||
dw x08B2
|
||
dw x07C2
|
||
dw x07F2
|
||
dw x081D
|
||
dw x084D
|
||
|
||
;€„<E282AC>…‘: #0468 á®®¡é¥¨ï ¤«ï ¯¥ç ⨠®¯æ¨© ¬¥î
|
||
;+0 7-6, ¤®¯®«¨â¥«ì®¥ ᬥ饨¥ ª®®à¤¨ âë Y
|
||
; 5,=1 ¢ ¡ ©â å +1/2 ¤à¥á ®â¤¥«ì® ¯/¯ ¯¥ç ⨠®¯æ¨¨ ¬¥î
|
||
; 4,=1 ¢ ¡ ©â¥ +3 ®¬¥à ¯«®áª®áâ¨/áâà ¨æë, ¥á«¨ ¯/¯ ¢ ¤à㣮© áâà ¨æ¥
|
||
; 5,=0 ¢ ¡ ©â å +1/2 ®¬¥à £à㯯ë á®®¡é¥¨© ¨ ®¬¥à á®®¡é¥¨ï ¢ ¥©
|
||
; 4,=1 (+3/4) ¤à¥á ¯¥à¥¬¥®© á ®¬¥à®¬ áâப¨ [0..3]
|
||
; +5 ᯨ᮪ áâப ¢ ä®à¬ â¥: +0 ¤«¨ áâப¨ ¡¥§ ãç¥â ¤ ®£® ¡ ©â
|
||
; +n áâப ¢ ä®à¬ ⥠+0 ä« £¨, +1/2 ᬥ饨¥
|
||
; 4,=0 (+3/4) ᬥ饨¥ ¤® ¯¥à¥¬¥®©/¡«®ª ¯¥à¥¬¥ëå
|
||
; 2,=0 -> ᬥ饨¥ ¢ á«¥¤ãî饩 ï祩ª¥ ®¤®¡ ©â®¥
|
||
; 2,=1 -> ᬥ饨¥ ¢ á«¥¤ãîé¨å ï祩ª å ¤¢ãå¡ ©â®¥
|
||
; 3,=1 -> íâ® ¡«®ª ¯¥à¥¬¥ëå ¨ ¢ á«¥¤ãé¨å ï祩ª å ¤à¥á ¤® ï祩ª¨ ᮠᬥ饨¥¬ ¤® 㦮© ¯¥à¥¬¥®©
|
||
; 1-0,=01 ¤¢ á®áâ®ï¨ï ®¯æ¨¨, ®¬¥à á®®¡é¥¨© ¯®á«¥ ¬ ᪨
|
||
; =10 á®áâ®ï¨¥ ®¯æ¨¨ íâ® ç¨á«® ¯® ¤à¥áã ¯¥à¥¬¥®© ®¯æ¨¨
|
||
; =11 1-4 á®áâ®ï¨ï ®¯æ¨¨, ¯® ®¬¥àã ¢ de
|
||
;+1 ®¬¥à ¡«®ª á®®¡é¥¨©
|
||
;+2 ®¬¥à á®®¡é¥¨ï ¢ í⮬ ¡«®ª¥
|
||
;
|
||
x0468 db %01000000 ;C. catalogue disk
|
||
db #01,#51
|
||
x046B db %01000000 ;format <09>… ˆ‘<CB86>Ž‹œ‡“…’‘Ÿ!!!!
|
||
db #01,#4B
|
||
x046E db %01000000 ;D. Disk utility
|
||
db #01,#4D
|
||
x0471 db %01000000 ;F. format disk
|
||
db #01,#45
|
||
x0474 db %01000000 ;Q. quick format
|
||
db #01,#68
|
||
x0477 db %01000000 ;T. test disk
|
||
db #01,#4E
|
||
x047A db %01000110 ;Y. retry constant
|
||
db #01,#4C
|
||
dw #1FB7 ;#E014+#1FB7=#FFCB
|
||
db #01,#08
|
||
x0481 db %00001101 ;I. side
|
||
db #01,#3B
|
||
dw #1FBC ;=#FFD0
|
||
dw #FFCA
|
||
db #80
|
||
db #3C,#3D
|
||
x048B db %00001101 ;R. track
|
||
db #01,#38
|
||
dw #1FBC ;=#FFD0
|
||
dw #FFCA
|
||
db #20
|
||
db #39,#3A
|
||
x0495 db %01000010 ;L. interleaving
|
||
db #01,#52
|
||
db #18
|
||
db #01,#1B ;¬¨¨¬ã¬ ¨ ¬ ªá¨¬ã¬
|
||
x049B db %00001101 ;S. side
|
||
db #01,#3B
|
||
dw #1FB8 ;=#FFCC
|
||
dw #FFCA
|
||
db #80
|
||
db #3C,#3D
|
||
x04A5 db %01001101 ;T. track
|
||
db #01,#38
|
||
dw #1FB8 ;=#FFCC
|
||
dw #FFCA
|
||
db #40
|
||
db #39,#3A
|
||
x04AF db %01000111 ;D. disk drive
|
||
db #01,#33
|
||
dw #1FB6 ;=#FFCA
|
||
db #34,#35,#36,#37
|
||
x04B8 db %00001111 ;E. sector
|
||
db #01,#40
|
||
dw #1FBC ;=#FFD0
|
||
dw #FFCA
|
||
db #41,#42,#43,#44
|
||
x04C3 db %00001111 ;P. speed
|
||
db #01,#1A
|
||
dw #1FB8 ;=#FFCC
|
||
dw #FFCA
|
||
db #47,#48,#49,#4A
|
||
x04CE db %01000001 ;S. sound
|
||
db #01,#31
|
||
db #14,#01
|
||
db #25,#26
|
||
x04D5 db %00000001 ;A. autoconfig
|
||
db #02,#0C
|
||
db #14,#02
|
||
db #05,#04
|
||
x04DC db %01000001 ;R. reset RAM
|
||
db #01,#30
|
||
db #14,#80
|
||
db #25,#26
|
||
x04E3 db %01000000 ;M. monitor
|
||
db #01,#0A
|
||
x04E6 db %01000000 ;R. reset
|
||
db #01,#29
|
||
x04E9 db %00000010 ;L. string width
|
||
db #01,#27
|
||
db #58
|
||
db #00,#EA ;0..233
|
||
x04EF db %00000010 ;W. page length
|
||
db #01,#28
|
||
db #57
|
||
db #00,#79
|
||
x04F5 db %00000010 ;F. line feed
|
||
db #01,#2A
|
||
db #41
|
||
db #00,#21
|
||
x04FB db %01000010 ;C. carriage return
|
||
db #01,#2B
|
||
x04FE db %01000000 ;no search string <09>… ˆ‘<CB86>Ž‹œ‡“…’‘Ÿ!!!!
|
||
db #00,#21
|
||
x0501 db %00000010 ;V. form feed
|
||
db #01,#2E
|
||
x0504 db %01000010 ;no search string <09>… ˆ‘<CB86>Ž‹œ‡“…’‘Ÿ!!!!
|
||
db #00,#21
|
||
x0507 db %00000001 ;D. data
|
||
db #01,#23
|
||
db #15,#80
|
||
db #0E,#0F
|
||
x050E db %01000001 ;S. speed
|
||
db #01,#1A
|
||
db #15,#02
|
||
db #1B,#1C
|
||
x0515 db %00000001 ;A. data bits
|
||
db #01,#1D
|
||
db #15,#04
|
||
db #1E,#1F
|
||
x051C db %00000001 ;P. stop bits
|
||
db #01,#20
|
||
db #15,#08
|
||
db #21,#22
|
||
x0523 db %01000001 ;I. interface
|
||
db #01,#17
|
||
db #15,#01
|
||
db #18,#19
|
||
x052A db %01000000 ;P. printer
|
||
db #01,#0B
|
||
x052D db %01000000 ;computer <09>… ˆ‘<CB86>Ž‹œ‡“…’‘Ÿ!!!!
|
||
db #01,#2C
|
||
x0530 db %10000000 ;0. previous menu
|
||
db #01,#07
|
||
x0533 db %10000000 ;0. Continue program
|
||
db #01,#08
|
||
x0536 db %01000000 ;G. magic button
|
||
db #01,#09
|
||
x0539 db %01000000 ;B. Save & load
|
||
db #01,#2D
|
||
x053C db %01000000 ;M. Monitor
|
||
db #01,#0A
|
||
x053F db %01000001 ;S. print screen
|
||
db #01,#03
|
||
db #12,#04
|
||
db #0E,#0F
|
||
x0546 db %01000000 ;P. Print Screen
|
||
db #01,#03
|
||
x0549 db %01000000 ;P. printer * 2
|
||
db #01,#55
|
||
x054C db %01000000 ;S. printer * 1
|
||
db #01,#54
|
||
x054F db %01000000 ;D. disk ...
|
||
db #01,#0C
|
||
x0552 db %01000000 ;S. Set Up
|
||
db #01,#04
|
||
x0555 db %01000000 ;R. reset monitor
|
||
db #01,#53
|
||
x0558 db %01000000 ;S. save ...
|
||
db #01,#5A
|
||
x055B db %01000000 ;L. load ...
|
||
db #01,#5B
|
||
x055E db %10000000 ;R. ROM disk
|
||
db #00,#5E
|
||
x0561 db %01000001 ;A. autostart
|
||
db #01,#69
|
||
db #14,#04
|
||
db #25,#26
|
||
x0568 db %00000001 ;Z. compression
|
||
db #02,#0D
|
||
db #13,#20
|
||
db #04,#05
|
||
x056F db %00000010 ;?. degree
|
||
db #02,#0E
|
||
db #26,#01
|
||
db #FF
|
||
x0575 db %01000001 ;V. Computer Speed
|
||
db #01,#58
|
||
db #19,#40
|
||
db #56,#57
|
||
x057C db %01000010 ;N. NMI debouncing
|
||
db #01,#5D
|
||
db #25
|
||
db #01,#80 ;1..127
|
||
x0582 db %01000000 ;G. graphics manipulators
|
||
db #01,#5E
|
||
x0585 db %01000001 ;G. manipulators
|
||
db #01,#60
|
||
db #27,#80
|
||
db #26,#25
|
||
x058C db %01000001 ;M. mouse
|
||
db #01,#61
|
||
db #27,#20
|
||
db #26,#25
|
||
x0593 db %00000001 ;K. kempston joystick
|
||
db #01,#62
|
||
db #27,#40
|
||
db #26,#25
|
||
x059A db %01000010 ;1. first debouncing
|
||
db #01,#63
|
||
db #2A
|
||
db #01,#C8
|
||
x05A0 db %00000010 ;2. before repeat
|
||
db #01,#64
|
||
db #2B
|
||
db #01,#C8
|
||
x05A6 db %00000010 ;3. second wait
|
||
db #01,#65
|
||
db #2C
|
||
db #01,#C8
|
||
x05AC db %00000010 ;4. second debouncing
|
||
db #01,#66
|
||
db #2D
|
||
db #01,#C8
|
||
x05B2 db %00000010 ;S. size of step
|
||
db #01,#67
|
||
db #2E
|
||
db #01,#08
|
||
x05B8 db %01000000 ;T. time & date
|
||
db #02,#01
|
||
x05BB db %01000001 ;I. indicator
|
||
db #02,#03
|
||
db #27,#08
|
||
db #04,#05
|
||
x05C2 db %01000010 ;H. hours
|
||
db #02,#06
|
||
db #E4 ;=#1C
|
||
db #00,#18
|
||
x05C8 db %00000010 ;M. minutes
|
||
db #02,#07
|
||
db #E3 ;-#1D
|
||
db #00,#3C
|
||
x05CE db %00000010 ;S. seconds
|
||
db #02,#08
|
||
db #E2 ;-#1E
|
||
db #00,#3C
|
||
x05D4 db %00000010 ;Y. years
|
||
db #02,#09
|
||
db #E7 ;-#19
|
||
db #00,#64
|
||
x05DA db %00000010 ;O. months
|
||
db #02,#0A
|
||
db #E6 ;-#1A
|
||
db #01,#0D
|
||
x05E0 db %01000010 ;D. days
|
||
db #02,#0B
|
||
db #E5 ;-#1B
|
||
db #01,#20
|
||
x05E6 db %01000000 ;P. save CMOS
|
||
db #01,#6A
|
||
x05E9 db %00000000 ;G. load CMOS
|
||
db #01,#6B
|
||
x05EC db %01000000 ;C. save Set Up to disk
|
||
db #01,#6C
|
||
x05EF db %01000000 ;H. Hard disk utility
|
||
db #02,#0F
|
||
x05F2 db %01100000 ;C. cylinders
|
||
dw x1047 ;¯¥ç âì ª®«¨ç¥á⢠樫¨¤à®¢ HDD
|
||
x05F5 db %00000010 ;H. head
|
||
db #02,#11
|
||
db #E0 ;-#20
|
||
db #01,#40
|
||
x05FB db %00000010 ;S. sector
|
||
db #01,#40
|
||
db #E1 ;-#1F
|
||
db #01,#40
|
||
x0601 db %00000001 ;L. LBA mode
|
||
db #02,#35
|
||
db #1C,#04
|
||
db #04,#05
|
||
x0608 db %01000001 ;M. TRDOS mirror
|
||
db #02,#36
|
||
db #1C,#10
|
||
db #05,#04
|
||
x060F db %01000000 ;P. partition manager
|
||
db #02,#12
|
||
x0612 db %01000000 ;A. delete all part
|
||
db #02,#14
|
||
x0615 db %01000000 ;G. global part. table
|
||
db #02,#13
|
||
x0618 db %01000000 ;V. partition information
|
||
db #02,#16
|
||
x061B db %01000000 ;L. local part. table
|
||
db #02,#15
|
||
x061E db %01000000 ;D. delete partition
|
||
db #02,#18
|
||
x0621 db %01000000 ;C. create partition
|
||
db #02,#19
|
||
x0624 db %00000000 ;N. rename partition
|
||
db #02,#32
|
||
x0627 db %00000000 ;W. write to disk
|
||
db #02,#1A
|
||
x062A db %10000000 ;R. restore from disk
|
||
db #02,#1B
|
||
x062D db %01000000 ;A. auto detection hdd
|
||
db #02,#1C
|
||
x0630 db %00100011 ;D. mount on D:
|
||
dw x247E ;¯¥ç âì ®¢®£® ¯ãâ¨
|
||
x0633 db %00100010 ;C. mount on C:
|
||
dw x247E ;¯¥ç âì ®¢®£® ¯ãâ¨
|
||
x0636 db %00100001 ;B. mount on B:
|
||
dw x247E ;¯¥ç âì ®¢®£® ¯ãâ¨
|
||
x0639 db %01100000 ;A. mount on A:
|
||
dw x247E ;¯¥ç âì ®¢®£® ¯ãâ¨
|
||
x063C db %01000001 ;A. autostart
|
||
db #01,#69
|
||
db #1C,#01
|
||
db #26,#25
|
||
x0643 db %00000011 ;V. from drive
|
||
db #01,#70
|
||
db #DD ;-#23
|
||
db #34,#35,#36,#37
|
||
x064B db %00100000 ;Z. dismount...
|
||
dw x24CE ;¯¥ç âì ®¢®£® §¢ ¨ï ¯ãªâ
|
||
db #0B,#80
|
||
x0650 db %00000001 ;O. on start
|
||
db #02,#31
|
||
db #1C,#02
|
||
db #05,#04
|
||
x0657 db %01000000 ;1. test
|
||
db #01,#06
|
||
x065A db %00000000 ;2. test
|
||
db #01,#06
|
||
x065D db %01000000 ;D. delete all part
|
||
db #02,#14
|
||
|
||
;€„<E282AC>…‘: #0660 ¤¥áªà¨¯â®àë ¬¥î
|
||
;¤¥áªà¨¯â®à ®¯æ¨©
|
||
;+0,4-0 æ¨äà /¡ãª¢ ¢ë¡®à ®¯æ¨¨ 0-5/A-Z
|
||
; ,7-5 ®¬¥à âਡã⮢ ¯¥ç ⨠¨§ â ¡«¨æë xEAED
|
||
;+1,3-2 áâ à訩 ¡ ©â á¬¥é¥¨ï ®â x08DD ¤® ¯/¯ ®¯à¥¤¥«¥¨ï ¤®áâ㯮á⨠®¯æ¨¨
|
||
; 5-4 áâ à訩 ¡ ©â á¬¥é¥¨ï ®â x0468 ¯ à ¬¥âàë ®¯æ¨¨
|
||
; 7-6 áâ à訩 ¡ ©â á¬¥é¥¨ï ®â x08DD ¤® ¯/¯ ®¡à ¡®âª¨ ®¯æ¨¨
|
||
;+2 ¬« ¤è¨© ¡ ©â á¬¥é¥¨ï ®â x08DD ¤® ¯/¯ ®¯à¥¤¥«¥¨ï ¤®áâ㯮á⨠®¯æ¨¨
|
||
;+3 ¬« ¤è¨© ¡ ©â á¬¥é¥¨ï ®â x0468 ¯ à ¬¥âàë ®¯æ¨¨
|
||
;+4 ¬« ¤è¨© ¡ ©â á¬¥é¥¨ï ®â x08DD ¤® ¯/¯ ®¡à ¡®âª¨ ®¯æ¨¨
|
||
x0660 db #07 ;ª®«¨ç¥á⢮ ®¯æ¨© ¢ ¬¥î -1
|
||
db #01,#02 ;¬¥î: main menu
|
||
db 0*#20+#1A,%01000000,#6A,#CB,#E4 ;0. Continue program x0947/x0533/ x0AC1
|
||
db 1*#20+#01,%01000000,#6A,#D1,#C1 ;B. Save & load x0947/x0539/x0A9E
|
||
db 2*#20+#0C,%01000000,#6F,#D4,#B2 ;M. Monitor x094C/x053C/ x0A8F
|
||
db 1*#20+#0F,%01000000,#64,#DE,#C3 ;P. Print Screen x0941/x0546/x0AA0
|
||
db 1*#20+#03,%01000000,#6A,#06,#BC ;D. Disk utility x0947/x046E/x0A99
|
||
db 1*#20+#07,%01010000,#5E,#87,#7A ;H. Hard disk utility x093B/x05EF/x0A57
|
||
db 1*#20+#12,%01000000,#6A,#EA,#C2 ;S. Set Up x0947/x0552/x0A9F
|
||
db 1*#20+#15,%10010000,#3C,#0D,#9D ;V. Computer Speed x0919/x0575/x0B7A
|
||
|
||
x068B db #07 ;ª®«¨ç¥á⢮ ®¯æ¨© ¢ ¬¥î -1
|
||
db #01,#5C ;¬¥î: save & load of program
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#06,%01000000,#2F,#CE,#EC ;G. magic button x090C/x0536/ x0AC9
|
||
db 1*#20+#12,%00000000,#6F,#F0,#D8 ;S. save ... x094C/x0558/x09B5
|
||
db 1*#20+#19,%10010000,#6F,#00,#9D ;Z. compression x094C/x0568/x0B7A
|
||
db 1*#20+#16,%10010000,#48,#07,#A4 ;W. degree x0925/x056F/x0B81
|
||
db 1*#20+#0B,%00000000,#6F,#F3,#DE ;L. load ... x094C/x055B/x09BB
|
||
db 1*#20+#00,%10000000,#6F,#F9,#9D ;A. autostart x094C/x0561/x0B7A
|
||
db 1*#20+#11,%00000000,#7B,#F6,#C3 ;R. ROM disk x0958/x055E/x09A0
|
||
|
||
x06B6 db #03
|
||
db #01,#03 ;¬¥î: print screen
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#12,%01000000,#6A,#E4,#A2 ;S. printer * 1 x0947/x054C/ x0A7F
|
||
db 1*#20+#0F,%01000000,#6A,#E1,#A3 ;P. printer * 2 x0947/x0549/ x0A80
|
||
db 1*#20+#03,%00000000,#6A,#E7,#E4 ;D. disk ... x0947/x054F/x09C1
|
||
|
||
x06CD db #07
|
||
db #01,#04 ;¬¥î: Set Up
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#12,%10000000,#64,#D7,#9D ;S. print screen x0941/x053F/x0B7A
|
||
db 1*#20+#0F,%01000000,#6A,#C2,#BF ;P. printer x0947/x052A/x0A9C
|
||
db 1*#20+#0C,%01000000,#6A,#7B,#BD ;M. monitor x0947/x04E3/x0A9A
|
||
db 1*#20+#03,%01000000,#6A,#06,#BB ;D. Disk utility x0947/x046E/x0A98
|
||
db 1*#20+#06,%01010000,#6A,#1A,#C0 ;G. graphics manipulat. x0947/x0582/x0A9D
|
||
db 1*#20+#13,%01010000,#57,#50,#BA ;T. time & date x0934/x05B8/x0A97
|
||
db 2*#20+#11,%01000000,#6A,#ED,#73 ;R. reset monitor x0947/x0555/x0A50
|
||
|
||
x06F8 db #0B
|
||
db #01,#16 ;¬¥î: Set Up printer
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#08,%10000000,#6A,#BB,#9D ;I. interface x0947/x0523/x0B7A
|
||
db 1*#20+#12,%10000000,#75,#A6,#9D ;S. speed x0952/x050E/x0B7A
|
||
db 1*#20+#00,%10000000,#75,#AD,#9D ;A. data bits x0952/x0515/x0B7A
|
||
db 1*#20+#0F,%10000000,#75,#B4,#9D ;P. stop bits x0952/x051C/x0B7A
|
||
db 1*#20+#03,%10000000,#6A,#9F,#9D ;D. data x0947/x0507/x0B7A
|
||
db 1*#20+#02,%10000000,#6A,#93,#A4 ;C. carriage return x0947/x04FB/x0B81
|
||
db 1*#20+#05,%10000000,#6A,#8D,#A4 ;F. line feed x0947/x04F5/x0B81
|
||
db 1*#20+#15,%10000000,#6A,#99,#A4 ;V. form feed x0947/x0501/x0B81
|
||
db 1*#20+#0B,%10000000,#6A,#81,#A4 ;L. string width x0947/x04E9/x0B81
|
||
db 1*#20+#16,%10000000,#6A,#87,#A4 ;W. page length x0947/x04EF/x0B81
|
||
db 1*#20+#11,%01000000,#6A,#7E,#9B ;R. reset x0947/x04E6/x0A78
|
||
|
||
x0737 db #07
|
||
db #01,#2F ;¬¥î: Set Up monitor
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#0D,%10010000,#6A,#14,#A4 ;N. NMI debouncing x0947/x057C/x0B81
|
||
db 1*#20+#11,%10000000,#6F,#74,#9D ;R. reset RAM x094C/x04DC/x0B7A
|
||
db 1*#20+#12,%10000000,#6A,#66,#98 ;S. sound x0947/x04CE/x0B75
|
||
db 1*#20+#0F,%00010000,#4E,#7E,#C6 ;P. save CMOS x092B/x05E6/x09A3
|
||
db 1*#20+#06,%00010000,#4E,#81,#CC ;G. load CMOS x092B/x05E9/x09A9
|
||
db 1*#20+#02,%00010000,#6B,#84,#D2 ;C. save Set Up to disk x0948/x05EC/x09AF
|
||
db 1*#20+#00,%10000000,#6A,#6D,#9D ;A. autoconfig x0947/x04D5/x0B7A
|
||
|
||
x0762 db #09
|
||
db #01,#32 ;¬¥î: Set Up disk utility
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#03,%01000000,#6A,#47,#F8 ;D. disk drive x0947/x04AF/x0AD5
|
||
db 1*#20+#13,%10000000,#6A,#3D,#9D ;T. track x0947/x04A5/x0B7A
|
||
db 1*#20+#12,%10000000,#6A,#33,#9D ;S. side x0947/x049B/x0B7A
|
||
db 1*#20+#0F,%10000000,#6A,#5B,#06 ;P. speed x0947/x04C3/x0AE3
|
||
db 1*#20+#0B,%10000000,#6A,#2D,#A4 ;L. interleaving x0947/x0495/x0B81
|
||
db 1*#20+#11,%10000000,#6A,#23,#9D ;R. track x0947/x048B/x0B7A
|
||
db 1*#20+#08,%10000000,#6A,#19,#9D ;I. side x0947/x0481/x0B7A
|
||
db 1*#20+#04,%10000000,#6A,#50,#0B ;E. sector x0947/x04B8/x0AE8
|
||
db 1*#20+#18,%10000000,#6A,#12,#A4 ;Y. retry constant x0947/x047A/x0B81
|
||
|
||
x0797 db #07
|
||
db #01,#4D ;¬¥î: disk utility
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#03,%01000000,#6A,#47,#F8 ;D. disk drive x0947/x04AF/x0AD5
|
||
db 1*#20+#02,%10000000,#6A,#00,#48 ;C. catalogue disk x0947/x0468/x0B25
|
||
db 1*#20+#05,%10000000,#6A,#09,#33 ;F. format disk x0947/x0471/x0B10
|
||
db 1*#20+#10,%10000000,#6A,#0C,#26 ;Q. quick format x0947/x0474/x0B03
|
||
db 1*#20+#13,%10000000,#6A,#0F,#3A ;T. test disk x0947/x0477/x0B17
|
||
db 1*#20+#00,%10010000,#6A,#D4,#9D ;A. autostart x0947/x063C/x0B7A
|
||
db 1*#20+#15,%01010000,#6A,#DB,#F0 ;V. from drive x0947/x0643/x0ACD
|
||
|
||
x07C2 db #08
|
||
db #02,#0F ;¬¥î: hard disk utility
|
||
db 0*#20+#1A,%01000000,#AD,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#00,%00010000,#80,#D1,#F5 ;A. mount on A: x095D/x0639/x09D2
|
||
db 1*#20+#01,%00010000,#80,#CE,#F1 ;B. mount on B: x095D/x0636/x09CE
|
||
db 1*#20+#02,%00010000,#80,#CB,#ED ;C. mount on C: x095D/x0633/x09CA
|
||
db 1*#20+#03,%00010000,#80,#C8,#E9 ;D. mount on D: x095D/x0630/x09C6
|
||
db 1*#20+#19,%10010000,#80,#E3,#9D ;Z. dismount... x095D/x064B/x0B7A
|
||
db 1*#20+#0C,%10010000,#80,#A0,#9D ;M. TRDOS mirror x095D/x0608/x0B7A
|
||
db 1*#20+#0F,%01010000,#06,#A7,#0B ;P. partition manager x08E3/x060F/x09E8
|
||
db 1*#20+#12,%01000000,#6A,#EA,#B6 ;S. Set Up x0947/x0552/x0A93
|
||
|
||
x07F2 db #07
|
||
db #02,#13 ;¬¥î: global partition table
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DC ;0. previous menu x0947/x0530/x0AB9
|
||
db 1*#20+#0B,%01010000,#80,#B3,#05 ;L. local part. table x095D/x061B/x09E2
|
||
db 1*#20+#15,%01010000,#6A,#B0,#00 ;V. partition info. x0947/x0618/x09DD
|
||
db 1*#20+#02,%01010000,#86,#B9,#3F ;C. create partition x0963/x0621/x0A1C
|
||
db 2*#20+#03,%01010000,#9A,#B6,#35 ;D. delete partition x0977/x061E/x0A12
|
||
db 2*#20+#00,%01010000,#6A,#AA,#4E ;A. delete all part x0947/x0612/x0A2B
|
||
db 1*#20+#11,%01010000,#6A,#C2,#30 ;R. restore from disk x0947/x062A/x0A0D
|
||
db 3*#20+#16,%01010000,#A1,#BF,#58 ;W. write to disk x097E/x0627/x0A35
|
||
|
||
|
||
x081D db #08
|
||
db #02,#15 ;¬¥î: local partition table
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#D7 ;0. previous menu x0947/x0530/x0AB4
|
||
db 1*#20+#06,%01010000,#A7,#AD,#30 ;G. global part. table x0984/x0615/x0A0D
|
||
db 1*#20+#15,%00010000,#6A,#B0,#FB ;V. partition info. x0947/x0618/x09D8
|
||
db 1*#20+#02,%01010000,#90,#B9,#44 ;C. create partition x096D/x0621/x0A21
|
||
db 1*#20+#0D,%01010000,#9A,#BC,#49 ;N. rename partition x0977/x0624/x0A26
|
||
db 2*#20+#03,%01010000,#9A,#B6,#3A ;D. delete partition x0977/x061E/x0A17
|
||
db 2*#20+#00,%01010000,#6A,#AA,#53 ;A. delete all part x0947/x0612/x0A30
|
||
db 1*#20+#11,%01010000,#6A,#C2,#08 ;R. restore from disk x0947/x062A/x09E5
|
||
db 3*#20+#16,%01010000,#A1,#BF,#62 ;W. write to disk x097E/x0627/x0A3F
|
||
|
||
x084D db #09
|
||
db #01,#6D ;¬¥î: Set Up hard disk
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#00,%01010000,#6A,#C5,#6C ;A. auto detection hdd x0947/x062D/x0A49
|
||
db 1*#20+#0E,%10010000,#6A,#E8,#9D ;O. on start x0947/x0650/x0B7A
|
||
db 1*#20+#02,%10010000,#6A,#8A,#51 ;C. cylinders x0947/x05F2/x0B2E
|
||
db 1*#20+#07,%10010000,#6A,#8D,#89 ;H. head x0947/x05F5/x0B66
|
||
db 1*#20+#12,%10010000,#6A,#93,#89 ;S. sector x0947/x05FB/x0B66
|
||
db 1*#20+#0B,%10010000,#6A,#99,#9D ;L. LBA mode x0947/x0601/x0B7A
|
||
db 1*#20+#1B,%01010000,#00,#EF,#8F ;1. test x08DD/x0657/x0A6C
|
||
db 1*#20+#1C,%01010000,#00,#F2,#93 ;2. test x08DD/x065A/x0A70
|
||
db 2*#20+#03,%01010000,#00,#F5,#97 ;D. delete all part x08DD/x065D/x0A74
|
||
|
||
x0882 db #08
|
||
db #01,#5F ;¬¥î: Set Up graphics manipulators
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#06,%10010000,#6A,#1D,#9D ;G. manipulators x0947/x0585/x0B7A
|
||
db 1*#20+#0C,%10010000,#1E,#24,#9D ;M. mouse x08FB/x058C/x0B7A
|
||
db 1*#20+#0A,%10010000,#12,#2B,#9D ;K. kempston joystick x08EF/x0593/x0B7A
|
||
db 1*#20+#12,%10010000,#0C,#4A,#A4 ;S. size of step x08E9/x05B2/x0B81
|
||
db 1*#20+#1B,%10010000,#0C,#32,#A4 ;1. first debouncing x08E9/x059A/x0B81
|
||
db 1*#20+#1C,%10010000,#0C,#38,#A4 ;2. before repeat x08E9/x05A0/x0B81
|
||
db 1*#20+#1D,%10010000,#0C,#3E,#A4 ;3. second wait x08E9/x05A6/x0B81
|
||
db 1*#20+#1E,%10010000,#0C,#44,#A4 ;4. second debouncing x08E9/x05AC/x0B81
|
||
|
||
x08B2 db #07
|
||
db #02,#02 ;¬¥î: Set Up time & date
|
||
db 0*#20+#1A,%01000000,#6A,#C8,#DF ;0. previous menu x0947/x0530/x0ABC
|
||
db 1*#20+#07,%10010000,#57,#5A,#6E ;H. hours x0934/x05C2/x0B4B
|
||
db 1*#20+#0C,%10010000,#57,#60,#6E ;M. minutes x0934/x05C8/x0B4B
|
||
db 1*#20+#12,%10010000,#57,#66,#6E ;S. seconds x0934/x05CE/x0B4B
|
||
db 1*#20+#03,%10010000,#57,#78,#6E ;D. days x0934/x05E0/x0B4B
|
||
db 1*#20+#0E,%10010000,#57,#72,#6E ;O. months x0934/x05DA/x0B4B
|
||
db 1*#20+#18,%10010000,#57,#6C,#6E ;Y. years x0934/x05D4/x0B4B
|
||
db 1*#20+#08,%10010000,#57,#53,#84 ;I. indicator x0934/x05BB/x0B61
|
||
|
||
;€„<E282AC>…‘: #08DD ¡«®ª ¯/¯ ®¯à¥¤¥«ïîé¨å ¤®áâ㯮áâì ®¯æ¨©
|
||
;¢ëå: cy =1 ®¯æ¨ï ¥¤®áâã¯
|
||
;
|
||
;€„<E282AC>…‘: #08DD ¡«®ª ¯/¯ ®¡à ¡®âª¨ ®¯æ¨©
|
||
;¢ëå:
|
||
;
|
||
x08DD bit 7,(iy+#1A) ;¤®áâ㯮áâì ®¯æ¨¨ 1. test
|
||
jr x0938
|
||
|
||
x08E3 bit 7,(iy+#1B) ;¤®áâ㯮áâì ®¯æ¨¨ P. partition manager
|
||
jr x0938
|
||
|
||
x08E9 bit 7,(iy+#27) ;¤®áâ㯮áâì ®¯æ¨¨ S. size of step
|
||
jr x0938
|
||
|
||
;€„<E282AC>…‘: #08EF ¤®áâ㯮áâì ®¯æ¨¨ K. kempston joystick
|
||
x08EF call x08FB ;¤®áâ㯮áâì ®¯æ¨¨ K. kempston joystick
|
||
or a
|
||
ret
|
||
|
||
x08F4 ccf ;<3B>… ˆ‘<CB86>Ž‹œ‡“…’‘Ÿ!!!!
|
||
ret nc
|
||
res 6,(iy+#27)
|
||
ret
|
||
|
||
x08FB push bc ;¤®áâ㯮áâì ®¯æ¨¨ M. mouse
|
||
ld bc,#FADF
|
||
in a,(c)
|
||
pop bc
|
||
and #38
|
||
cp #38
|
||
ret nc
|
||
res 5,(iy+#27)
|
||
ret
|
||
|
||
x090C scf ;¤®áâ㯮áâì ®¯æ¨¨ G. magic button
|
||
bit 4,(iy-#02)
|
||
ret z ;48k
|
||
ld a,(iy-#01)
|
||
and #13
|
||
jr x0945
|
||
|
||
x0919 ld a,(xE02D) ;®¯à¥¤¥«¥¨¥ ¤®áâ㯮á⨠âãà¡®-०¨¬
|
||
rlca
|
||
ccf
|
||
ret
|
||
|
||
x091F bit 5,(iy-#02) ;48k?
|
||
jr x0945
|
||
|
||
x0925 bit 5,(iy+#13) ;¤®áâ㯮áâì ®¯æ¨¨ W. degree
|
||
jr x0938
|
||
|
||
x092B call x091F ;¤®áâ㯮áâì ®¯æ¨¨ P. save CMOS
|
||
ret c
|
||
bit 5,(iy+#1A)
|
||
ret nz
|
||
|
||
x0934 bit 6,(iy+#1A) ;¤®áâ㯮áâì ®¯æ¨¨ T. time & date
|
||
x0938 ret nz
|
||
scf
|
||
ret
|
||
|
||
x093B bit 5,(iy+#1A) ;¤®áâ㯮áâì ®¯æ¨¨ Hard disk utility
|
||
jr x0938
|
||
|
||
x0941 bit 1,(iy+#12) ;¤®áâ㯮áâì ®¯æ¨¨ Print Screen
|
||
x0945 ret z
|
||
scf
|
||
x0947 ret
|
||
|
||
x0948 call x091F ;¤®áâ㯮áâì ®¯æ¨¨ C. save Set Up to disk
|
||
ret c
|
||
|
||
x094C ld a,(xC063) ;¤®áâ㯮áâì ®¯æ¨¨ Monitor
|
||
or a
|
||
jr x0945
|
||
|
||
x0952 bit 0,(iy+#15) ;¤®áâ㯮áâì ®¯æ¨¨ ¯ à ¬¥â஢ ¯à¨â¥à
|
||
jr x0938
|
||
|
||
x0958 call x10C7 ;¤®áâ㯮áâì ®¯æ¨¨ R. ROM disk
|
||
jr x0938
|
||
|
||
x095D bit 7,(iy+#1C) ;¤®áâ㯮áâì ¬®â¨à®¢ ¨ï ®¡à §®¢
|
||
jr x0938
|
||
|
||
x0963 call x2936 ;¤®áâ㯮áâì ®¯æ¨¨ C. create partition
|
||
ld hl,#0003
|
||
or a
|
||
sbc hl,de
|
||
ret
|
||
|
||
x096D call x2936 ;¤®áâ㯮áâì ®¯æ¨¨ C. create partition
|
||
ld hl,#003F
|
||
or a
|
||
sbc hl,de
|
||
ret
|
||
|
||
x0977 call x2936 ;¤®áâ㯮áâì ®¯æ¨¨ D. delete partition
|
||
ld a,e
|
||
or d
|
||
jr x0938
|
||
|
||
x097E bit 6,(iy+#1C) ;¤®áâ㯮áâì ®¯æ¨¨ W. write to disk
|
||
jr x0938
|
||
|
||
x0984 bit 6,(iy+#1C) ;¤®áâ㯮áâì ®¯æ¨¨ G. global part. table
|
||
jr x0945
|
||
|
||
;€„<E282AC>…‘: #098A ¯à®¢¥àª «¨ç¨ï à §¤¥« MFS ¢¨ç¥â¥à¥
|
||
;¢ëå: z - ¥â à §¤¥« MFS/«¨¡® ¥â ¢¨ç¥áâ¥à
|
||
; nz - ¥áâì à §¤¥« MFS
|
||
x098A xor a
|
||
bit 7,(iy+#1B)
|
||
ret z ;¯à®¢¥àª £¥®¬¥âਨ ¢¨ç¥áâ¥à ¥ ¯à®©¤¥
|
||
bit 7,(iy+#1C)
|
||
ret nz ; ¢¨ç¥áâ¥à¥ ¥áâì à §¤¥« MFS
|
||
res 7,(iy+#0B) ;¬¥î mount
|
||
push bc
|
||
call x2739 ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 á¯¨áª à §¤¥«®¢ MBR
|
||
pop bc
|
||
xor a
|
||
ret
|
||
|
||
;¯ãªâ ¬¥î: R. ROM disk
|
||
x09A0 jp x10DB ;®¡à ¡®âª ¯ãªâ ¬¥î: R. ROM disk
|
||
|
||
;¯ãªâ ¬¥î: P. save CMOS
|
||
x09A3 rst #30
|
||
dw rom4_x036C ;§ ¯¨áì ¯¥à¥¬¥ëå ¢ CMOS ¨ ¢ NVRAM
|
||
db #04
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: G. load CMOS
|
||
x09A9 rst #30
|
||
dw rom4_x0305 ;ãáâ ®¢ª ¯¥à¥¬¥ëå ¨§ NVRAM/CMOS128
|
||
db #04
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: C. save Set Up to disk
|
||
x09AF rst #30
|
||
dw rom4_x0512 ;§ ¯¨áì ¤¨áª ᥪâ®à á ª®ä¨£ãà 樥© (C. save Set Up to disk)
|
||
db #04
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: S. save ...
|
||
x09B5 rst #30
|
||
dw rom6_x097E ;á®åà ¥¨¥ zs-snap (S. save ... snap)
|
||
db #06
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: L. load ...
|
||
x09BB rst #30
|
||
dw rom6_x0976 ;§ £à㧪 zs-snap (S. load ... snap)
|
||
db #06
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: D. disk ... (á®åà ¥¨¥ íªà ¤¨áª)
|
||
x09C1 rst #30
|
||
dw rom6_x067F ;á®åà ¥¨¥ íªà ¯®«ì§®¢ â¥«ï ¤¨áª
|
||
db #06
|
||
ret
|
||
|
||
;¯ãªâ ¬¥î: D. mount on D:
|
||
x09C6 ld a,#03
|
||
jr x09D3
|
||
;¯ãªâ ¬¥î: C. mount on C:
|
||
x09CA ld a,#02
|
||
jr x09D3
|
||
;¯ãªâ ¬¥î: B. mount on B:
|
||
x09CE ld a,#01
|
||
jr x09D3
|
||
;¯ãªâ ¬¥î: A. mount on A:
|
||
x09D2 xor a
|
||
x09D3 call x24F0 ;¬®â¨à®¢ ¨¥ ®¡à § ª ¤¨áª®¢®¤ã
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: V. local partition infomation
|
||
x09D8 call x29D5
|
||
jr x09E0 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: V. global partition infomation
|
||
x09DD call x29DC ;¯¥ç âì ®ª global partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
x09E0 jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: L. local part. table
|
||
x09E2 call x2F5D ;§ ¯à®á á®åà ¥¨¥ ᥪâ®à MBR, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
|
||
;¯ãªâ ¬¥î: R. restore from disk ç⥨¥ ª â «®£ ¯®¤à §¤¥«®¢
|
||
x09E5 call x0B86
|
||
|
||
;¯ãªâ ¬¥î: P. partition manager (local)
|
||
x09E8 rst #30
|
||
dw rom7_x1768 ;¯®¨áª à §¤¥« MFS
|
||
db #07
|
||
jr nc,x09F6 ; ©¤¥
|
||
cp #63
|
||
jr z,x0A01 ;¥â ¯®¤à §¤¥« MFS
|
||
rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
x09F6 res 6,(iy+#1C) ;á¡à®á ¯à¨§ ª ¨§¬¥¥¨ï à §¤¥«
|
||
call x2620 ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠¯®¤à §¤¥«®¢ MFS
|
||
ld a,#0D
|
||
jr x0A0A
|
||
x0A01 res 6,(iy+#1C) ;á¡à®á ¯à¨§ ª ¨§¬¥¥¨ï à §¤¥«
|
||
call x2739 ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 á¯¨áª à §¤¥«®¢ MBR
|
||
ld a,#0C
|
||
x0A0A jp x0AA1
|
||
|
||
;¯ãªâ ¬¥î: G. global partition table/R. restore from disk ç⥨¥ ª â «®£ à §¤¥«®¢
|
||
x0A0D call x0B86
|
||
jr x0A01
|
||
|
||
;¯ãªâ ¬¥î: D. delete global partition
|
||
x0A12 call x2C1F
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: D. delete local partition
|
||
x0A17 call x2D45 ;㤠«¥¨¥ ¯®¤à §¤¥«
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: C. create global partition
|
||
x0A1C call x2BCA
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: C. create local partition
|
||
x0A21 call x2C37 ;ᮧ¤ ¨¥ ¯®¤à §¤¥«
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: N. rename local partition
|
||
x0A26 call x245E ;¯¥à¥¨¬¥®¢ ¨¥ ¯®¤à §¤¥«
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: A. delete all global partition
|
||
x0A2B call x2733
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: A. delete all local partition
|
||
x0A30 call x261A ;㤠«¥¨¥ ¢á¥å ¯®¤à §¤¥«®¢
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: W. write to disk (§ ¯¨áì MBR ¢¨ç¥áâ¥à)
|
||
x0A35 call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
jr nz,x0A54 ;®â¬¥ § ¯¨á¨
|
||
call x2F66 ;ä®à¬¨à®¢ ¨¥ ¨ § ¯¨áì ᥪâ®à MBR
|
||
jr x0A0D ;¯¥à¥ç¨â ¥¬ ¥£® ¨ ¢ ¬¥î
|
||
|
||
;¯ãªâ ¬¥î: W. write to disk (§ ¯¨áì ª â «®£ MFS ¢¨ç¥áâ¥à)
|
||
x0A3F call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
jr nz,x0A54 ;®ª § ®â § ¯¨á¨. ¢®§¢à â ¢ ¬¥î
|
||
call x2FB1 ;§ ¯¨áì ª â «®£ MFS
|
||
jr x09E5 ;ç⥨¥ ª â «®£ ¯®¤à §¤¥«®¢
|
||
|
||
;¯ãªâ ¬¥î: A. auto detection hdd (§ ¯ã᪠¨¤¥â¨ä¨ª 樨 HDD)
|
||
x0A49 ld e,#01
|
||
call x30B9 ;¨¤¥â¨ä¨ª æ¨ï ¦¥á⪮£® ¤¨áª
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: R. reset monitor
|
||
x0A50 xor a
|
||
ld (xEAF5+#0A),a ;xEAFF ¨á¯®à⨬ ¯ ¬ïâì
|
||
;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
x0A54 jp x0EB5
|
||
|
||
;¯ãªâ ¬¥î: H. Hard disk utility
|
||
x0A57 xor a
|
||
res 7,(iy+#0B) ;¬¥î mount
|
||
res 7,(iy+#1C)
|
||
bit 7,(iy+#1B)
|
||
jr z,x0A96
|
||
call x2739 ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 á¯¨áª à §¤¥«®¢ MBR
|
||
xor a
|
||
jr x0A96
|
||
|
||
;¯ãªâ ¬¥î: 1. test (â¥áâ ⮫쪮 ç⥨¥)
|
||
x0A6C rst #30
|
||
dw rom7_x2105 ;â¥áâ¨à®¢ ¨¥ HDD (1. test) (â¥áâ ⮫쪮 ç⥨¥)
|
||
db #07 ;¢®§¢à â ¢ ⥪ã饥 ¬¥î ¬®â®à
|
||
|
||
;¯ãªâ ¬¥î: 2. test (â¥áâ ç⥨¥/§ ¯¨áì)
|
||
x0A70 rst #30
|
||
dw rom7_x20F1 ;â¥áâ¨à®¢ ¨¥ HDD (2. test) (â¥áâ ç⥨¥/§ ¯¨áì)
|
||
db #07 ;¢®§¢à â ¢ ⥪ã饥 ¬¥î ¬®â®à
|
||
|
||
;¯ãªâ ¬¥î: D. delete all part (㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR)
|
||
x0A74 rst #30 ;!!! ¬®¦® ¢ë§¢ âì àï¬ãî !!!
|
||
dw rom5_x31AA ;㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR
|
||
db #05
|
||
|
||
;¯ãªâ ¬¥î: R. reset printer
|
||
x0A78 ld hl,#0000
|
||
ld (xE067),hl
|
||
ret
|
||
|
||
;¯ãªâ ¬¥î: S. printer * 1
|
||
x0A7F scf
|
||
;¯ãªâ ¬¥î: S. printer * 2
|
||
x0A80 ld hl,xE029
|
||
set 5,(hl)
|
||
jr nc,x0A89
|
||
res 5,(hl)
|
||
x0A89 rst #30
|
||
dw rom2_x08D7
|
||
db #02
|
||
jr x0A54 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
|
||
;¯ãªâ ¬¥î: M. Monitor
|
||
x0A8F rst #30
|
||
dw 0AEBh
|
||
db #02
|
||
|
||
x0A93 inc a ;(a=#0E) S. Set Up hard disk
|
||
x0A94 inc a
|
||
x0A95 inc a
|
||
x0A96 inc a ;(a=#0B) H. Hard disk utility
|
||
x0A97 inc a ;(a=#09) T. time & date
|
||
x0A98 inc a ;(a=#09) D. Disk utility
|
||
x0A99 inc a ;(a=#08) D. Disk utility
|
||
x0A9A inc a ;(a=#07) M. monitor
|
||
x0A9B inc a
|
||
x0A9C inc a ;(a=#05) P. printer
|
||
x0A9D inc a ;(a=#04) G. graphics manipulator
|
||
x0A9E inc a ;(a=#03) B. Save & load
|
||
x0A9F inc a ;(a=#02) S. Set Up
|
||
x0AA0 inc a ;(a=#01) P. Print Screen
|
||
x0AA1 push af
|
||
ld hl,(xE033) ;a - ®¬¥à ®¢®£® ¬¥î
|
||
ld a,(xDDFF) ;®¬¥à ⥪ã饣® ¬¥î
|
||
ld (hl),a
|
||
inc hl
|
||
ld (xE033),hl
|
||
pop af
|
||
ld (xDDFF),a
|
||
x0AB1 jp x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¢ë室 ¨§ ¬¥î: L. local partition table
|
||
x0AB4 call x2FA8 ;§ ¯à®á á®åà ¥¨¥ ª â «®£ MFS, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
jr x0ABC
|
||
|
||
;¢ë室 ¨§ ¬¥î: G. global partition table
|
||
x0AB9 call x2F5D ;§ ¯à®á á®åà ¥¨¥ ᥪâ®à MBR, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
|
||
;¢ë§®¢ ¯à¥¤ë¤ã饣® ¬¥î: 0. previous menu
|
||
x0ABC call x0B86
|
||
jr x0AB1 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¢ë室 ¨§ ¬®¨â®à : 0. Continue program
|
||
x0AC1 rst #30 ;®¡à ¡®âª 0. Continue program
|
||
dw rom2_x382E ;®¦¨¤ ¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
|
||
db #02
|
||
rst #30
|
||
dw rom2_x013A ;¢ë室 ¨§ ¬®¨â®à
|
||
db #02
|
||
|
||
;¯ãªâ ¬¥î: G. magic button
|
||
x0AC9 rst #30
|
||
dw rom2_x36C3 ;§ ¯¨áì áâ ¤ à⮣® Magic-ä ©«
|
||
db #02
|
||
|
||
;¯ãªâ ¬¥î: V. from drive (¨§¬¥¥¨¥ ¤¨áª ¢â®§ ¯ã᪠)
|
||
x0ACD ld hl,xDFF1 ;á ª ª®£® ¤¨áª ¤¥« âì ¢â®áâ àâ
|
||
ld bc,#0004 ;¬¨/¬ ªá
|
||
jr x0AF8 ;横«¨ç¥áª®¥ ¨§¬¥¥¨¥ ¬®£®¢ ਠâëå ¯ à ¬¥â஢ ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: D. disk drive (ᬥ ⥪ã饣® ¤¨áª®¢®¤ )
|
||
x0AD5 ld hl,xFFCA
|
||
ld bc,#0004
|
||
call x0AF8 ;横«¨ç¥áª®¥ ¨§¬¥¥¨¥ ¬®£®¢ ਠâëå ¯ à ¬¥â஢ ¬®¨â®à
|
||
rst #30
|
||
dw rom2_x2C4D ;ª®¯¨à®¢ ¨¥ ¤¥áªà¨¯â®à ¤¨áª®¢®¤ ¢ ¡ãä¥à xE590, ¥á«¨ ª ¥¬ã ¯à¨¬®â¨à®¢ ®¡à §
|
||
db #02
|
||
ret
|
||
|
||
;¯ãªâ ¬¥î: P. speed (¨§¬¥¥¨¥ ᪮à®áâ¨ à ¡®âë ⥪ã饣® ¤¨áª®¢®¤ )
|
||
x0AE3 ld hl,xFFCC
|
||
jr x0AEB
|
||
|
||
;¯ãªâ ¬¥î: E. sector (¨§¬¥¥¨¥ à §¬¥à ᥪâ®à ⥪ã饣® ¤¨áª®¢®¤ )
|
||
x0AE8 ld hl,xFFD0
|
||
x0AEB ld bc,(xFFCA)
|
||
ld b,#00 ;®¬¥à ⥪ã饣® ¤¨áª®¢®¤
|
||
add hl,bc
|
||
ld a,(hl)
|
||
and #E0
|
||
ld b,a
|
||
ld c,#04
|
||
|
||
;横«¨ç¥áª®¥ ¨§¬¥¥¨¥ ¬®£®¢ ਠâëå ¯ à ¬¥â஢ ¬®¨â®à
|
||
;¢å: hl - ¤à¥á ¯¥¥à¥¬¥®©
|
||
; c - ¬ ªá¨¬ «ì®¥ § 票¥+1
|
||
; b - ¬¨¨¬ «ì®¥ § 票¥
|
||
;
|
||
x0AF8 ld a,(hl)
|
||
and #03
|
||
inc a
|
||
cp c
|
||
jr c,x0B00
|
||
xor a
|
||
x0B00 or b
|
||
ld (hl),a
|
||
ret
|
||
|
||
;¯ãªâ ¬¥î: Q. quick format (¡ëáâ஥ ä®à¬ â¨à®¢ ¨¥ ⥪ã饣® ¤¨áª )
|
||
x0B03 set 7,(iy+#13)
|
||
call x0CF6 ;ãáâ ®¢ª ¨ ¨¨æ¨ «¨§ æ¨ï ®ª ¤«ï ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
rst #30
|
||
dw rom6_x04E5 ;¡ëáâ஥ ä®à¬ â¨à®¢ ¨¥ ⥪ã饩 ¤¨áª¥âë (®ç¨á⪠ª â «®£ )
|
||
db #06
|
||
jr x0B2B ;;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: F. format disk (ä®à¬ â¨à®¢ ¨¥ ⥪ã饣® ¤¨áª )
|
||
x0B10 ld hl,xE027
|
||
set 7,(hl)
|
||
jr x0B1C
|
||
|
||
;¯ãªâ ¬¥î: T. test disk (¯à®¢¥àª ⥪ã饣® ¤¨áª )
|
||
x0B17 ld hl,xE027
|
||
res 7,(hl)
|
||
x0B1C call x0CF6 ;ãáâ ®¢ª ¨ ¨¨æ¨ «¨§ æ¨ï ®ª ¤«ï ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
rst #30
|
||
dw rom6_x03A9 ;ä®à¬ â¨à®¢ ¨¥/¯à®¢¥àª ⥪ã饩 ¤¨áª¥âë
|
||
db #06
|
||
jr x0B2B ;;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: C. catalogue disk (¢ë¢®¤ ª â «®£ ⥪ã饣® ¤¨áª )
|
||
x0B25 rst #20
|
||
db #8C
|
||
rst #30
|
||
dw rom6_x0249 ;¢ë¢®¤ ª â «®£ ⥪ã饣® ¤¨áª®¢®¤ ( íªà /¯à¨â¥à)
|
||
db #06
|
||
x0B2B jp x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: C. cylinders (ãáâ ®¢ª 樫¨¤à®¢)
|
||
x0B2E ld hl,x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
push hl
|
||
ld bc,(xDFF2) ;§ 票¥ Cylinders HDD (2 ¡ ©â )
|
||
ld a,#07
|
||
x0B38 call x0BD9 ;¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
ret c ;®¬¥ ¢¢®¤
|
||
ld a,e
|
||
or d
|
||
ld a,#0C
|
||
jr z,x0B38 ;¢¢¥«¨ ®«ì. ¯®¢â®à ¢¢®¤
|
||
ld (xDFF2),de ;®¢®¥ § 票¥ Cylinders HDD (2 ¡ ©â )
|
||
rst #30
|
||
dw rom7_x1F08 ;¯à®¢¥àª £¥®¬¥âਨ ¢¨ç¥áâ¥à
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0B4B ¢¢®¤ ¨ á®åà ¥¨¥ § 票© ¢à¥¬¥¨/¤ âë
|
||
x0B4B res 3,(iy+#27) ;£ ᨬ ¨¤¨ª â®à ¢à¥¬¥¨
|
||
call x0B9B ;¢¢®¤ ¯ à ¬¥âà ⥪ã饩 ®¯æ¨¨ (ç¨á«® 0..255)
|
||
set 3,(iy+#27)
|
||
jr c,x0B2B ;§ ¢¥à襨¥ ¯® break/cancel
|
||
ld hl,xDFF6 ;¡¥ä¥à § 票© ¢à¥¬¥¨/¤ âë
|
||
rst #30
|
||
dw rom7_x1FB2 ;§ ¯¨áì ¢ CMOS ¢à¥¬¥¨ ¨ ¤ âë
|
||
db #07
|
||
jr x0B2B ;§ ¢¥à襨¥ ¢¢®¤
|
||
|
||
;€„<E282AC>…‘: #0B61 ᬥ ¯ à ¬¥âà ®¯æ¨¨ ¯à®â¨¢®¯®«®¦®¥ á ®¡®¢«¥¨¥¬ ¬¥î (ON/OFF, normal/trubo ¨ â.¯.)
|
||
;¢å: bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (x0468)
|
||
;
|
||
x0B61 call x0B7A
|
||
jr x0B2B ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: H. head; S. sector
|
||
x0B66 call x0B9B ;¢¢®¤ ¯ à ¬¥âà ⥪ã饩 ®¯æ¨¨ (ç¨á«® 0..255)
|
||
jr c,x0B2B ;®â¬¥ ¢¢®¤ . ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
rst #30
|
||
dw rom7_x1F2D ;à áç¥â ¯à®¨§¢¥¤¥¨ï £®«®¢®ª ¨ ᥪâ®à®¢
|
||
db #07
|
||
rst #30
|
||
dw rom7_x1F08 ;¯à®¢¥àª £¥®¬¥âਨ ¢¨ç¥áâ¥à
|
||
db #07
|
||
jr x0B2B ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;¯ãªâ ¬¥î: S. sound
|
||
x0B75 ld a,#FF
|
||
ld (xE004),a ;£«ã訬 §¢ãª
|
||
|
||
;€„<E282AC>…‘: #0B7A ᬥ ¯ à ¬¥âà ®¯æ¨¨ ¯à®â¨¢®¯®«®¦®¥ (ON/OFF, normal/trubo ¨ â.¯.)
|
||
;¢å: bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (xNNNN)
|
||
x0B7A call x0FE3
|
||
ld a,(de)
|
||
xor (hl)
|
||
ld (de),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0B81 ¢¢®¤ ¨ á®åà ¥¨¥ § 票© ®¯æ¨©
|
||
;¢å: bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (xNNNN)
|
||
x0B81 call x0B9B ;¢¢®¤ ¯ à ¬¥âà ⥪ã饩 ®¯æ¨¨ (ç¨á«® 0..255)
|
||
jr x0B2B ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;€„<E282AC>…‘: #0B86
|
||
x0B86 ld de,xDE08
|
||
ld hl,(xE033)
|
||
xor a
|
||
sbc hl,de
|
||
add hl,de
|
||
jr z,x0B97
|
||
dec hl
|
||
ld (xE033),hl
|
||
ld a,(hl)
|
||
x0B97 ld (xDDFF),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0B9B ¢¢®¤ ¯ à ¬¥âà ⥪ã饩 ®¯æ¨¨ (ç¨á«® 0..255)
|
||
;¢å: bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (x0468)
|
||
;¢ëå: cy=1 § ¢¥à襨¥ ¯® break/cancel
|
||
;
|
||
x0B9B res 5,(iy+#0E) ;¢¢®¤ áâப¨ ¯ à ¬¥â஢
|
||
call x0FE3 ;¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ®¯æ¨¨
|
||
ld c,(hl) ;¬¨¨¬ «ì®¥ § 票¥
|
||
inc hl
|
||
ld b,(hl) ;¬ ªá¨¬ «ì®¥ § 票¥
|
||
ld a,(de) ;⥪ã饥 § 票¥
|
||
call x0CB0 ;¯¥ç âì ç¨á« A ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
push de
|
||
push bc
|
||
ld a,#07 ;á®®¡é¥¨¥: enter number
|
||
x0BAD call x0BF3 ;¢¢®¤ áâப¨ ᨬ¢®«®¢
|
||
jr c,x0BCD ;§ ¢¥à襨¥ ¢¢®¤ ¯® break/cancel
|
||
rst #30
|
||
dw rom2_x0DF4 ;¯à¥®¡à §®¢ ¨¥ áâப¨ ¢ ç¨á«®
|
||
db #02
|
||
jr nz,x0BAD ;¥ã¤ 箥 ¯à¥®¡à §®¢ ¨¥. ¯à®¤®«¦ ¥¬ ¢¢®¤
|
||
ld a,d
|
||
or a
|
||
ld a,#0C ;á®®¡é¥¨¥: out of range
|
||
jr nz,x0BAD ;᫨誮¬ ¡®«ì讥 ç¨á«®. ¯à®¤®«¦ ¥¬ ¢¢®¤
|
||
pop bc
|
||
push bc
|
||
ld a,e
|
||
call x102E ;¯à®¢¥àª ¤¨ ¯ §® ç¨á«
|
||
ld a,#0C ;á®®¡é¥¨¥: out of range
|
||
jr c,x0BAD ;᫨誮¬ ¡®«ì讥 ç¨á«®. ¯à®¤®«¦ ¥¬ ¢¢®¤
|
||
pop bc
|
||
ld a,e
|
||
pop de
|
||
ld (de),a ;¬¥ï¥¬ ¯¥à¥¬¥ãî
|
||
ret
|
||
;§ ¢¥à襨¥ ¢¢®¤ ¯® break/cancel
|
||
x0BCD pop bc
|
||
pop de
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0BD0 ¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
;¢å: bc - ç «ì®¥ ç¨á«®
|
||
; hl - ¯ à ¬¥âàë ®ª ¢¢®¤
|
||
;¢ëå: cy=1 ®â¬¥ ¢¢®¤
|
||
; cy=0 ç¨á«® ¢¢¥¤¥®
|
||
; de - ¢¢¥¤¥®¥ ç¨á«®
|
||
x0BD0 ld (xE9EF),hl ;¯ à ¬¥âàë ®ª ¢¢®¤
|
||
set 5,(iy+#0E)
|
||
jr x0BDD
|
||
|
||
;€„<E282AC>…‘: #0BD9 ¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
;¢å: bc - ç «ì®¥ ç¨á«®
|
||
;¢ëå: cy=1 ®â¬¥ ¢¢®¤
|
||
; cy=0 ç¨á«® ¢¢¥¤¥®
|
||
; de - ¢¢¥¤¥®¥ ç¨á«®
|
||
x0BD9 res 5,(iy+#0E)
|
||
x0BDD push af
|
||
call x0CAA ;¯¥ç âì ç¨á« bc ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
pop af
|
||
push de
|
||
push bc
|
||
x0BE4 call x0BF3 ;¢¢®¤ áâப¨ ᨬ¢®«®¢
|
||
jr c,x0BCD ;®â¬¥ ¢¢®¤
|
||
rst #30
|
||
dw rom2_x0DF4 ;¯à¥®¡à §®¢ ¨¥ áâப¨ ¢ ç¨á«®
|
||
db #02
|
||
jr nz,x0BE4 ;¥ã¤ 箥 ¯à¥®¡à §®¢ ¨¥ (¥ ç¨á«®/᫨誮¬ ¡®«ì讥)
|
||
pop bc
|
||
pop af
|
||
or a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0BF3 ¢¢®¤ áâப¨ ᨬ¢®«®¢
|
||
;¢å: a-®¬¥à á®®¡é¥¨ï ¢ £à㯯¥ 0 (¤«ï ¨¦¥© áâப¨)
|
||
;¢ëå: cy=1 § ¢¥à襨¥ ¢¢®¤ ¯® break/cancel
|
||
; cy-0 § ¢¥à襨¥ ¢¢®¤ ¯® enter/fire cursor
|
||
; hl - ¤à¥á ¯¥à¢®£® ¢¢¥¤¥®£® ᨬ¢®« ¢ ¡ãä¥à¥
|
||
; z - íâ®â ᨬ¢®« ¯¥à¥¢®¤ áâப¨
|
||
;
|
||
x0BF3 call x0C0B ;¢¢®¤ áâப¨
|
||
jr nc,x0C04 ;§ ¢¥à襨¥ ¢¢®¤ ¯® enter
|
||
call x0D1A
|
||
jr nc,x0C04 ;§ ¢¥à襨¥ ¢¢®¤ ¯® fire cursor
|
||
cp #03
|
||
scf
|
||
ret z ;§ ¢¥à襨¥ ¢¢®¤ ¯® break/cancel
|
||
xor a
|
||
jr x0BF3 ;¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨
|
||
x0C04 rst #30
|
||
dw rom2_x0EE3 ;¯®¨áª ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨ ¯¥à¢®£® ¯¥ç ⮣® ᨬ¢®«
|
||
db #02
|
||
scf
|
||
ccf
|
||
ret
|
||
;¢¢®¤ áâப¨
|
||
;¢å: a-®¬¥à á®®¡é¥¨ï ¢ £à㯯¥ 0 (¤«ï ¨¦¥© áâப¨)
|
||
;¢ëå: cy=0 § ¢¥à襨¥ ¢¢®¤ ¯® enter
|
||
; cy=1 -> a=3 break/cancel
|
||
; cy=1 -> a=a ¥â íä䥪⠮⠦ â¨ï
|
||
x0C0B rst #30
|
||
dw rom2_x2FFB ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢¢®¤ ç¨á«
|
||
db #02
|
||
or a
|
||
jr z,x0C69 ;¯à®¤®«¦¨¬ ¢¢®¤ áâப¨
|
||
call x0C22 ;ãáâ ®¢ª ¯ à ¬¥â஢ ®ª ¤«ï ¢¢®¤ áâப¨ ¢ ¬¥î ¬®¨â®à
|
||
rst #30 ;!!! Ž˜ˆ<CB9C>Š€. ¬®¦® ¢ë§¢ âì ¯àï¬ãî
|
||
dw rom5_x1CB8 ;¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
db #05
|
||
jr nc,x0C1F ;cy=0 ¢ë室 ¯® enter
|
||
call x0D1A ;®¯à¥¤¥«¥¨¥ ⨯ ¦ ⮩ ª« ¢¨è¨
|
||
ret c ;®â¬¥ /¥â íä䥪â
|
||
;§ ¢¥à襨¥ ¢¢®¤ ¯® enter/fire cursor
|
||
x0C1F or a
|
||
ld a,#06 ;á®®¡é¥¨¥: _Working ...
|
||
;ãáâ ®¢ª ¯ à ¬¥â஢ ®ª ¤«ï ¢¢®¤ áâப¨ ¢ ¬¥î ¬®¨â®à
|
||
;¢å: a - ®¬¥à á®®¡é¥¨ï ¢ £à㯯¥ 0 (¤«ï ¨¦¥© áâப¨)
|
||
x0C22 push af
|
||
ld b,a ;®¬¥à á®®¡é¥¨ï ¢ £à㯯¥ 0
|
||
call x10C2 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
ld a,(ix+6)
|
||
push af ;á®åà ¨¬ âਡãâë
|
||
ld a,(xE115)
|
||
ld (ix+6),a ; âਡãâë ¯¥ç ⨠ᮮ¡é¥¨ï
|
||
ld (ix+0),#17 ;ª®®à¤¨ âë ¯¥ç â¨
|
||
ld (ix+1),#00
|
||
rst #20
|
||
dc " " ;¯à®¡¥«
|
||
ld c,#00
|
||
rst #08 ;¯¥ç âì á®®¡é¥¨ï
|
||
ld a,#2B
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
pop af
|
||
ld (ix+6),a ;¢®ááâ ®¢¨¬ âਡãâë
|
||
rst #30
|
||
dw rom2_x2FFB ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢¢®¤ ç¨á«
|
||
db #02
|
||
bit 5,(iy+#0E)
|
||
jr nz,x0C6E ;¢¢®¤ ¨¬¥¨ à §¤¥« HDD
|
||
ld (ix+3),#16 ;crd X ®ª
|
||
ld (ix+6),#4E ; âਡãâë %01001110
|
||
ld l,#08 ;è¨à¨ ¢ ᨬ¢®« å
|
||
call x0CA0 ;ãáâ ®¢ª è¨à¨ë ®ª ¢ § ª®¬¥áâ å ¨ ᨬ¢®« å
|
||
ld a,(iy-#09) ;crd Y ®¯æ¨¨ ¬¥î
|
||
x0C62 ld (ix+2),a ;crd Y ®ª
|
||
rst #20
|
||
db #8C ;®ç¨á⪠®ª
|
||
pop af
|
||
ret
|
||
;¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨
|
||
x0C69 rst #30
|
||
dw rom5_x1CB3 ;¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
db #05
|
||
ret
|
||
;¢¢®¤ ¨¬¥¨ à §¤¥« HDD
|
||
x0C6E ld (ix+6),#71 ; âਡãâë %01110001
|
||
ld hl,(xE9EF)
|
||
push hl
|
||
call x0C8F ;l=l*6/8
|
||
ld a,(xE0F3+#03) ;xE0F6 ª®®à¤¨ â X ®ª ᮠᯨ᪮¬ à §¤¥«®¢ HDD
|
||
add a,l
|
||
ld (ix+3),a ;crd X ®ª
|
||
pop hl
|
||
ld l,h
|
||
call x0CA0 ;ãáâ ®¢ª è¨à¨ë ®ª ¢ § ª®¬¥áâ å ¨ ᨬ¢®« å
|
||
ld a,(xE0F3) ;ª®®à¤¨ â Y ªãàá®à ¢ ®ª¥
|
||
ld l,a
|
||
ld a,(xE0F3+#02) ;xE0F5 ª®®à¤¨ â Y ®ª
|
||
add a,l
|
||
jr x0C62
|
||
;¢ëç¨á«¥¨¥ l=l*6/8
|
||
x0C8F push de
|
||
ld de,#0006
|
||
ld h,d
|
||
rst #30
|
||
dw rom2_x0E85 ;㬮¦¥¨¥ ahl=hl*de (0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â)
|
||
db #02
|
||
ld b,#03
|
||
x0C9A srl l
|
||
djnz x0C9A
|
||
pop de
|
||
ret
|
||
;ãáâ ®¢ª è¨à¨ë ®ª ¢ § ª®¬¥áâ å ¨ ᨬ¢®« å
|
||
;¢å: l - è¨à¨ ®ª ¢ ᨬ¢®« å
|
||
x0CA0 ld (ix+#0B),l
|
||
call x0C8F
|
||
ld (ix+5),l
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CAA ¯¥ç âì ç¨á« bc ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;¢å: bc - ç¨á«®
|
||
x0CAA push bc
|
||
call x0CB9
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CB0 ¯¥ç âì ç¨á« A ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;¢å: bc - ç¨á«®
|
||
x0CB0 push bc
|
||
ld c,a
|
||
ld b,#00
|
||
call x0CB9
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CB9 ¯¥ç âì ç¨á« bc ¢ ¡ãä¥à¥ ¢¢®¤ áâப¨
|
||
;¢å: bc - ç¨á«®
|
||
x0CB9 push de
|
||
push bc
|
||
call x0CCA ;®ç¨á⪠¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
inc hl
|
||
ld de,#2E0A
|
||
ld a,#03
|
||
pop bc
|
||
call x0CDA ;¯¥ç âì ç¨á« bc ¢ ¡ã©ä¥à hl
|
||
pop de
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CCA ®ç¨á⪠¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
;¢ëå: hl - ¤à¥á ¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
x0CCA ld b,#2B
|
||
ld hl,xDE17
|
||
push hl
|
||
ld (xDE15),hl
|
||
x0CD3 ld (hl)," "
|
||
inc hl
|
||
djnz x0CD3
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CDA ¯¥ç âì ç¨á« bc ¢ ¡ã©ä¥à hl
|
||
;¢å: hl - ¤à¥á ¡ãä¥à ¤«ï ¯¥ç ⨠ç¨á«
|
||
; bc - ç¨á«®
|
||
; d - ᨬ¢®« ¯¥à¥¤ ç¨á«®¬
|
||
; e - ¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥¨ï à §àï¤ ç¨á«
|
||
; a - ª®«-¢® à §à冷¢ ¢ ç¨á«¥
|
||
x0CDA ld (hl),d
|
||
inc hl
|
||
x0CDC ld (xE3BC),hl ; ¤à¥á ¢ ¡ãä¥à¥ ¯¥ç â¨
|
||
set 6,(iy+#09) ;¯¥ç âì ¢ ¡ãä¥à
|
||
ld (iy+#07),a ;¬¨¨¬ã¬ à §à冷¢ ¢ ç¨á«¥ ¯à¨ ¯¥à¥¢®¤¥ ¢ ASCII
|
||
ld (iy+#08),"0"
|
||
ld (iy+#10),e ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥¨ï à §àï¤ ç¨á«
|
||
rst #30
|
||
dw rom2_x1673 ;¯¥ç âì ç¨á« bc /¢ ¡ãä¥à
|
||
db #02
|
||
res 6,(iy+#09)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0CF6 ãáâ ®¢ª ¨ ¨¨æ¨ «¨§ æ¨ï ®ª ¤«ï ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
;¢ëå: ix - ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à : ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
x0CF6 rst #30
|
||
dw rom2_x3014 ;ix = ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à : ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
db #02
|
||
ld a,#0C
|
||
or a
|
||
rst #30
|
||
dw rom5_x1C84 ;¨¨æ¨ «¨§ æ¨ï ®ª ¢¢®¤
|
||
db #05
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D02 ®ç¨á⪠¨¦¥© áâப¨ ®ª ¬¥î
|
||
x0D02 call x10C2 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
ld a,(xE110)
|
||
ld (ix+6),a ; âਡãâë ¤«ï ¯¥ç ⨠®¯æ¨¨ ¬¥î
|
||
ld (ix+0),#17 ;crd Y ªãàá®à
|
||
ld (ix+1),#00 ;crd X ªãàá®à
|
||
ld a,#2B
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D1A ®¯à¥¤¥«¥¨¥ ⨯ ¦ ⮩ ª« ¢¨è¨
|
||
;¢å: a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
;¢ëå: cy=0 - íâ® ¯®¤â¢¥à¦¤¥¨¥ ¢¢®¤ (entre/fire cursor)
|
||
; =1 -> a=3 break/cancel
|
||
; =1 -> a=a ¥â íä䥪⠮⠦ â¨ï
|
||
x0D1A ld c,a
|
||
cp #82
|
||
jr z,x0D29 ;ss+space
|
||
cp #80
|
||
ret z ;ss
|
||
cp #91
|
||
ret z ;mouse fire
|
||
res 3,a ;¨áª«îç ¥¬ ¯à®ç¨¥ ª®¬¡¨ 樨
|
||
cp #92 ;mouse cancel
|
||
x0D29 ld a,c
|
||
scf
|
||
ret nz
|
||
ld a,#03
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D2F ®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
;¢ëå: hl - ¤à¥á ¤¥áªà¨¯â®à ¬¥î +1
|
||
; a = (+0) ª®«¨ç¥á⢮ ®¯æ¨© ¢ ¬¥î -1 (®¬¥à ¯®á«¥¤¥© ®¯æ¨¨)
|
||
x0D2F ld hl,x044A
|
||
ld a,(xDDFF)
|
||
add a,a
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x0D3B
|
||
inc h ;hl ¤à¥á ¢ â ¡«¨æ¥
|
||
x0D3B ld a,(hl)
|
||
inc hl
|
||
ld h,(hl)
|
||
ld l,a ;hl ¤à¥á ®¯¨á â¥«ï ®ª
|
||
ld a,(hl)
|
||
inc hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D42 ¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
;¢å: hl - ¤à¥á ç « ®¯æ¨© ¢ ¤¥áªà¨¯â®à¥ ¬¥î
|
||
; c - ®¬¥à ®¯æ¨¨
|
||
;¢ëå: a - ¯¥ç âë© á¨¬¢®«
|
||
; hl - ¤à¥á ¤¥áªà¨¯â®à § ¤ ®© ®¯æ¨¨ +2
|
||
; e =(+1) ®¯æ¨¨
|
||
;
|
||
x0D42 call x0D52
|
||
|
||
;€„<E282AC>…‘: #0D45 ¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
;¢å: a =[#00..#19] -> ®¬¥à ¡ãª¢ë A..Z
|
||
; =[#1A..#1F] -> æ¨äà 1..5
|
||
;¢ëå: a - ¯¥ç âë© á¨¬¢®«
|
||
x0D45 and #1F
|
||
cp #1A
|
||
jr nc,x0D4F
|
||
inc a
|
||
or #40
|
||
ret
|
||
x0D4F add a,#16
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D52 ®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ®¯æ¨¨
|
||
;¢å: hl - ¤à¥á ç « ®¯æ¨© ¢ ¤¥áªà¨¯â®à¥ ¬¥î
|
||
; c - ®¬¥à ®¯æ¨¨
|
||
;¢ëå: hl - ¤à¥á ¤¥áªà¨¯â®à § ¤ ®© ®¯æ¨¨ +2
|
||
; a =(+0) ®¯æ¨¨
|
||
; e =(+1) ®¯æ¨¨
|
||
;
|
||
x0D52 ld a,c
|
||
add a,a
|
||
add a,a
|
||
add a,c
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x0D5B
|
||
inc h
|
||
x0D5B ld a,(hl)
|
||
inc hl
|
||
ld e,(hl)
|
||
inc hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D60 ®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
;¢ëå: hl - ¤à¥á ï祩ª¨ á ®¬¥à®¬ ®¯æ¨¨
|
||
;
|
||
x0D60 ld hl,xDE00
|
||
ld a,(xDDFF)
|
||
add a,l
|
||
ld l,a
|
||
ret nc
|
||
inc h
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0D6B ¯¥ç âì ⥪ã饣® ¬¥î
|
||
x0D6B call x10C2 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
;¯¥ç âì §¢ ¨ï ¬¥î
|
||
ld a,(xE111) ;¯¥ç âì §¢ ¨ï ®ª
|
||
ld (ix+6),a ; âਡãâë ¯¥ç â¨
|
||
ld (ix+0),#03 ;crd Y =3
|
||
rst #20 ;¢ë¢®¤ á ¢ëà ¢¨¢ ¨¥¬
|
||
db #84
|
||
call x0D2F
|
||
ld c,(hl)
|
||
inc hl
|
||
ld b,(hl) ;bc ®¬¥à ¡«®ª á®®¡é¥¨© ¨ á®®¡é¥¨ï ¢ ¥¬
|
||
rst #08 ;¯¥ç âì á®®¡é¥¨ï ¯® ®¬¥àã ¢ BC ( §¢ ¨¥ ¬¥î)
|
||
rst #20
|
||
db #85 ;¢ë஢ïâì ¯® æ¥âàã
|
||
inc (ix+0) ;crd Y +1
|
||
;¯¥ç âì ®¯æ¨© ¬¥î
|
||
ld c,#00 ;®¬¥à ®¯æ¨¨
|
||
ld a,(xE110) ; âਡãâë ¯¥ç ⨠®¯æ¨© ¬¥î
|
||
ld (ix+6),a
|
||
x0D8E call x0D2F ;;c=®¬¥à ⥪ã饩 ®¯æ¨¨ [0..n]
|
||
inc a
|
||
cp c
|
||
ret z ;¢á¥ ®¯æ¨¨ ¯¥ç â ë
|
||
inc hl
|
||
inc hl ;hl ¤à¥á ç « ®¯æ¨© ¢ ¤¥áªà¨¯â®à¥ ¬¥î
|
||
call x0D52 ;hl - ¤à¥á ç « § ¤ ®© ®¯æ¨¨ +2
|
||
ld b,a
|
||
; ãáâ ®¢ª âਡã⮢ ¯¥ç ⨠®¯æ¨¨
|
||
call x0F51 ;¢ë§®¢ ¯/¯ ®¯à¥¤¥«¥¨ï ¤®áâ㯮á⨠®¯æ¨¨. cy=1 ¥¤®áâã¯
|
||
push hl
|
||
ld a,(xE112) ; âਡãâë ¥ ªâ¨¢®© ®¯æ¨¨
|
||
jr c,x0DBB
|
||
ld a,b ;¢ë¤¥«¥¨¥ Ink ¯¥ç ⨠ªâ¨¢®© ®¯æ¨¨
|
||
rlca
|
||
rlca
|
||
rlca
|
||
and #07 ;®¬¥à Ink ¢ â ¡«¨æ¥
|
||
ld hl,xEAED
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x0DB1 ;‹ˆ˜<CB86>……!!! á ãç¥â®¬ ⥪ã饣® à §¬¥é¥¨ï â ¡«¨æë
|
||
inc h ;‹ˆ˜<CB86>……!!! á ãç¥â®¬ ⥪ã饣® à §¬¥é¥¨ï â ¡«¨æë
|
||
x0DB1 ld a,(hl)
|
||
and #07
|
||
ld l,a ;Ink ¯¥ç ⨠®¯æ¨¨
|
||
ld a,(xE110)
|
||
and %11111000
|
||
or l
|
||
x0DBB ld (ix+6),a ; âਡãâë ¯¥ç ⨠®¯æ¨¨
|
||
pop hl
|
||
; ãáâ ®¢ª crdY, ¢ë¤¥«¥¨¥ ®¯æ¨¨, ¯¥ç âì £®àï祩 ª« ¢¨è¨ ¢ë§®¢
|
||
call x0F6D
|
||
ld a,(hl)
|
||
inc hl
|
||
push af
|
||
push hl
|
||
rlca
|
||
rlca
|
||
and #03
|
||
add a,(ix+0)
|
||
ld (ix+0),a
|
||
ld a,b
|
||
call x0D45 ;¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
ld b,a ;æ¨äà /¡ãª¢ ¢ë¡®à ®¯æ¨¨
|
||
call x0D60 ;®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
ld a,(hl)
|
||
cp c
|
||
call z,x0E6F ;¢ë¤¥«¥¨¥ ⥪ã饩 ®¯æ¨¨ ¬¥î
|
||
pop hl
|
||
ld (ix+1),#09 ;¯¥ç âì ®¬¥à ®¯æ¨¨
|
||
rst #20
|
||
dc " "
|
||
ld a,b ;¯¥ç âì æ¨äàë/¡ãª¢ë ¢ë¡®à ®¯æ¨¨
|
||
rst #10
|
||
rst #20
|
||
dc ". "
|
||
pop af
|
||
; ¯¥ç âì §¢ ¨ï ®¯æ¨¨
|
||
push af
|
||
bit 5,a
|
||
jr nz,x0E03 ;¯¥ç âì §¢ ¨ï ®â¤¥«ì®© ¯/¯
|
||
push bc
|
||
ld c,(hl) ;®¬¥à ¡«®ª á®®¡é¥¨©
|
||
ld (iy-#08),c ;xE00C
|
||
inc hl
|
||
ld b,(hl) ;®¬¥à á®®¡é¥¨ï ¢ ¡«®ª¥
|
||
inc hl
|
||
push hl
|
||
rst #08 ;¯¥ç âì §¢ ¨ï ®¯æ¨¨
|
||
rst #20
|
||
dc " "
|
||
ld (ix+1),#1F ;crd X =31
|
||
pop hl
|
||
pop bc
|
||
jr x0E25
|
||
x0E03 push bc ;¯¥ç âì §¢ ¨ï ®¯æ¨¨ ®â¤¥«ì®© ¯à®æ¥¤ãன
|
||
ld bc,x0E1F ;áî¤ ¢¥à¥¬áï
|
||
push bc
|
||
ld c,(hl)
|
||
inc hl
|
||
ld b,(hl) ;bc - ¤à¥á ¯/¯ ¯¥ç âì ®¯æ¨¨
|
||
bit 4,a
|
||
jr nz,x0E11 ;® ¢ ¤à㣮© áâà ¨æ¥
|
||
push bc
|
||
ret
|
||
x0E11 ld (xE3BE+#01),bc ;¢ë§®¢ ¯/¯ ¨§ ¤à㣮© áâà ¨æë ROM
|
||
inc hl
|
||
ld c,a
|
||
ld a,(hl)
|
||
ld (xE3BE+#03),a
|
||
ld a,c
|
||
jp xE3BE
|
||
x0E1F pop bc
|
||
pop af
|
||
and #E0
|
||
jr x0E26 ;¯¥ç âì á«¥¤ãî饩 ®¯æ¨¨
|
||
x0E25 pop af
|
||
x0E26 and #1F
|
||
jr z,x0E68 ;¯¥ç âì á«¥¤ãî饩 ®¯æ¨¨
|
||
; ¯¥ç âì ⥪ã饣® ¯ à ¬¥âà ®¯æ¨¨
|
||
push bc
|
||
call x0FE9 ;de - ¤à¥á ¯¥à¥¬¥®©/hl - ¤à¥á ¬ ᪨ ¤«ï ¯¥à¥¬¥®©
|
||
and #03
|
||
cp #01
|
||
jr nz,x0E45
|
||
ld a,(de) ;¤¢ á®áâ®ï¨ï ®¯æ¨¨, ®¯à¥¤¥«ï¥¬ ¯® ¬ ᪥ ¢ (hl)
|
||
and (hl)
|
||
inc hl
|
||
ld b,(hl)
|
||
inc hl
|
||
jr z,x0E3C
|
||
x0E3B ld b,(hl)
|
||
x0E3C ld c,(iy-#08) ;®¬¥à ¡«®ª á®®¡é¥¨©
|
||
rst #08
|
||
rst #20
|
||
dc " "
|
||
pop bc
|
||
jr x0E62
|
||
x0E45 cp #02
|
||
jr nz,x0E57
|
||
ld a,(de) ;íâ® ç¨á«® ¯® ¤à¥áã ¯¥à¥¬¥®©
|
||
ld c,a
|
||
ld b,#00
|
||
ld de,#0A00
|
||
rst #30
|
||
dw rom2_x162C ;¯¥ç âì ç¨á« ¢ § ¤ ®© á¨á⥬¥ áç¨á«¥¨ï
|
||
db #02
|
||
pop bc
|
||
jr x0E68 ;¯¥ç âì á«¥¤ãî饩 ®¯æ¨¨
|
||
x0E57 ld a,(de) ;1-4 á®áâ®ï¨ï ®¯æ¨¨, ¯® ®¬¥àã ¢ de
|
||
and #03
|
||
jr z,x0E3B
|
||
ld b,a
|
||
x0E5D inc hl
|
||
djnz x0E5D
|
||
jr x0E3B
|
||
x0E62 ld a,#29 ;¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï íªà
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
x0E68 inc c ;¯¥ç âì á«¥¤ãî饩 ®¯æ¨¨
|
||
inc (ix+0)
|
||
jp x0D8E
|
||
|
||
;€„<E282AC>…‘: #0E6F ¢ë¤¥«¥¨¥ âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
x0E6F push hl
|
||
push bc
|
||
ld a,(xE113)
|
||
and %00111000
|
||
ld c,a ;¢ë¤¥«ï¥¬ paper
|
||
ld a,(ix+6)
|
||
and %11000111
|
||
or c
|
||
ld (ix+6),a ;ãáâ ¢«¨¢ ¥¬ âਡãâë
|
||
call x0E98 ;¢ë¤¥«¥¨¥ âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
ld a,(ix+0)
|
||
ld (iy-#09),a
|
||
pop bc
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0E8C áï⨥ ¢ë¤¥«¥¨ï âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
x0E8C ld a,(iy-#09) ;ª®®à¤¨ â Y ¢ë¤¥«¥®© ®¯æ¨¨
|
||
ld (ix+0),a ;crd Y
|
||
ld a,(xE110)
|
||
and %00111000
|
||
ld c,a ; âਡãâë ¯¥ç â¨
|
||
|
||
;€„<E282AC>…‘: #0E98 ¯¥ç âì âਡã⮢ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
;¢å: c - âਡãâë, ⮫쪮 Paper
|
||
;
|
||
x0E98 push bc
|
||
ld (ix+1),#00 ;crd X =0
|
||
rst #30
|
||
dw rom2_x2969 ;à áç¥â ¤à¥á ªãàá®à ¢ ®¡« á⨠âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
|
||
db #02
|
||
pop bc
|
||
inc hl
|
||
ld b,#1E
|
||
x0EA5 ld a,(hl)
|
||
and %11000111
|
||
or c
|
||
ld (hl),a
|
||
inc hl
|
||
djnz x0EA5
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0EAE !!!Ž˜ˆ<CB9C>Š€!!! âãâ § ¢¨á ¨¥. ¤®«¦¥ ¡ëâì 宫®¤ë© á¡à®á????
|
||
x0EAE rst #30
|
||
dw #000B
|
||
db #02
|
||
|
||
;€„<E282AC>…‘: #0EB2 ®ç¨á⪠⥪ã饣® ®ª
|
||
x0EB2 rst #20 ;®ç¨á⪠⥪ã饣® ®ª
|
||
db #8C
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0EB5 ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
x0EB5 ld sp,xE336
|
||
rst #30
|
||
dw rom2_x04D5 ;¢ª«î票¥ ’ãà¡®-०¨¬
|
||
db #02 ;bc =#7FFD
|
||
ld h,#E1 ;¯à®¢¥àª ¢ ram 8 ¯à¨§ ª MOA
|
||
ld l,#7B
|
||
ld a,"M"
|
||
cpi
|
||
jr nz,x0EAE ;¥â ¡ãª¢ë M. ¯®àâ¨âáï ॣ¨áâà bc -> § ¢¨á ¨¥
|
||
ld a,"O"
|
||
cpi
|
||
jr nz,x0EAE ;¥â ¡ãª¢ë O. ¯®àâ¨âáï ॣ¨áâà bc -> § ¢¨á ¨¥
|
||
call x10C2 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
ld a,(xE110)
|
||
ld (ix+6),a ; âਡãâë ®ª
|
||
call x0EB2 ;®ç¨á⪠®ª
|
||
ld hl,xE16E
|
||
rst #30
|
||
dw rom2_x15DB ;¯¥ç âì á®®¡é¥¨ï ¨§ hl
|
||
db #02
|
||
call x105B ;á®®¡é¥¨¥ Profesional Extention
|
||
ld a,(xE111)
|
||
ld (ix+6),a
|
||
ld bc,#0101 ;á®®¡é¥¨¥ Shadow service monitor
|
||
rst 8
|
||
;®á®¢®© 横« ¬¥î ¬®¨â®à
|
||
x0EEC ld hl,x0EEC ;áî¤ ¢¥à¥¬áï ¯®á«¥ ®¡à ¡®âª¨ ¢ë¡à ®© ®¯æ¨¨
|
||
push hl
|
||
call x0D6B ;¯¥ç âì ⥪ã饣® ¬¥î
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
push af ;ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
ld a,(xE110) ; âਡãâë ¯¥ç ⨠®¯æ¨¨ ¬¥î
|
||
ld (ix+6),a
|
||
call x0E8C ;áï⨥ ¢ë¤¥«¥¨ï âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
pop af
|
||
call x1033 ;¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ¦ â¨ï ª« ¢¨è¨
|
||
db #86 ;cs+6 ¢¨§
|
||
dw x0F95 ;¯¥à¥¬¥é¥¨¥ ªãàá®à á«¥¤ãîéãî ®¯æ¨î (¢¨§)
|
||
db #84 ;cs+7 ¢¢¥àå
|
||
dw x0FA6 ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¯à¥¤ë¤ãéãî ®¯æ¨î (¢¢¥àå)
|
||
db #0D ;enter / cs+1+m
|
||
dw x0F87 ;¢ë¡®à ¢ë¤¥«¥®© ®¯æ¨¨
|
||
db #11 ;cs+1+q
|
||
dw x0F78 ;¯¥à¥å®¤ ¢ £« ¢®¥ ¬¥î
|
||
db #04 ;cs+1+d
|
||
dw x1150 ;¢ë§®¢ ®ª ¢ë¡®à ¤¨áª
|
||
db #80 ;kempston joy
|
||
dw x0FB6 ;®¯à¥¤¥«¥¨¥ ®¯æ¨¨ ¯®¤ ªãàá®à®¬ ¬ëè¨ ¨ ¯¥à¥å®¤ ¥¥ ®¡à ¡®âªã
|
||
db #91 ;mouse
|
||
dw x0FB6 ;®¯à¥¤¥«¥¨¥ ®¯æ¨¨ ¯®¤ ªãàá®à®¬ ¬ëè¨ ¨ ¯¥à¥å®¤ ¥¥ ®¡à ¡®âªã
|
||
db #92 ;mouse
|
||
dw x0F78 ;¯¥à¥å®¤ ¢ £« ¢®¥ ¬¥î
|
||
db #FF
|
||
cp #7B
|
||
jr nc,x0F28 ;a=[#7B..#FF]
|
||
cp #40
|
||
jr c,x0F28 ;a=[#00..#3F]
|
||
and %01011111 ;¡ãª¢ã ¢ ¢¥à娩 ॣ¨áâà
|
||
x0F28 ld b,a ;ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
ld c,#FF
|
||
x0F2B inc c
|
||
call x0D2F ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
inc a
|
||
cp c
|
||
ret z ;§ ª®ç¨«¨áì ®¯æ¨¨ ¢ ¬¥î. ¨ç¥£® ¥ ¤¥« ¥¬
|
||
inc hl
|
||
inc hl
|
||
call x0D42 ;¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
cp b
|
||
jr nz,x0F2B ;ª« ¢¨è ¥ ᮮ⢥âáâ¢ã¥â £ àï祩 ª« ¢¨è¨ ®¯æ¨¨
|
||
;¯¥à¥å®¤ ¯/¯ ®¡à ¡®âª¨ ¢ë¡à ®© ®¯æ¨¨
|
||
push hl
|
||
push de
|
||
call x0D60
|
||
ld (hl),c ;á®åà ¨¬ ®¬¥à ⥪ã饩 ®¯æ¨¨ ¢ ¬¥î
|
||
call x0D6B ;¯¥ç âì ⥪ã饣® ¬¥î
|
||
pop de
|
||
pop hl
|
||
call x0F51 ;¯à®¢¥àª ¤®áâ㯮á⨠®¯æ¨¨
|
||
ret c ;®¯æ¨ï ¥¤®áâã¯
|
||
push hl
|
||
call x0F6D ;®¯à¥¤¥¨¥ ¤à¥á ®¯¨á ¨ï ®¯æ¨¨
|
||
ld c,l
|
||
ld b,h ; ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (xNNNN)
|
||
pop hl
|
||
inc hl
|
||
;bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (xNNNN)
|
||
;¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ®¯æ¨¨
|
||
|
||
;€„<E282AC>…‘: #0F51 ¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ¤®áâ㯮á⨠®¯æ¨¨/®¡à ¡®âª¨ ®¯æ¨¨
|
||
;¢å: hl - ¤à¥á ¢ ¤¥áªà¨¯â®à¥ ®¯æ¨¨ (+2/4 ®â ç « )
|
||
; 3-2,e ¡¨âë áâ à襣® ¡ ©â
|
||
;¢ëå: hl - ¤à¥á ¢ ¤¥áªà¨¯â®à¥ ®¯æ¨¨ (+3 ®â ç « )
|
||
; d - áâ à訩 ¡ ©â ᬥ饨ï
|
||
; e=e>>2
|
||
;
|
||
x0F51 call x0F65 ;¢ë¤¥«¥¨¥ áâ à襣® ¡ ©â ᬥ饨ï
|
||
push de
|
||
ld e,(hl) ;¬« ¤è¨© ¡ ©â
|
||
inc hl
|
||
push hl
|
||
ld hl,x08DD
|
||
add hl,de
|
||
ld de,x0F62
|
||
push de
|
||
xor a
|
||
jp (hl)
|
||
x0F62 pop hl
|
||
pop de
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0F65 ¢ë¤¥«¥¨¥ áâ à襣® ¡ ©â ᬥ饨ï
|
||
;¢å: 3-2,e ¡¨âë áâ à襣® ¡ ©â
|
||
;¢ëå: d - áâ à訩 ¡ ©â ᬥ饨ï
|
||
; e=e>>2
|
||
;
|
||
x0F65 ld a,e
|
||
rrca
|
||
rrca
|
||
ld e,a
|
||
and #03
|
||
ld d,a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0F6D ®¯à¥¤¥¨¥ ¤à¥á ®¯¨á ¨ï ®¯æ¨¨
|
||
;¢å: hl - ¤à¥á ¢ ¤¥áªà¨¯â®à¥ ®¯æ¨¨ (+3 ®â ç « )
|
||
; 3-2,e ¡¨âë áâ à襣® ¡ ©â
|
||
;¢ëå: hl - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨
|
||
; d - áâ à訩 ¡ ©â ᬥ饨ï
|
||
; e=e>>2
|
||
;
|
||
x0F6D call x0F65
|
||
push de
|
||
ld e,(hl)
|
||
ld hl,x0468
|
||
add hl,de
|
||
pop de
|
||
ret
|
||
;¯¥à¥å®¤ ¢ £« ¢®¥ ¬¥î
|
||
x0F78 ld hl,x0EB5
|
||
ex (sp),hl
|
||
xor a
|
||
ld (xDDFF),a
|
||
ld hl,xDE08
|
||
ld (xE033),hl
|
||
ret
|
||
;enter / cs+1+m
|
||
x0F87 call x0D60 ;®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
ld c,(hl) ;®¬¥à ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
call x0D2F ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
inc hl
|
||
inc hl
|
||
call x0D42 ;¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
x0F93 jr x0F28 ;a - £®àïç ï ª« ¢¨è ¢ë¡à ®© ®¯æ¨¨
|
||
|
||
;€„<E282AC>…‘: #0F95 ¯¥à¥¬¥é¥¨¥ ªãàá®à á«¥¤ãîéãî ®¯æ¨î (¢¨§)
|
||
x0F95 call x0D60 ;®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
push hl
|
||
ld c,(hl)
|
||
inc c ;c - ®¬¥à ®¯æ¨¨
|
||
call x0D2F ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
cp c ;a - ®¬¥à ¯®á«¥¤¥© ®¯æ¨¨
|
||
jr nc,x0FA3
|
||
ld c,#00
|
||
x0FA3 pop hl
|
||
ld (hl),c
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0FA6 ¯¥à¥¬¥é¥¨¥ ªãàá®à ¯à¥¤ë¤ãéãî ®¯æ¨î (¢¢¥àå)
|
||
x0FA6 call x0D60 ;®¯à¥¤¥«¥¨¥ ¤à¥á á ®¬¥à®¬ ⥪ã饩 ®¯æ¨¨ ⥪ã饣® ¬¥î
|
||
ld a,(hl)
|
||
or a
|
||
jr z,x0FAF
|
||
dec (hl)
|
||
ret
|
||
x0FAF push hl
|
||
call x0D2F ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
pop hl
|
||
ld (hl),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #0FB6 ®¯à¥¤¥«¥¨¥ ®¯æ¨¨ ¯®¤ ªãàá®à®¬ ¬ëè¨ ¨ ¯¥à¥å®¤ ¥¥ ®¡à ¡®âªã
|
||
;
|
||
x0FB6 ld c,#FF
|
||
ld d,#03 ; ç «ì ï crd Y
|
||
x0FBA inc d
|
||
inc c ;®¬¥à ®¯æ¨¨
|
||
call x0D2F ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ¬¥î
|
||
inc a ;ª®«-¢® ®¯æ¨© ¢ ¬¥î
|
||
cp c
|
||
ret z ;®¯æ¨ï ¥ ©¤¥
|
||
inc hl
|
||
inc hl
|
||
push de
|
||
call x0D52 ;®¯à¥¤¥«¥¨¥ ¤à¥á ¤¥áªà¨¯â®à ®¯æ¨¨
|
||
ld b,a
|
||
call x0F65 ;¢ë¤¥«¥¨¥ áâ à襣® ¡ ©â ᬥ饨ï
|
||
inc hl
|
||
call x0F6D ;®¯à¥¤¥¨¥ ¤à¥á ®¯¨á ¨ï ®¯æ¨¨
|
||
pop de
|
||
ld a,(hl)
|
||
rlca
|
||
rlca
|
||
and #03
|
||
add a,d
|
||
ld d,a ;ª®®à¤¨ â Y ®¯æ¨¨
|
||
cp (iy-#0B)
|
||
jr nz,x0FBA ;ªãàá®à ¥ í⮩ ®¯æ¨¨
|
||
ld a,b
|
||
call x0D45 ;¯à¨¢¥¤¥¨¥ ®¬¥à £®àï祩 ª« ¢¨è¨ ®¯æ¨¨ ª ¯¥ç ⮬ã ᨬ¢®«ã
|
||
jr x0F93 ;a - £®àïç ï ª« ¢¨è ¢ë¡à ®© ®¯æ¨¨
|
||
|
||
;€„<E282AC>…‘: #0FE3 ¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ¨ ¤à¥á ¬ ᪨ ¤«ï § ¤ ®© ®¯æ¨¨
|
||
;¢å: bc - ¤à¥á ®¯¨á ¨ï ®¯æ¨¨ (x0468)
|
||
;¢ëå: hl - ¤à¥á ¬ ᪨ ¤«ï ¯¥à¥¬¥®©
|
||
; de - ¤à¥á ¯¥à¥¬¥®©
|
||
;
|
||
x0FE3 ld l,c
|
||
ld h,b
|
||
ld a,(bc)
|
||
inc hl
|
||
inc hl
|
||
inc hl
|
||
|
||
;€„<E282AC>…‘: #0FE9 ¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ¨ ¤à¥á ¬ ᪨ ¤«ï § ¤ ®© ®¯æ¨¨
|
||
;¢å: a - ä« £¨ ®¯¨á ¨ï ®¯æ¨¨
|
||
; hl - ¤à¥á ¢ ®¯¨á ¨¨ ®¯æ¨¨
|
||
;¢ëå: hl - ¤à¥á ¬ ᪨ ¤«ï ¯¥à¥¬¥®©
|
||
; de - ¤à¥á ¯¥à¥¬¥®©
|
||
;
|
||
x0FE9 bit 4,a
|
||
jr z,x1001
|
||
;¯®«ã票¥ ¯®¤áâப¨ á ®¯¨á ¨¥¬ ®¯æ¨¨
|
||
ld e,(hl)
|
||
inc hl
|
||
ld d,(hl) ; ¤à¥á ¯¥à¥¬¥®© á ®¬¥à®¬ áâப¨
|
||
inc hl ;hl= ¤à¥á+5
|
||
ld a,(de)
|
||
and #03 ;®¬¥à áâப¨ [0..3]
|
||
inc a ;¯®¨áª áâப¨
|
||
x0FF5 dec a
|
||
ld b,(hl)
|
||
inc hl
|
||
jr z,x0FFF
|
||
x0FFA inc hl
|
||
djnz x0FFA
|
||
jr x0FF5
|
||
x0FFF ld a,(hl) ;a - ä« £¨
|
||
inc hl
|
||
;¯®«ã票¥ ¤à¥á ¯¥à¥¬¥®© ®¯æ¨¨
|
||
x1001 ld e,(hl) ;¯®«ã票¥ á¬¥é¥¨ï ®â iy(xE014)
|
||
inc hl
|
||
bit 2,a
|
||
jr z,x100B
|
||
ld d,(hl)
|
||
inc hl
|
||
jr x1012
|
||
x100B bit 7,e
|
||
ld d,#00
|
||
jr z,x1012
|
||
dec d ;de - ᬥ饨¥ ®â iy(xE014)
|
||
x1012 push iy
|
||
ex (sp),hl
|
||
add hl,de
|
||
ex de,hl
|
||
pop hl ;de - ¤à¥á ¯¥à¥¬¥®© ®¯æ¨¨
|
||
;¥á«¨ íâ® ¡«®ª ¯¥à¥¬¥ëå, ®¯à¥¤¥«ï¥¬ ã¦ãî ¯¥à¥¬¥ãî ¢ ¡«®ª¥
|
||
bit 3,a
|
||
ret z
|
||
push af
|
||
ld b,(hl)
|
||
inc hl
|
||
ld a,(hl)
|
||
inc hl ;ab - ¤à¥á ¯¥à¥¬¥®© ᮠᬥ饨¥¬ ¢ ¡«®ª¥
|
||
push hl
|
||
ld l,b
|
||
ld h,a
|
||
ld a,(hl)
|
||
and #03
|
||
ld l,a ;hl - ᬥ饨¥ ¢ ¡«®ª¥
|
||
ld h,#00
|
||
add hl,de
|
||
ex de,hl
|
||
pop hl
|
||
pop af
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #102E ¯à®¢¥àª ¤¨ ¯ §® ç¨á«
|
||
;¢å: a - ç¨á«®
|
||
; c - ¬¨¨¬ «ì®¥ § 票¥
|
||
; b - ¬ ªá¨¬ «ì®¥ § 票¥+1
|
||
;¢ëå: cy=1 ¢¥ ¯à¥¤¥«®¢ § ¤ ëå § 票©
|
||
;
|
||
x102E cp c
|
||
ret c
|
||
cp b
|
||
ccf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1033 ¯à®æ¥¤ãà ®¡à ¡®âª¨ ¦ ⨩ ª« ¢¨è
|
||
;¢å: ¯ à ¬¥âàë ¯¥à¥¤ îâáï ç¥à¥§ db ?:dw ??
|
||
x1033 pop hl
|
||
jr x1038
|
||
x1036 inc hl
|
||
inc hl
|
||
x1038 ld e,(hl)
|
||
inc e
|
||
jr z,x1045 ;e=#FF -> ¢®§¢à â
|
||
cp (hl)
|
||
inc hl
|
||
jr nz,x1036
|
||
ld e,(hl)
|
||
inc hl
|
||
ld d,(hl)
|
||
dec de
|
||
ex de,hl
|
||
x1045 inc hl
|
||
jp (hl)
|
||
|
||
;€„<E282AC>…‘: #1047 ¯¥ç âì ª®«¨ç¥á⢠樫¨¤à®¢ HDD
|
||
x1047 ld bc,#1002 ;Cylinders
|
||
rst #08
|
||
ld (ix+1),#1F
|
||
ld bc,(xDFF2) ;ª®«¢® 樫¨¤à®¢
|
||
ld de,#0A00 ;¤¥áïâ¨ç ï á¨á⥬ áç¨á«¥¨ï
|
||
rst #30
|
||
dw rom2_x162C ;¯¥ç âì ç¨á« ¢ § ¤ ®© á¨á⥬¥ áç¨á«¥¨ï
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #105B ¯¥ç âì è ¯ª¨ ¬¥î ¬®¨â®à
|
||
x105B call x10C2 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
ld hl,x106B
|
||
|
||
;€„<E282AC>…‘: #1061 ¯¥ç âì § ª®¤¨à®¢ ®£® á®®¡é¥¨ï ¨§ hl
|
||
x1061 ld a,(hl)
|
||
xor #6A
|
||
cp #FF
|
||
ret z
|
||
rst #10 ;¯¥ç âì ᨬ¢®« ¨§ A
|
||
inc hl
|
||
jr x1061
|
||
|
||
;§ ªá®à¥®¥ á®®¡é¥¨¥
|
||
x106B db #6B,#40,#BF
|
||
db #71,#6A,#63
|
||
db #3A,#18,#05,#0C,#0F,#19,#03,#05
|
||
db #04,#0B,#06,#4A,#4A,#2F,#12,#1E
|
||
db #0F,#04,#1E,#03,#05,#04,#4A
|
||
db #71,#68,#6A
|
||
db #2B,#04,#0B,#06,#13,#19,#0F,#18
|
||
db #68
|
||
db #95
|
||
/*®® ¦¥, ® à ᪮¤¨à®¢ ®¥
|
||
db #01,%00101010,%11010101 ; âਡãâë
|
||
db #1B,#00,#09 ;ª®®à¤¨ âë
|
||
db "Profesional Extention "
|
||
db #1B,#02,#00 ;ª®®à¤¨ âë
|
||
db "Analyser"
|
||
db #02 ;¢®ááâ ®¢¨¬ âਡãâë
|
||
db #FF ;ª®¥æ
|
||
*/
|
||
|
||
;§ ªá®à¥®¥ á®®¡é¥¨¥
|
||
x1095 db #6B,#1B,#E4
|
||
db #71,#61,#60
|
||
db #39,#0B,#1C,#0F,#0E,#4A,#38,#2B
|
||
db #27,#4A,#08,#0B,#04,#01,#4A
|
||
db #95
|
||
/*®® ¦¥, ® à ᪮¤¨à®¢ ®¥
|
||
x1095 db #01,%01110001,%10001110 ; âਡãâë
|
||
db #1B,#0B,#0A ;ª®®à¤¨ âë
|
||
db "Saved RAM bank "
|
||
db #FF ;ª®¥æ
|
||
*/
|
||
|
||
;§ ªá®à¥®¥ á®®¡é¥¨¥
|
||
x10AB db #6B,#1B,#0E4
|
||
db #71,#61,#60
|
||
db #26,#05,#0B,#0E,#0F,#0E,#4A,#38
|
||
db #2B,#27,#4A,#08,#0B,#04,#01,#4A
|
||
db #95
|
||
/*®® ¦¥, ® à ᪮¤¨à®¢ ®¥
|
||
db #01,%01110001,%10001110 ; âਡãâë
|
||
db #1B,#0B,#0A ;ª®®à¤¨ âë
|
||
db "Loaded RAM bank "
|
||
db #FF ;ª®¥æ
|
||
*/
|
||
|
||
;€„<E282AC>…‘: #10C2 ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
x10C2 rst #30
|
||
dw rom2_x3005 ;ãáâ ®¢ª ⥪ã騬 ®ª : menu
|
||
db %00000010
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #10C7 Š®¯¨à®¢ ¨¥ ª â «®£ ROM-¤¨áª ¢ ram 8
|
||
;¢ëå: a =0 ¥â ROM-¤¨áª
|
||
x10C7 push bc
|
||
ld hl,(x0071)
|
||
ld l,#00
|
||
ld bc,#0100
|
||
ld de,xE5A9
|
||
push de
|
||
ldir
|
||
pop de
|
||
ld a,(de)
|
||
or a
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #10DB ®¡à ¡®âª ¯ãªâ ¬¥î: R. ROM disk
|
||
x10DB call x0D02 ;®ç¨á⪠¨¦¥© áâப¨ ®ª ¬¥î
|
||
call x10C7 ;Š®¯¨à®¢ ¨¥ ª â «®£ ROM-¤¨áª ¢ ram 8
|
||
ld hl,#1006 ;ª®®à¤¨ âë ®ª
|
||
ld de,#100C ;è¨à¨ ®ª ¢ ᨬ¢®« å ¨ § ª®¬¥áâ å
|
||
call x2133 ;ª®à४æ¨ï ª®®à¤¨ â ¨ à §¬¥à®¢ ®ª
|
||
ld hl,x1111
|
||
ld (xE9E1),hl
|
||
x10F0 call x1EF1 ;¯¥ç âì ª â «®£ ¨ ¢ë¡®à ¯®§¨æ¨¨ ¢ ¥¬
|
||
jr nc,x10FF ;¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
cp #03
|
||
jr z,x110E ;break/cancel § ªàë¢ ¥¬ ®ª®
|
||
cp #11
|
||
jr nz,x10F0 ;¯®¢â®à¨¬ ¢ë¡®à
|
||
jr x110E ;®â¬¥ á § ªàë⨥¬ ®ª
|
||
;¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
;hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
x10FF call x1130 ;®¯à¥¤¥«¥¨¥ ç « § ¯¨á¨ ¢ ª â «®£¥ ROM-disk ¯® ®¬¥àã ¢ hl
|
||
ld de,#000E
|
||
add hl,de
|
||
ld a,(hl) ;ᬥ饨¥ ®â ç « áâà ¨æë
|
||
inc hl
|
||
ld h,(hl) ;®¬¥à áâà ¨æë
|
||
ld l,a ;ᬥ饨¥ ®â ç « áâà ¨æë¬
|
||
rst #30
|
||
dw rom6_x0E3B ;§ £à㧪 ¨§ ROM-disk
|
||
db #06
|
||
;break/cancel § ªàë¢ ¥¬ ®ª®
|
||
x110E jp x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;€„<E282AC>…‘: #1111 â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà
|
||
x1111 dw x1128 ;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ROM-disk
|
||
dw x113D ;®¯à¥¤¥«¥¨¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ROM-disk
|
||
dw x1117 ;§¢£®«®¢®ª: ¯¥ç âì á®®¡é¥¨ï: _Select a file_
|
||
;¯¥ç âì á®®¡é¥¨ï: _Select a file_
|
||
x1117 rst #20
|
||
dc " Select a file "
|
||
ret
|
||
;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ROM-disk
|
||
;¢å: hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
x1128 call x1130
|
||
rst #30
|
||
dw rom2_x15DB ;¯¥ç âì á®®¡é¥¨ï ¨§ hl
|
||
db #02
|
||
ret
|
||
;®¯à¥¤¥«¥¨¥ ç « § ¯¨á¨ ¢ ª â «®£¥ ROM-disk ¯® ®¬¥àã ¢ hl
|
||
x1130 ld de,xE5A9 ;ª â «®£ ROM-disk
|
||
ld b,#04
|
||
x1135 sla l ;hl=hl*16
|
||
rl h
|
||
djnz x1135
|
||
add hl,de
|
||
ret
|
||
;®¯à¥¤¥«¥¨¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ROM-disk
|
||
;¢ëå: hl - ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ROM-disk
|
||
x113D ld hl,xE5A9 ;ª â «®£ ROM-disk
|
||
ld de,#0010
|
||
ld c,d
|
||
x1144 ld a,(hl)
|
||
or a
|
||
jr nz,x114C
|
||
dec c
|
||
ld l,c
|
||
ld h,d
|
||
ret
|
||
x114C add hl,de
|
||
inc c
|
||
jr x1144
|
||
|
||
;€„<E282AC>…‘: #1150 ¢ë¢®¤ ®ª ¢ë¡®à ¤¨áª®¢®¤
|
||
x1150 call x0D02 ;®ç¨á⪠¨¦¥© áâப¨ ®ª ¬¥î
|
||
ld hl,#1006 ;ª®®à¤¨ âë ®ª
|
||
ld de,#140F ;à §¬¥àë ®ª
|
||
call x2133 ;ª®à४æ¨ï ª®®à¤¨ â ¨ à §¬¥à®¢ ®ª
|
||
ld hl,x1182 ; ¤à¥á â ¡«¨æë ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯/¯ x2028
|
||
ld (xE9E1),hl
|
||
x1162 call x1EF1 ;¯¥ç âì ª â «®£ ¨ ¢ë¡®à ¯®§¨æ¨¨ ¢ ¥¬
|
||
jr nc,x117A ;çâ®-â® ¢ë¡à «¨
|
||
cp #03
|
||
jr z,x110E ;®â¬¥ break/cancel
|
||
cp #11
|
||
jr z,x110E ;cs+1+q
|
||
and #5F ;¯à®¢¥àª ¡ãª¢ A..D
|
||
cp #45
|
||
jr nc,x1162 ;¯à®¤®«¦¨¬
|
||
sub #41
|
||
jr c,x1162 ;¯à®¤®«¦¨¬
|
||
ld l,a ;®¬¥à ¤¨áª®¢®¤
|
||
x117A ld a,l
|
||
ld (xFFCA),a ;¢ë¡à ë© ¤¨áª®¢®¤
|
||
jp x0B25 ;¢ë¢®¤ ª â «®£ ⥪ã饣® ¤¨áª
|
||
|
||
;€„<E282AC>…‘: #1181 ret
|
||
x1181 ret
|
||
|
||
;â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª ¢ë¡®à ¤¨áª®¢®¤
|
||
x1182 dw x119D ;¯¥ç âì ®¤®£® ¨¬¥¨ ¤¨áª®¢®¤
|
||
dw x1188 ;®¯à¥¤¥«¥¨¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ =3
|
||
dw x118C ;§ £®«®¢®ª: ¯¥ç âì á®®¡é¥¨ï: _Select a disk_
|
||
|
||
;®¯à¥¤¥«¥¨¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ =3
|
||
x1188 ld hl,#0003
|
||
ret
|
||
|
||
;§ £®«®¢®ª: ¯¥ç âì á®®¡é¥¨ï: _Select a disk_
|
||
x118C rst #20
|
||
dc " Select a Disk "
|
||
ret
|
||
|
||
;¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤ ¨«¨ ¯ãâ¨, ¥á«¨ íâ® ®¡à §
|
||
x119D ld a,l
|
||
and #03
|
||
call x249C ;¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤ ¨«¨ ¯ãâ¨, ¥á«¨ íâ® ®¡à §
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #11A4 ¯®¨áª á®®¡é¥¨ï ¯® ®¬¥àã ¢ B[#01..#??]
|
||
;¢å: hl - ¤à¥á ¡«®ª á®®¡é¥¨©
|
||
;¢ëå: de - ¤à¥á ç « á®®¡é¥¨ï
|
||
;
|
||
x11A4 ex de,hl
|
||
x11A5 dec b
|
||
ret z
|
||
x11A7 ld a,(de)
|
||
inc de
|
||
and #80
|
||
jr nz,x11A5
|
||
jr x11A7
|
||
|
||
;€„<E282AC>…‘: #11AF ãáâ ®¢ª ¡«®ª á«®¢/á®®¡é¥¨© ¯® ®¬¥àã ¢ A
|
||
;¢å: a=[#00..#02] - ®¬¥à ¡«®ª á®®¡é¥¨©/á«®¢
|
||
;¢ëå: (xDDDA) - ¤à¥á ¡«®ª á«®¢
|
||
; hl - ¤à¥á ¢ â ¡«¨æ¥ ¡«®ª®¢ á«®¢/á®®¡é¥¨©
|
||
;
|
||
x11AF ld hl,x11C1 ;ᯨ᮪ ¡«®ª®¢ á®®¡é¥¨©
|
||
rlca
|
||
rlca
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x11B9
|
||
inc h
|
||
x11B9 ld e,(hl)
|
||
inc hl
|
||
ld d,(hl)
|
||
ld (xDDDA),de
|
||
ret
|
||
x11C1 dw x1554,x1906
|
||
dw x1353,x181A
|
||
dw x122D,x176D
|
||
|
||
;€„<E282AC>…‘: #11CD ¯¥ç âì á®®¡é¥¨ï ¯® ®¬¥àã ¢ BC
|
||
;¢å: c=[0..2] ®¬¥à ¡«®ª á®®¡é¥¨©
|
||
; b - ®¬¥à á®®¡é¥¨ï ¢ í⮬ ¡«®ª¥
|
||
;
|
||
x11CD ld a,c
|
||
call x11AF ;ãáâ ®¢ª ¡«®ª á«®¢/á®®¡é¥¨© ¯® ®¬¥àã ¢ A
|
||
inc hl
|
||
ld e,(hl)
|
||
inc hl
|
||
ld d,(hl)
|
||
ex de,hl
|
||
ld (xDDD8),hl ; ¤à¥á ¡«®ª á®®¡é¥¨©
|
||
ld c,#80 ;¯¥à¢ ï ¡ãª¢ § £« ¢ ï
|
||
call x11A4 ;¯®¨áª á®®¡é¥¨ï ¯® ®¬¥àã ¢ B[#01..#??]
|
||
ex de,hl ;hl - ¤à¥á ç « á®®¡é¥¨ï
|
||
x11DF ld a,(hl) ;¯¥ç âì á®®¡é¥¨ï
|
||
cp #7F
|
||
jr nz,x11ED
|
||
inc hl ;ᬥ ¡«®ª á«®¢
|
||
ld a,(hl)
|
||
push hl
|
||
call x11AF ;ãáâ ®¢ª ¡«®ª á«®¢/á®®¡é¥¨© ¯® ®¬¥àã ¢ A
|
||
pop hl
|
||
jr x1216
|
||
x11ED and #7F
|
||
jr z,x121C ;¯¥ç âì 㪠§ ⥫ï áâíª
|
||
ld b,a
|
||
push hl
|
||
ld hl,(xDDDA)
|
||
call x11A4 ;¯®¨áª á«®¢ ¯® ®¬¥àã ¢ B[#01..#??]
|
||
pop hl
|
||
x11FA ld a,(de) ;¯¥ç âì á«®¢
|
||
sla c
|
||
jr nc,x120C
|
||
push af ;¯¥à¢ë© ᨬ¢®« á«®¢ § £« ¢ë©
|
||
and #7F
|
||
cp #40
|
||
jr c,x120B
|
||
pop af
|
||
and %11011111
|
||
jr x120C
|
||
x120B pop af
|
||
x120C rst #30 ;¯¥ç âì ᨬ¢®«
|
||
dw rom2_x2B0B ;¯¥ç âì ᨬ¢®« á® á¡à®á®¬ 7£® ¡¨â (rst #10)
|
||
db %00000010
|
||
rla
|
||
inc de
|
||
jr nc,x11FA
|
||
rst #20 ;¯¥ç âì ¯à®¡¥« ¢ ª®æ¥ á«®¢
|
||
dc " "
|
||
x1216 bit 7,(hl)
|
||
inc hl
|
||
jr z,x11DF ;á«¥¤ãî饥 á«®¢®
|
||
ret
|
||
|
||
;¯¥ç âì ç¨á« ¨§ (xDDA7)
|
||
x121C push hl
|
||
sla c
|
||
push bc
|
||
ld hl,(xDDA7)
|
||
rst #30
|
||
dw rom2_x1612 ;¯¥ç âì ç¨á« ¢ hl (dec/hex) á ¯à¥ä¨ªá®¬
|
||
db %00000010
|
||
rst #20 ;¯¥ç âì ¯à®¡¥«
|
||
dc " "
|
||
pop bc
|
||
pop hl
|
||
jr x1216
|
||
|
||
;€„<E282AC>…‘: #122D ¡«®ª á«®¢ 2 (#35 á«®¢)
|
||
x122D dc "time" ;#01
|
||
dc "date"
|
||
dc "&"
|
||
dc "Set Up"
|
||
dc "indicator"
|
||
dc "ON"
|
||
dc "OFF"
|
||
dc "hours"
|
||
dc "minutes" ;#09
|
||
dc "seconds"
|
||
dc "years"
|
||
dc "months"
|
||
dc "days"
|
||
dc "autoconfig"
|
||
dc "from"
|
||
dc "degree"
|
||
dc "compression" ;#11
|
||
dc "Cylinders"
|
||
dc "head"
|
||
dc "partition"
|
||
dc "manager"
|
||
dc "global"
|
||
dc "-"
|
||
dc "delete"
|
||
dc "part" ;#19
|
||
dc "all"
|
||
dc "local"
|
||
dc "table"
|
||
dc "information"
|
||
dc "select"
|
||
dc "..."
|
||
dc "create"
|
||
dc "write" ;#21
|
||
dc "restore"
|
||
dc "auto"
|
||
dc "detection"
|
||
dc "mount"
|
||
dc "dismount"
|
||
dc "on"
|
||
dc "input"
|
||
dc "output" ;#29
|
||
dc "interrupt"
|
||
dc "controller"
|
||
dc "NVRAM"
|
||
dc "modem"
|
||
dc "port"
|
||
dc "serial"
|
||
dc " "
|
||
dc "rename" ;#31
|
||
dc "SMUC"
|
||
dc "mode"
|
||
dc "LBA"
|
||
dc "mirror" ;#35
|
||
|
||
;€„<E282AC>…‘: #1353 ¡«®ª á«®¢ 1 (#6A á«®¢)
|
||
x1353 dc "main" ;#01
|
||
dc "menu"
|
||
dc "previous"
|
||
dc "continue"
|
||
dc "magic"
|
||
dc "button"
|
||
dc "monitor"
|
||
dc "print"
|
||
dc "screen" ;#09
|
||
dc "test"
|
||
dc "printer"
|
||
dc "disk"
|
||
dc "Set Up"
|
||
dc "about"
|
||
dc "positive"
|
||
dc "negative"
|
||
dc "Shadow" ;#11
|
||
dc "service"
|
||
db #1B,#01,#88
|
||
db #1B,#03,#8D
|
||
dc "keyboard"
|
||
dc "constant"
|
||
dc "debouncing"
|
||
dc "delay"
|
||
dc "repeat" ;#19
|
||
dc "before"
|
||
dc "interface"
|
||
dc "speed"
|
||
dc "data"
|
||
dc "bits"
|
||
dc "stop"
|
||
dc "to"
|
||
dc "limiter" ;#21
|
||
dc "+LF"
|
||
dc "length"
|
||
dc "page"
|
||
dc "width"
|
||
dc "centronics"
|
||
dc "RS232"
|
||
dc "9600"
|
||
dc "1200" ;#29
|
||
dc "8"
|
||
dc "7"
|
||
dc "1"
|
||
dc "2"
|
||
dc "OFF"
|
||
dc "ON"
|
||
dc "reset"
|
||
dc "line" ;#31
|
||
dc "feed"
|
||
dc "carriage"
|
||
dc "return"
|
||
dc "computer"
|
||
dc "form"
|
||
dc "sound"
|
||
dc "format"
|
||
dc "drive" ;#39
|
||
dc "track"
|
||
dc "side"
|
||
dc "sector"
|
||
dc "A"
|
||
dc "B"
|
||
dc "C"
|
||
dc "D"
|
||
dc "40" ;#41
|
||
dc "80"
|
||
dc "FM"
|
||
dc "MFM"
|
||
dc "128"
|
||
dc "256"
|
||
dc "512"
|
||
dc "1024"
|
||
dc "one" ;#49
|
||
dc "double"
|
||
dc "half"
|
||
dc "LOW"
|
||
dc "HIGH"
|
||
dc "retry"
|
||
dc "utility"
|
||
dc "analys"
|
||
dc "catalogue" ;#51
|
||
dc "interleaving"
|
||
dc "*"
|
||
dc "normal"
|
||
dc "fast"
|
||
db #0C,#1B,#00,#87
|
||
db #1B,#0C,#8D
|
||
dc "save"
|
||
dc "load" ;#59
|
||
dc "..."
|
||
dc "&"
|
||
dc "NMI"
|
||
dc "graphics"
|
||
dc "manipulators"
|
||
dc "mouse"
|
||
dc "kempston"
|
||
dc "joystick" ;#61
|
||
dc "wait"
|
||
dc "second"
|
||
dc "first"
|
||
dc "of"
|
||
dc "step"
|
||
dc "size"
|
||
dc "quick"
|
||
dc "autostart" ;#69
|
||
dc "I/O" ;#6A
|
||
|
||
;€„<E282AC>…‘: #1554 ¡«®ª á«®¢ 0 (#5E á«®¢)
|
||
x1554 dc "at" ;#01
|
||
dc "abandoned"
|
||
dc "already"
|
||
dc "bad"
|
||
dc "big"
|
||
dc "blocks"
|
||
dc "breakpoint"
|
||
dc "by"
|
||
dc "command" ;#09
|
||
dc "enter"
|
||
dc "empty"
|
||
dc "definition"
|
||
dc "devision"
|
||
dc "failed"
|
||
dc "file"
|
||
dc "finish"
|
||
dc "found" ;#11
|
||
dc "few"
|
||
dc "identical"
|
||
dc "insufficient"
|
||
dc "known"
|
||
dc "long"
|
||
dc "many"
|
||
dc "no"
|
||
dc "not" ;#19
|
||
dc "number"
|
||
dc "name"
|
||
dc "of"
|
||
dc "operands"
|
||
dc "opcode"
|
||
dc "open"
|
||
dc "out"
|
||
dc "present" ;#21
|
||
dc "program"
|
||
dc "range"
|
||
dc "redefined"
|
||
dc "stack"
|
||
dc "space"
|
||
dc "syntax"
|
||
dc "string"
|
||
dc "small" ;#29
|
||
dc "start"
|
||
dc "search"
|
||
dc "too"
|
||
dc "undefined"
|
||
dc "workspace"
|
||
dc "word"
|
||
dc "zero"
|
||
dc ">" ;#31
|
||
dc "error"
|
||
dc "quit"
|
||
dc "operand"
|
||
dc ")"
|
||
dc "brackets"
|
||
dc "invalid"
|
||
dc "type"
|
||
dc "illegal" ;#39
|
||
dc "value"
|
||
dc "bank"
|
||
dc "RAM"
|
||
dc "ROM"
|
||
dc "forbidden"
|
||
dc " Working ..."
|
||
dc "address"
|
||
dc "state" ;#41
|
||
dc "selections:"
|
||
dc "init"
|
||
dc "count"
|
||
dc "***"
|
||
dc "curent"
|
||
dc "analyser"
|
||
dc "definitions:"
|
||
dc "left" ;#49
|
||
dc "for"
|
||
dc "bytes"
|
||
dc "Professional"
|
||
dc "TRDOS"
|
||
dc "exist"
|
||
dc "R/W"
|
||
dc "disk"
|
||
dc "other" ;#51
|
||
dc "execution"
|
||
dc "configuration"
|
||
dc "memory"
|
||
dc "control"
|
||
dc "hard"
|
||
dc "checksum"
|
||
dc "CMOS"
|
||
dc "boot" ;#59
|
||
dc "record"
|
||
dc "busy"
|
||
dc "ready"
|
||
dc "duplicate"
|
||
dc "CRC" ;#5E
|
||
|
||
;€„<E282AC>…‘: #176D <20>«®ª á®®¡é¥¨© 2
|
||
; #00 ¯¥ç âì ç¨á« ¨§ ï祩ª¨ (xDDA7)
|
||
; #7F,[0..2] - ᬥ ¡«®ª á«®¢
|
||
x176D db #01,#03,#82 ;#01 time & date
|
||
db #04,#01,#03,#82 ;#02 Set Up time & date
|
||
db #85 ;#03 indicator
|
||
db #87 ;#04 OFF
|
||
db #86 ;#05 ON
|
||
db #88 ;#06 hours
|
||
db #89 ;#07 minutes
|
||
db #8A ;#08 seconds
|
||
db #8B ;#09 years
|
||
db #8C ;#0A months
|
||
db #8D ;#0B days
|
||
db #8E ;#0C autoconfig
|
||
db #91 ;#0D compression
|
||
db #90 ;#0E degree
|
||
db #7F,#00,#56 ;#0F hard disk utility
|
||
db #7F,#01,#0C,#CF
|
||
db #92 ;#10 Cylinders
|
||
db #93 ;#11 head
|
||
db #14,#95 ;#12 partition manager
|
||
db #16,#14,#9C ;#13 global partition table
|
||
db #18,#1A,#99 ;#14 delete all part
|
||
db #1B,#14,#9C ;#15 local partition table
|
||
db #14,#9D ;#16 partition information
|
||
db #18,#94 ;#17 delete partition
|
||
db #18,#14,#9F ;#18 delete partition ...
|
||
db #20,#14,#9F ;#19 create partition ...
|
||
db #21,#7F,#01,#20,#8C ;#1A write to disk
|
||
db #22,#0F,#7F,#01,#8C ;#1B restore from disk
|
||
db #23,#24,#7F,#00,#56 ;#1C auto detection hard disk
|
||
db #D0
|
||
db #25,#27,#7F,#01,#39 ;#1D mount on drive C
|
||
db #BF
|
||
db #1E,#1B,#94 ;#1E select local partition
|
||
db #1E,#7F,#01,#8C ;#1F select disk
|
||
db #25,#27,#7F,#01,#39 ;#20 mount on drive D
|
||
db #C0
|
||
db #25,#27,#7F,#01,#39 ;#21 mount on drive B
|
||
db #BE
|
||
db #A8 ;#22 input
|
||
db #A9 ;#23 output
|
||
db #2A,#2B,#7F,#00,#19 ;#24 interrupt controller not found
|
||
db #91
|
||
db #2A,#2B,#7F,#00,#91 ;#25 interrupt controller found
|
||
db #2C,#7F,#00,#19,#91 ;#26 NVRAM not found
|
||
db #2C,#7F,#00,#91 ;#27 NVRAM found
|
||
db #2D,#7F,#00,#19,#91 ;#28 modem not found
|
||
db #2D,#7F,#00,#91 ;#29 modem found
|
||
db #2F,#2E,#7F,#00,#19 ;#2A serial port not found
|
||
db #91
|
||
db #25,#A7 ;#2B mount on
|
||
db #30,#0F,#7F,#01,#B9 ;#2C __from drive
|
||
db #26,#7F,#01,#DA ;#2D dismount ...
|
||
db #B0 ;#2E __
|
||
db #A6 ;#2F dismount
|
||
db #25,#7F,#01,#5A ;#30 mount ... ___
|
||
db #7F,#02,#B0
|
||
db #30,#27,#7F,#00,#AA ;#31 __ on start
|
||
db #31,#14,#9F ;#32 rename partition ...
|
||
db #2C,#7F,#00,#57,#B2 ;#33 NVRAM checksum error
|
||
db #2B,#32,#7F,#00,#91 ;#34 controller SMUC found
|
||
db #34,#B3 ;#35 LBA mode
|
||
db #7F,#00,#4D,#7F,#02 ;#36 TRDOS mirror
|
||
db #B5
|
||
|
||
;€„<E282AC>…‘: #181A <20>«®ª á®®¡é¥¨© 1
|
||
; #00 ¯¥ç âì ç¨á« ¨§ ï祩ª¨ (xDDA7)
|
||
; #7F,[0..2] - ᬥ ¡«®ª á«®¢
|
||
x181A db #13,#11,#12,#87 ;#01 crd Y=1, crd X=8 Shadow service monitor
|
||
db #01,#82 ;#02 main menu
|
||
db #08,#89 ;#03 print screen
|
||
db #8D ;#04 Set Up
|
||
db #0D,#95 ;#05 Set Up keyboard
|
||
db #8A ;#06 test
|
||
db #03,#82 ;#07 previous menu
|
||
db #04,#7F,#00,#A2 ;#08 continue program
|
||
db #05,#86 ;#09 magic button
|
||
db #87 ;#0A monitor
|
||
db #8B ;#0B printer
|
||
db #0C,#DA ;#0C disk ...
|
||
db #0E,#87 ;#0D about monitor
|
||
db #8F ;#0E positive
|
||
db #90 ;#0F negative
|
||
db #89 ;#10 screen
|
||
db #7F,#00,#BC ;#11 RAM
|
||
db #16,#97 ;#12 constant debouncing
|
||
db #18,#99 ;#13 delay repeat
|
||
db #95 ;#14 keyboard
|
||
db #18,#1A,#99 ;#15 delay before repeat
|
||
db #0D,#8B ;#16 Set Up printer
|
||
db #9B ;#17 interface
|
||
db #A6 ;#18 centronics
|
||
db #A7 ;#19 RS232
|
||
db #9C ;#1A speed
|
||
db #A8 ;#1B 9600
|
||
db #A9 ;#1C 1200
|
||
db #1D,#9E ;#1D data bits
|
||
db #AA ;#1E 8
|
||
db #AB ;#1F 7
|
||
db #1F,#9E ;#20 stop
|
||
db #AD ;#21 2
|
||
db #AC ;#22 1
|
||
db #9D ;#23 data
|
||
db #7F,#00,#28,#7F,#01 ;#24 string limiter +LF
|
||
db #21,#A2
|
||
db #AF ;#25 ON
|
||
db #AE ;#26 OFF
|
||
db #7F,#00,#28,#7F,#01 ;#27 string width
|
||
db #A5
|
||
db #24,#A3 ;#28 page lenth
|
||
db #B0 ;#29 reset
|
||
db #31,#B2 ;#2A line feed
|
||
db #33,#B4 ;#2B carriage return
|
||
db #B5 ;#2C computer
|
||
db #58,#5B,#D9 ;#2D save & load
|
||
db #36,#B2 ;#2E form feed
|
||
db #0D,#87 ;#2F Set Up monitor
|
||
db #30,#7F,#00,#BC ;#30 reset RAM
|
||
db #B7 ;#31 sound
|
||
db #0D,#0C,#CF ;#32 Set Up disk utility
|
||
db #0C,#B9 ;#33 disk drive
|
||
db #BD ;#34 A
|
||
db #BE ;#35 B
|
||
db #BF ;#36 C
|
||
db #C0 ;#37 D
|
||
db #BA ;#38 track
|
||
db #C1 ;#39 40
|
||
db #C2 ;#3A 80
|
||
db #BB ;#3B side
|
||
db #C9 ;#3C one
|
||
db #CA ;#3D double
|
||
db #C4 ;#3E MFM
|
||
db #C3 ;#3F FM
|
||
db #BC ;#40 sector
|
||
db #C5 ;#41 128
|
||
db #C6 ;#42 256
|
||
db #C7 ;#43 512
|
||
db #C8 ;#44 1024
|
||
db #38,#8C ;#45 format disk
|
||
db #1F,#38,#80 ;#47 stop format _ç¨á«®_
|
||
db #CD ;#47 HIGH
|
||
db #4B,#CD ;#48 half HIGH
|
||
db #4B,#CC ;#49 half LOW
|
||
db #CC ;#4A LOW
|
||
db #B8 ;#4B format
|
||
db #4E,#96 ;#4C retry constant
|
||
db #0C,#CF ;#4D disk utility
|
||
db #0A,#8C ;#4E test disk
|
||
db #50,#8C ;#4F analys disk
|
||
db #7F,#00,#04,#7F,#01 ;#50 bad disk _ç¨á«®_
|
||
db #0C,#80 ;
|
||
db #51,#8C ;#51 catalogue disk
|
||
db #D2 ;#52 interleaving
|
||
db #30,#87 ;#53 reset monitor
|
||
db #0B,#53,#AC ;#54 printer * 1
|
||
db #0B,#53,#AD ;#55 printer * 2
|
||
db #D4 ;#56 normal
|
||
db #D5 ;#57 fast
|
||
db #35,#9C ;#58 computer speed
|
||
db #56,#53,#55,#0A ;#59 ®ç¨áâ¨âì ®ª®, crd Y=0, crd X=7
|
||
db #7F,#00,#1C,#7F,#01 ; * fast test of computer *
|
||
db #35,#53,#D7 ; crd Y=12, crd X=13
|
||
db #58,#DA ;#5A save ...
|
||
db #59,#DA ;#5B load ...
|
||
db #58,#5B,#59,#7F,#00 ;#5C save & load of program
|
||
db #1C,#A2 ;
|
||
db #5C,#97 ;#5D NMY debouncing
|
||
db #5D,#DE ;#5E graphics manipulators
|
||
db #0D,#5D,#DE ;#5F Set Up graphics manipulators
|
||
db #DE ;#60 manipulators
|
||
db #DF ;#61 mouse
|
||
db #60,#E1 ;#62 kempston joystick
|
||
db #64,#97 ;#63 first debouncing
|
||
db #1A,#99 ;#64 before repeat
|
||
db #63,#E2 ;#65 second wait
|
||
db #63,#97 ;#66 second debouncing
|
||
db #67,#65,#E6 ;#67 size of step
|
||
db #68,#38,#8C ;#68 quick format disk
|
||
db #E9 ;#69 autostart
|
||
db #58,#7F,#00,#D8 ;#6A save CMOS
|
||
db #59,#7F,#00,#D8 ;#6B load CMOS
|
||
db #58,#0D,#20,#8C ;#6C save Set Up to disk
|
||
db #0D,#7F,#00,#56,#D0 ;#6D Set Up hard disk
|
||
db #7F,#00,#38,#7F,#01 ;#6E type I/O
|
||
db #EA ;
|
||
db #91 ;#6F Shadow
|
||
db #7F,#02,#30,#0F ;#70 __ from drive
|
||
db #7F,#01,#B9
|
||
|
||
;€„<E282AC>…‘: #1906 <20>«®ª á®®¡é¥¨© 0
|
||
; #00 ¯¥ç âì ç¨á« ¨§ ï祩ª¨ (xDDA7)
|
||
; #7F,[0..2] - ᬥ ¡«®ª á«®¢
|
||
|
||
x1906 db #0A,#89 ;#01 enter command
|
||
db #06,#93 ;#02 block identical
|
||
db #07,#80 ;#03 breackpoint _ç¨á«®_
|
||
db #11,#01,#80 ;#04 found at _ç¨á«®_
|
||
db #7F,#01,#1F,#7F,#00 ;#05 stop number _ç¨á«®_
|
||
db #1A,#80
|
||
db #BF ;#06 _Working ...
|
||
db #0A,#9A ;#07 enter number
|
||
db #2F,#A4 ;#08 word redefined
|
||
db #0A,#9B ;#09 enter name
|
||
db #2C,#12,#9D ;#0A too few operands
|
||
db #2C,#17,#9D ;#0B too many operands
|
||
db #20,#1C,#A3 ;#0C out of range
|
||
db #15,#9A ;#0D known number
|
||
db #04,#A8 ;#0E bad string
|
||
db #27,#B2 ;#0F syntax error
|
||
db #19,#9A ;#10 not number
|
||
db #1A,#2C,#85 ;#11 number too big
|
||
db #34,#19,#91 ;#12 operand not found
|
||
db #33,#34,#19,#91 ;#13 quit operand not found
|
||
db #2C,#17,#B5 ;#14 too many >
|
||
db #37,#38,#B6 ;#15 invalid type brackets
|
||
db #09,#19,#91 ;#16 command not found
|
||
db #39,#3A,#B4 ;#17 illegal value operand
|
||
db #37,#3B,#BC ;#18 invalid bank RAM
|
||
db #37,#3B,#BD ;#19 invalid bank ROM
|
||
db #09,#82 ;#1A command abandoned
|
||
db #3E,#3B,#BD ;#1B forbidden bank ROM
|
||
db #3E,#3B,#BC ;#1C forbidden bank RAM
|
||
db #2A,#31,#90 ;#1D start > _ç¨á«®_
|
||
db #7F,#01,#08 ;#1E print abandoned
|
||
db #7F,#00,#82
|
||
db #28,#2C,#96 ;#1F string too long
|
||
db #28,#19,#91 ;#20 string not found
|
||
db #18,#2B,#A8 ;#21 no search string
|
||
db #37,#1A,#87 ;#22 invalid number breackpoint
|
||
db #37,#41,#87 ;#23 invalid state breackpoint
|
||
db #37,#38,#87 ;#24 invalid type breackpoint
|
||
db #04,#40,#87 ;#25 bad address breackpoint
|
||
db #07,#AD ;#26 breackpoint undefined
|
||
db #46,#07,#C2 ;#27 curent breackpoint selections:
|
||
db #18,#40,#3B,#38,#41 ;#28 no address bank type state init count word
|
||
db #43,#44,#AF
|
||
db #45,#AD ;#29 *** undefined
|
||
db #04,#9E ;#2A bad opcode
|
||
db #10,#A2 ;#2B finish program
|
||
db #04,#B4 ;#2C bad operand
|
||
db #14,#22,#A6 ;#2D insufficient program space
|
||
db #22,#AD ;#2E program undefined
|
||
db #39,#2F,#9B ;#2F illegal word name
|
||
db #18,#8C ;#30 no definition
|
||
db #2F,#19,#95 ;#31 word not known
|
||
db #3E,#38,#AF ;#32 forbidden type word
|
||
db #47,#C8 ;#33 analyser definitions:
|
||
db #26,#49,#4A,#25,#80 ;#34 space left for stack _ç¨á«®_
|
||
db #CB ;#35 bytes
|
||
db #25,#19,#8B ;#36 stack not empty
|
||
db #41,#1C,#A5 ;#37 state of stack
|
||
db #47,#B2 ;#38 analyser error
|
||
db #20,#1C,#25,#A6 ;#39 out of stack space
|
||
db #25,#8B ;#3A stack empty
|
||
db #2E,#94 ;#3B workspace insufficient
|
||
db #AE ;#3C workspace
|
||
db #4C,#22,#19,#91 ;#3D Professional program not found
|
||
db #15,#D0 ;#3E known disk
|
||
db #50,#19,#CD ;#3F disk not TRDOS
|
||
db #0D,#08,#B0 ;#40 devision by zero
|
||
db #0E,#01,#80 ;#41 failed at _ç¨á«®_
|
||
db #2C,#12,#86 ;#42 too few blocks
|
||
db #0A,#C0 ;#43 enter address
|
||
db #0E,#D0 ;#44 failed disk
|
||
db #37,#0F,#9B ;#45 invalid file name
|
||
db #04,#44,#1C,#8F ;#46 bad count of file
|
||
db #0F,#03,#CE ;#47 file not exist
|
||
db #0F,#19,#91 ;#48 file not found
|
||
db #50,#18,#A6 ;#49 disk no space
|
||
db #39,#0F,#B8 ;#4A illegal file type
|
||
db #D0 ;#4B disk
|
||
db #C7 ;#4C analyser
|
||
db #87 ;#4D breackpoint
|
||
db #D2 ;#4E execution
|
||
db #D3 ;#4F configuration
|
||
db #4F,#32,#80 ;#50 R/W error _ç¨á«®_
|
||
db #54,#D5 ;#51 memory control
|
||
db #D0 ;#52 disk
|
||
db #D1 ;#53 other
|
||
db #2D,#8F ;#54 undefined file
|
||
db #39,#7F,#01,#38 ;#55 illegal fromat file
|
||
db #7F,#00,#8F
|
||
db #56,#50,#19,#91 ;#56 hard disk not found
|
||
db #56,#50,#4F,#32,#80 ;#57 hard disk R/W error _ç¨á«®_
|
||
db #56,#50,#AD ;#58 hard disk undefined
|
||
db #56,#50,#91 ;#59 hard disk found
|
||
db #58,#57,#B2 ;#5A CMOS checksum error
|
||
db #58,#19,#91 ;#5B CMOS not found
|
||
db #00,#4B,#58,#91 ;#5C _ç¨á«®_ bytes CMOS found
|
||
db #59,#DA ;#5D boot record
|
||
db #3D,#D0 ;#5E ROM disk
|
||
db #C2 ;#5F selections:
|
||
db #5B,#19,#91 ;#60 busy not found
|
||
db #56,#50,#19,#DC ;#61 hard disk not ready
|
||
db #56,#50,#7F,#01,#1D ;#62 hard disk data not ready
|
||
db #7F,#00,#19,#DC
|
||
db #37,#7F,#02,#14,#95 ;#63 invalid partition manager
|
||
db #7F,#02,#9E ;#64 select
|
||
db #5D,#9B ;#65 duplicate name
|
||
db #7F,#02,#14,#7F,#00 ;#66 partition not found
|
||
db #19,#91
|
||
db #7F,#02,#14,#7F,#00 ;#67 partition undefined
|
||
db #AD
|
||
db #7F,#01,#1D,#7F,#00 ;#68 data CRC error
|
||
db #5E,#B2
|
||
db #7F,#02,#2C,#7F,#00 ;#69 NVRAM R/W error
|
||
db #4F,#B2
|
||
db #C5 ;#6A ***
|
||
|
||
;€„<E282AC>…‘: #1A40 ¯ ã§ á ¨¤¨ª 樥© ¡®à¤îॠ¨ ¯¥ç âì ¤ âë ¨ ¢à¥¬¥¨ ¢ ®ª¥ ¬®¨â®à
|
||
x1A40 ld bc,#0000
|
||
x1A43 ld a,c
|
||
out (#FE),a
|
||
dec bc
|
||
ld a,c
|
||
or b
|
||
jr nz,x1A43
|
||
pop bc
|
||
|
||
;€„<E282AC>…‘: #1A4C ¯¥ç âì ¤ âë ¨ ¢à¥¬¥¨ ¢ ®ª¥ ¬®¨â®à
|
||
;
|
||
x1A4C bit 3,(iy+#27)
|
||
ret z ;¨¤¨ª æ¨ï ¢à¥¬¥¨ ®â«îç¥
|
||
ld hl,(xE3B7) ; ¤à¥á ¤¥áªà¨¯â®à ⥪ã饣® ®ª
|
||
ld de,xE0C9
|
||
or a
|
||
sbc hl,de
|
||
ret nz ;®â®¡à ¦¥® ®ª® ¢ ª®â®à®¬ ¥«ì§ï ¢ë¢®¤¨âì ¢à¥¬ï
|
||
ld hl,xDB69 ;¡ãä¥à ¤«ï çâ¥¨ï ¤ âë ¨ ¢à¥¬¥¨ ¢ ä®à¬ ⥠ASCII
|
||
push hl
|
||
ld d,%11111010
|
||
call x1AAF ;ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
ld hl,(xE3BC) ;¯¥à¢ë© ᢮¡®¤ë© ¤à¥á ¢ ¡ãä¥à¥ ¯¥ç â¨
|
||
ld (hl)," "
|
||
inc hl
|
||
ld d,%10100000
|
||
call x1B21 ;ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
ld hl,(xE3BC) ;¯¥à¢ë© ᢮¡®¤ë© ¤à¥á ¢ ¡ãä¥à¥ ¯¥ç â¨
|
||
pop bc
|
||
or a
|
||
sbc hl,bc
|
||
ld b,l ;¤«¨ áâப¨
|
||
ld hl,(xE0C9)
|
||
push hl ;§ ¯®¬¨¬ ª®®à¤¨ âë ªãàá®à ¢ ®ª¥
|
||
ld a,(xE0C9+#06) ;xE0CF
|
||
push af ;§ ¯®¬¨¬ âਡãâë ®ª
|
||
ld hl,#0017
|
||
ld (xE0C9),hl ;ª®®à¤¨ âë ¯¥ç ⨠¢à¥¬¥¨
|
||
ld a,(xE111) ; âਡãâë ¯¥ç â¨
|
||
dec e ;¥á«¨ ¢®áªà¥á¥ì¥, ¢ë¢®¤¨¬ ªà áë¬ æ¢¥â®¬
|
||
inc e
|
||
jr nz,x1A8E
|
||
ld a,%00101010
|
||
x1A8E ld (xE0C9+#06),a ; âਡãâë ¯¥ç â¨
|
||
rst #20
|
||
db #84 ;¢ë¢®¤ á ¢ëà ¢¨¢ ¨¥¬
|
||
ld hl,xDB69 ; ¤à¥á áâப¨
|
||
rst #30
|
||
dw rom2_x15B3 ;¯¥ç âì á®®¡é¥¨ï ¨§ hl ¤«¨®© b
|
||
db #02
|
||
rst #20
|
||
db " "
|
||
db #86 ;¢ë஢塞 ¯® ¯à ¢®¬ã ªà î
|
||
pop af
|
||
ld (xE0C9+#06),a ;¢®ááâ ®¢¨¬ âਡãâë
|
||
pop hl
|
||
ld (xE0C9),hl ;¢®ááâ ®¢¨¬ ª®®à¤¨ âë ªãàá®à
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1AA6 ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;¢å: 0-4,d ¡ ©â à §¤¥«¨â¥«ì +#20
|
||
; 5,d,=1 ¬®¦® ¢ë¢®¤¨âì ᥪã¤ë
|
||
; 6,d,=1 ¬®¦® ¢ë¢®¤¨âì ¬¨ãâë
|
||
; 7,d,=1 ¬®¦® ¢ë¢®¤¨âì ç áë
|
||
x1AA6 call x1AEC ;ãáâ ®¢ª ¯¥à¥¬¥ëå ¤«ï ¯¥ç ⨠¤ âë ¨ ¢à¥¬¥¨
|
||
ret c ;CMOS ®âáãâáâ¢ã¥â
|
||
call x1C67 ;ç⥨¥ ¨§ CMOS ¢à¥¬¥¨ ¨ ¤ âë
|
||
jr x1AB2
|
||
|
||
;€„<E282AC>…‘: #1AAF ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;¢å: 0-4,d ¡ ©â à §¤¥«¨â¥«ì +#20
|
||
; 5,d,=1 ¬®¦® ¢ë¢®¤¨âì ᥪã¤ë
|
||
; 6,d,=1 ¬®¦® ¢ë¢®¤¨âì ¬¨ãâë
|
||
; 7,d,=1 ¬®¦® ¢ë¢®¤¨âì ç áë
|
||
; hl - ¤à¥á ¡ãä¥à
|
||
;
|
||
x1AAF call x1AF5
|
||
x1AB2 ld hl,xDFF6+2
|
||
bit 7,d
|
||
jr z,x1ABF ;ç áë ¥ ¢ë¢®¤¨¬
|
||
call x1ADE ;ç á ¢ áâபã
|
||
call x1AD7 ;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
x1ABF dec hl
|
||
bit 6,d
|
||
jr z,x1AC7 ;¬¨ãâë ¥ ¢ë¢®¤¨¬
|
||
call x1ADE ;¬¨ãâë ¢ áâபã
|
||
x1AC7 dec hl
|
||
bit 5,d
|
||
jr z,x1AD2 ;ᥪã¤ë ¥ ¢ë¢®¤¨¬
|
||
call x1AD7 ;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
call x1ADE ;ᥪã¤ë ¢ áâபã
|
||
x1AD2 res 6,(iy+9)
|
||
ret
|
||
;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
x1AD7 ld a,d
|
||
and #1F
|
||
or #20
|
||
rst #10
|
||
ret
|
||
;¯à¥®¡à §®¢ ¨¥ ç á /¬¨ãâë/ᥪã¤ë ¢ áâபã
|
||
x1ADE push de
|
||
ld c,(hl)
|
||
ld b,#00 ;ç á
|
||
ld (iy+7),#02
|
||
rst #30
|
||
dw rom2_x1673 ;¯à¥®¡à §®¢ ¨¥ ç¨á« ¢ áâபã
|
||
db %00000010
|
||
pop de
|
||
ret
|
||
;ãáâ ®¢ª ¯¥à¥¬¥ëå ¤«ï ¯¥ç ⨠¤ âë ¨ ¢à¥¬¥¨
|
||
;¢ëå: cy=1 CMOS ®âáãâáâ¢ã¥â
|
||
x1AEC bit 6,(iy+#1A)
|
||
scf
|
||
ret z ;CMOS ®âáãâáâ¢ã¥â
|
||
ccf
|
||
jr x1AFC
|
||
x1AF5 ld (xE3BC),hl
|
||
set 6,(iy+9) ;¯¥ç âì ¢ ¡ãä¥à
|
||
x1AFC ld (iy+#08),#30 ;ª®¤ ¢¥¤ã饣® ®«ï
|
||
ld (iy+#10),#0A ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥¨ï à §à冷¢ ç¨á«
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1B05 ç⥨¥ ¤ âë ¨§ ¡ãä¥à ¨ à áç¥â ®¬¥à ¤ï ¥¤¥«¨
|
||
;¢ëå: c ¤¥ì
|
||
; b ¬¥áïæ
|
||
; a,e £®¤
|
||
; l ®¬¥à ¤ï ¥¤¥«¨ (0 - ‚á, 1 - <20> ¨ â.¤.)
|
||
;
|
||
x1B05 ld bc,(xDFF9)
|
||
ld a,(xDFFB)
|
||
push de
|
||
push af
|
||
push bc
|
||
ld e,a
|
||
call x1BAC
|
||
pop bc
|
||
pop af
|
||
pop de
|
||
ld e,a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1B18 ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;¢å: 0-4,d ¡ ©â à §¤¥«¨â¥«ì +#20
|
||
; 5,d,=1 ¢ë¢®¤¨âì ¬¥áïæ á«®¢®¬ ¨ ¯¥à¥¤ £®¤®¬ ¤®¡ ¢«ïâì "19"
|
||
; 6,d,=1 áâ ¢¨âì ᨬ¢®« 0 ¯¥à¥¤ ç¨á«®¬
|
||
; 7,d,=1 ¢ë¢®¤¨âì ¤¥ì ¥¤¥«¨
|
||
x1B18 call x1AEC ;ãáâ ®¢ª ¯¥à¥¬¥ëå ¤«ï ¯¥ç ⨠¤ âë ¨ ¢à¥¬¥¨
|
||
ret c ;CMOS ®âáãâáâ¢ã¥â
|
||
call x1C67 ;ç⥨¥ ¨§ CMOS ¢à¥¬¥¨ ¨ ¤ âë
|
||
jr x1B24
|
||
|
||
;€„<E282AC>…‘: #1B21 ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
;¢å: 0-4,d ¡ ©â à §¤¥«¨â¥«ì +#20
|
||
; 5,d,=1 ¢ë¢®¤¨âì ¬¥áïæ á«®¢®¬ ¨ ¯¥à¥¤ £®¤®¬ ¤®¡ ¢«ïâì "19"
|
||
; 6,d,=1 áâ ¢¨âì ᨬ¢®« 0 ¯¥à¥¤ ç¨á«®¬
|
||
; 7,d,=1 ¢ë¢®¤¨âì ¤¥ì ¥¤¥«¨
|
||
; hl - ¤à¥á ¡ãä¥à
|
||
;
|
||
x1B21 call x1AF5
|
||
x1B24 call x1B05 ;ç⥨¥ ¤ âë ¨§ ¡ãä¥à ¨ à áç¥â ®¬¥à ¤ï ¥¤¥«¨
|
||
push af
|
||
push bc
|
||
bit 7,d
|
||
jr z,x1B39 ;¤¥ì ¥¤¥«¨ ¥ ¢ë¢®¤¨¬
|
||
ld a,l ;¤¥ì ¥¤¥«¨ ¢ áâபã
|
||
ld e,l
|
||
ld hl,rom2_x3F0A ;<3B> §¢ ¨ï ¤¥© ¥¤¥«¨
|
||
rst #30
|
||
dw rom2_x15D0
|
||
db %00000010
|
||
call x1AD7 ;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
x1B39 pop hl
|
||
ld c,l ;¤¥ì
|
||
push hl
|
||
ld b,#00
|
||
ld a,#01
|
||
bit 6,d
|
||
jr z,x1B45 ;¢¥¤ã騩 0 ¥ áâ ¢¨âì
|
||
inc a
|
||
x1B45 ld (iy+7),a ;¬¨¨¬ã¬ à §à冷¢ ¢ ç¨á«¥
|
||
push de
|
||
rst #30
|
||
dw rom2_x1673 ;¯à¥®¡à §®¢ ¨¥ ç¨á« ¢ áâபã
|
||
db %00000010
|
||
pop de
|
||
call x1AD7 ;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
pop af ;¬¥áïæ
|
||
bit 5,d
|
||
jr z,x1B60 ;¢ë¢®¤¨¬ æ¨äன
|
||
dec a ;¢ë¢®¤¨¬ á«®¢®¬
|
||
ld hl,rom2_x3EE6 ; §¢ ¨ï ¬¥áï楢
|
||
rst #30
|
||
dw rom2_x15D0
|
||
db %00000010
|
||
jr x1B6D
|
||
x1B60 ld c,a
|
||
ld b,0
|
||
ld (iy+7),#02
|
||
push de
|
||
rst #30
|
||
dw rom2_x1673 ;¯à¥®¡à §®¢ ¨¥ ç¨á« ¢ áâபã
|
||
db %00000010
|
||
pop de
|
||
x1B6D call x1AD7 ;¢ë¢®¤ à §¤¥«¨â¥«ï ¢ áâபã
|
||
pop af
|
||
ld c,a
|
||
bit 5,d
|
||
jr z,x1B82 ;£®¤ ¢ë¢®¤¨¬ ¤¢ã¬ï æ¨äà ¬¨
|
||
cp 80
|
||
jr nc,x1B7F
|
||
rst #20
|
||
dc "20"
|
||
jr x1B82
|
||
x1B7F rst #20
|
||
dc "19"
|
||
x1B82 ld b,#00
|
||
ld (iy+7),#02
|
||
push de
|
||
rst #30
|
||
dw rom2_x1673 ;¯à¥®¡à §®¢ ¨¥ ç¨á« ¢ áâபã
|
||
db %00000010
|
||
pop de
|
||
res 6,(iy+9)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1B93 â ¡«¨æ ¤«ï ¢ëç¨á«¥¨ï ª®¤ ¬¥áïæ
|
||
x1B93 db 2 ;¬ àâ
|
||
db 5 ; ¯à¥«ì
|
||
db 7 ;¬ ©
|
||
db 10 ;¨îì
|
||
db 12 ;¨î«ì
|
||
db 15 ; ¢£ãáâ
|
||
db 18 ;á¥âï¡àì
|
||
db 20 ;®ªâï¡àì
|
||
db 23 ;®ï¡àì
|
||
db 25 ;¤¥ª ¡àì
|
||
db 28 ;ï¢ àì
|
||
db 31 ;ä¥¢à «ì
|
||
x1B9F db 33 ;
|
||
;ª®«¨ç¥á⢮ ¤¥© ¢ ¬¥áïæ å
|
||
db 31 ;ï¢ àì
|
||
db 28 ;ä¥¢à «ì
|
||
db 31 ;¬ àâ
|
||
db 30 ; ¯à¥«ì
|
||
db 31 ;¬ ©
|
||
db 30 ;¨îì
|
||
db 31 ;¨î«ì
|
||
db 31 ; ¢£ãáâ
|
||
db 30 ;á¥âï¡àì
|
||
db 31 ;®ªâï¡àì
|
||
db 30 ;®ï¡àì
|
||
db 31 ;¤¥ª ¡àì
|
||
|
||
;€„<E282AC>…‘: #1BAC à áç¥â ®¬¥à ¤ï ¥¤¥«¨
|
||
;¢å: c ¤¥ì
|
||
; b ¬¥áïæ
|
||
; e £®¤
|
||
;¢ëå: l ®¬¥à ¤ï ¥¤¥«¨ (0 - ‚á, 1 - <20> ¨ â.¤.)
|
||
;
|
||
x1BAC exx
|
||
push hl
|
||
push de
|
||
push bc
|
||
exx
|
||
ld a,e ;a,de - £®¤
|
||
ld d,#00
|
||
ld hl,1900
|
||
add hl,de
|
||
cp 80
|
||
jr nc,x1BC0 ;£®¤ >=80
|
||
ld de,100
|
||
add hl,de ;hl ⥪ã騩 £®¤ ¢ ä®à¬ ⥠yyyy
|
||
x1BC0 ld a,b ;®¯à¥¤¥«¥¨¥ ª®¤ ¬¥áïæ
|
||
sub 3
|
||
jr nc,x1BC8
|
||
add a,12
|
||
dec hl
|
||
x1BC8 ld de,x1B93
|
||
add a,e
|
||
ld e,a
|
||
jr nc,x1BD0
|
||
inc d
|
||
x1BD0 ld a,(de) ;a ª®¤ ¬¥áïæ
|
||
add a,c ;+¤¥ì
|
||
push hl ;£®¤
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x1BD8
|
||
inc h
|
||
x1BD8 ex (sp),hl
|
||
push hl
|
||
srl h
|
||
rr l
|
||
srl h
|
||
rr l
|
||
ex (sp),hl
|
||
push hl
|
||
ld de,100
|
||
rst #30
|
||
dw rom2_x0E73 ;bc=hl/de
|
||
db %00000010
|
||
pop hl ;bc=£®¤/100
|
||
push bc
|
||
ld de,400
|
||
rst #30
|
||
dw rom2_x0E73 ;bc=hl/de
|
||
db %00000010
|
||
pop de ;bc=£®¤/400
|
||
pop hl
|
||
add hl,bc
|
||
or a
|
||
sbc hl,de ;hl £®¤/4 + £®¤/400 - £®¤/100
|
||
pop bc ;bc ¤¥ì + (31 * ¬¥áïæ)/12 + £®¤
|
||
add hl,bc
|
||
ld de,#0000
|
||
exx
|
||
ld bc,#0007
|
||
rst #30
|
||
dw rom7_x0F5D ;l ®áâ ⮪ ®â ¤¥«¥¨ï
|
||
db %00000111
|
||
exx
|
||
pop bc
|
||
pop de
|
||
pop hl
|
||
exx
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1C0D à ¡®â á ¬¨ªà®á奬®© CMOS (rst 8: db #89)
|
||
;¢å: d - ª®¤ ®¯¥à 樨: 7,=1/0 § ¯¨á âì/áç¨â âì
|
||
; 6,=1/0 ç¨â âì ¢ ¡ãä¥à/⮫쪮 ¢ ॣ¨áâàë
|
||
; 5,=0 =0 ç¨â âì ¢ áâபã ASCII
|
||
; 0,=1/0 ¤ â /¢à¥¬ï
|
||
; e - ¯à¨ ç⥨¨ ¢ ASCII ä®à¬ â ¯¥à¥¢®¤
|
||
; 0-4,e ¡ ©â à §¤¥«¨â¥«ì +#20
|
||
; 5,e,=1 ¢ë¢®¤¨âì ¬¥áïæ á«®¢®¬ ¨ ¯¥à¥¤ £®¤®¬ ¤®¡ ¢«ïâì "19"
|
||
; 6,e,=1 áâ ¢¨âì ᨬ¢®« 0 ¯¥à¥¤ ç¨á«®¬
|
||
; 7,e,=1 ¢ë¢®¤¨âì ¤¥ì ¥¤¥«¨
|
||
; 5,e,=1 ¬®¦® ¢ë¢®¤¨âì ᥪã¤ë
|
||
; 6,e,=1 ¬®¦® ¢ë¢®¤¨âì ¬¨ãâë
|
||
; 7,e,=1 ¬®¦® ¢ë¢®¤¨âì ç áë
|
||
; hl - ¤à¥á ¡ãä¥à (¥á«¨ ¡¨â 6,d =1)
|
||
; c - ᥪã¤ë/ç¨á«®
|
||
; b - ¬¨ãâë/¬¥áïæ
|
||
; e - ç áë/£®¤
|
||
;¢ëå: cy=1 - ¥á«¨ ¬¨ªà®á奬ë CMOS ¥â ¨«¨ § ¤ ¥¢¥àë© ä®à¬ â § ¯à®á
|
||
; hl - áâப ⥪áâ ASCIZ (¥á«¨ ¡¨â 6,d =1)
|
||
; c - ᥪã¤ë/ç¨á«®
|
||
; b - ¬¨ãâë/¬¥áïæ
|
||
; e - ç áë/£®¤
|
||
; l - ¤¥ì ¥¤¥«¨
|
||
;
|
||
x1C0D bit 6,(iy+#1A)
|
||
scf
|
||
ret z ;CMOS ®âáãâáâ¢ã¥â
|
||
bit 7,d
|
||
jr nz,x1C4A ;§ ¯¨áì ¢à¥¬¥¨ ¨«¨ ¤ âë ¢ CMOS
|
||
bit 6,d
|
||
jr z,x1C34 ;ç⥨¥ ¢ ॣ¨áâàë ¨§ CMOS ¢à¥¬¥¨/¤ âë
|
||
bit 5,d
|
||
jr nz,x1C2E ;ç⥨¥ ¢ ¡ãä¥à ¢à¥¬¥¨ ¨ ¤ âë
|
||
bit 0,d ;ç¨â ¥¬ ¢ ä®à¬ ⥠ASCII
|
||
ld d,e
|
||
jr nz,x1C29 ;ç¨â ¥¬ ¤ âã ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
call x1AAF ;ç¨â ¥¬ ¢à¥¬ï ¢ áâப㠢 ä®à¬ ⥠ASCII
|
||
or a
|
||
ret
|
||
x1C29 call x1B21
|
||
or a
|
||
ret
|
||
;ç⥨¥ ¢à¥¬¥¨ ¨ ¤ âë ¨§ CMOS ¢ ¡ãä¥à
|
||
x1C2E rst #30
|
||
dw rom7_x1F93
|
||
db %00000111
|
||
or a
|
||
ret
|
||
;ç⥨¥ ¨§ CMOS ¢à¥¥¨ ¨ ¤ âë
|
||
x1C34 call x1C67
|
||
bit 0,d
|
||
jr z,x1C40 ;¢à¥¬ï
|
||
call x1B05 ;¤ â
|
||
or a
|
||
ret
|
||
x1C40 ld hl,xDFF6
|
||
ld c,(hl)
|
||
inc hl
|
||
ld b,(hl)
|
||
inc hl
|
||
ld e,(hl)
|
||
or a
|
||
ret
|
||
;§ ¯¨áì ¢à¥¬¥¨ ¨«¨ ¤ âë ¢ CMOS
|
||
x1C4A call x1C67 ;ç⥨¥ ¨§ CMOS ¢à¥¥¨ ¨ ¤ âë
|
||
bit 0,d
|
||
jr nz,x1C62 ;íâ® ¤ â
|
||
ld hl,xDFF6 ; ¤à¥á ¢à¥¬¥¨
|
||
x1C54 ld (hl),c
|
||
inc hl
|
||
ld (hl),b
|
||
inc hl
|
||
ld (hl),e
|
||
ld hl,xDFF6 ;§ ¯¨áì ¢à¥¬¥¨ ¨ ¤ âë ¢ CMOS
|
||
rst #30
|
||
dw rom7_x1FB2
|
||
db %00000111
|
||
or a
|
||
ret
|
||
x1C62 ld hl,xDFF9 ; ¤à¥á ¤ âë
|
||
jr x1C54
|
||
;ç⥨¥ ¨§ CMOS ¢à¥¬¥¨ ¨ ¤ âë
|
||
x1C67 ld hl,xDFF6
|
||
push bc
|
||
push de
|
||
rst #30
|
||
dw rom7_x1F93
|
||
db %00000111
|
||
pop de
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1C73 ¢¢®¤ ⥪á⮢®© áâப¨ ¢ ¨¦¥© áâப¥ íªà
|
||
;¢å: 7,a =1/0 âਡãâë bright 1, paper 3, ink 4/bright 0, paper 5, ink 2
|
||
; 6-0,a - ®¬¥à á®®¡é¥¨ï ¨§ ¡«®ª 0
|
||
; a =#00 ¯à®¤®«¦¥¨¥ ¢¢®¤
|
||
;¢ëå: hl = xDE17 ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
; a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
; cy=0 ¢ë室 ¯® enter
|
||
; =1 ¢ë室 ¯® ¤à㣮© ª®¬¡¨ 樨
|
||
;
|
||
x1C73 rst #30
|
||
dw rom2_x3014 ;ix = ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à : ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
db #02
|
||
rlc a
|
||
jr z,x1CB3 ;¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
call x1C84 ;¨¨æ¨ «¨§ æ¨ï ®ª ¢¢®¤
|
||
call x1CB8 ;¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
ret c ;®â¬¥ ¢¢®¤
|
||
ld a,#0C ;á®®¡é¥¨¥ _Working ...
|
||
|
||
;€„<E282AC>…‘: #1C84 ¨¨æ¨ «¨§ æ¨ï ®ª ¢¢®¤
|
||
;¢å: 0,a =1/0 âਡãâë bright 1, paper 3, ink 4/bright 0, paper 5, ink 2
|
||
; 7-1,a - ®¬¥à á®®¡é¥¨ï ¨§ ¡«®ª 0
|
||
; cy=1 á ®ç¨á⪮© ¡ãä¥à ¢¢®¤
|
||
x1C84 push af
|
||
ld hl,xDE17 ;¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
ld (xDE15),hl
|
||
call c,x1DD6 ;®ç¨á⪠¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
rst #30
|
||
dw rom2_x2A5E ;®ç¨á⪠⥪ã饣® ®ª
|
||
db #02
|
||
pop af
|
||
push af
|
||
srl a
|
||
ld hl,#5AC0 ; âਡãâë ¨ä®à¬ 樮®© áâப¨ íªà ¥
|
||
ld e,l
|
||
ld d,h
|
||
ld (hl),#29 ;bright 0, paper 5, ink 1
|
||
cp #0A
|
||
jr c,x1CA3
|
||
ld (hl),#2A ;bright 0, paper 5, ink 2
|
||
x1CA3 inc de
|
||
ld bc,#001F
|
||
ldir
|
||
inc (ix+1)
|
||
ld b,a
|
||
rst #08
|
||
inc (ix+0)
|
||
pop af
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1CB3 ¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
;¢ëå: hl = xDE17 ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
; a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
; cy=0 ¢ë室 ¯® enter
|
||
; =1 ¢ë室 ¯® ¤à㣮© ª®¬¡¨ 樨
|
||
;
|
||
x1CB3 call x1DEC ;㤠«¥¨¥ ª®¤ ¢®§¢à â ª à¥âª¨ ¨§ áâப¨
|
||
jr x1CC7
|
||
|
||
;€„<E282AC>…‘: #1CB8 ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
;¢ëå: hl = xDE17 ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
; a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
; cy=0 ¢ë室 ¯® enter
|
||
; =1 ¢ë室 ¯® ¤à㣮© ª®¬¡¨ 樨
|
||
;
|
||
x1CB8 call x1DEC ;㤠«¥¨¥ ª®¤ ¢®§¢à â ª à¥âª¨ ¨§ áâப¨ ¢¢®¤
|
||
ld hl,xDE17
|
||
ld (xDE15),hl
|
||
call x1D70 ;¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
x1CC4 call x1D98 ;¯¥ç âì ¢¢®¤¨¬®© áâப¨ íªà ¥
|
||
x1CC7 ld hl,x1CC4 ;âãâ § 横«¨¬
|
||
push hl
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
rst #30
|
||
dw rom2_x28B8 ;¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬, ¥á«¨ 㦮 (6 ¯¨ªá¥«¥© ᨬ¢®«)
|
||
db #02
|
||
x1CD3 call x1033 ;¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ¦ â¨ï ª« ¢¨è¨
|
||
db #85 ;cs+5
|
||
dw x1D5A ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢®¤¨¬®© áâப¥ ¢«¥¢®
|
||
db #83 ;cs+8
|
||
dw x1D64 ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢®¤¨¬®© áâப¥ ¢¯à ¢®
|
||
db #7F ;cs+0
|
||
dw x1D40 ;㤠«¥¨¥ ᨬ¢®« ¯¥à¥¤ ªãàá®à®¬ (delete)
|
||
db #0D ;enter / cs+1+m
|
||
dw x1D0D ;
|
||
db #86 ;cs+6 ¢¨§
|
||
dw x1E5B ;ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ ¯à¥¤¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
db #84 ;cs+7 ¢¢¥àå
|
||
dw x1EC0 ;ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ á«¥¤ãî饩 ¢¢¥¤¥®© áâப¨
|
||
db #1F ;ss+i
|
||
dw x1DC2 ;ᬥ ०¨¬ ¢áâ ¢ª¨/§ ¬¥ë ¯à¨ ¢¢®¤¥ áâப¨
|
||
db #FF
|
||
cp #20 ;a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
jr c,x1CF4 ;a=[#00..#1F]
|
||
cp #80
|
||
jr c,x1D10 ;a=[#20..#7F]
|
||
x1CF4 scf ;a - ¥¯¥ç âë© á¨¬¢®«
|
||
x1CF5 push af ;cy =1/0 ®â¬¥ /¢¢®¤
|
||
push de
|
||
push af
|
||
call nc,x1E2D ;á®åà ¥¨¥ ¢¢¥¤¥®© áâப¨ ¢ ¡ãä¥à¥ ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப
|
||
call x1D98 ;¯¥ç âì ¢¢¥¤¥®© áâப¨ íªà ¥
|
||
rst #30
|
||
dw rom2_x28B8 ;¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬, ¥á«¨ 㦮 (6 ¯¨ªá¥«¥© ᨬ¢®«)
|
||
db #02
|
||
pop af
|
||
call nc,x1D10 ;¤®¡ ¢«¥¨¥ ᨬ¢®« ¢ ¢¢®¤¨¬ãî áâபã
|
||
pop de
|
||
pop af
|
||
pop hl
|
||
ld hl,xDE17 ; ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
ret
|
||
x1D0D or a
|
||
jr x1CF5
|
||
|
||
;€„<E282AC>…‘: #1D10 ¤®¡ ¢«¥¨¥ ᨬ¢®« ¢ ¢¢®¤¨¬ãî áâபã
|
||
;¢å: a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
x1D10 ld e,a
|
||
call x1DB7 ;¯®«ã票¥ ¤à¥á ¯®¤ ªãàá®à®¬ ¢ ¡ãä¥à¥ áâப¨
|
||
ld d,(ix+#0B)
|
||
dec d
|
||
ld c,(ix+1)
|
||
ld a,d
|
||
cp c
|
||
jr z,x1D38 ;ªãàá®à ¢ ¯®á«¥¤¥© ¯®§¨æ¨¨. ¯à¥¤ã¯à¥¦¤ ¥¬ §¢®ª®¬
|
||
bit 1,(ix+#0D)
|
||
jr nz,x1D36 ;०¨¬ § ¬¥ë ᨬ¢®«®¢
|
||
x1D25 sub c ;à §¤¢¨£ ¥¬ áâபã
|
||
ld c,a
|
||
ld b,#00
|
||
push hl
|
||
add hl,bc
|
||
ld a,(hl)
|
||
push de
|
||
ld e,l
|
||
ld d,h
|
||
dec hl
|
||
lddr
|
||
pop de
|
||
pop hl
|
||
jr x1D38
|
||
x1D36 ld a," "
|
||
x1D38 ld (hl),e ;áâ ¢¨¬ ᨬ¢®«
|
||
cp " "
|
||
call nz,x1EEE ;§¢®®ª á ãáâ ®¢ª®© ¡®à¤îà
|
||
jr x1D64 ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢¢¥¤¥®© áâப¥ ¢¯à ¢®
|
||
|
||
;€„<E282AC>…‘: #1D40 㤠«¥¨¥ ᨬ¢®« ¯¥à¥¤ ªãàá®à®¬ (delete)
|
||
x1D40 call x1D5A ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢¢®¤¨¬®© áâப¥ ¢«¥¢®
|
||
ret z
|
||
call x1DB7 ;¯®«ã票¥ ¤à¥á ¯®¤ ªãàá®à®¬ ¢ ¡ãä¥à¥ áâப¨
|
||
ld a,(ix+#0B)
|
||
dec a
|
||
sub (ix+1)
|
||
ld c,a
|
||
ld e,l
|
||
ld d,h
|
||
inc hl
|
||
ld b,#00
|
||
ldir ;㤠«¥¨¥ ᨬ¢®« ¯®¤ ªãàá®à®¬
|
||
ld a," " ;¢ ª®¥æ áâப¨ ¤®¯¨è¥¬ ¯à®¡¥«
|
||
ld (de),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1D5A ¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢®¤¨¬®© áâப¥ ¢«¥¢®
|
||
;¢ëå: z - ªãàá®à ¢ ªà ©¥¬ ¯®«®¦¥¨¨
|
||
x1D5A ld a,(ix+1)
|
||
or a
|
||
ret z
|
||
dec (ix+1)
|
||
inc a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1D64 ¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢¢®¤¨¬®© áâப¥ ¢¯à ¢®
|
||
x1D64 ld a,(ix+1)
|
||
inc a
|
||
cp (ix+#0B)
|
||
ret nc
|
||
inc (ix+1)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1D70 ¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
x1D70 ld hl,(xDE15) ; ¤à¥á ¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
ld a,(ix+#0B) ;à §¬¥à ®ª ¢ ᨬ¢®« å
|
||
ld c,a
|
||
dec a ;ªà ©ïï ¯à ¢ ï ª®®à¤¨ â
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x1D7D
|
||
inc h ;hl ¤à¥á ª®æ áâப¨
|
||
x1D7D ld b,#00 ;bc ¤«¨ áப¨
|
||
ld a," "
|
||
x1D81 cpd ;¨é¥¬ ᨬ¢®« ¥ ¯à®¡¥«
|
||
jp po,x1D94 ;bc=0 ª®¥æ ¯®¨áª
|
||
jr z,x1D81
|
||
x1D88 ld a,(ix+#0B) ;â ª®© ᨬ¢®« ©¤¥
|
||
dec a
|
||
cp c
|
||
jr z,x1D90
|
||
inc c ;áâ ¢¨¬ ªãàá®à ¯®á«¥ í⮣® ᨬ¢®«
|
||
x1D90 ld (ix+1),c
|
||
ret
|
||
x1D94 jr z,x1D90 ;¥á«¨ ¢á¥-â ª¨ ©¤¥ ¯à®¡¥«
|
||
jr x1D88
|
||
|
||
;€„<E282AC>…‘: #1D98 ¯¥ç âì ¢¢®¤¨¬®© áâப¨ íªà ¥
|
||
x1D98 rst #30
|
||
dw rom2_x28B8 ;¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬, ¥á«¨ 㦮 (6 ¯¨ªá¥«¥© ᨬ¢®«)
|
||
db #02
|
||
ld a,(ix+1) ;á®åà ¨¬ ª®®à¤¨ âã X ªãàá®à
|
||
push af
|
||
ld hl,(xDE15) ; ç «® ¢¢®¤¨¬®© áâப¨
|
||
ld b,(ix+#0B) ;¤«¨ áâப¨
|
||
ld (ix+1),#00
|
||
rst #30
|
||
dw rom2_x15B3 ;¯¥ç âì á®®¡é¥¨ï ¨§ hl ¤«¨®© b
|
||
db #02
|
||
pop af
|
||
ld (ix+1),a ;¢®ááâ ®¢¨¬ ª®®à¤¨ âã X ªãàá®à
|
||
rst #30
|
||
dw rom2_x28E8 ;¯¥ç âì ªãàá®à ¢ ®ª¥
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1DB7 ¯®«ã票¥ ¤à¥á ¯®¤ ªãàá®à®¬ ¢ ¡ãä¥à¥ áâப¨
|
||
;¢ëå: hl - ¤à¥á ¢ ¡ãä¥à¥
|
||
x1DB7 ld a,(ix+1)
|
||
ld hl,(xDE15)
|
||
add a,l
|
||
ld l,a
|
||
ret nc
|
||
inc h
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1DC2 ᬥ ०¨¬ ¢áâ ¢ª¨/§ ¬¥ë ¯à¨ ¢¢®¤¥ áâப¨
|
||
;
|
||
x1DC2 ld a,(ix+#0D)
|
||
xor %00000010
|
||
ld (ix+#0D),a
|
||
bit 1,a
|
||
ld a,#DB
|
||
jr z,x1DD2
|
||
ld a,#DC
|
||
x1DD2 ld (ix+#0C),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1DD6 ®ç¨á⪠¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
x1DD6 ld hl,(xDE15)
|
||
ld c,(ix+#0B)
|
||
ld (hl)," "
|
||
dec c
|
||
ret z
|
||
ld b,#00
|
||
ld e,l
|
||
ld d,h
|
||
inc de
|
||
ldir
|
||
ld (ix+1),#00
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1DEC 㤠«¥¨¥ ª®¤ ¢®§¢à â ª à¥âª¨ ¨§ áâப¨
|
||
x1DEC ld a,#0A
|
||
ld (xDE14),a
|
||
ld a,(ix+1) ;á®åà ¨¬ ª®®à¤¨ âã X
|
||
push af
|
||
call x1D70 ;¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
ld a,(ix+1)
|
||
inc a
|
||
cp (ix+#0B)
|
||
jr z,x1E04 ;ªãàá®à ¯®á«¥¤¥¬ ᨬ¢®«¥ áâப¨
|
||
call x1D5A ;¯¥à¥¬¥é¥¨¥ ªãàá®à ¢ ¢®¤¨¬®© áâப¥ ¢«¥¢®
|
||
x1E04 call x1DB7 ;¯®«ã票¥ ¤à¥á ¯®¤ ªãàá®à®¬ ¢ ¡ãä¥à¥ áâப¨
|
||
ld a,(hl) ;enter § ¬¥¨¬ ¯à®¡¥«
|
||
cp #0D
|
||
jr nz,x1E0E
|
||
ld (hl)," "
|
||
x1E0E pop af
|
||
ld (ix+1),a ;¢®ááâ ®¢¨¬ ª®®à¤¨ âã ªãàá®à
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1E13 ¯®¬¥é¥¨¥ ᨬ¢®« ¢ áâப㠨 ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ áâப
|
||
;¢å: hl - ¤à¥á ¢ ¡ãä¥à¥
|
||
; de - ¤à¥á ª®æ ¡ãä¥à
|
||
;¢ëå: hl - ®ç¥à¥¤®© ¤à¥á ¢ ¡ãä¥à¥
|
||
x1E13 ld (ix+0),a
|
||
inc ix
|
||
|
||
;€„<E282AC>…‘: #1E18 横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
;¢å: hl - ¤à¥á ¢ ¡ãä¥à¥
|
||
; de - ¤à¥á ª®æ ¡ãä¥à
|
||
;¢ëå: hl - ®ç¥à¥¤®© ¤à¥á ¢ ¡ãä¥à¥
|
||
x1E18 inc hl
|
||
or a
|
||
sbc hl,de
|
||
add hl,de
|
||
ret nz
|
||
ld hl,xDE42
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1E22 ¯®«ã祬 ¤à¥á ª®æ ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
;¢å: hl - ¤à¥á ª®æ ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
; de - ¤à¥á ç « ¡ãä¥à
|
||
;¢ëå: hl - ¤à¥á ¯®á«¥¤¥£® ᨬ¢®« ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
x1E22 or a
|
||
sbc hl,de
|
||
add hl,de
|
||
jr nz,x1E2B
|
||
ld hl,xDFD2
|
||
x1E2B dec hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1E2D á®åà ¥¨¥ ¢¢¥¤¥®© áâப¨ ¢ ¡ãä¥à¥ ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப
|
||
x1E2D call x1D70 ;¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
ld b,(ix+1) ;¤«¨ ¢¢¥¤¥®© áâப¨
|
||
ld a,b
|
||
or a
|
||
ret z ;¯ãáâ ï áâப
|
||
push ix
|
||
ld ix,(xDE15) ; ¤à¥á ç « ¢¢¥¤¥®© áâப¨
|
||
ld hl,(xE035)
|
||
ld de,xDFD2 ;ª®¥æ ¡ãä¥à ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப
|
||
x1E42 ld a,(ix+0) ;á®åà ¥¨¥ áâப¨ ¢ ¡ãä¥à¥ ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப
|
||
inc ix
|
||
ld (hl),a
|
||
call x1E18 ;横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
djnz x1E42
|
||
pop ix
|
||
ld (hl),#00 ;¬ àª¥à ª®æ ¢¢¥¤¥®© áâப¨
|
||
call x1E18 ;横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
ld (xE035),hl
|
||
ld (xE037),hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1E5B ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ ¯à¥¤¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
;¢å: a - ª®¤ ¦ ⮩ ª« ¢¨è¨ #86
|
||
;
|
||
x1E5B ld bc,(xDE14) ;
|
||
cp c ;
|
||
ld b,#02 ;
|
||
jr nz,x1E65 ;
|
||
dec b ;
|
||
x1E65 ld (xDE14),a ;
|
||
x1E68 ld hl,(xE037)
|
||
ld de,xDE42
|
||
call x1E22 ;¯®«ã祬 ¤à¥á ª®æ ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
x1E71 call x1E22 ;¨é¥¬ ç «® áâப¨
|
||
ld a,(hl)
|
||
or a
|
||
jr nz,x1E71
|
||
ld de,xDFD2
|
||
call x1E18 ;横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
call x1EE1 ;¯à®¢¥àª ᯨ᪠«¨ç¨¥ ¢¢¥¤¥ëå áâப
|
||
ld a,(hl)
|
||
or a
|
||
jp z,x1DD6 ;íâ áâப ¯ãáâ ï
|
||
ld (xE037),hl ; ç «® ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
push bc
|
||
call x1E91 ;ª®¯¨à®¢ ¨¥ áâப¨ ¨§ ¡ãä¥à ¢¢¥¤¥ëå áâப ¢ ¡ãä¥à ¢¢®¤ áâப¨
|
||
pop bc
|
||
djnz x1E68
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1E91 ª®¯¨à®¢ ¨¥ áâப¨ ¨§ ¡ãä¥à ¢¢¥¤¥ëå áâப ¢ ¡ãä¥à ¢¢®¤ áâப¨
|
||
x1E91 call x1DD6 ;®ç¨á⪠¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
ld b,(ix+#0B)
|
||
ld hl,(xE037) ; ç «® ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
ld de,xDFD2 ;ª®¥æ ¡ãä¥à
|
||
push ix
|
||
ld ix,(xDE15) ; ¤à¥á ¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
x1EA3 ld a,(hl) ;ª®¯¨à®¢ ¨¥ áâப¨ ¢ ¡ãä¥à ¢¢®¤
|
||
or a
|
||
jr z,x1EB5 ;ª®¥æ áâப¨
|
||
call x1E13 ;¯®¬¥é¥¨¥ ᨬ¢®« ¢ áâப㠨 ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ áâப
|
||
djnz x1EA3
|
||
x1EAC ld a,(hl) ;¥á«¨ áâப ¡ë« ¤«¨¥¥ ¡ãä¥à ¢¢®¤ , ¨é¥¬ ¥¥ ª®¥æ
|
||
or a
|
||
jr z,x1EB5
|
||
call x1E18 ;横«¨ç¥áª®¥ ¯à¨à 饨¥ ¤à¥á ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
jr x1EAC
|
||
x1EB5 call x1E18 ;hl - ¤à¥á á«¥¤ãî饩 áâப¨ ¢ ¡ãä¥à¥ ¢¢¥¤¥ëå áâப
|
||
pop ix
|
||
push hl
|
||
call x1D70 ;¯®§¨æ¨®¨à®¢ ¨¥ ªãàá®à ¢ ª®¥æ áâப¨
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1EC0 ª®¯¨à®¢ ¨¥ ¢ ¡ãä¥à ¢¢®¤ á«¥¤ãî饩 ¢¢¥¤¥®© áâப¨
|
||
;¢å: a - ª®¤ ¦ ⮩ ª« ¢¨è¨ #84
|
||
;
|
||
x1EC0 ld hl,(xE037)
|
||
ld bc,(xDE14)
|
||
cp c
|
||
ld b,#02
|
||
jr nz,x1ECD
|
||
dec b
|
||
x1ECD ld (xDE14),a
|
||
x1ED0 call x1EE1 ;¯à®¢¥àª ᯨ᪠«¨ç¨¥ ¢¢¥¤¥ëå áâப
|
||
ld a,(hl)
|
||
or a
|
||
ret z ;áâப ¯ãáâ ï
|
||
push bc
|
||
call x1E91 ;ª®¯¨à®¢ ¨¥ áâப¨ ¨§ ¡ãä¥à ¢¢¥¤¥ëå áâப ¢ ¡ãä¥à ¢¢®¤ áâப¨
|
||
ld (xE037),hl
|
||
pop bc
|
||
djnz x1ED0
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1EE1 ¯à®¢¥àª ᯨ᪠«¨ç¨¥ ¢¢¥¤¥ëå áâப
|
||
;¢å: hl - ç «® ¯®á«¥¤¥© ¢¢¥¤¥®© áâப¨
|
||
x1EE1 ld de,(xE035) ;¯¥à¢ë© ᢮¡®¤ë© ¤à¥á ¢ ¡ãä¥à¥ ¯®á«¥¤¨å ¢¢¥¤¥ëå áâப(ª®¬ ¤)
|
||
or a
|
||
sbc hl,de
|
||
add hl,de
|
||
ret nz
|
||
pop hl ;ᯨ᮪ ¯ãá⮩
|
||
jp x1DD6 ;®ç¨á⪠¡ãä¥à ¢¢®¤¨¬®© áâப¨
|
||
|
||
;€„<E282AC>…‘: #1EEE §¢®®ª á ãáâ ®¢ª®© ¡®à¤îà
|
||
x1EEE rst #20
|
||
db #87
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #1EF1 ¯¥ç âì ª â «®£ ¨ ¢ë¡®à ¯®§¨æ¨¨ ¢ ¥¬
|
||
;¢ëå: cy=0 ¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
; hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
; cy=1 ®è¨¡ª ¢ë¡®à
|
||
;
|
||
x1EF1 call x2028 ;®¯à¥¤¥«¥¨¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥
|
||
db #02
|
||
ld (xDD89),hl ;®¬¥à ¯®á«¥¤¥© § ¯¨á¨
|
||
call x203C ;à áç¥â à §¬¥à®¢ ¨ ¯¥ç âì ®ª ¯®¤ ª â «®£
|
||
ld hl,#0000 ;®¬¥à § ¯¨á¨ ª â «®£ , á ª®â®à®© ç¨ ¥¬ ¯¥ç âì
|
||
ld (xE9E3),hl
|
||
call x1F7F ;¯¥ç âì ª â «®£ ¢ ®ª¥
|
||
x1F04 ld hl,x1F04 ;áî¤ ¢¥à¥¬áï
|
||
push hl
|
||
call x1FF4 ;¯¥ç âì ¢ë¤¥«¥®© ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
push af ;a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
call x1FBA ;ᨬ ¥¬ ¢ë¤¥«¥¨¥ áâப¨ ª â «®£
|
||
pop af
|
||
call x0385 ;®¡à ¡®âª ॠªæ¨¨ ¦ â¨ï ª« ¢¨è
|
||
call nc,x1FDC ;¯®ª ¦¥¬ ¢ë¡à ãî ¯®§¨æ¨î
|
||
call x1033
|
||
db #84 ;cs+7 ¢¢¥àå
|
||
dw x1F4C ; ¦ â ª« ¢¨è ¢¢¥àå, ¤¢¨£ ¥¬ ¢ë¤¥«¥¨¥ ¢¢¥àå
|
||
db #86 ;cs+6 ¢¨§
|
||
dw x1F94 ; ¦ â ª« ¢¨è ¢¨§, ¤¢¨£ ¥¬ ¢ë¤¥«¥¨¥ ¢¨§
|
||
db #0D ;enter
|
||
dw x1F44 ;¢ë¡®à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
db #80 ;fire KempJoy ¢ ®ª¥
|
||
dw x1F4B ;!!!Ž˜ˆ<CB9C>Š€ ¤®«¦® ¡ëâì x1F44
|
||
db #FF
|
||
cp #3A
|
||
ccf
|
||
jr c,x1F45 ;¥ æ¨äà
|
||
cp #30
|
||
jr c,x1F45 ;¥ æ¨äà
|
||
sub #30
|
||
jr nz,x1F39
|
||
ld a,#0A ;"0" =10
|
||
x1F39 dec a
|
||
cp (ix+4)
|
||
ret nc ;¥â ¯®§¨æ¨¨ á â ª¨¬ ®¬¥à®¬
|
||
ld (ix+0),a
|
||
call x1FDC ;¯®ª ¦¥¬ ¢ë¡à ãî ¯®§¨æ¨î
|
||
;¢ë¡®à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
x1F44 or a
|
||
x1F45 pop hl
|
||
push af
|
||
call x201D ;(xE9E3) +crd Y ªãàá®à
|
||
pop af
|
||
x1F4B ret
|
||
; ¦ â ª« ¢¨è ¢¢¥àå, ¤¢¨£ ¥¬ ¢ë¤¥«¥¨¥ ¢¢¥àå
|
||
x1F4C call x201D ;(xE9E3) +crd Y ªãàá®à
|
||
ld a,l
|
||
or h
|
||
jr z,x1F64 ;¤®á⨣ã⠯।¥«
|
||
call x2012 ;㬥ìè ¥¬ ª®®à¤¨ âã Y
|
||
ret nz ;㬥yì訫¨ ãᯥè®
|
||
rst #30
|
||
dw rom2_x2A1B ;áªà®««¨£ ®ª ¢¢¨§
|
||
db #02
|
||
ld hl,(xE9E3)
|
||
dec hl
|
||
ld (xE9E3),hl
|
||
jr x1FBA ;¯¥ç âì ®¤®© áâப¨ ª â «®£ ROM-disk
|
||
x1F64 ld hl,(xDD89) ;¯¥à¥å®¤ ¨¦îî áâà®çªã
|
||
ld c,(ix+4)
|
||
dec c
|
||
ld (ix+0),c
|
||
xor a
|
||
ld b,a
|
||
sbc hl,bc
|
||
jr nc,x1F7C
|
||
ld a,l
|
||
add a,c
|
||
ld (ix+0),a
|
||
ld hl,#0000
|
||
x1F7C ld (xE9E3),hl
|
||
;¯¥ç âì ª â «®£ ROM-disk ¢ ®ª¥
|
||
x1F7F ld a,(ix+0)
|
||
push af ;á®åà ¨¬ crd Y ªãàá®à
|
||
xor a
|
||
ld (ix+0),a ;crd Y =0
|
||
x1F87 call x1FBA ;;¯¥ç âì ®¤®© áâப¨ ª â «®£ ROM-disk
|
||
call x2006 ;¯à¨à 饨¥ ª®®à¤¨ âë Y ªãàá®à
|
||
jr nz,x1F87 ;¯¥ç â ¥¬ á«¥¤ãîéãî áâபã
|
||
pop af
|
||
ld (ix+0),a ;¢®ááâ ®¢¨¬ crd Y ªãàá®à
|
||
ret
|
||
; ¦ â ª« ¢¨è ¢¨§, ¤¢¨£ ¥¬ ¢ë¤¥«¥¨¥ ¢¨§
|
||
x1F94 ld hl,(xDD89)
|
||
push hl
|
||
call x201D ;(xE9E3) +crd Y ªãàá®à
|
||
pop de
|
||
xor a
|
||
sbc hl,de
|
||
jr c,x1FAB
|
||
ld h,a ;¤®á⨣ãâ ¨¦¨© ¯à¥¤¥«. ¯¥à¥å®¤¨¬ ¢¥àåîî áâபã
|
||
ld l,a
|
||
ld (xE9E3),hl
|
||
ld (ix+0),a
|
||
jr x1F7F ;¯¥ç âì ª â «®£ ROM-disk ¢ ®ª¥
|
||
x1FAB call x2006 ;¯à¨à 饨¥ ª®®à¤¨ âë Y ªãàá®à
|
||
ret nz ;ãᯥè®
|
||
rst #30
|
||
dw rom2_x298E ;áªà®««¨£ ®ª ¢¢¥àå
|
||
db #02
|
||
ld hl,(xE9E3)
|
||
inc hl
|
||
ld (xE9E3),hl
|
||
;¯¥ç âì ®¤®© áâப¨ ª â «®£ ROM-disk
|
||
x1FBA ld (ix+1),#00
|
||
rst #30
|
||
dw rom2_x2B10 ;¯¥ç âì ¯à®¡¥« (rst #10)
|
||
db #02
|
||
call x201D ;(xE9E3) +crd Y ªãàá®à
|
||
ex de,hl
|
||
ld hl,(xDD89)
|
||
or a
|
||
sbc hl,de ;®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ROM-disk
|
||
jr c,x1FD3
|
||
ex de,hl
|
||
call x2028 ;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ROM-disk
|
||
db #00 ;¢å: hl - ®¬¥à § ¯¨á¨
|
||
x1FD3 rst #30
|
||
dw rom2_x2FED ;¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª
|
||
db #02
|
||
rst #30
|
||
dw rom2_x2B10 ;¯¥ç âì ¯à®¡¥« (rst #10)
|
||
db #02
|
||
ret
|
||
;¯®ª ¦¥¬ ¢ë¡à ãî ¯®§¨æ¨î
|
||
x1FDC push af
|
||
call x1FF4 ;¯¥ç âì ¢ë¤¥«¥®© ¯®§¨æ¨¨ ¢ ª â «®£¥ ROM-disk
|
||
call x1FE8 ;¯ 㧠¯à¨¬¥à® 646k ⠪⮢
|
||
call x1FBA ;ᨬ ¥¬ ¢ë¤¥«¥¨¥ ¯®§¨æ¨¨
|
||
pop af
|
||
ret
|
||
;¯ 㧠¯à¨¬¥à® 646k ⠪⮢
|
||
x1FE8 ld a,#C0
|
||
x1FEA push bc
|
||
x1FEB ld b,#00
|
||
djnz $
|
||
pop bc
|
||
dec a
|
||
jr nz,x1FEA
|
||
ret
|
||
;¯¥ç âì ¢ë¤¥«¥®© ¯®§¨æ¨¨ ¢ ª â «®£¥ ROM-disk
|
||
x1FF4 ld a,(ix+6)
|
||
push af ;á®åà ¨¬ âਡãâë
|
||
ld a,(ix+#0E)
|
||
ld (ix+6),a
|
||
call x1FBA ;¯¥ç âì ®¤®© áâப¨ ª â «®£ ROM-disk
|
||
pop af
|
||
ld (ix+6),a
|
||
ret
|
||
;¯à¨à 饨¥ ª®®à¤¨ âë Y ªãàá®à
|
||
;¢ëå: z - ¥ ¡ë«® ¯à¨à 饨ï
|
||
x2006 ld a,(ix+4)
|
||
dec a
|
||
cp (ix+0)
|
||
ret z
|
||
inc (ix+0)
|
||
ret
|
||
;㬥ìè ¥¬ ª®®à¤¨ âã Y
|
||
x2012 ld a,(ix+0)
|
||
or a
|
||
ret z
|
||
dec (ix+0)
|
||
xor a
|
||
inc a
|
||
ret
|
||
;(xE9E3) +crd Y ªãàá®à
|
||
x201D ld hl,(xE9E3)
|
||
ld a,(ix+0)
|
||
|
||
;€„<E282AC>…‘: #2023 á«®¦¥¨¥ hl=hl+a
|
||
x2023 add a,l
|
||
ld l,a
|
||
ret nc
|
||
inc h
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2028 ¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
;¢å: db ? ®¬¥à ¯à®æ¥¤ãàë
|
||
; =#04 § £®«®¢®ª
|
||
x2028 ex (sp),hl
|
||
ld a,(hl)
|
||
inc hl
|
||
ex (sp),hl
|
||
|
||
;€„<E282AC>…‘: #202C ¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
;¢å: a - ®¬¥à ¯à®æ¥¤ãàë
|
||
; =#04 § £®«®¢®ª
|
||
x202C push hl
|
||
ld hl,(xE9E1)
|
||
call x2023 ;á«®¦¥¨¥ hl=hl+a
|
||
ld a,(hl)
|
||
inc hl
|
||
ld h,(hl)
|
||
ld l,a
|
||
ex (sp),hl
|
||
ld a,(xDDA7)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #203C à áç¥â à §¬¥à®¢ ¨ ¯¥ç âì ®ª ¯®¤ ª â «®£ ROM-disk
|
||
x203C call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
ld bc,(xDD89) ;®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ª â «®£ ROM-disk
|
||
ld hl,#000F ;¢ëá®â ®ª ¥ ¡®«¥¥ 16
|
||
or a
|
||
sbc hl,bc
|
||
jr nc,x204D
|
||
ld c,#10
|
||
x204D inc c
|
||
ld (ix+4),c ;¢ëá®â ®ª
|
||
ld hl,#0531 ; âਡãâë § £®«®¢ª ¨ ¢ëà ¢¨¢ ¨¥
|
||
|
||
;€„<E282AC>…‘: #2054 ¯¥ç âì à ¬ª¨ ¢®ªà㣠®ª
|
||
x2054 call x207A ;¯¥ç âì à ¬ª¨ ¢®ªà㣠®ª
|
||
rst #20
|
||
db #8C ;®ç¨á⪠®ª
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #205A ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
x205A ld hl,xE0F3
|
||
rst #30
|
||
dw rom2_x301C ;ix = ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à ¨§ hl
|
||
db #02
|
||
ret
|
||
|
||
;¯¥ç âë¥ ª®¤ë à ¬®ª
|
||
x2062 db #BB,#CD,#C9,#BA,#BA,#BC,#CD,#C8
|
||
db #B9,#CD,#CC,#BA,#BA,#BC,#CD,#C8
|
||
db #B6,#C4,#C7,#BA,#BA,#BC,#CD,#C8
|
||
|
||
;€„<E282AC>…‘: #207A ¯¥ç âì à ¬ª¨ ¢®ªà㣠®ª
|
||
;¢å: l - âਡãâë § £®«®¢ª
|
||
; h - ¢ëà ¢¨¢ ¨¥ § £«®¢ª (=0 ¥â ¢ëà ¢¨¢ ¨ï)
|
||
; hl=#0000 ¥â § £®«®¢ª
|
||
;
|
||
x207A bit 7,(ix+8)
|
||
ret z ;¥â à ¬ª¨
|
||
push hl
|
||
ld de,xE338 ;á®åà ¨¬ ¤¥áªà¨¯â®à ®ª
|
||
push ix
|
||
pop hl
|
||
push hl
|
||
ld bc,#000E
|
||
ldir
|
||
pop hl
|
||
ld (hl),#00 ;ª®®à¤¨ âë ªãàá®à =0
|
||
inc hl
|
||
ld (hl),#00
|
||
inc hl
|
||
dec (hl) ;㢥«¨ç¨¬ à §¬¥à뮪 2
|
||
inc hl
|
||
dec (hl)
|
||
inc hl
|
||
inc (hl) ;¢ëá®â +2
|
||
inc (hl)
|
||
inc hl
|
||
inc (hl) ;è¨à¨ +2
|
||
inc (hl)
|
||
ld (ix+7),#03 ;á¨áâ¥¬ë¥ âਡãâë ®ª
|
||
ld a,(ix+9)
|
||
ld (ix+6),a ; âਡãâë à ¬ª¨
|
||
ld a,(ix+8)
|
||
and %00111000
|
||
ld l,a
|
||
ld h,#00 ;®¬¥à à ¬ª¨ *8
|
||
ld de,x2062
|
||
add hl,de ; ¤à¥á à ¬ª¨
|
||
ld (ix+#0A),#08 ;à §¬¥à ᨬ¢®«®¢ ¢ ¯¨ªá¥«ïå
|
||
ld a,(ix+#0B)
|
||
push af ;á®åà ¨¬ è¨à¨ã ®ª
|
||
ld (ix+#0B),#20 ;è¨à¨ ®ª 32
|
||
call x2120 ;¯¥ç âì ¢¥à奩 «¨¨¨ à ¬ª¨
|
||
ld b,(ix+4)
|
||
dec b
|
||
dec b ;¢ëá®â
|
||
jr z,x20E0 ;á।¨å «¨¨© ¥â
|
||
ld c,(ix+5)
|
||
dec c ;¯à ¢ ï ª®®à¤¨ â X
|
||
ld e,(hl)
|
||
inc hl
|
||
ld d,(hl)
|
||
inc hl ;de ¯¥ç âë¥ ª®¤ë à ¬ª¨
|
||
x20D0 inc (ix+0) ;¯¥ç âì á।ëå «¨¨© à ¬ª¨
|
||
ld (ix+1),#00
|
||
ld a,e
|
||
rst #10
|
||
ld (ix+1),c
|
||
ld a,d
|
||
rst #10
|
||
djnz x20D0
|
||
x20E0 inc (ix+0)
|
||
ld (ix+1),#00
|
||
call x2120 ;¯¥ç âì ¨¦¥© «¨¨¨ à ¬ª¨
|
||
pop af
|
||
inc a
|
||
inc a
|
||
inc a
|
||
ld (ix+#0B),a
|
||
ld (ix+#0A),#06
|
||
pop hl
|
||
ld a,l
|
||
or h
|
||
jr z,x2114 ;¥â § £ «®¢ª
|
||
ld (ix+0),#00
|
||
ld (ix+1),#01
|
||
ld (ix+6),l
|
||
ld a,h
|
||
or a
|
||
push af
|
||
jr z,x210C ;¥â ¢ëà ¢¨¢ ¨ï
|
||
rst #20
|
||
db #84 ;¢ë¢®¤ á ¢ëà ¢¨¢ ¨¥¬
|
||
x210C call x2028
|
||
db #04 ;¯¥ç âì § £®«®¢ª ®ª
|
||
pop af
|
||
jr z,x2114
|
||
rst #10 ;¢ë஢﫨 § £®«®¢®ª
|
||
x2114 ld hl,xE338 ;¢®ááâ ®¢¨¬ ¤¥áªà¨¯â®à ®ª
|
||
push ix
|
||
pop de
|
||
ld bc,#000E
|
||
ldir
|
||
ret
|
||
;¯¥ç âì «¨¨¨ à ¬ª¨
|
||
x2120 ld e,(hl)
|
||
inc hl
|
||
ld d,(hl)
|
||
inc hl
|
||
ld a,(hl)
|
||
inc hl
|
||
rst #10
|
||
ld b,(ix+5) ;è¨à¨ ®ª
|
||
dec b
|
||
dec b
|
||
x212C ld a,d
|
||
rst #10
|
||
djnz x212C
|
||
ld a,e
|
||
rst #10
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2133 ª®à४æ¨ï ª®®à¤¨ â ¨ à §¬¥à®¢ ®ª
|
||
;¢å: hl - ª®®à¤¨ âë ®ª
|
||
; e - è¨à¨ ®ª ¢ § ª®¬¥áâ å
|
||
; d - è¨à¨ ®ª ¢ ᨬ¢®« å
|
||
x2133 ld (xE0F3+#02),hl
|
||
ld a,e
|
||
ld (xE0F3++#05),a
|
||
ld a,d
|
||
ld (xE0F3++#0B),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #213F ª®®à¤¨ âë Y ¨ X ¯®«¥© ¤«ï ®ª । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
x213F db #00,#02,#05
|
||
db #08,#09,#0B,#0C,#0E,#0F,#11,#12
|
||
db #14,#15,#17,#18,#1A,#1B,#1D,#1E
|
||
db #21,#28
|
||
db #FC
|
||
db #08,#09,#0B,#0C,#0E,#0F,#11,#12
|
||
db #14,#15,#17,#18,#1A,#1B,#1D,#1E
|
||
db #21,#28
|
||
db #FF
|
||
|
||
;€„<E282AC>…‘: #2168 â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ®ª । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
x2168 dw x2447 ;#00 ¯¥ç âì ®¤®© áâப¨ ¤ ¬¯ ¯ ¬ï⨠(8 ¡ ©â)
|
||
dw x2365 ;#02 ®¡®¢«¥¨¥ ®ª ¤ ¬¯ ¯ ¬ïâ¨
|
||
dw x21A7 ;#04 § £«ãèª ret
|
||
dw x2286 ;#06 áªà®««¨£ ¤ ¬¯
|
||
dw x2286 ;#08 áªà®««¨£ ¤ ¬¯
|
||
dw x243D ;#0A ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ ⥫ï
|
||
dw x2442 ;#0C § ¯¨áì ¡ ©â ¢ ¯ ¬ïâì ¯®«ì§®¢ ⥫ï
|
||
dw x2409 ;#0E । ªâ¨à®¢ ¨¥ á«®¢® ¢ bc
|
||
dw x244C ;#10 ®¡®¢«¥¨¥ ®ª á ¤¨§ ᬮ¬ ¯ ¬ïâ¨ ç¨ ï á ⥪ã饩 ï祩ª¨
|
||
|
||
;€„<E282AC>…‘: #217A ¯®¨áª 祣®-â® (â ª®¥ ¢¯¥ç â«¥¨¥, çâ® âã⠮訡ª , ¯® «®£¨ª¥
|
||
; ¤®«¦® ¡ëâì áà ¢¥¨¥ á ª®®à¤¨ ⮩ X)
|
||
;¢ëå: ¯à¨ ⥪ã饬 à ᪫ ¤¥ ¢ë室¥ ¢á¥£¤ z
|
||
; hl=x213F+#15
|
||
x217A ld hl,(xE9DF)
|
||
x217D ld a,(hl)
|
||
cp #FD
|
||
ret nc
|
||
cp #FC
|
||
ret z
|
||
and #7F
|
||
cp (ix+#00)
|
||
ret z
|
||
x218A inc hl
|
||
bit 7,(hl)
|
||
jr nz,x217D
|
||
jr x218A
|
||
|
||
;€„<E282AC>…‘: #2191 ¯à®¢¥àª ¯®¯ ¤ ¨ï ªãàá®à ¯® X । ªâ¨àã¥¬ë© ¡ ©â ¢ ¤ ¬¯¥
|
||
;¢ëå: z - crdX ª ª®¬-â® ¡ ©â¥ ¯®«ï ¤ ¬¯
|
||
x2191 ld a,(hl)
|
||
cp #FD
|
||
ret nc
|
||
x2195 inc hl
|
||
ld a,(hl)
|
||
bit 7,a
|
||
ret nz
|
||
cp (ix+#01)
|
||
ret nc
|
||
inc hl
|
||
ld a,(hl)
|
||
cp (ix+#01)
|
||
ret z
|
||
jr c,x2195
|
||
xor a
|
||
x21A7 ret
|
||
|
||
;€„<E282AC>…‘: #21A8 ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢«¥¢®
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; nz - ¥¢®§¬®¦® ®âª®à४â¨à®¢ âì ª®®à¤¨ âã
|
||
x21A8 push hl
|
||
call x2191 ;¯à®¢¥àª ¯®¯ ¤ ¨ï ªãàá®à ¯® X । ªâ¨àã¥¬ë© ¡ ©â ¢ ¤ ¬¯¥
|
||
pop hl
|
||
ret z ;crdX ª ª®¬-â® ¡ ©â¥ ¯®«ï ¤ ¬¯
|
||
call x2253 ;¤¥ªà¥¬¥â ª®®à¤¨ âë X
|
||
jr nz,x21A8 ;ª®®à¤¨ â X 㬥ìè¥
|
||
jr x2208 ;¤¥ªà¥¬¥â ¥ ¡ë«®
|
||
|
||
;€„<E282AC>…‘: #21B5 ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; nz - ¥¢®§¬®¦® ®âª®à४â¨à®¢ âì ª®®à¤¨ âã
|
||
x21B5 ld c,(ix+#01) ;crd X
|
||
call x21FD ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢¯à ¢®
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
ld (ix+#01),c ;¢®ááâ ®¢¨¬ ª®®à¤¨ âã X
|
||
call x21A8 ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢«¥¢®
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
ld (ix+#01),c ;¢®ááâ ®¢¨¬ ª®®à¤¨ âã X
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #21C7 ¨ªà¥¬¥â ª®®à¤¨ âë X, ¨ ¨§¬¥¥¨¥ ¤à¥á ⥪ã饩 ï祩ª¨ ¤ ¬¯
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
x21C7 call x2247 ;¨ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ®ª
|
||
jr z,x21D3 ;¨ªà¥¬¥â ¥¡ë«®
|
||
call x217A
|
||
call x21FD ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢¯à ¢®
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; crd X =#00
|
||
x21D3 ld (ix+#01),#00
|
||
|
||
;€„<E282AC>…‘: #21D7 ¯¥à¥¬¥é¥¨¥ ªãàá®à 8 ¡ ©â ¢¨§ ( ¦ ⨥ cs+6/ss+S ªãàá®à ¢¨§)
|
||
x21D7 ld e,#08
|
||
jr x21DD
|
||
;¯¥à¥¬¥é¥¨¥ ªãàá®à ®¤¨ ¡ ©â ¢¨§
|
||
x21DB ld e,#01
|
||
;¯¥à¥¬¥é¥¨¥ ªãàá®à E ¡ ©â ¢¨§
|
||
x21DD call x2006 ;¯à¨à 饨¥ ª®®à¤¨ âë Y ªãàá®à
|
||
ld a,#08 ;áªà®««¨£ ¤ ¬¯
|
||
jp z,x202C ;Y ¥ ¨§¬¥¨« áì. ¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
|
||
;€„<E282AC>…‘: #21E5 ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; nz -
|
||
x21E5 call x21ED
|
||
ret z
|
||
ld (ix+#00),#00 ;crd Y =0
|
||
x21ED call x217A ;¯à¨ ⥪ã饬 à ᪫ ¤¥ ¢ë室¥ ¢á¥£¤ z
|
||
jr nz,x21F6
|
||
call x21B5 ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
x21F6 call x2006 ;¯à¨à 饨¥ ª®®à¤¨ âë Y ªãàá®à
|
||
jr nz,x21ED ;ª®®à¤¨ â Y ¨§¬¥¨« áì
|
||
jr x2208 ;ãáâ ®¢ª nz ¨ ¢ë室
|
||
|
||
;€„<E282AC>…‘: #21FD ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢¯à ¢®
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; nz - ¥¢®§¬®¦® ®âª®à४â¨à®¢ âì ª®®à¤¨ âã
|
||
x21FD push hl
|
||
call x2191 ;¯à®¢¥àª ¯®¯ ¤ ¨ï ªãàá®à ¯® X । ªâ¨àã¥¬ë© ¡ ©â ¢ ¤ ¬¯¥
|
||
pop hl
|
||
ret z ;crdX ª ª®¬-â® ¡ ©â¥ ¯®«ï ¤ ¬¯
|
||
call x2247 ;¨ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ®ª
|
||
jr nz,x21FD ;¨ªà¥¬¥â ¡ë«
|
||
;ãáâ ®¢ª ä« £ nz
|
||
x2208 xor a
|
||
inc a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #220B ¤¥ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ⥪ã饣® ¯®«ï á® áªà®««¨£®¬
|
||
x220B call x2253 ;¤¥ªà¥¬¥â ª®®à¤¨ âë X
|
||
jr z,x2217 ;¤¥ªà¥¬¥â ¥ ¡ë«®
|
||
call x217A
|
||
call x21A8 ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à ¢«¥¢®
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; áâ ¢¨¬ ªãàá®à ªà ©îî ¯à ¢ãî ¯®§¨æ¨î
|
||
x2217 ld a,(ix+#0B) ;à §¬¥à ®ª ¢ ᨬ¢®« å
|
||
dec a
|
||
ld (ix+#01),a ;®¢ ï ª®®à¤¨ â X (ªà ©ïï ¯à ¢ ï ¯®§¨æ¨ï)
|
||
|
||
;€„<E282AC>…‘: #221E ¯¥à¥¬¥é¥¨¥ ªãàá®à 8 ¡ ©â ¢¢¥àå ( ¦ ⨥ cs+7/ss+W ªãàá®à ¢¢¥àå)
|
||
x221E ld e,#F8
|
||
jr x2224
|
||
;áªà®««¨£ áâப㠢¢¥àå
|
||
x2222 ld e,#FF
|
||
x2224 call x2012 ;㬥ìè ¥¬ ª®®à¤¨ âã Y
|
||
ld a,#06 ;áªà®««¨£ ¤ ¬¯
|
||
jp z,x202C ;ª®®à¤¨ â Y ¥ ¡ë« 㬥ìè¥ (¢ë§®¢ ¯à®æ¥¤ãàë áªà®««¨£ )
|
||
call x2237 ;ª®à४æ¨ï ª®®à¤¨ âë Y, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; ãáâ ®¢ª ª®®à¤¨ âë Y ¢ ¨¦¨© ªà © ®ª
|
||
ld a,(ix+#04)
|
||
dec a
|
||
ld (ix+#01),a
|
||
|
||
;€„<E282AC>…‘: #2237 ª®à४æ¨ï ª®®à¤¨ âë Y, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
;¢ëå: z - ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; nz - ¥¢®§¬®¦® ®âª®à४â¨à®¢ âì ª®®à¤¨ âã
|
||
x2237 call x217A
|
||
jr nz,x2240 ; ¢ë室¥ ¢á¥£¤ z
|
||
call x21B5 ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
ret z ;ªãàá®à ¡ ©â¥ ¤ ¬¯
|
||
; ¥¢®§¬®¦® ®âª®à४â¨à®¢ âì ª®®à¤¨ âã X
|
||
x2240 call x2012 ;㬥ìè ¥¬ ª®®à¤¨ âã Y
|
||
jr nz,x2237 ;ª®®à¤¨ â 㬥ìè¥
|
||
jr x2208 ;ãáâ ®¢ª nz
|
||
|
||
;€„<E282AC>…‘: #2247 ¨ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ®ª
|
||
;¢ëå: z - ¨ªà¥¬¥â ¥ ¡ë«®
|
||
x2247 ld a,(ix+#0B) ;è¨à¨ ®ª ¢ ᨬ¢®« å
|
||
dec a
|
||
cp (ix+#01)
|
||
ret z
|
||
inc (ix+#01)
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2253 ¤¥ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ®ª
|
||
;¢ëå: z - ¤¥ªà¥¬¥â ¥ ¡ë«®
|
||
x2253 ld a,(ix+#01)
|
||
or a
|
||
ret z
|
||
dec (ix+#01)
|
||
jr x2208
|
||
|
||
;€„<E282AC>…‘: #225D ¦ ⨥ cs+5/ss+Q ªãàá®à ¢«¥¢®
|
||
;¢å: c - crd X ªãàá®à
|
||
x225D ld a,c
|
||
cp #21
|
||
jr c,x226B
|
||
; ¢ ¯®«¥ । ªâ¨à®¢ ¨ï ᨬ¢®«®¢
|
||
jr nz,x220B ;¥ ªà ©ïï «¥¢ ï ¯®§¨æ¨ï
|
||
ld a,#28
|
||
x2266 ld (ix+#01),a ;ªà ©ïï ¯à ¢ ï ¯®§¨æ¨ï
|
||
jr x2222 ;áªà®««¨£ áâப㠢¢¥àå
|
||
; ¢ ¯®«¥ । ªâ¨à®¢ ¨ï hex ¤ ¬¯ ¨«¨ ¤à¥á
|
||
x226B cp #02
|
||
ret z ;ªà ©ïï ¯®§¨æ¨ï ¢ ¤à¥á¥
|
||
cp #08
|
||
jr z,x2274 ;ªà ©ïï ¯®§¨æ¨ï ¢ hex ¤ ¬¯¥
|
||
jr x220B ;¤¥ªà¥¬¥â ª®®à¤¨ âë X ¢ à ¬ª å ⥪ã饣® ¯®«ï á® áªà®««¨£®¬
|
||
x2274 ld a,#1E ;®¢ ï ª®®à¤¨ â X ¢ hex ¤ ¬¯¥
|
||
jr x2266
|
||
|
||
;€„<E282AC>…‘: #2278 । ªâ¨à®¢ ¨¥ ¤ ¬¯ ¯ ¬ï⨠¢ ®ª¥ ¬®¨â®à
|
||
x2278 ld hl,x2168
|
||
ld (xE9E1),hl ; ¤à¥á â ¡«¨æë ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯/¯ x2028
|
||
ld hl,x213F
|
||
ld (xE9DF),hl
|
||
jr x2298
|
||
|
||
;€„<E282AC>…‘: #2286 áªà®««¨£ ¤ ¬¯
|
||
;¢å: e - ª®«¨ç¥á⢮ áâப ¤«ï áªà®«« ¤ ¬¯ (e=#01/#08/#FF/#F8)
|
||
x2286 call x23A9 ;à áç¥â ¯à¨à é¥¨ï ¤«ï áªà®««¨£ ¤ ¬¯
|
||
ld hl,(xDD87) ; ¤à¥á ç « ¤ ¬¯ ¯ ¬ïâ¨
|
||
add hl,bc ;®¢ë© ¤à¥á
|
||
ld (xDD87),hl
|
||
ld hl,(xDD69) ; ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
add hl,de
|
||
ld (xDD69),hl
|
||
pop hl
|
||
|
||
;®¡®¢«¥¨¥ ®ª ¤ ¬¯
|
||
x2298 call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #02 ;®¡®¢«¥¨¥ ®ª ¤ ¬¯ ¯ ¬ïâ¨
|
||
call x21E5 ;ª®à४æ¨ï ª®®à¤¨ âë X, ¯à¨ ¤¢¨¦¥¨¨ ªãàá®à
|
||
|
||
;®á®¢®© 横« । ªâ¨à®¢ ¨ï ¤ ¬¯ ¯ ¬ïâ¨
|
||
x229F ld hl,x229F ; ¤à¥á ¢®§¢à â
|
||
push hl
|
||
call x23C0 ;®¯à¥¤¥«¥¨¥ ¯®«ï ¢ ®ª¥ । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #10 ;®¡®¢«¥¨¥ ®ª á ¤¨§ ᬮ¬ ¯ ¬ïâ¨ ç¨ ï á ⥪ã饩 ï祩ª¨
|
||
res 0,(ix+#07) ;¢ë¢®¤¨âì ᨬ¢®« ªãàá®à
|
||
;®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
rst #30
|
||
dw rom2_x28E8 ;¯¥ç âì/㤠«¥¨¥ ªãàá®à ¢ ®ª¥
|
||
db #02
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06 ;a - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
rst #30
|
||
dw rom2_x28B8 ;¢®ááâ ®¢«¥¨¥ íªà ¯®¤ ªãàá®à®¬, ¥á«¨ 㦮 (6 ¯¨ªá¥«¥© ᨬ¢®«)
|
||
db #02
|
||
;ॠªæ¨ï ¦ âãî ª« ¢¨èã
|
||
set 0,(ix+#07) ;¥ ¢ë¢®¤¨âì ᨬ¢®« ªãàá®à
|
||
ld d,a ;d - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
call x23C0 ;®¯à¥¤¥«¥¨¥ ¯®«ï ¢ ®ª¥ । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
jr c,x22E9 ;ªãàá®à ¢ ¯®«¥ । ªâ¨à®¢ ¨ï ¤à¥á ¤ ¬¯
|
||
jr nz,x230D ;ªãàá®à ¢ ¯®«¥ । ªâ¨à®¢ ¨ï ᨬ¢®«®¢ ¤ ¬¯
|
||
; ¨§¬¥¥¨¥ hex § ç¥¨ï ¯®¤ ªãàá®à®¬ ¢ ¤ ¬¯¥
|
||
call x2400 ;ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¢ bc
|
||
call x2412 ;। ªâ¨à®¢ ¨¥ ¡ ©â ¢ bc
|
||
jr nz,x2328 ;¡ ©â ¥ ¨§¬¥¨«áï. ¯à®¢¥àª ¦ â¨ï ã¯à ¢«ïî饩 ª« ¢¨è¨
|
||
ld (xDDA7),bc ;®¢®¥ § 票¥ ¡ ©â
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #0C ;§ ¯¨áì ¡ ©â ¢ ¯ ¬ïâì ¯®«ì§®¢ ⥫ï
|
||
call x2393 ;¯¥ç âì ®¤®©(⥪ã饩) áâப¨ ¤ ¬¯
|
||
; ¯à®¢¥àª ª®®à¤¨ âë X
|
||
x22D9 ld de,#1E08 ;£à ¨çë¥ ª®®à¤¨ âë
|
||
x22DC ld a,(ix+#01) ;crd X
|
||
cp d
|
||
jp c,x21C7 ;¨ªà¥¬¥â ª®®à¤¨ âë X, ¨ ¨§¬¥¥¨¥ ¤à¥á ⥪ã饩 ï祩ª¨ ¤ ¬¯
|
||
ld (ix+#01),e
|
||
jp x21DB ;¯¥à¥¬¥é¥¨¥ ªãàá®à ®¤¨ ¡ ©â ¢¨§
|
||
; ¨§¬¥¥¨¥ ¤à¥á ¤ ¬¯ ¯ ¬ïâ¨
|
||
x22E9 ld bc,(xDD87) ; ¤à¥á ç « ¤ ¬¯ ¯ ¬ïâ¨
|
||
ld (xDDA7),a ;®¬¥à ¡ ©â ¢ áâப¥ ¤ ¬¯
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #0E ;। ªâ¨à®¢ ¨¥ á«®¢ ¢ bc
|
||
jr nz,x2328 ;á«®¢® ¥ ¨§¬¥¨«®áì. ¯à®¢¥àª ¦ â¨ï ã¯à ¢«ïî饩 ª« ¢¨è¨
|
||
ld (xDD69),bc ;®¢ë© ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
ld (xDD87),bc ; ¤à¥á ç « ¤ ¬¯ ¯ ¬ïâ¨
|
||
ld a,(ix+#01)
|
||
push af
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #02 ;®¡®¢«¥¨¥ ®ª ¤ ¬¯ ¯ ¬ïâ¨
|
||
pop af
|
||
ld (ix+#01),a
|
||
jp x21C7 ;¨ªà¥¬¥â ª®®à¤¨ âë X, ¨ ¨§¬¥¥¨¥ ¤à¥á ⥪ã饩 ï祩ª¨ ¤ ¬¯
|
||
; ¨§¬¥¥¨¥ ᨬ¢®« ¢ ᨬ¢®«ì®¬ ¯®«¥ ¤ ¬¯
|
||
x230D call x2400 ;ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¢ bc
|
||
ld a,d
|
||
cp #20
|
||
jr c,x2328 ;íâ® ¥ ᨬ¢®«, ¯à®¢¥àª ¦ â¨ï ã¯à ¢«ïî饩 ª« ¢¨è¨
|
||
cp #7F
|
||
jr nc,x2328 ;íâ® ¥ ᨬ¢®«, ¯à®¢¥àª ¦ â¨ï ã¯à ¢«ïî饩 ª« ¢¨è¨
|
||
ld (xDDA7),a
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #0C ;§ ¯¨áì ¡ ©â ¢ ¯ ¬ïâì ¯®«ì§®¢ ⥫ï
|
||
call x2393 ;¯¥ç âì ®¤®©(⥪ã饩) áâப¨ ¤ ¬¯
|
||
x2323 ld de,#2821 ;£à ¨çë¥ ª®®à¤¨ âë ¯®«ï । ªâ¨à®¢ ¨ï ᮬ¢®«®¢ ¤ ¬¯
|
||
jr x22DC ;¯à®¢¥àª ª®®à¤¨ â
|
||
;¯à®¢¥àª ¨ ®¡à ¡®âª ¦ â¨ï ã¯à ¢«ïî饩 ª« ¢¨è¨
|
||
;¢å: d - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
x2328 ld a,d
|
||
ld c,(ix+#01) ;crd X
|
||
call x1033 ;¢ë§®¢ ¯/¯ ®¡à ¡®âª¨ ¦ ⮩ ª« ¢¨è¨
|
||
db #85 ;cs+5
|
||
dw x225D ;ªãàá®à ¢«¥¢®
|
||
db #1C ;ss+Q
|
||
dw x225D ;ªãàá®à ¢«¥¢®
|
||
db #83 ;cs+8
|
||
dw x235D ;ªãàá®à ¢¯à ¢®
|
||
db #1E ;ss+E
|
||
dw x235D ;ªãàá®à ¢¯à ¢®
|
||
db #84 ;cs+7
|
||
dw x221E ;ªãàá®à ¢¢¥àå
|
||
db #1D ;ss+W
|
||
dw x221E ;ªãàá®à ¢¢¥àå
|
||
db #86 ;cs+6
|
||
dw x21D7 ;ªãàá®à ¢¨§
|
||
db #8B ;ss+S
|
||
dw x21D7 ;ªãàá®à ¢¨§
|
||
db #89 ;cs+9
|
||
dw x237A ;ᬥ ¯®«ï । ªâ¨à®¢ ¨ï hex <-> ᨬ¢®«ë
|
||
db #01 ;cs+1+A
|
||
dw x2352 ;ãáâ ®¢ª ªãàá®à । ªâ¨à®¢ ¨¥ ¤à¥á ¤ ¬¯
|
||
db #03 ;break/cancel
|
||
dw x235B ;¢ë室
|
||
db #FF
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2352 ãáâ ®¢ª ªãàá®à । ªâ¨à®¢ ¨¥ ¤à¥á ¤ ¬¯
|
||
x2352 ld (ix+#00),#00 ;crd Y =#00
|
||
ld (ix+#01),#02 ;crd X =#02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #235B ¢ë室 ¨§ ०¨¬ । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
x235B pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #235D ¦ ⨥ cs+8/ss+E ªãàá®à ¢¯à ¢®
|
||
x235D ld a,c ;crd X
|
||
cp #20
|
||
jr nc,x2323 ;¢ ¯®«¥ । ªâ¨à®¢ ¨ï ᨬ¢®«®¢
|
||
jp x22D9 ;¯®«¥ । ªâ¨à®¢ ¨ï ¤à¥á ¨«¨ hex ¤ ¬¯
|
||
|
||
;€„<E282AC>…‘: #2365 ®¡®¢«¥¨¥ ®ª ¤ ¬¯ ¯ ¬ïâ¨
|
||
x2365 rst #30
|
||
dw rom2_x2E3D ;¯¥ç âì ¤ ¬¯ ¯ ¬ï⨠¢ ®ª¥
|
||
db #02
|
||
rst #30
|
||
dw rom2_x2E76 ;㤠«¥¨¥ ªãàá®à ¯à¥¤ë¤ã饩 ï祩ª¥ ¤ ¬¯
|
||
db #02
|
||
ld a,(ix+#01) ;ª®®à¤¨ â X ªãàá®à ¢ ®ª¥
|
||
sub #03
|
||
ld (ix+#01),a
|
||
bit 7,(iy+#0E)
|
||
ret z ;। ªâ¨à㥬 hex ¤ ¬¯
|
||
|
||
;€„<E282AC>…‘: #237A ᬥ ¯®«ï । ªâ¨à®¢ ¨ï hex <-> ᨬ¢®«ë
|
||
x237A call x23C0 ;®¯à¥¤¥«¥¨¥ ¯®«ï ¢ ®ª¥ । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
ret c ;। ªâ¨à㥬 ¤à¥á ¤ ¬¯
|
||
ld hl,xE022
|
||
jr nz,x238B
|
||
; ãáâ ®¢ª ª®®à¤¨ â ¤«ï । ªâ¨à®¢ ¨ï ᨬ¢®«ì®£® ¯à¥¤áâ ¢«¥¨ï ¤ ¬¯
|
||
set 7,(hl)
|
||
add a,#21
|
||
x2387 ld (ix+#01),a
|
||
ret
|
||
; ãáâ ®¢ª ª®®à¤¨ â ¤«ï । ªâ¨à®¢ ¨ï hex ¤ ¬¯
|
||
x238B res 7,(hl)
|
||
add a,a
|
||
add a,c
|
||
add a,#08
|
||
jr x2387
|
||
|
||
;€„<E282AC>…‘: #2393 ¯¥ç âì ®¤®©(⥪ã饩) áâப¨ ¤ ¬¯
|
||
x2393 ld c,#00
|
||
call x23F3 ;hl - ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
ld a,(ix+#01) ;crd X
|
||
push af
|
||
ld (ix+#01),#00 ;crd X =#00
|
||
call x2028 ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
db #00 ;¯¥ç âì ®¤®© áâப¨ ¤ ¬¯ ¯ ¬ï⨠(8 ¡ ©â)
|
||
pop af
|
||
ld (ix+#01),a ;¢®ááâ ®¢¨¬ ª®®à¤¨ âã X
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #23A9 à áç¥â ¯à¨à é¥¨ï ¤«ï áªà®««¨£ ¤ ¬¯
|
||
;¢å: e - ª®«¨ç¥á⢮ áâப ¤«ï áªà®«« ¤ ¬¯ (e=#01/#08/#FF/#F8)
|
||
;¢ëå: bc - ¯à¨à 饨¥ ¤«ï áªà®««¨£ ¤ ¬¯
|
||
; d =#00/#FF - áªà®««¨¬ ¢¯¥à¥¤/ § ¤
|
||
; cy =1 áªà®««¨¬ § ¤
|
||
x23A9 xor a
|
||
ld b,(ix+#04) ;¢ëá®â ®ª ¢ § ª®¬¥áâ å
|
||
x23AD add a,#08
|
||
djnz x23AD
|
||
ld c,a ;bc - ¯à¨à 饨¥ ¤«ï áªà®««¨£ ¤ ¬¯
|
||
ld d,#00
|
||
ld a,e
|
||
or a
|
||
ret p ;e<#80
|
||
dec d ;d=#FF
|
||
ld hl,#0000
|
||
sbc hl,bc
|
||
ld c,l
|
||
ld b,h
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #23C0 ®¯à¥¤¥«¥¨¥ ¯®«ï ¢ ®ª¥ । ªâ¨à®¢ ¨ï ¤ ¬¯
|
||
;¢ëå: cy =1 ªãàá®à ¢ ¯®«¥ । ªâ¨à®¢ ¨ï ¤à¥á ¤ ¬¯
|
||
; cy =0, z - ªãàá®à ¢ ¯®«¥ । ªâ¨à®¢ ¨ï hex ¤ ¬¯
|
||
; cy =0, nz - ªãàá®à ¢ ¯®«¥ । ªâ¨à®¢ ¨ï ᨬ¢«®¢ ¤ ¬¯
|
||
; c,a - ®¬¥à ¡ ©â ¢ áâப¥ ¤ ¬¯
|
||
; hl - ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
x23C0 ld a,(ix+#01) ;crd X
|
||
cp #06
|
||
jr nc,x23CB ;íâ® ¥ ¤à¥á®¥ ¯®«¥
|
||
; íâ® ¤à¥á®¥ ¯®«¥
|
||
sub #02
|
||
scf
|
||
ret
|
||
x23CB cp #20
|
||
jr nc,x23E5
|
||
; íâ® hex ¤ ¬¯
|
||
sub #08 ;(CrdX-8)/3
|
||
push de
|
||
ld c,a
|
||
xor a
|
||
ld de,#0003
|
||
rst #30
|
||
dw rom2_x16AA ;¤¥«¥¨¥ bc=ac/de
|
||
db #02 ;l ®áâ ⮪ ®â ¤¥«¥¨ï
|
||
pop de ;á - ®¬¥à ï祩ª¨ ¢ áâப¥ ¤ ¬¯ ¯ ¬ïâ¨
|
||
ld a,#01
|
||
sub l ;a - ᬥ饨¥ ®â ç « áâப¨ ¤® । ªâ¨à㥬®£® à §àï¤
|
||
call x23E8
|
||
xor a
|
||
ld a,c
|
||
ret
|
||
;í⮠ᨬ¢®«ì®¥ ¯à¥¤áâ ¢«¥¨¥ ¤ ¬¯
|
||
;¢å: a - ª®®à¤¨ â ªãàá®à
|
||
;¢ëå: nz
|
||
x23E5 sub #21
|
||
ld c,a
|
||
;ãáâ ®¢ª ¤à¥á ⥪ã饩 । ªâ¨à㥬®© ï祩ª¨ ¯ ¬ïâ¨
|
||
;¢å: á - ®¬¥à ï祩ª¨ ¢ áâப¥ ¤ ¬¯ ¯ ¬ïâ¨
|
||
; a - ᬥ饨¥ ®â ç « áâப¨ ¤® । ªâ¨à㥬®£® à §àï¤
|
||
x23E8 ld e,a
|
||
call x23F3
|
||
ld (xDD69),hl ; ¤à¥á ⥪ã饩 । ªâ¨à㥬®© ï祩ª¨ ¯ ¬ïâ¨
|
||
xor a
|
||
inc a
|
||
ld a,e
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #23F3 à áç¥â ¤à¥á ⥪ã饩 । ªâ¨à㥬®© ï祩ª¨ ¯ ¬ïâ¨
|
||
;¢å: á - ®¬¥à ï祩ª¨ ¢ áâப¥ ¤ ¬¯ ¯ ¬ïâ¨
|
||
;¢ëå: hl - ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
x23F3 ld a,(ix+#00) ;ª®®à¤¨ â Y ªãàá®à ¢ ®ª¥
|
||
rlca
|
||
rlca
|
||
rlca
|
||
add a,c
|
||
ld hl,(xDD87) ; ¤à¥á ç « ¤ ¬¯ ¯ ¬ïâ¨
|
||
jp x2023 ;á«®¦¥¨¥ hl=hl+a
|
||
|
||
;€„<E282AC>…‘: #2400 ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¢ bc
|
||
;¢å: hl - ¤à¥á ¯ ¬ï⨠¯®«ì§®¢ ⥫ï
|
||
;¢ëå: bc,a - ¯à®ç¨â ë© ¡ ©â
|
||
x2400 ld a,#0A ;®¬¥à ¯à®æ¥¤ãàë *2 (ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ ⥫ï)
|
||
call x202C ;¢ë§®¢ ¯à®æ¥¤ãàë ¯® â ¡«¨æ¥, ¤à¥á ª®â®à®© ¢ (xE9E1)
|
||
ld c,a
|
||
ld b,#00
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2409 । ªâ¨à®¢ ¨¥ ç¨á« ¢ bc
|
||
;¢å: bc - á«®¢® ¤«ï । ªâ¨à®¢ ¨ï
|
||
; a - ᬥ饨¥ ®â ç « áâப¨ ¤® । ªâ¨à㥬®£® à §àï¤
|
||
; d - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
;¢ëå: bc - ®â। ªâ¨à®¢ ë© ¡ ©â/á«®¢®
|
||
; nz - ç¨á«® ¥ ¨§¬¥¨«®áì
|
||
x2409 sub #03
|
||
neg
|
||
ld e,a
|
||
ld a,#04 ;ª®«-¢® à §à冷¢ ¢ ç¨á«¥
|
||
jr x2414
|
||
|
||
;€„<E282AC>…‘: #2412 । ªâ¨à®¢ ¨¥ ¡ ©â ¢ bc
|
||
;¢å: bc - ¡ ©â ¤«ï । ªâ¨à®¢ ¨ï
|
||
; e - ᬥ饨¥ ®â ª®æ áâப¨ ¤® । ªâ¨à㥬®£® à §àï¤
|
||
; d - ª®¤ ¦ ⮩ ª« ¢¨è¨
|
||
;¢ëå: bc - ®â। ªâ¨à®¢ ë© ¡ ©â/á«®¢®
|
||
; nz - ç¨á«® ¥ ¨§¬¥¨«®áì
|
||
x2412 ld a,#02 ;ª®«-¢® à §à冷¢ ¢ ç¨á«¥
|
||
x2414 push hl
|
||
push de
|
||
ld hl,xE1A6 ;¡ãä¥à ¤«ï ¢ë¢®¤ áâப¨
|
||
push de
|
||
ld de,#2310 ;è¥áâ ¤æ â¨à §à冷¥
|
||
call x0CDA ;¯¥ç âì ç¨á« bc ¢ ¡ãä¥à hl
|
||
ld hl,(xE3BC)
|
||
ld (hl),#FF
|
||
dec hl ; ¤à¥á ¯®á«¥¤¥£® ᨬ¢®«
|
||
pop de
|
||
ld a,d
|
||
ld d,#00
|
||
or a
|
||
sbc hl,de ; ¤à¥á à §àï¤ ç¨á«
|
||
ld (hl),a ;®¢®¥ § 票¥ à §àï¤
|
||
ld hl,xE1A6
|
||
rst #30
|
||
dw rom2_x0DF4 ;¯à¥®¡à §®¢ ¨¥ áâப¨ ¢ ç¨á«®
|
||
db #02
|
||
ld c,e ;१ã«ìâ ⠯८¡à §®¢ ¨ï
|
||
ld b,d
|
||
jr nz,x243A ;íâ® ¥ ç¨á«®
|
||
inc (hl) ;¬ àª¥à ª®æ áâப¨
|
||
x243A pop de
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #243D ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ ⥫ï
|
||
;¢å: hl - ¤à¥á ¢ ¯ ¬ïâ¨
|
||
;¢ëå: a - ¯à®ç¨â ë© ¡ ©â
|
||
x243D rst #30
|
||
dw rom2_x0028 ;ç⥨¥ ¡ ©â ¨§ ¯ ¬ï⨠¯®«ì§®¢ ⥫ï
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2442 § ¯¨áì ¡ ©â ¢ ¯ ¬ïâì ¯®«ì§®¢ ⥫ï
|
||
;¢å: hl - ¤à¥á ¢ ¯ ¬ïâ¨
|
||
; a - ¡ ©â ¤«ï § ¯¨á¨
|
||
x2442 rst #30
|
||
dw rom2_x0000 ;§ ¯¨áì ¡ ©â ¢ ¯ ¬ïâì ¯®«ì§®¢ ⥫ï (rst #00)
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2447 ¯¥ç âì ®¤®© áâப¨ ¤ ¬¯ ¯ ¬ï⨠(8 ¡ ©â)
|
||
;¢å: hl - ¤à¥á ¯ ¬ï⨠( ç «® ¤ ¬¯ )
|
||
;¢ëå: hl - á«¥¤ãî騩 ¤à¥á ¯ ¬ï⨠( ç «® ¤ ¬¯ )
|
||
x2447 rst #30
|
||
dw rom2_x2EBA ;¯¥ç âì ®¤®© áâப¨ ¤ ¬¯ ¯ ¬ï⨠(8 ¡ ©â)
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #244C ®¡®¢«¥¨¥ ®ª á ¤¨§ ᬮ¬ ¯ ¬ïâ¨ ç¨ ï á ⥪ã饩 ï祩ª¨
|
||
x244C bit 5,(iy+#0A)
|
||
ret nz ;¥ ®¡®¢«ïâì ¤¨§ áᥬ¡«¥à ¯ ¬ï⨠¯® ᮤ¥à¦¨¬®¬ã ï祩ª¨ ¯ ¬ïâ¨
|
||
ld de,(xDD69) ; ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
|
||
rst #30
|
||
dw rom2_x2F74 ;¢ë¢®¤ ¤¨á ᬠ¯ ¬ï⨠¯® ¤à¥áã ¢ de
|
||
db #02
|
||
rst #30
|
||
dw rom2_x3019 ;ix = ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à : ¤ ¬¯ ¯ ¬ïâ¨
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #245E ¯¥à¥¨¬¥®¢ ¨¥ ¯®¤à §¤¥«
|
||
x245E ld a,#32 ;á®®¡é¥¨¥ § £®«®¢ª : rename partition ...
|
||
call x29D7 ;¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
;hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
x2463 ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
ld a,#FF
|
||
cp (hl)
|
||
jr nz,x2471 ;¯®¤à §¤¥« áãé¥áâ¢ã¥â
|
||
x246C call x29F4 ;¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
jr x2463
|
||
x2471 ld a,(hl)
|
||
ld (xDFFE),a ;⨯ ¯®¤à §¤¥«
|
||
call x2D2F ;¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
jr c,x246C ;®â¬¥ ¢¢®¤ . ¯à®¤®«¦¨¬ ¢ë¡®à
|
||
jp x2D50 ;á®àâ¨à®¢ª ª â «®£ ¨ ¢ë室 ¢ ¬¥î
|
||
|
||
;<3B>¥ ¨á¯®«ì§ã¥âáï €„<E282AC>…‘: #247D ret
|
||
x247D ret
|
||
|
||
;€„<E282AC>…‘: #247E ¯¥ç âì ®¢®£® ¯ã⨠¯®á«¥ ¢ë¡®à ¯ãªâ®¢ ¬¥î mount/dismount DRIVE
|
||
;¢å: a - ®¬¥à ¤¨áª®¢®¤
|
||
x247E and #03
|
||
;¯¥ç¥âì á®®¡é¥¨ï
|
||
push af
|
||
bit 7,(iy+#0B)
|
||
jr nz,x248D ;¬¥î dismount
|
||
ld bc,#2B02 ;á®®¡é¥¨¥: mount on
|
||
rst #08
|
||
jr x2491
|
||
x248D ld bc,#2F02 ;á®®¡é¥¨¥: dismount
|
||
rst #08
|
||
x2491 pop af
|
||
call x249C ;¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤ ¨«¨ ¯ãâ¨, ¥á«¨ íâ® ®¡à §
|
||
ld a,#26
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #249C ¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤ ¨«¨ ¯ãâ¨, ¥á«¨ íâ® ®¡à §
|
||
;¢å: a - ®¬¥à ¤¨áª®¢®¤
|
||
x249C push af
|
||
;¯¥ç âì ¡ãª¢ë ¤¨áª®¢®¤
|
||
add a,"A"
|
||
rst #10
|
||
pop af
|
||
rst #30
|
||
dw rom7_x1B04 ;à áç¥â ¤à¥á ¡«®ª ®¯¨á â¥«ï § ¤ ®£® ¤¨áª®¢®¤
|
||
db #07
|
||
ld c,a ;ª®¤ ¯®¤à §¤¥« (¤«ï ®¡à § =#01)
|
||
;¯¥ç âì ¤¢®¥â®ç¨ï
|
||
push af
|
||
ld a,":"
|
||
rst #10
|
||
pop af
|
||
jr z,x24CD ;í⮠ॠ«ì ï ¤¨áª¥â
|
||
;íâ® ®¡à §. ¯¥ç âì ¯ãâ¨
|
||
ld de,#0009
|
||
add hl,de
|
||
ld de,xE7C7 ;áâப ¯ã⨠ª ®¡à §ã ¤¨áª
|
||
push de
|
||
call x24DE ;ª®¯¨à®¢ ¨¥ ¨¬¥¨ ¨§ (hl) ¢ (de)
|
||
ld a,c
|
||
cp #01
|
||
jr nz,x24C4 ;íâ® ¥ ®¡à § tr-dos
|
||
ld a,#5C ;"\"
|
||
ld (de),a
|
||
inc de
|
||
call x24DE
|
||
x24C4 ex de,hl
|
||
dec hl
|
||
set 7,(hl)
|
||
pop hl
|
||
rst #30
|
||
dw rom2_x15DB ;¯¥ç âì á®®¡é¥¨ï ¨§ hl
|
||
db #02
|
||
x24CD ret
|
||
|
||
;€„<E282AC>…‘: #24CE ®¡à ¡®âª ¯ãªâ ¬¥î: Z. dismount.../Z. mount...
|
||
x24CE bit 7,(iy+#0B)
|
||
jr nz,x24D9 ;¬¥î dismount
|
||
ld bc,#2D02 ;á®®¡é¥¨¥: dismount ...
|
||
rst #08
|
||
ret
|
||
x24D9 ld bc,#3002 ;á®®¡é¥¨¥: mount ... ___
|
||
rst #08
|
||
ret
|
||
|
||
;ª®¯¨à®¢ ¨¥ ¨¬¥¨ ¨§ (hl) ¢ (de)
|
||
;¢å: b - ᬥ饨¥ ¢ ¨¬¥¨ ¯®¤à §¤¥«
|
||
; hl - ç «® ¨¬¥¨ ¯®¤à §¤¥« ¢ ¡«®ª¥ ®¯¨á â¥«ï ¤¨áª®¢®¤
|
||
x24DE ld a,l
|
||
add a,b
|
||
ld l,a
|
||
jr nc,x24E4
|
||
inc h
|
||
x24E4 ld b,#06
|
||
x24E6 ld a,(hl)
|
||
cp #21
|
||
ret c ;¥¯¥ç âë© á¨¬¢®«. ¢ë室
|
||
ld (de),a
|
||
inc hl
|
||
inc de
|
||
djnz x24E6
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #24F0 ¬®â¨à®¢ ¨¥ ®¡à § ª ¤¨áª®¢®¤ã
|
||
;¢å: a - ®¬¥à ¤¨áª®¢®¤
|
||
x24F0 call x2536 ;¬®â¨à®¢ ¨¥/®âª«î票¥ ¯®¤à §¤¥« /®¡à § ¤¨áª
|
||
ret c ;®â¬¥ ¢ë¡®à
|
||
ld c,#11 ;ç⥨¥ ª®¤ ᯥæ¨ä¨ª 樨 ¤¨áª®¢®¤
|
||
rst #30
|
||
dw rom7_x0229 ;¢ë§®¢ äãªæ¨¨ R8DOS
|
||
db #07 ;hl - ¤à¥á ª®¤ , ®¯à¥¤¥«ïî饣® ⨯ ⥪ã饣® ¤¨áª®¢®¤
|
||
bit 4,(hl)
|
||
jr nz,x2503
|
||
ld hl,xFFDC
|
||
res 6,(hl)
|
||
|
||
;€„<E282AC>…‘: #2503 ¬®â¨à®¢ ¨¥ ¢á¥å ®¡à §®¢ á ¢¨ç¥áâ¥à
|
||
x2503 ld a,(xFFCA)
|
||
and #03
|
||
ld e,a ;®¬¥à ⥪ã饣® ¤¨áª®¢®¤
|
||
ld d,#03
|
||
; ¤«ï ¢á¥å ªà®¬¥ ⥪ã饣® ¤¨áª®¢®¤
|
||
x250B push de
|
||
ld a,d
|
||
cp e
|
||
call nz,x251A
|
||
pop de
|
||
ld a,d
|
||
or a
|
||
jr z,x2519
|
||
dec d
|
||
jr x250B
|
||
x2519 ld a,e
|
||
; ¢ ª®æ¥ ¨ ¤«ï ⥪ã饣®
|
||
;¬®â¨à®¢ ¨¥ ®¡à § á ®¡à ¡®âª®© ¥ã¤ 箩 ¯®¯ë⪨
|
||
x251A push af
|
||
or #80
|
||
rst #30
|
||
dw rom7_x18C0 ;R8DOS #28(40) ¢â®¯®¤ª«î票¥, â. ¥. ¯®¤ª«îç¨âì â®, çâ® § ¤ ® ¢ ᥪâ®à¥ ¢â® áâ஥ª
|
||
db #07
|
||
pop bc
|
||
ret nc ;¯à®è«® ¡¥§ ®è¨¡®ª
|
||
; ¡ë«¨ ®è¨¡ª¨ ¯à¨ ¬®â¨à®¢ ¨¨ ®¡à §
|
||
push af
|
||
ld a,b ;®¬¥à ¤¨áª®¢®¤
|
||
push bc
|
||
or #40
|
||
rst #30
|
||
dw rom7_x18C0 ;R8DOS #28(40) ®âª«îç¨âì ¯®¤à §¤¥« ®â ¤à ©¢¥à
|
||
db #07
|
||
pop bc
|
||
pop af
|
||
cp #67
|
||
ret z ;¥â ¯à¨¬®â¨à®¢ £® ¯®¤à §¤¥« /®¡à §
|
||
ld a,b
|
||
set 7,(iy+#0B)
|
||
|
||
;€„<E282AC>…‘: #2536 ¬®â¨à®¢ ¨¥/®âª«î票¥ ¯®¤à §¤¥« /®¡à § ¤¨áª
|
||
;¢å: a - ®¬¥à ¤¨áª®¢®¤
|
||
; 7,(iy+#0B) =0/1 mount/dismount
|
||
;
|
||
x2536 rst #30
|
||
dw rom7_x1AB1 ;®¯à¥¤¥«¥¨¥ ¤à¥á ç « § ¯¨á¨ ¤«ï § ¤ ®£® ¤¨áª®¢®¤ ¢ ¡ãä¥à¥ xE5A9
|
||
db #07
|
||
push hl ; ¤à¥á ç « § ¯¨á¨ ¤«ï § ¤ ®£® ¤¨áª®¢®¤ ¢ ¡ãä¥à¥ xE5A9
|
||
ld b,#00
|
||
bit 7,(iy+#0B) ;=0/1 mount/dismount
|
||
call z,x259D ;¥á«¨ ¤ , ¯¥ç âì á¯¨áª à §¤¥«®¢ ¨ ¢ë¡®à ¯®¤à §¤¥« /®¡à §
|
||
pop bc
|
||
ret c ;®â¬¥ ¢ë¡®à
|
||
; ¯®¤à §¤¥«/®¡à § ¢ë¡à
|
||
push hl ;hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
push bc
|
||
rst #30
|
||
dw rom7_x1E3D ;ç⥨¥ ᥪâ®à 3(ᥪâ®à á áâனª ¬¨) ¢ ¡ãä¥à xE5A9 ¨ ¯à®¢¥àª ª®â஫쮩 á㬬ë
|
||
db #07
|
||
jr nc,x2552 ;ãᯥè®
|
||
cp #63 ;®è¨¡ª ª®â஫쮩 á㬬ë. áâனª¨ ®¡ã«¥ë
|
||
jr nz,x2599 ;®è¨¡ª¨ ç⥨ï
|
||
x2552 pop hl ;hl ¤à¥á áâப¨ á ¯à¨¬®â¨à®¢ ë¬ ®¡à §®¬ ¢ ¡ãä¥à¥ (¤«ï § ¤ ®£® ¤¨áª®¢®¤ )
|
||
bit 7,(iy+#0B) ;=0/1 mount/dismount
|
||
res 7,(iy+#0B)
|
||
ld (hl),#00
|
||
pop de ;de - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
jr nz,x2592 ;dismount
|
||
;ä®à¬¨à®¢ ¨¥ § ¯¨á¨ ® ¯à¨¬®â¨à®¢ ®¬ ¯®¤à §¤¥«¥/®¡à §¥
|
||
ld a,(de)
|
||
push de
|
||
ld (hl),a ;+#00 ⨯ à §¤¥« /®¡à §
|
||
inc hl
|
||
ex de,hl
|
||
ld bc,#0001
|
||
add hl,bc
|
||
ld bc,#0004
|
||
ldir ;+#01 ᬥ饨¥ ¯¥à¢®£® ᥪâ®à ®â ç « ¢¨ç¥áâ¥à (LBA ¤à¥á)
|
||
ld (de),a ;+#05 ⨯ à §¤¥« /®¡à §
|
||
and #DF ;á¡à®á ¡¨â § é¨âë ®â § ¯¨á¨
|
||
inc de
|
||
pop hl ;hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
push hl
|
||
ld bc,#0006
|
||
add hl,bc
|
||
ld bc,#0004
|
||
ldir ;+#06 à §¬¥à ¯®¤à §¤¥« /®¡à §
|
||
cp #01
|
||
jr z,x2588 ;íâ® ®¡à § ¤¨áª
|
||
pop hl ;hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
push hl
|
||
call x25E1 ;+#0A ¨¬ï ¯®¤à §¤¥«
|
||
jr x258E
|
||
; íâ® ®¡à § ¤¨áª
|
||
x2588 ld hl,xE81B+#0A
|
||
call x25E5 ;+#0A ¨¬ï ¯®¤à §¤¥« , ª®â®à®¬ã ¯à¨ ¤«¥¦¨â ®¡à §
|
||
x258E pop hl ;hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
call x25E1 ;+#0A ¨¬ï ¯®¤à §¤¥« /®¡à §
|
||
x2592 rst #30
|
||
dw rom7_x1D2A ;¯®¤áç¥â ª®â஫쮩 áã¬¬ë ¨ § ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9 ¢¨ç¥áâ¥à
|
||
db #07
|
||
ret nc ;®è¨¡®ª ¥â
|
||
jr x25D1 ;®è¨¡ª § ¯¨á¨
|
||
;®è¨¡ª ç⥨ï/§ ¯¨á¨ ¢¨ç¥áâ¥à
|
||
x2599 pop bc
|
||
pop hl
|
||
jr x25D1
|
||
|
||
;¯¥ç âì á¯¨áª à §¤¥«®¢ ¨ ¢ë¡®à ¯®¤à §¤¥« /®¡à §
|
||
;¢ëå: cy =1 ®â¬¥ ¢ë¡®à
|
||
; =0 ®¡à §/à §¤¥« ¢ë¡à
|
||
; hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
; (xE81B) § £®«®¢®ª ¢ë¡à ®£® ¯®¤à §¤¥« /®¡à §
|
||
x259D call x2620 ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠¯®¤à §¤¥«®¢ MFS
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢
|
||
ld a,c
|
||
or b
|
||
jp z,x0EB5 ;¯®¤à §¤¥«®¢ ¥â. ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
ld a,#1E
|
||
call x29D7 ;¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
x25AE ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
ld a,(hl)
|
||
and #DF
|
||
cp #01
|
||
jr z,x25C4 ;¯®¤à §¤¥« TR-DOS
|
||
cp #02
|
||
ret z ;MicroDOS
|
||
cp #03
|
||
ret z ;IS-DOS
|
||
call x29F4 ;¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
jr x25AE
|
||
;¢ë¡à ¯®¤à §¤¥« TR-DOS
|
||
x25C4 ld de,xE81B ;ª®¯¨à㥬 § ¯¨áì ¯®¤à §¤¥«
|
||
ld bc,#0010
|
||
ldir
|
||
call x25EB ;ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠®¡à §®¢ ª®««¥ªæ¨¨
|
||
jr nc,x25D6 ;áä®à¬¨à®¢ ® ¡¥§ ®è¨¡®ª
|
||
; ®è¨¡ª¨ ¢¨ç¥áâ¥à
|
||
x25D1 rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
x25D6 ld a,#1F ;á®®¡é¥¨¥: select disk
|
||
call x29D0 ;¯¥ç âì ®ª á ®¡à § ¬¨ ¤¨áª®¢ ¨ ¢ë¡®à ®¡à § ¢ ¥¬
|
||
ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
or a
|
||
ret
|
||
;ª®¯¨à®¢ ¨¥ 6 ¡ ©â ¨§ (hl+#0A) ¢ (de)
|
||
x25E1 ld bc,#000A
|
||
add hl,bc
|
||
;ª®¯¨à®¢ ¨¥ 6 ¡ ©â ¨§ (hl) ¢ (de)
|
||
x25E5 ld bc,#0006
|
||
ldir
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #25EB ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠®¡à §®¢ ª®««¥ªæ¨¨
|
||
; (xE81B) § £®«®¢®ª ¢ë¡à ®£® ¯®¤à §¤¥«
|
||
x25EB call x2707 ;dehl - ᬥ饨¥(LBA ¤à¥á) ¯¥à¢®£® ᥪâ®à ¯®¤à §¤¥«
|
||
rst #30
|
||
dw rom7_x17BB ;ç⥨¥ ¢ ¡ãä¥à xEBF5 ª â «®£ ¢ë¡à ®£® ¯®¤à §¤¥«
|
||
db #07
|
||
ret c ;®è¨¡ª
|
||
;¯à®¢¥àª «¨ç¨ï ᨣ âãàë
|
||
ld hl,(xEBF5+#3FC) ;ᨣ âãà ¯®¤à §¤¥«
|
||
ld de,#5254
|
||
sbc hl,de
|
||
jr z,x2601 ;ᨣ âãà ᮢ¯ ¤ ¥â
|
||
ld a,#63
|
||
scf
|
||
ret
|
||
x2601 push ix
|
||
call x2671 ;á®àâ¨à®¢ª § ¯¨á¥© ¢ ¡ãä¥à¥ ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;ix=xEBF5
|
||
call x2707 ;dehl - ᬥ饨¥ ¯¥à¢®£® ᥪâ®à ¢ë¡à ®£® ¯®¤à §¤¥«
|
||
call x2683 ;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã ®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
call x2707 ;dehl - ᬥ饨¥ ¯¥à¢®£® ᥪâ®à ¢ë¡à ®£® ¯®¤à §¤¥«
|
||
ld bc,xE9E7
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
;de=xE9E7
|
||
ld bc,#0006
|
||
jr x2661 ;ä®à¬¨à®¢ ¨¥ ¯®á«¥¤¥© unused § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
|
||
;€„<E282AC>…‘: #261A 㤠«¥¨¥ ¢á¥å ¯®¤à §¤¥«®¢
|
||
x261A set 6,(iy+#1C) ;¯à¨§ ª ¨§¬¥¥¨ï ª â «®£
|
||
jr x2647
|
||
|
||
;€„<E282AC>…‘: #2620 ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 ᯨ᪠¯®¤à §¤¥«®¢ MFS
|
||
x2620 res 6,(iy+#1C)
|
||
rst #30
|
||
dw rom7_x1768 ;¯®¨áª à §¤¥« MFS
|
||
db #07
|
||
jr nc,x262F ;à §¤¥« ©¤¥
|
||
x262A rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
x262F push hl ;dehl - ᬥ饨¥ ¯¥à¢®£® ᥪâ®à à §¤¥«
|
||
push de ;bc - ¤à¥á ¤¥áªà¨¯â®à à §¤¥« MFS ¢ ¡ãä¥à¥
|
||
ld l,c
|
||
ld h,b
|
||
ld de,xE81B
|
||
ld bc,#0010
|
||
ldir
|
||
pop de
|
||
pop hl
|
||
rst #30
|
||
dw rom7_x17BB ;ç⥨¥ ¢ ¡ãä¥à xEBF5 ¤¢ãå ¯¥à¢ëå ᥪâ®à®¢ à §¤¥« MFS
|
||
db #07
|
||
jr nc,x264A ;¥â ®è¨¡®ª
|
||
cp #63 ;à §¤¥« ¥ ¨¨æ¨ «¨§¨à®¢
|
||
jr nz,x262A ;®è¨¡ª ç⥨ï
|
||
x2647 call x2E71 ;®ç¨á⪠¡ãä¥à xEBF5 ¨ ãáâ ®¢ª ᨣ âãàë à §¤¥« MFS
|
||
x264A push ix
|
||
call x2671 ;á®àâ¨à®¢ª ¯®¤à §¤¥«®¢ ¢ ¡ãä¥à¥ xEBF5 ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;ix=xEBF5, bc - ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢ ¢ ¡ãä¥à¥
|
||
call x270D ;§ £à㧪 ç¨á« ¢ dehl ¨§ ¯ ¬ï⨠xE81B+8
|
||
call x2683 ;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
call x270D ;§ £à㧪 ç¨á« ¢ dehl ¨§ ¯ ¬ï⨠xE81B+8
|
||
ld bc,xE9E7
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
;de=xE9E7
|
||
ld bc,#000C
|
||
; ä®à¬¨à®¢ ¨¥ ¯®á«¥¤¥© unused § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
x2661 ld hl,xE81B
|
||
add hl,bc ; ¤à¥á ª®«¨ç¥á⢠ᥪâ®à®¢ à §¤¥« MFS
|
||
ex de,hl
|
||
push hl
|
||
call x3052 ;(xE9E7) - ¤à¥á ¯¥à¢®£® ᢮¡®¤®£® ᥪâ®à ¯®á«¥ à §¤¥« MFS
|
||
pop hl
|
||
call x26AC ;¯à®¢¥àª ª®æ à §¤¥« MFS «¨ç¨¥ ¯ãá⮣® ¬¥áâ
|
||
pop ix
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2671 á®àâ¨à®¢ª § ¯¨á¥© ¢ ¡ãä¥à¥ xEBF5 ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;¢ëå: ix,xEBF5
|
||
; bc - ª®«¨ç¥á⢮ § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
x2671 call x271A ;¯®¤áç¥â ª®«¨ç¥á⢠§ ¯¨á¥©
|
||
ld hl,x28B9 ;¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
call x2960 ;á®àâ¨à®¢ª ¤¥áªà¨¯â®à®¢ § ¯¨á¥©
|
||
ld ix,xEBF5
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2683 ¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
;¢å: ix=xEBF5 - ¤à¥á ¡ãä¥à á ª â «®£®¬ ¯®¤à §¤¥«®¢/®¡à §®¢
|
||
; bc - ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢/®¡à §®¢
|
||
; dehl - ᬥ饨¥ ¯¥à¢®£® ᥪâ®à MFS à §¤¥« (LBA ¤à¥á)
|
||
x2683 ld (xE9EB),hl
|
||
ld (xE9EB+#02),de
|
||
push bc
|
||
ld hl,xE9EB
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
pop bc
|
||
x2695 ld a,c
|
||
or b
|
||
ret z ;¥â § ¯¨á¥©
|
||
dec bc ;®¬¥à ¯®á«¥¤¥© § ¯¨á¨
|
||
push bc
|
||
push ix
|
||
pop hl ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®© § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
ld bc,#0001
|
||
add hl,bc ; ¤à¥á á LBA ¤à¥á®¬ ¯¥à¢®© § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
call x26AC ;¯à®¢¥àª à §àë¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãá⮩ § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
ld bc,#0010
|
||
add ix,bc ; ¤à¥á á«¥¤ãî饩 § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
pop bc
|
||
jr x2695 ;¯®¢â®à¨¬
|
||
|
||
;€„<E282AC>…‘: #26AC ¯à®¢¥àª à §àë¢ ¬¥¦¤ã ¯®¤à §¤¥« ¬¨/®¡à § ¬¨ ¨ ᮧ¤ ¨¥ ¯ãá⮩ § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
;¢å: ix=xEBF5 - ¤à¥á § ¯¨á¨ ¢ ¡ãä¥à¥ á ª â «®£®¬ ¯®¤à §¤¥«®¢/®¡à §®¢
|
||
; hl - ¤à¥á á LBA ¤à¥á®¬ ¯®¤à §¤¥« /®¡à § (LBA ¤à¥á)
|
||
; (xE9EB) - à áç¥âë© ¤à¥á ç « í⮣® ¯®¤à §¤¥« /®¡à § (LBA ¤à¥á)
|
||
;¢ëå: (xE9EB) - à áç¥âë© ¤à¥á ç « á«¥¤ãî饣® ¯®¤à §¤¥« /®¡à § (LBA ¤à¥á)
|
||
;
|
||
x26AC push hl
|
||
ld de,xE9EB ;ᬥ饨¥ ¯¥à¢®£® ᥪâ®à MFS à §¤¥« (LBA ¤à¥á) +2
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
pop hl
|
||
jr z,x26F8 ;®¨ à ¢ë
|
||
;¥áâì ¯ãá⮥ ¬¥áâ®. ä®à¬¨à㥬 § ¯¨áì unused ¢ ¡ãä¥à¥
|
||
ld de,xE9E7
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ex de,hl
|
||
ld de,xE9EB
|
||
push hl
|
||
call x3035 ;¢ëç¨â ¨¥ (hl)=(hl)-(de)
|
||
pop hl ;(xE9E7) à §¬¥à ¯ãá⮣® ¯à®áâà áâ¢
|
||
ld de,rom7_x0F59 ;=#00000200
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
jp c,x26F8 ;¬¥¥¥ 256Kb
|
||
call x2990 ;¢áâ ¢«ï¥¬ ®¢ãî § ¯¨áì ¢ ᯨ᮪ § ¯¨á¥©
|
||
push ix
|
||
pop hl
|
||
; ãáâ ¢«¨¢ ¥¬ ᬥ饨¥ ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
push hl
|
||
ld bc,#0001
|
||
add hl,bc ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
ld de,xE9EB
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
pop hl
|
||
; ãáâ ¢«¨¢ ¥¬ à §¬¥à ®¢®© § ¯¨á¨
|
||
ld bc,#0006
|
||
add hl,bc ; ¤à¥á à §¬¥à ®¢®© § ¯¨á¨
|
||
ld de,xE9E7
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ld (ix+0),#FF ;¯®¬¥ç ¥¬ ª ª unused
|
||
call x26F8 ;à áç¥â ¤à¥á ç « á«¥¤ãî饣® ¯®¤à §¤¥« /®¡à § (LBA ¤à¥á)
|
||
ld bc,#0010
|
||
add ix,bc ;¤¢¨£ ¥¬ 㪠§ ⥫ì ᤢ¨ãâãî § ¯¨áì
|
||
;à áç¥â ¤à¥á ç « á«¥¤ãî饣® ¯®¤à §¤¥« /®¡à § (LBA ¤à¥á)
|
||
x26F8 push ix
|
||
pop hl
|
||
ld bc,#0006
|
||
add hl,bc ; ¤à¥á á à §¬¥à®¬ ¯®¤à §¤¥« /®¡à §
|
||
ex de,hl
|
||
ld hl,xE9EB
|
||
call x3052 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2707 § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠xE81B+1
|
||
x2707 push bc
|
||
ld bc,#0001
|
||
jr x2711
|
||
|
||
;€„<E282AC>…‘: #270D § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠xE81B+8
|
||
x270D push bc
|
||
ld bc,#0008
|
||
x2711 ld hl,xE81B
|
||
add hl,bc
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #271A ¯®¤áç¥â ª®«¨ç¥á⢠¯®¤à §¤¥«®¢ ¢ MFS
|
||
;¢ëå: (xDD89),bc - ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢ ¢ à §¤¥«¥ MFS
|
||
x271A ld hl,xEBF5
|
||
ld e,#10
|
||
xor a
|
||
ld d,a
|
||
ld b,a
|
||
ld c,a
|
||
x2723 ld a,(hl)
|
||
cp b
|
||
jr z,x272E
|
||
inc c
|
||
add hl,de
|
||
ld a,c
|
||
cp #3F
|
||
jr c,x2723
|
||
x272E ld (xDD89),bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2733 㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR
|
||
x2733 set 6,(iy+#1C)
|
||
jr x275F
|
||
|
||
;€„<E282AC>…‘: #2739 ä®à¬¨à®¢ ¨¥ ¢ ¡ãä¥à¥ xEBF5 á¯¨áª à §¤¥«®¢ MBR
|
||
x2739 res 6,(iy+#1C)
|
||
set 7,(iy+#1C)
|
||
rst #30
|
||
dw rom7_x1768 ;¯®¨áª à §¤¥« MFS
|
||
db #07
|
||
jr nc,x2762 ;à §¤¥« ©¤¥
|
||
res 7,(iy+#1C)
|
||
cp #63
|
||
jr z,x2754 ;à §¤¥« ¥ ©¤¥
|
||
rst #30 ;®è¨¡ª çâ¥¨ï ¤¨áª
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
;à §¤¥« MFS ¥ ©¤¥. ¯à®¢¥à塞 «¨ç¨¥ MBR
|
||
x2754 ld hl,(xE5A9+#1FE) ;ᨣ âãà ᥪâ®à MBR
|
||
ld de,#AA55
|
||
or a
|
||
sbc hl,de
|
||
jr z,x2762 ;ᨣ âãà ¥áâì
|
||
x275F call x2E5D ;áä®à¬¨à㥬 ¯ãá⮩ ᥪâ®à MBR ¢ ¡ãä¥à¥ xE5A9
|
||
;¨é¥¬ § ¯¨á¨ ¢ MBR ¨ ª®¯¨à㥬 ¨å ¢ ¡ãä¥à xEBF5
|
||
x2762 ld de,xEBF5 ;áî¤ á«®¦¨¬ áãé¥áâ¢ãî騥 § ¯¨á¨ ¢ MBR
|
||
push ix
|
||
ld bc,#0400
|
||
ld ix,xE5A9+#1BE ; ç «® § ¯¨á¥© ¢ MBR
|
||
x276E push bc
|
||
xor a
|
||
or (ix+4) ;ª®¤ ⨯ à §¤¥«
|
||
ld a,c
|
||
ld bc,#0010
|
||
jr z,x2781 ;¯ãáâ ï § ¯¨áì
|
||
inc a ;+1 ©¤¥ ï § ¯¨áì
|
||
push ix
|
||
pop hl
|
||
push bc
|
||
ldir ;ª®¯¨à㥬 ¢ ¡ãä¥à xEBF5
|
||
pop bc
|
||
x2781 add ix,bc ; ¤à¥á á«¥¤ãî饩 § ¯¨á¨ ¢ MBR
|
||
pop bc
|
||
ld c,a ;ª®«¨ç¥á⢮ ©¤¥ëå § ¯¨á¥©
|
||
djnz x276E
|
||
ld (xDD89),bc ;ª®«¨ç¥á⢮ ©¤¥ëå § ¯¨á¥©
|
||
pop ix
|
||
;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
x278D ld hl,x2895
|
||
call x2960 ;á®àâ¨à®¢ª § ¯¨á¥© MBR ¯® ¤à¥áã à ᯮ«®¦¥¨ï
|
||
push ix
|
||
ld ix,xEBF5 ;¡ãä¥à á § ¯¨áﬨ MBR
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥©
|
||
call x2FCF ;®¡ã«¥¨¥ ¯¥à¥¬¥®© xE9EB
|
||
ld a,(xDFF5) ;§ 票¥ sector HDD
|
||
ld (xE9EB),a ;à §¤¥« ¬®¦¥â ç¨ âìáï ⮫쪮 á ç « ¤®à®¦ª¨
|
||
ld a,c
|
||
or b
|
||
jr z,x27C2 ;¥â § ¯¨á¥© ¢ MBR
|
||
x27AA ld a,c
|
||
or b
|
||
jr z,x27C2 ;¡®«ìè¥ ¥â § ¯¨á¥© MBR ¤«ï ®¡à ¡®âª¨
|
||
dec bc
|
||
push bc
|
||
push ix
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ MBR ¢ ¡ãä¥à¥ xEBF5
|
||
ld bc,#0008
|
||
add hl,bc ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à § ¯¨á¨ MBR
|
||
call x27E1 ;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥
|
||
;¯ãá⮩ § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
ld bc,#0010
|
||
add ix,bc
|
||
pop bc
|
||
jr x27AA ;¯à®¢à¥ª á«¥¤ãî饩 § ¯¨á¨ MBR
|
||
;¡ãä¥à á § ¯¨áﬨ ¯®áâ஥
|
||
x27C2 ld hl,(xE5A5)
|
||
ld de,#0000 ;head * sector ªâ¨¢®£® HDD
|
||
exx
|
||
ld bc,(xDFF2) ;§ 票¥ Cylinders HDD
|
||
rst #30
|
||
dw rom7_x0FB7 ;㬮¦¥¨¥ dehl=de'hl' * bc
|
||
db #07
|
||
ld bc,xE9E7
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
ex de,hl ;hl=xE9E7 ( ¤à¥á ¯®á«¥¤¥£® ᥪâ®à ¢ CHS)
|
||
call x302A ;¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
call x27E1
|
||
pop ix
|
||
ret
|
||
|
||
;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥ ¯ãá⮩ § ¯¨á¨ ¢ ¡ãä¥à¥
|
||
;¢å: ix ¤à¥á ç « § ¯¨á¨ MBR ¢ ¡ãä¥à¥ xEBF5
|
||
; hl - ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à § ¯¨á¨ MBR
|
||
; (xE9EB) ¯¥à¢ë© ᢮¡®¤ë© ᥪâ®à
|
||
;¢ëå: (xE9EB) ®¢ë© ¯¥à¢ë© ᢮¡®¤ë© ᥪâ®à
|
||
; ix - ¤à¥á á«¥¤ãî饩 § ¯¨á¨
|
||
x27E1 push hl
|
||
ld de,xE9EB
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
pop hl
|
||
jr z,x282C ;¥â ¯à®¯ãé¥ëå ᥪâ®à®¢
|
||
; ¢ëç¨á«ï¥¬ ª®«¨ç¥á⢮ ¥§ ïâëå ᥪâ®à®¢
|
||
ld de,xE9E7 ;¯¥à¥¬¥ ï
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ex de,hl
|
||
ld de,xE9EB
|
||
push hl
|
||
call x3035 ;¢ëç¨â ¨¥ (hl)=(hl)-(de)
|
||
pop hl ;(xE9E7) - ª®«¨ç¥á⢮ ¥§ ïâëå ᥪâ®à®¢
|
||
ld de,rom7_x0F55 ;íâ® ¤à¥á ¢ rom 7 ᮤ¥à¦¨â dd #800
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
jp c,x282C ;¬¥ìè¥ ¬¥£ ¡ ©â . ¥ãç¨âë¢ ¥¬
|
||
; ᮧ¤ ¥¬ ®¢ãî § ¯¨áì á ª®«¨ç¥á⢮¬ ¥§ ïâëå ᥪâ®à®¢
|
||
call x2990 ;¢áâ ¢«ï¥¬ ®¢ãî § ¯¨áì ¢ ᯨ᮪ § ¯¨á¥©
|
||
push ix
|
||
pop hl
|
||
push hl ; ¤à¥á ®¢®© § ¯¨á¨
|
||
ld bc,#0008
|
||
add hl,bc ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
ld de,xE9EB
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
pop hl ; ¤à¥á ®¢®© § ¯¨á¨
|
||
ld bc,#000C
|
||
add hl,bc ; ¤à¥á ª®«¨ç¥á⢠ᥪâ®à®¢ à §¤¥«
|
||
ld de,xE9E7 ;ª®«¨ç¥á⢮ ¥§ ïâëå ᥪâ®à®¢
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
call x283B ;ãáâ ®¢ª ®áâ «ìëå ¯ à ¬¥â஢ ¢ ®¢®© § ¯¨á¨
|
||
call x282C ;(xE9EB) ®¢ë© ¯¥à¢ë© ᢮¡®¤ë© ᥪâ®à
|
||
ld bc,#0010
|
||
add ix,bc ;á«¥¤ãîé ï § ¯¨áì
|
||
;à áç¥â ®¢®£® ¯¥à¢®£® ᢮¡®¤®£® ᥪâ®à
|
||
x282C push ix
|
||
pop hl
|
||
ld bc,#000C
|
||
add hl,bc ; ¤à¥á ª®«¨ç¥á⢠ᥪâ®à®¢ à §¤¥«
|
||
ex de,hl
|
||
ld hl,xE9EB
|
||
call x3052 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
ret
|
||
;ãáâ ®¢ª ®áâ «ìëå ¯ à ¬¥â஢ ¢ ®¢®© § ¯¨á¨
|
||
;¢å: ix - ¤à¥á ®¢®© § ¯¨á¨
|
||
x283B ld (ix+#00),#FF ;⨯ unused
|
||
ld (ix+#04),#53 ;ª®¤ ⨯ à §¤¥« (MFS)
|
||
push ix
|
||
pop hl
|
||
ld bc,#0008
|
||
add hl,bc ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
push hl
|
||
push ix
|
||
pop bc
|
||
inc bc ; ¤à¥á áâàãªâãàë ®¯¨á ¨ï à §¤¥« MBR +1
|
||
call x2874 ;à áç¥â ¨ ãáâ ®¢ª ¢ áâàãªâãॠ§ ¯¨á¨ MBR ¯ à ¬¥â஢ CHS
|
||
pop hl ; ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
; à áç¥â ª®«¨ç¥á⢠ᥪâ®à®¢ ®¢®© § ¯¨á¨
|
||
ld de,xE9E7
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ex de,hl
|
||
push hl
|
||
inc de
|
||
inc de
|
||
inc de
|
||
inc de ; ¤à¥á ª®«¨ç¥á⢠ᥪâ®à®¢ ®¢®© § ¯¨á¨
|
||
call x3052 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
pop hl
|
||
push hl
|
||
call x302A ;¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
; ãáâ ®¢ª ª®æ à §¤¥« ¢ CHS
|
||
push ix
|
||
pop hl
|
||
ld bc,#0005
|
||
add hl,bc ;ª®¥æ à §¤¥« - £®«®¢ª
|
||
ld c,l
|
||
ld b,h
|
||
pop hl
|
||
ld hl,xE9E7
|
||
;à áç¥â ¨ ãáâ ®¢ª ¢ áâàãªâãॠ§ ¯¨á¨ MBR ¯ à ¬¥â஢ CHS
|
||
;¢å: bc - ¤à¥á áâàãªâãàë ®¯¨á ¨ï à §¤¥« MBR +1
|
||
; hl - ¤à¥á á¬¥é¥¨ï ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
x2874 push bc
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
;dehl - ᬥ饨¥ ¯¥à¢®£® ᥪâ®à ®¢®© § ¯¨á¨
|
||
rst #30
|
||
dw rom7_x1DDF ;à áç¥â ¨ ãáâ ®¢ª ¢ ¯¥à¥¬¥ëå ¤à¥á LBA/CHS ¢ § ¢¨á¨¬®á⨠®â áâ஥ª
|
||
db #07
|
||
pop hl ; ç «® à §¤¥« - £®«®¢ª
|
||
ld a,(iy+#35)
|
||
and #0F
|
||
ld (hl),a ;£®«®¢ª
|
||
inc hl
|
||
ld a,(iy+#34)
|
||
and #03
|
||
rlca
|
||
rlca ;樫¨¤à (¡¨âë 6, 7)
|
||
or (iy+#32) ;ᥪâ®à (¡¨âë 0-5)
|
||
ld (hl),a
|
||
inc hl
|
||
ld a,(iy+#33)
|
||
ld (hl),a ;樫¨¤à (áâ à訥 ¡¨âë 8, 9 åà ïâáï ¢ ¡ ©â¥ ®¬¥à ᥪâ®à )
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2895 á®àâ¨à®¢ª ¤¢ãå ¤¥áªà¨¯â®à®¢ bc ¨ bc+1 ¯® ¤à¥áã à ᯮ«®¦¥¨ï (¤«ï § ¯¨á¥© MBR)
|
||
;¢å: bc - ®¬¥à ¯®¤à §¤¥«
|
||
x2895 call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
ld hl,xEBF5+#08 ;¡ãä¥à á ᥪâ®à ¬¨ à §¤¥« +8
|
||
add hl,bc
|
||
ex de,hl
|
||
ld hl,xEBF5+#18 ;#EC0D
|
||
|
||
;á®àâ¨à®¢ª ¤¢ãå ¤¥áªà¨¯â®à®¢ ¯® ¢®§à áâ ¨î § ¤ ®£® ¯®«ï
|
||
;¢å: hl - ¤à¥á ï祩ª¨ ¢â®à®£® ¯®¤à §¤¥« á ¯®«¥¬ ¤«ï á®àâ¨à®¢ª¨
|
||
; bc - ᬥ饨¥ ¤® ¤¥áªà¨¯â®à ¯®¤à §¤¥« ¢ ¡ãä¥à¥
|
||
; de - ¤à¥á ï祩ª¨ ¯®¤à §¤¥« á ¯®«¥¬ ¤«ï á®àâ¨à®¢ª¨
|
||
;¢ëå: cy=0 ®¡¬¥ ¥ ¡ë«®
|
||
; cy=1 ¤¥áªà¨¯â®àë ¯®¬¥ïë ¬¥áâ ¬¨
|
||
x28A0 add hl,bc ; ¤à¥á ï祩ª¨ ᮠᬥ饨¥¬ ¤® ç « ¯®á«¥¤¥£® ¯®¤à §¤¥«
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
ret nc ;à ᯮ«®¦¥ë ¯® ¢®§à áâ ¨î
|
||
ld hl,xEBF5 ;®¡¬¥ ¬¥áâ ¬¨ ¤¥áªà¨â®à®¢
|
||
add hl,bc
|
||
ex de,hl
|
||
ld hl,xEBF5+#10
|
||
add hl,bc
|
||
ld b,#10
|
||
x28B0 ld a,(de)
|
||
ld c,(hl)
|
||
ld (hl),a
|
||
ld a,c
|
||
ld (de),a
|
||
djnz x28B0
|
||
scf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #28B9 á®àâ¨à®¢ª ¤¢ãå ¤¥áªà¨¯â®à®¢ bc ¨ bc+1 ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï
|
||
;¢å: bc - ®¬¥à ¯®¤à §¤¥«
|
||
x28B9 call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
ld hl,xEBF5+#01 ;¡ãä¥à á ᥪâ®à ¬¨ à §¤¥« +1
|
||
add hl,bc ; ¤à¥á ï祩ª¨ ᮠᬥ饨¥¬ ¤® ç « ¯®¤à §¤¥«
|
||
ex de,hl ;
|
||
ld hl,xEBF5+#11 ; ¤à¥á ï祩ª¨ ᮠᬥ饨¥¬ ¤® ç « ¢â®à®£® ¯®¤à §¤¥«
|
||
jr x28A0 ;á®àâ¨à®¢ª ¯® ¢®§à áâ ¨î ¬¥á⮯®«®¦¥¨ï ¤¢ãå ¤¥áªà¨¯â®à®¢
|
||
|
||
;€„<E282AC>…‘: #28C6 㯫®â¥¨¥ ª â «®£ MBR (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
;¢å: hl=x2D5D ¯/¯ áà ¢¥¨ï (hl) á #FF, cy=1 ¥á«¨ à ¢ë
|
||
;
|
||
x28C6 ld (xE51C+1),hl
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥© ¢ ¡ãä¥à¥ ª â «®£
|
||
call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
ld hl,xEBF5 ;¡ãä¥à
|
||
push hl
|
||
push hl
|
||
add hl,bc ;ª®¥æ ª â «®£
|
||
ld (xE9E7),hl ; ¤à¥á ª®æ ª â «®£
|
||
pop hl
|
||
ld bc,#0000
|
||
x28DD ex de,hl
|
||
ld hl,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥© ¢ ¡ãä¥à¥ ª â «®£
|
||
scf ;âãâ áç¥â稪 § ¯¨á¥© ¢ ª â «®£¥
|
||
sbc hl,bc ;
|
||
inc bc ;
|
||
ex de,hl ;hl ¤à¥á ®¡à ¡ âë¢ ¥¬®© § ¯¨á¨ ¢ ª â «®£¥
|
||
jr c,x2914 ;¥â ¡®«ìè¥ § ¯¨á¥©
|
||
call xE51C ;áà ¢¨¬ á #FF
|
||
jr nc,x290E ;¥ à ¢ë, á«¥¤ãîé ï § ¯¨áì
|
||
push hl ; ¤à¥á ⥪ã饩 § ¯¨á¨
|
||
ex de,hl
|
||
ld hl,(xE9E7)
|
||
or a
|
||
sbc hl,de ;à §¬¥à ¥®¡à ¡®â ®£® ª â «®£
|
||
jr z,x290D ;¯à®á¬®â५¨ ¢¥áì ª â «®£
|
||
push bc
|
||
push hl
|
||
ld bc,#0010 ;ã¡¨à ¥¬ ¨§ ª â «®£ § ¯¨áì unused
|
||
or a ;¨ 㯫®â塞 ª â «®£
|
||
sbc hl,bc
|
||
add hl,de
|
||
ld (xE9E7),hl ;®¢ë© ¤à¥á ª®æ ª â «®£ , ¯®á«¥ 㯫®â¥¨ï
|
||
ld l,e
|
||
ld h,d
|
||
add hl,bc ; ¤à¥á á«¥¤ãî饩 § ¯¨á¨
|
||
pop bc
|
||
ldir ;㯫®â塞
|
||
pop bc
|
||
pop hl
|
||
jr x28DD ;á«¥¤ãé ï § ¯¨áì
|
||
;ª®¥æ ª â «®£
|
||
x290D pop hl ; ¤à¥á ª®æ ª â «®£
|
||
;á«¥¤ãé ï § ¯¨áì
|
||
x290E ld de,#0010
|
||
add hl,de
|
||
jr x28DD
|
||
;§ ¢¥à訫¨ 㯫®â¥¨¥
|
||
;hl ¤à¥á ª®æ ª â «®£
|
||
x2914 pop de ;de ¤à¥á ¯¥à¢®© § ¯¨á¨ ¢ ª â «®£¥
|
||
xor a
|
||
sbc hl,de
|
||
push hl
|
||
ld b,#04
|
||
x291B srl h
|
||
rr l
|
||
djnz x291B ;hl=hl/#10
|
||
ld (xDD89),hl ;ª®«¨ç¥á⢮ § ¯¨á¥©
|
||
pop hl
|
||
add hl,de
|
||
ld (hl),a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2928 ¯®¤áç¥â ª®«¨ç¥áâ¢ à §¤¥«®¢/¯®¤à §¤¥«®¢ ¢ ª â «®£¥
|
||
;¢ëå: de - ä ªâ¨ç¥áª®¥ ª®«¨ç¥á⢮ à §¤¥«®¢/¯®¤à §¤¥«®¢ ¢ ª â «®£¥
|
||
x2928 ld hl,x2D5D ;¯/¯ áà ¢¥¨ï (hl) á #FF, cy=1 ¥á«¨ à ¢ë
|
||
call x2939 ;de - ª®«¨ç¥á⢮ ¯ãáâëå § ¯¨á¥© ¢ ª â «®£¥ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
ld hl,(xDD89) ;ª®«¨ç¥á⢮ à §¤¥«®¢/¯®¤à §¤¥«®¢ ¢ ª â «®£¥
|
||
or a
|
||
sbc hl,de
|
||
ex de,hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2936 ¯®¤áç¥â ¯ãáâëå § ¯¨á¥© ¢ ª â «®£¥ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
;¢ëå: de - ª®«¨ç¥á⢮ ¯ãáâëå § ¯¨á¥© ¢ ª â «®£¥ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
x2936 ld hl,x2D5D ;¯/¯ áà ¢¥¨ï (hl) á #FF, cy=1 ¥á«¨ à ¢ë
|
||
x2939 ld (xE51C+#01),hl
|
||
ld hl,xEBF5 ;ª â «®£ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
ld de,(xDD89) ;ª®«¨ç¥á⢮ à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
ld a,e
|
||
or d
|
||
ret z ;a=#00 ¥â à §¤¥«®¢/¯®¤à §¤¥«®¢
|
||
push bc
|
||
ld c,e
|
||
ld b,d ;bc ª®«¨ç¥á⢮ à §¤¥«®¢/¯®¤à §¤¥«®¢ ¢ ª â «®£¥
|
||
ld de,#0000 ;ª®«¨ç¥á⢮ ¯ãáâëå § ¯¨á¥© ¢ ª â «®£¥
|
||
x294C dec bc
|
||
call xE51C
|
||
jr c,x2953 ;§ ¯¨áì ® à §¤¥«¥/¯®¤à §¤¥«¥ ¥ ¯ãáâ ï
|
||
inc de
|
||
x2953 ld a,c
|
||
or b
|
||
jr z,x295E
|
||
ld a,#10 ;á«¥¤ãîé ï § ¯¨áì
|
||
call x2023 ;á«®¦¥¨¥ hl=hl+a
|
||
jr x294C
|
||
x295E pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2960 á®àâ¨à®¢ª ¤¥áªà¨¯â®à®¢ ¯®¤à §¤¥«®¢
|
||
;¢å: hl=x28B9 - ¯® ¯®à浪㠬¥á⮯®«®¦¥¨ï ¢¨ç¥áâ¥à¥
|
||
; hl=x2895 - ¯® ¤à¥áã à ᯮ«®¦¥¨ï (¤«ï § ¯¨á¥© MBR)
|
||
x2960 ld (xE51C+1),hl
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢
|
||
ld a,c
|
||
or b
|
||
ret z ;¯®¤à §¤¥«ë ®âáãâáâ¢ãîâ
|
||
ld hl,#0001
|
||
sbc hl,bc
|
||
ret z ;¯®¤à §¤¥« ⮫쪮 1
|
||
x2970 xor a
|
||
ld r,a
|
||
ld bc,(xDD89) ;ª®«¨ç¥á⢮ ¯®¤à §¤¥«®¢
|
||
dec bc
|
||
x2978 push bc
|
||
dec bc
|
||
call xE51C ;¯/¯ á®àâ¨à®¢ª¨
|
||
jr nc,x2983 ;®¡¬¥ ¥ ¡ë«®
|
||
ld a,#FF
|
||
ld r,a ;7,r =1 ¡ë« §®âï ¡ë ®¤¨ ®¡¬¥
|
||
x2983 pop bc
|
||
dec bc
|
||
ld a,c
|
||
or b
|
||
jr nz,x2978 ;á«¥¤ãîé ï ¯ à ¤¥áªà¨¯â®à®¢
|
||
ld a,r
|
||
bit 7,a
|
||
jr nz,x2970 ;¡ã¤¥¬ ¯®¢â®àïâì, ¯®ª á®àâ¨à®¢ª ¥ § ª®ç¨âáï
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2990 ¢áâ ¢«ï¥¬ ®¢ãî § ¯¨áì ¢ ᯨ᮪ § ¯¨á¥©
|
||
;¢å: ix ¤à¥á ç « § ¯¨á¨ ¢ ¡ãä¥à¥ =xEBF5, á ª®â®à®© ¤® à §¤¢¨ãâì ᯨ᮪
|
||
; (xDD89) - ª®«¨ç¥á⮢ § ¯¨á¥©
|
||
x2990 ld bc,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥© (®® ¦¥ ®¬¥à ¯¥à¢®© ᢮¡®¤®©)
|
||
call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
call x2FDB ;¨ªà¥¬¥â á«®¢ (xDD89)=(xDD89)+1
|
||
ld hl,xEBF5 ;¡ãä¥à á § ¯¨áﬨ
|
||
add hl,bc ; ¤à¥á ®¢®© § ¯¨á¨ ¢ ª®æ¥ ᯨáª
|
||
push ix
|
||
pop de ; ¤à¥á ⥪ã饩 § ¯¨á¨
|
||
or a
|
||
sbc hl,de
|
||
ret c ;®è¨¡ª
|
||
push hl ; ᪮«ìª® ¡ ©â ᤢ¨ãâì
|
||
push ix
|
||
pop hl ; ¤à¥á ⥪ã饩 § ¯¨á¨
|
||
ld bc,#0010
|
||
ld e,l
|
||
ld d,h ; ¤à¥á ⥪ã饩 § ¯¨á¨
|
||
add hl,bc ;ªã¤ ᤢ¨£ ¥¬
|
||
ex de,hl
|
||
pop bc ; ᪮«ìª® ¡ ©â ᤢ¨ãâì
|
||
ld a,c
|
||
or b
|
||
ret z
|
||
push hl
|
||
sbc hl,de ; ¯à ¢«¥¨¥ ¯¥à¥®á
|
||
pop hl
|
||
jr c,x29BD
|
||
ldir
|
||
ret
|
||
x29BD dec bc
|
||
add hl,bc
|
||
ex de,hl
|
||
add hl,bc
|
||
ex de,hl
|
||
inc bc
|
||
lddr
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #29C6 à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
;¢å: hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
;¢ëå: hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
x29C6 ld c,l
|
||
ld b,h
|
||
call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
ld hl,xEBF5
|
||
add hl,bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #29D0 ¯¥ç âì ®ª á ®¡à § ¬¨ ¤¨áª®¢ ¨ ¢ë¡®à ®¡à § ¢ ¥¬
|
||
;¢ëå: cy=0 ¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
; hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
; cy=1 ®è¨¡ª ¢ë¡®à
|
||
x29D0 ld hl,x2A0A
|
||
jr x29E1
|
||
|
||
;€„<E282AC>…‘: #29D5 ¯¥ç âì ®ª local partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;¢ëå: cy=0 ¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
; hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
; cy=1 ®è¨¡ª ¢ë¡®à
|
||
x29D5 ld a,#16 ;á®®¡é¥¨¥ § £®«®¢ª : partition information
|
||
|
||
;€„<E282AC>…‘: #29D7 ¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
;¢ëå: cy=0 ¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
; hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
; cy=1 ®è¨¡ª ¢ë¡®à
|
||
x29D7 ld hl,x2A04 ;â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª ¢ë¡®à à §¤¥«
|
||
jr x29E1
|
||
|
||
;€„<E282AC>…‘: #29DC ¯¥ç âì ®ª global partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;¢ëå: cy=0 ¢ë¡®à ¯à®¨§¢¥¤¥ ãᯥè®
|
||
; hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
; cy=1 ®è¨¡ª ¢ë¡®à
|
||
x29DC ld a,#16 ;á®®¡é¥¨¥ § £®«®¢ª : partition information
|
||
x29DE ld hl,x29FE ;â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª partition information
|
||
x29E1 ld (iy-#08),a ;®¬¥à á®®¡é¥¨ï ⥪ã饩 ®¯æ¨¨
|
||
call x2BB8 ;¯®¤£®â®¢ª ª ¯¥ç ⨠®ª ¢ë¡®à à §¤¥«
|
||
ld (xE9E1),hl ; ¤à¥á ᯨ᪠¯à®æ¥¤ãà
|
||
call x2FE5 ;¤¥ªà¥¬¥â á«®¢ (xDD89)=(xDD89)-1
|
||
call x1EF1 ;¯¥ç âì ª â «®£ ¨ ¢ë¡®à ¯®§¨æ¨¨ ¢ ¥¬
|
||
call x2FDB ;¨ªà¥¬¥â á«®¢ (xDD89)=(xDD89)+1
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #29F4 ¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
x29F4 call x2FE5 ;¤¥ªà¥¬¥â á«®¢ (xDD89)=(xDD89)-1
|
||
call x1F04 ;¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
call x2FDB ;¨ªà¥¬â á«®¢ (xDD89)=(xDD89)+1
|
||
ret
|
||
|
||
;â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª global partition information
|
||
x29FE dw x2A77 ;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ à §¤¥«®¢ MBR
|
||
dw x2A19 ;¯®«ã票¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ¯®¤à §¤¥«®¢
|
||
dw x2A10 ;§ £®«®¢®ª: partition information
|
||
|
||
;â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª ¢ë¡®à à §¤¥«
|
||
x2A04 dw x2A33 ;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ¯®¤à §¤¥«®¢
|
||
dw x2A19 ;¯®«ã票¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ¯®¤à §¤¥«®¢
|
||
dw x2A10 ;§ £®«®¢®ª: _select local partition_
|
||
|
||
;#2A0A â ¡«¨æ ᮠᯨ᪮¬ ¯à®æ¥¤ãà ¤«ï ¯¥ç ⨠®ª ¢ë¡®à ®¡à § ¤¨áª
|
||
x2A0A dw x2A1D ;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ®¡à §®¢ ¤¨áª®¢
|
||
dw x2A19 ;¯®«ã票¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ ¯®¤à §¤¥«®¢
|
||
dw x2A10 ;§ £®«®¢®ª: select disk
|
||
|
||
;§ £®«®¢®ª: _select local partition _
|
||
x2A10 rst #20
|
||
dc " "
|
||
ld b,(iy-#08) ;®¬¥à á®®¡é¥¨ï ¢ ¡«®ª¥
|
||
ld c,#02 ;®¬¥à ¡«®ª á®®¡é¥¨©
|
||
rst #08 ;select local partition
|
||
ret
|
||
;¯®«ã票¥ ®¬¥à ¯®á«¥¤¥© § ¯¨á¨ ¢ ª â «®£¥ à §¤¥«®¢/¯®¤à §¤¥«®¢/®¡à §®¢
|
||
x2A19 ld hl,(xDD89)
|
||
ret
|
||
|
||
;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ®¡à §®¢ ¤¨áª®¢
|
||
x2A1D call x2B05 ;¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ #FF
|
||
jr nz,x2A27 ;¯¥ç âì ¨¬¥¨
|
||
call x2B12 ;¯¥ç âì á®®¡é¥¨ï: Unused
|
||
jr x2A6C ;¯¥ç âì à §¬¥à
|
||
x2A27 rst #20
|
||
dc "Disk Name"
|
||
jr x2A59 ;¯à®¤®«¦¥¨¥ ¯¥ç ⨠¨¬¥¨ ¤¨áª
|
||
|
||
;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ ¯®¤à §¤¥«®¢
|
||
x2A33 call x2B05 ;¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
jr nz,x2A3D ;<>#FF
|
||
x2A38 call x2B12 ;¯¥ç âì á®®¡é¥¨ï: Unused
|
||
jr x2A6C
|
||
x2A3D bit 7,(hl)
|
||
ld a," "
|
||
jr z,x2A45
|
||
ld a,"*"
|
||
x2A45 rst #10 ;¯¥ç âì ᨬ¢®« ¨§ A
|
||
|
||
push hl ;¯¥ç âì ⨯ ¯®¤à §¤¥«
|
||
ld a,(hl)
|
||
and #07
|
||
ld hl,x2B71 ;ᯨ᮪ á®®¡é¥¨©
|
||
call x2B8C ;¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
jr nc,x2A6B ;⨯ à §¤¥« ¥ ®¯®§
|
||
ld a,#0A
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
pop hl
|
||
x2A59 ld a,":" ;à §¤¥«¨â¥«ì
|
||
rst #10
|
||
|
||
push hl ;¯¥ç âì ¨¬¥¨ ¯®¤à §¤¥«
|
||
ld bc,#000A
|
||
add hl,bc
|
||
xor a
|
||
cp (hl)
|
||
jr z,x2A6B ;¥â ¨¬¥¨
|
||
ld b,#06
|
||
rst #30 ;¯¥ç âì ¨¬¥¨ ¯®¤à §¤¥«
|
||
dw rom2_x15B3 ;¯¥ç âì á®®¡é¥¨ï ¨§ hl ¤«¨®© b
|
||
db #02
|
||
x2A6B pop hl
|
||
x2A6C ld a,#13
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
call x3005 ;dehl = à §¬¥à ¯®¤à §¤¥«
|
||
jr x2A97 ;¯¥ç âì à §¬¥à ¯®¤à §¤¥«
|
||
|
||
;¯¥ç âì ®¤®£® ¨¬¥¨ ¨§ ª â «®£ à §¤¥«®¢ MBR
|
||
x2A77 call x2B03 ;¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
jr nz,x2A81 ;¥áâì § ¯¨áì
|
||
call x2B12 ;¯¥ç âì á®®¡é¥¨ï: Unused
|
||
jr x2A8E ;
|
||
; ¯¥ç âì ⨯ à §¤¥« MBR
|
||
x2A81 push hl ;®¬¥à § ¯¨á¨
|
||
ld bc,#0004
|
||
add hl,bc
|
||
ld a,(hl) ;ª®¤ ⨯ à §¤¥«
|
||
ld hl,x2B1A ;â ¡«¨æ á á®®¡é¥¨ï¬¨ ⨯®¢ à §¤¥«®¢
|
||
call x2B8C ;¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
pop hl
|
||
; ¯¥ç âì à §¬¥à à §¤¥«
|
||
x2A8E ld a,#13
|
||
rst #30
|
||
dw rom2_x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ®© ª®®à¤¨ âë X
|
||
db #02
|
||
call x300A ;dehl - 箫¨ç¥á⢮ ᥪâ®à®¢ à §¤¥« MBR
|
||
|
||
;¯¥ç âì à §¬¥à ¢ ¬¥£ ¡ ©â å
|
||
;dehl - à §¬¥à ¯®¤à §¤¥«
|
||
x2A97 ld a,e
|
||
or d
|
||
jr nz,x2AA4 ;¬¥£ ¡ ©âë
|
||
ld bc,#0800
|
||
push hl
|
||
sbc hl,bc
|
||
pop hl
|
||
jr c,x2AB2 ;ª¨«®¡ ©âë
|
||
|
||
;€„<E282AC>…‘: #2AA4 ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
x2AA4 call x2AC0 ;¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
ld a,#04
|
||
rst #30
|
||
dw rom2_x1629 ;¯¥ç âì ç¨á« ¢ bc (bin/oct/dec/hex) á ¯à¥ä¨ªá®¬
|
||
db #02
|
||
rst #20
|
||
dc " MB"
|
||
ret
|
||
x2AB2 call x2ACC ;¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ª¨«®¡ ©âë
|
||
ld a,#04
|
||
rst #30
|
||
dw rom2_x1629 ;¯¥ç âì ç¨á« ¢ bc (bin/oct/dec/hex) á ¯à¥ä¨ªá®¬
|
||
db #02
|
||
rst #20
|
||
dc " KB"
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2AC0 ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
;¢å: dehl - à §¬¥à ¢ ᥪâ®à å
|
||
;¢ëå: bc - à §¬¥à ¢ ¬¥£ ¡ ©â å
|
||
x2AC0 exx
|
||
ld bc,#800
|
||
rst #30
|
||
dw rom7_x0F5D ;¤¥«¥¨¥ de'hl'=de'hl'/bc
|
||
db #07
|
||
exx
|
||
x2AC9 ld c,l
|
||
ld b,h
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2ACC ¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ª¨«®¡ ©âë
|
||
;¢å: dehl - à §¬¥à ¢ ᥪâ®à å
|
||
;¢ëå: bc - à §¬¥à ¢ ª¨«®¡ ©â å
|
||
x2ACC exx
|
||
ld bc,#0002
|
||
rst #30
|
||
dw rom7_x0F5D ;¤¥«¥¨¥ de'hl'=de'hl'/bc
|
||
db #07
|
||
exx
|
||
ld a,e
|
||
or d
|
||
jr nz,x2AE2 ;¡®«¥¥ 16 bit
|
||
push hl
|
||
ld bc,#8000
|
||
sbc hl,bc
|
||
pop hl
|
||
jr c,x2AC9 ;¬¥¥¥ #8000
|
||
x2AE2 ld hl,#7FFF ;१ã«ìâ â ¡®«¥¥ #7FFF
|
||
jr x2AC9
|
||
|
||
;€„<E282AC>…‘: #2AE7 㬮¦¥¨¥ dehl=de*#800
|
||
;¢å: de - ç¨á«®
|
||
;¢ëå: dehl - १ã«ìâ â
|
||
x2AE7 ld l,e
|
||
ld h,d
|
||
ld de,#0000
|
||
exx
|
||
ld bc,#0800
|
||
rst #30
|
||
dw rom7_x0FB7 ;㬮¦¥¨¥ dehl=de'hl' * bc
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2AF5 㬮¦¥¨¥ dehl=de*2
|
||
;¢å: de - ç¨á«®
|
||
;¢ëå: dehl - § 票¥
|
||
x2AF5 ld l,e
|
||
ld h,d
|
||
ld de,#0000
|
||
exx
|
||
x2AFB ld bc,#0002
|
||
rst #30
|
||
dw rom7_x0FB7 ;㬮¦¥¨¥ dehl=de'hl' * bc
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2B03 ¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
;¢å: hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
;¢ëå: z - ¯¥à¢ë© ¡ ©â =#FF
|
||
x2B03 rst #20
|
||
dc " "
|
||
|
||
;€„<E282AC>…‘: #2B05 ¯à®¢¥àª ¯¥à¢®£® ¡ ©â § ¯¨á¨ ª â «®£ ¯®¤à §¤¥« #FF
|
||
;¢å: hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
;¢ëå: z - ¯¥à¢ë© ¡ ©â =#FF
|
||
x2B05 push hl
|
||
pop bc
|
||
x2B07 call x2FEF ;㬮¦¥¨¥ bc=bc*#10
|
||
ld hl,xEBF5
|
||
add hl,bc
|
||
ld a,(hl)
|
||
cp #FF
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2B12 ¯¥ç âì á®®¡é¥¨ï: Unused
|
||
x2B12 rst #20
|
||
dc "Unused"
|
||
ret
|
||
|
||
;â ¡«¨æ á §¢ ¨ï¬¨ à §¤¥«®¢ MBR
|
||
x2B1A db #00
|
||
dc "Unknown DOS"
|
||
db #01
|
||
dc "MS-DOS 12FAT"
|
||
db #04
|
||
dc "MS-DOS 16FAT"
|
||
db #05
|
||
dc "MS-DOS Ext"
|
||
db #06
|
||
dc "MS-DOS 3.31+"
|
||
db #07
|
||
dc "OS/2 HPFS"
|
||
db #0A
|
||
dc "OS/2 Boot"
|
||
dc "SMFS"
|
||
db #FF
|
||
|
||
;â ¡«¨æ á §¢ ¨ï¬¨ à §¤¥«®¢ MFS
|
||
x2B71 db #01
|
||
dc "TR-DOS"
|
||
db #02
|
||
dc "MicroDOS"
|
||
db #03
|
||
dc "IsDOS"
|
||
db #04
|
||
dc "BAD"
|
||
db #FF
|
||
|
||
;€„<E282AC>…‘: x2B8C ¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
;¢å: hl - ᯨ᮪ á®®¡é¥¨©
|
||
; a - ⨯ á®®¡é¥¨ï
|
||
;¢ëå: cy=1 ¯¥ç â ®
|
||
; cy=0 á®®¡é¥¨¥ ¥ ©¤¥®
|
||
x2B8C call x2B9A ;¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
ret c ; ¯¥ç â ®
|
||
rst #20 ;¯¥ç âì á®®¡é¥¨ï "Unknown"
|
||
dc "Unknown"
|
||
or a
|
||
ret
|
||
;¯®¨áª ¨ ¯¥ç âì á®®¡é¥¨ï ¨§ HL ¯® ⨯㠢 A
|
||
;cy=1 ¯¥ç â ®
|
||
;cy=0 á®®¡é¥¨¥ ¥ ©¤¥®
|
||
x2B9A ld c,a
|
||
x2B9B ld a,(hl)
|
||
cp #FF
|
||
ret z ;ª®¥æ ᯨáª
|
||
ld a,c
|
||
cp (hl)
|
||
inc hl
|
||
jr z,x2BAC ;á®®¡é¨¥ ©¤¥®
|
||
x2BA4 ld a,(hl) ;¨é¥¬ ª®¥æ á®®¡é¥¨ï
|
||
and #80
|
||
inc hl
|
||
jr z,x2BA4
|
||
jr x2B9B
|
||
;¯¥ç âì á®®¡é¥¨ï ¨§ hl
|
||
;cy=1 ¯¥ç â ®
|
||
x2BAC ld a,(hl)
|
||
rst #30
|
||
dw rom2_x2B0B ;¯¥ç âì ᨬ¢®« á® á¡à®á®¬ 7£® ¡¨â (rst #10)
|
||
db #02
|
||
and #80
|
||
inc hl
|
||
jr z,x2BAC ;¥é¥ ¥ ª®¥æ á®®¡é¥¨ï
|
||
scf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2BB8 ¯®¤£®â®¢ª ª ¯¥ç ⨠®ª ¢ë¡®à à §¤¥«
|
||
x2BB8 push hl
|
||
call x0E8C ;áï⨥ ¢ë¤¥«¥¨ï âਡãâ ¬¨ § ¤ ®© ®¯æ¨¨ ¬¥î (¯® ªãàá®àã)
|
||
ld hl,#0506 ;ª®®à¤¨ âë ®ª
|
||
ld de,#1C15 ;è¨à¨ ®ª ¢ § ª®¬¥áâ å ¨ ᨬ¢®« å
|
||
call x2133 ;ª®à४æ¨ï ª®®à¤¨ â ¨ à §¬¥à®¢ ®ª
|
||
call x0D02 ;®ç¨á⪠¨¦¥© áâப¨ ®ª ¬¥î
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2BCA ᮧ¤ ¨¥ à §¤¥« MFS
|
||
x2BCA ld a,#19 ;§ £®«®¢®ª ®ª : create partition ...
|
||
call x29DE ;¯¥ç âì ®ª global partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
x2BCF ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
ld a,#FF
|
||
cp (hl)
|
||
jr z,x2BDD ;¢ë¡à ® ¥§ ï⮥ ¬¥áâ®
|
||
x2BD8 call x29F4 ;¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
jr x2BCF
|
||
; § ïâ ï ®¡« áâì ¢ë¡à . ᮧ¤ ¥¬ à §¤¥« MFS (¢á¥ ¥§ ïâë¥ ®¡« á⨠¢ ¡ãä¥à¥
|
||
; 㦥 ¯®¬¥ç¥ë ¯à¨§ ª®¬ à §¤¥« MFS)
|
||
x2BDD ld a,#07
|
||
x2BDF push hl
|
||
push af
|
||
call x300A ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+12 ¡ ©â ª ¤à¥áã hl
|
||
call x2AC0 ;¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ¬¥£ ¡ ©âë
|
||
pop af ;bc - à §¬¥à ¢ ¬¥£ ¡ ©â å
|
||
ld hl,#0813
|
||
call x0BD0 ;¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
pop hl
|
||
jr c,x2BD8 ;®â¬¥ ¢¢®¤ ç¨á«
|
||
ld a,e
|
||
or d
|
||
jr z,x2BD8 ;¢¢¥¤¥ ®«ì
|
||
push hl
|
||
call x2AE7 ;㬮¦¥¨¥ dehl=de*#800
|
||
ld bc,xE9E7 ;dehl à §¬¥à ᮧ¤ ¢ ¥¬®£® à §¤¥« ¢ ᥪâ®à å
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
pop hl
|
||
push hl
|
||
ld bc,#000C
|
||
add hl,bc ;à §¬¥à à §¤¥« MBR ¢ § ¯¨á¨ ¢ ª â «®£¥
|
||
call x2FCA ;áà ¢¥¨¥ ᮠᮡ®¤ë¬ ¬¥á⮬
|
||
pop hl
|
||
ld a,#0C
|
||
jr c,x2BDF ;᫨誮¬ ¡®«ì让 à §¤¥« å®â¨¬ ᮧ¤ âì
|
||
ld (hl),#00 ;¯à¨§ ª «¨ç¨ï à §¤¥« +0 ¢ § ¯¨á¨
|
||
ld bc,#000C ;§ ®á¨¬ ¢ § ¯¨áì ¢ ª â «®£¥ à §¬¥à à §¤¥«
|
||
add hl,bc
|
||
ld de,xE9E7 ;à §¬¥à ᮧ¤ ¢ ¥¬®£® à §¤¥«
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
jr x2C2A ;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
|
||
;€„<E282AC>…‘: #2C1F 㤠«¥¨¥ à §¤¥« MBR
|
||
x2C1F ld a,#18 ;á®®¡é¥¨¥ § £®«®¢ª : delete partition ...
|
||
call x29DE ;¯¥ç âì ®ª global partition information ¨ ¢ë¡®à § ¯¨á¨ ¢ ¥¬
|
||
;hl - ®¬¥à § ¯¨á¨ ¢ ª â «®£¥
|
||
ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
;hl - ¤à¥á § ¯¨á¨ ¢ ª â «®£¥
|
||
ld (hl),#FF ;¯®¬¥ç ¥¬ ª ª ¯ãáâãî § ¯¨áì
|
||
;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
x2C2A set 6,(iy+#1C)
|
||
ld hl,x2D5D ;!!!íâ® «¨èïï ª®¬ ¤
|
||
call x28C6 ;㯫®â¥¨¥ ª â «®£ MBR (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
jp x278D ;¯à®¢¥àª à §à뢮¢ ¬¥¦¤ã à §¤¥« ¬¨ ¨ ᮧ¤ ¨¥ ¯ãáâëå § ¯¨á¥© ¢ ¡ãä¥à¥
|
||
|
||
;€„<E282AC>…‘: #2C37 ᮧ¤ ¨¥ ¯®¤à §¤¥«
|
||
x2C37 ld a,#19 ;á®®¡é¥¨¥ § £®«®¢ª : create partition ...
|
||
call x29D7 ;¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
x2C3C ret c ;®è¨¡ª
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
ld a,#FF
|
||
cp (hl)
|
||
jr z,x2C4A ;íâ § ¯¨áì ¯ãáâ ï
|
||
x2C45 call x29F4 ;¢ë¡à ¥ª®à४âë© à §¤¥«. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
jr x2C3C
|
||
;ᮧ¤ ¥¬ ¯®¤à §¤¥«
|
||
x2C4A push hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld hl,#0A01
|
||
ld de,#2B71
|
||
call x2F10 ;¢ë¡®à ⨯ ¯®¤à §¤¥«
|
||
call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
jr c,x2C45 ;®â¬¥ ¢ë¡®à ⨯ ¯®¤à §¤¥« . ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
ld (xDFFE),a ;ª®¤ ⨯ ¯®¤à §¤¥«
|
||
call x2D2F ;¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
jr c,x2C45 ;®â¬¥ ¢¢®¤
|
||
ld a,#07
|
||
x2C64 ld c,a
|
||
ld a,(xDFFE) ;ª®¤ ⨯ ¯®¤à §¤¥«
|
||
cp #01
|
||
ld a,c
|
||
jr z,x2CEB ;¢¢®¤ à §¬¥à ¯®¤à §¤¥« TR-DOS ¢ ®¡à § å
|
||
;¢¢®¤ ç¨á« . à §¬¥à ¯®¤à §¤¥« ¢ ª¨«®¡ ©â å
|
||
push hl
|
||
push af
|
||
call x3005 ;dehl - à §¬¥à ¯®¤à §¤¥« ¢ ᥪâ®à å
|
||
call x2ACC ;¯à¥®¡à §®¢ ¨¥ ª®«¨ç¥á⢠ᥪâ®à®¢ ¢ ª¨«®¡ ©âë
|
||
pop af ;bc - à §¬¥à ¢ ª¨«®¡ ©â å
|
||
ld hl,#0812 ;¯ à ¬¥âàë ®ª ¢¢®¤
|
||
call x0BD0 ;¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
jr c,x2C45 ;®â¬¥ ¢¢®¤ ç¨á«
|
||
ld a,e ;de - ¢¢¥¤¥®¥ ç¨á«®
|
||
or d
|
||
ld a,#0C
|
||
jr z,x2C64 ;¢¢¥«¨ ®«ì. ¯®¢â®à¨¬ ¢¢®¤
|
||
;¯à®¢¥àª ç¨á«
|
||
push hl
|
||
call x2AF5 ;㬮¦¥¨¥ dehl=de*2
|
||
x2C8C push de
|
||
ld bc,xE9E7
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
pop bc ;de=xE9E7
|
||
ld a,c
|
||
or b
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld a,#0C
|
||
jr nz,x2C64 ;¥«ì§ï ᮧ¤ âì ¯®¤à §¤¥« ¡®«¥¥ 32Mb. ¯®¢â®à¨¬ ¢¢®¤
|
||
;¯à®¢¥àª ᢮¡®¤®£® ¬¥áâ ¯®¤ § ¤ ë© à §¬¥à
|
||
push hl
|
||
ld bc,#0006
|
||
add hl,bc ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥+6
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld a,#0C
|
||
jr c,x2C64 ;¥â ¬¥áâ ¯®¤ â ª®© à §¤¥«. ¯®¢â®à¨¬ ¢¢®¤
|
||
;¯à®¢¥àª ¬¨¨¬ «ì® ¤®¯ãá⨬®£® à §¬¥à ¯®¤à §¤¥«
|
||
push hl
|
||
ld hl,xE9E7 ;¢¢¥¤¥®¥ ç¨á«®
|
||
ld de,rom7_x0F59 ;=#00000200
|
||
call x2FCA ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld a,#0C
|
||
jr c,x2C64 ;᫨誮¬ ¬ «¥ìª¨©. ¯à®¤®«¦¨¬ ¢¢®¤
|
||
ld a,(xDFFE) ;ª®¤ ⨯ ¯®¤à §¤¥«
|
||
ld (hl),a
|
||
push hl
|
||
ld bc,#0006
|
||
add hl,bc
|
||
ld de,xE9E7 ;¢¢¥¤¥®¥ ç¨á«®
|
||
ex de,hl
|
||
call x3000 ;§ ¯¨è¥¬ ¢ ¤¥áªà¨¯â®à ¯®¤à §¤¥« à §¬¥à
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld a,(hl)
|
||
cp #01
|
||
jr nz,x2CE8 ;íâ® ¥ TR-DOS ¯®¤à §¤¥«
|
||
;ᮧ¤ ¥¬ ª®««¥ªæ¨î ®¡à §®¢
|
||
push hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld de,xE8A9
|
||
ld bc,#0010
|
||
ldir ;᪮¯¨à㥬 ¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
jp nz,x2CE6 ;®âª § ®â á®åà ¥¨ï
|
||
call x2FB1 ;§ ¯¨áì ª â «®£ MFS
|
||
call x2D63 ;ä®à¬¨à®¢ ¨¥ ª®««¥ªæ¨¨ ®¡à §®¢ ¢ ¯®¤à §¤¥«¥ TR-DOS
|
||
jp x09E5 ;ç⥨¥ ª â «®£ ¯®¤à §¤¥«®¢
|
||
|
||
x2CE6 ld (hl),#FF ;¯®¬¥ç ¥¬ ¯®¤à §¤¥« ª ª 㤠«¥ë©
|
||
x2CE8 jp x2D50 ;á®àâ¨à®¢ª ª â «®£ ¨ ¢ë室 ¢ ¬¥î
|
||
;¢¢®¤ à §¬¥à ¯®¤à §¤¥« TR-DOS ¢ ®¡à § å
|
||
;hl - ¤à¥á ¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
x2CEB push hl
|
||
push af
|
||
call x2E30 ;à áç¥â ¬ ªá¨¬ «ì®£® ª®«¨ç¥á⢠®¡à §®¢ ¨áå®¤ï ¨§ à §¬¥à®¢ ¯®¤à §¤¥«
|
||
ld a,c
|
||
or a
|
||
jr z,x2D2A ;¥â ®¡à §®¢. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
pop af
|
||
ld hl,#0812
|
||
call x0BD0 ;¢¢®¤ ç¨á« . ¢ BC ç «ì®¥ § 票¥
|
||
call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
pop hl
|
||
jp c,x2C45 ;®â¬¥ ¢¢®¤ . ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
ld a,e
|
||
or d
|
||
ld a,#0C
|
||
jp z,x2C64 ;®«ì ®¡à §®¢ ¥«ì ᮧ¤ âì. ¯à®¤®«¦ ¥¬ ¢¢®¤
|
||
; à áç¥â à §¬¥à ¯®¤à §¤¥« ¨áå®¤ï ¨§ ª®«-¢ ®¡à §®¢
|
||
push hl ; ¤à¥á ¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
ld l,e
|
||
ld h,d
|
||
ld de,#0000
|
||
exx
|
||
ld bc,#0501 ;à §¬¥à ®¡à § ¢ ᥪâ®à å
|
||
rst #30
|
||
dw rom7_x0FB7 ;㬮¦¥¨¥ dehl=de'hl' * bc
|
||
db #07
|
||
ld bc,xE9E7
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì (de=xE9E7)
|
||
ex de,hl
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl +2 ᥪâ®à ª â «®£
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
;dehl - à §¬¥à ¯®¤à §¤¥« ¢ ᥪâ®à å
|
||
jp x2C8C ;ä®à¬¨à®¢ ¨¥ ¯®¤à §¤¥«
|
||
x2D2A pop af
|
||
pop hl
|
||
jp x2C45 ;¥â ®¡à §®¢. ¯à®¤®«¦ ¥¬ ¢ë¡®à
|
||
|
||
;€„<E282AC>…‘: #2D2F ¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
;¢å: hl - ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
;¢ëå: cy=1 ®â¬ª ¢¢®¤
|
||
x2D2F ld a,#09
|
||
x2D31 push hl
|
||
ld hl,#070B
|
||
call x2E85 ;¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
call x205A ;ãáâ ®¢ª ⥪ã騬 ®ª : ¢ë¢®¤ ª â «®£
|
||
pop hl
|
||
ret c ;®â¬¥ ¢¢®¤
|
||
call x2EA7 ;¯à®¢¥àª ¢¢¥¤¥®£® ¨¬¥¨
|
||
ld a,#65
|
||
jr c,x2D31 ;¨¬ï ¥ª®à४â®, ¯®¢â®à¨¬ ¢¢®¤
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2D45 㤠«¥¨¥ ¯®¤à §¤¥«
|
||
x2D45 ld a,#18 ;á®®¡é¥¨¥ § £®«®¢ª :delete partition ...
|
||
call x29D7 ;¯¥ç âì ®ª á ¯®¤à §¤¥« ¬¨ ¨ ¢ë¡®à ¯®¤à §¤¥« ¢ ¥¬
|
||
;hl - ®¬¥à ¯®§¨æ¨¨ ¢ ª â «®£¥
|
||
ret c ;®â¬¥ ¢ë¡®à
|
||
call x29C6 ;à áç¥â ¤à¥á ¢ ª â «®£¥
|
||
ld (hl),#FF
|
||
|
||
x2D50 set 6,(iy+#1C) ;¯à¨§ ª ¨§¬¥¥¨ï ª â «®£ ¯®¤à §¤¥«®¢
|
||
ld hl,x2D5D
|
||
call x28C6 ;㯫®â¥¨¥ ª â «®£ MBR (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
jp x264A ;á®àâ¨à®¢ª ª â «®£ ¨ ¢ë室 ¢ ¬¥î
|
||
|
||
;€„<E282AC>…‘: #2D5D áà ¢¥¨¥ (hl) á #FF, cy=1 ¥á«¨ à ¢ë
|
||
x2D5D ld a,#FF
|
||
cp (hl)
|
||
ret nz
|
||
scf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2D63 ä®à¬¨à®¢ ¨¥ ª®««¥ªæ¨¨ ®¡à §®¢ ¢ ¯®¤à §¤¥«¥ TR-DOS
|
||
;¢å: (xE8A9) - ¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
x2D63 ld hl,xE8A9 ;¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
call x2E30 ;à áç¥â ª®«¨ç¥á⢠®¡à §®¢ ¨áå®¤ï ¨§ à §¬¥à®¢ ¯®¤à §¤¥«
|
||
ld a,c
|
||
or b
|
||
ret z ;¨ ®¤®£® ®¡à § ¥ ¯®¬¥áâ¨âáï
|
||
ld b,c
|
||
ld c,#01
|
||
push bc
|
||
ld de,#0001
|
||
add hl,de
|
||
ld de,xE9E7
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ex de,hl ;hl=xE9E7
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
call x3047 ;¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
pop bc ;(xE9E7) LBA ¤à¥á ç « ®¡à §
|
||
ld hl,xEBF5 ; ç «® ª â «®£
|
||
;ä®à¬¨à®¢ ¨¥ ª â «®£ ®¡à §®¢ ¨ ®ç¨á⪠á«ã¦¥¡®£® ᥪâ®à ã ª ¦¤®£® ®¡à §
|
||
x2D85 push bc
|
||
ld (hl),#01 ;¯à¨§ ª ®¡à § TR-DOS
|
||
inc hl
|
||
ld de,xE9E7
|
||
ex de,hl
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
;ãáâ ®¢ª LBA ¤à¥á ç « ®¡à §
|
||
ex de,hl ;hl=xE9E7
|
||
call x2DF0 ;ᮧ¤ ¨¥ ¯¥à¢®£® (á«ã¦¥¡®£®) ᥪâ®à ®¡à § ¨ ä®à¬¨à®¢ ¨¥ ¤ ëå ¢ ®¯¨á ⥫¥ ⥪ã饣® ¤¨áª®¢®¤
|
||
ld bc,#0004
|
||
add hl,bc ; ¤à¥á ¤¥áªà¨¯â®à ®¡à § +5
|
||
ld (hl),#00
|
||
; à §¬¥à ®¡à §
|
||
inc hl ; ¤à¥á ¤¥áªà¨¯â®à ®¡à § +6
|
||
ld de,x2DE8
|
||
ex de,hl
|
||
ld bc,#0004
|
||
ldir ;à §¬¥à ®¡à § (¢á¥£¤ #0501)
|
||
; ¨¬ï ®¡à §
|
||
ld bc,#0004
|
||
ld hl,x2DEC
|
||
ldir ;¯®áâ®ï®¥ ¨¬ï ®¡à §
|
||
ex de,hl
|
||
pop bc
|
||
push bc ;c - ®¬¥à ®¡à §
|
||
ld b,#00
|
||
ld a,#02
|
||
ld e,#0A
|
||
push hl
|
||
call x0CDC ;¯¥ç âì ç¨á« bc ¢ ¡ãä¥à hl
|
||
pop hl
|
||
; ãáâ ®¢ª ¤à¥á á«¥¤ãî饣® ®¡à §
|
||
inc hl
|
||
inc hl ; ¤à¥á á«¥¤ãî饣® ¤¥áªà¨¯â®à ®¡à §
|
||
push hl
|
||
ld hl,xE9E7 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
ld de,x2DE8
|
||
call x3052 ;(xE9E7) LBA ¤à¥á á«¥¤ãî饣® ®¡à §
|
||
pop hl ; ¤à¥á á«¥¤ãî饣® ¤¥áªà¨¯â®à ®¡à §
|
||
pop bc ;®¬¥à á«¥¤ãî饣® ®¡à §
|
||
inc c
|
||
djnz x2D85
|
||
;ãáâ ®¢ª ᨣ âãà ª â «®£
|
||
ld (hl),#00
|
||
ld hl,#AA54 ;ᨣ âãà ª â «®£ ®¡à §®¢
|
||
ld (xEBF5+#3FE),hl
|
||
ld hl,#5254 ;¤®¯®«¨â쥫ì ï ᨣ âãà ª â «®£ ®¡à §®¢
|
||
ld (xEBF5+#3FC),hl
|
||
|
||
|
||
ld hl,xE8A9 ;¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
ld de,#0001
|
||
add hl,de ;¤¥áªà¨¯â®à ¯®¤à §¤¥« +1
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
;dehl - LBA ¤à¥á ç « ¯®¤à §¤¥«
|
||
rst #30
|
||
dw rom7_x17EF ;§ ¯¨áì ª â «®£ ®¡à § ® ¨§ ¡ãä¥à xEBF5
|
||
db #07
|
||
ret
|
||
|
||
x2DE8 db #01,#05,#00,#00 ;à §¬¥à ®¡à § ¢ ᥪâ®à å
|
||
x2DEC db "Disk" ;¯®áâ®ï ï ç áâì ¨¬¥¨
|
||
|
||
;€„<E282AC>…‘: #2DF0 ᮧ¤ ¨¥ ¯¥à¢®£® (á«ã¦¥¡®£®) ᥪâ®à ®¡à § ¨ ä®à¬¨à®¢ ¨¥ ¤ ëå ¢ ®¯¨á ⥫¥ ⥪ã饣® ¤¨áª®¢®¤
|
||
;¢å: hl - ¤à¥á ¤¥áªà¨¯â®à ®¡à § +1
|
||
; de - LBA ¤à¥á ç « ¤ ëå ®¡à §
|
||
x2DF0 push hl
|
||
ld hl,xE5A9 ;®ç¨á⪠¡ãä¥à 512b
|
||
ld de,xE5A9+1
|
||
ld (hl),#00
|
||
ld bc,#01FF
|
||
ldir
|
||
pop hl ; ¤à¥á ¤¥áªà¨¯â®à ®¡à § +1
|
||
;ᮧ¤ ¨¥ ¯¥à¢®£® (á«ã¦¥¡®£®) ᥪâ®à ®¡à §
|
||
push hl
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠(hl)
|
||
;dehl - LBA ¤à¥á ç « ®¡à §
|
||
rst #30
|
||
dw rom7_x1D45 ;§ ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9 ¢¨ç¥áâ¥à ¯® ¤à¥áã ¢ dehl
|
||
db #07
|
||
pop hl
|
||
;ä®à¬¨à®¢ ¨¥ ¤ ëå ¢ ®¯¨á ⥫¥ ⥪ã饣® ¤¨áª®¢®¤ ( åॠ???)
|
||
; LBA ¤à¥á ç « ®¡à §
|
||
push hl ; ¤à¥á ¤¥áªà¨¯â®à ®¡à § +1
|
||
ld de,xE590+1 ;LBA ¤à¥á ç « ®¡à §
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
; ¯à¨§ ª ®¡à §
|
||
ld a,#01
|
||
ld (xE590),a ;¯à¨§ ª ®¡à §
|
||
ld a,#E0
|
||
ld (xFFCE),a ;¤«ï ¤¨áª®¢®¤ C
|
||
pop hl
|
||
; à §¬¥à ®¡à §
|
||
push hl ; ¤à¥á ¤¥áªà¨¯â®à ®¡à § +1
|
||
ld de,xE590+5
|
||
call x3000 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
ld hl,x2DE8 ; ¤à¥á à §¬¥à ®¡à §
|
||
ex de,hl
|
||
call x3052 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
ld hl,xE590+5
|
||
call x302A ;¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2E30 à áç¥â ª®«¨ç¥á⢠®¡à §®¢ ¨áå®¤ï ¨§ à §¬¥à®¢ ¯®¤à §¤¥«
|
||
;¢å: hl - ¤à¥á ¤¥áªà¨¯â®à ¯®¤à §¤¥«
|
||
;¢ëå: bc - ª®«¨ç¥á⢮ ®¡à §®¢
|
||
x2E30 push hl
|
||
call x3005 ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+6 ¡ ©â ª ¤à¥áã hl
|
||
ld bc,xE9E7 ;dehl - à §¬¥à ¯®¤à §¤¥«
|
||
call x301C ;§ £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
ex de,hl ;hl=xE9E7
|
||
call x302A ;¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
call x302A ;¤¥ªà¥¬¥â (hl)=(hl)-1 -2 ᥪâ®à
|
||
call x300E ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠(hl)
|
||
exx
|
||
ld bc,#0501 ;à §¬¥à ®¡à § ¢ ᥪâ®à å
|
||
rst #30
|
||
dw rom7_x0F5D ;¤¥«¥¨¥ de'hl'=de'hl'/bc
|
||
db #07
|
||
exx
|
||
ld bc,#0033 ;®¯à¥¤¥«¥¨¥ ª®«¨ç¥á⢠®¡à §®¢ ¢ ¯®¤à §¤¥«¥
|
||
ld a,e
|
||
or d
|
||
or h
|
||
jr nz,x2E5B
|
||
ld a,l
|
||
cp #34
|
||
jr nc,x2E5B
|
||
ld c,a
|
||
x2E5B pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2E5D áä®à¬¨à㥬 ¯ãá⮩ ᥪâ®à MBR ¢ ¡ãä¥à¥ xE5A9
|
||
x2E5D ld hl,xE5A9+#1BE ; ç «® á¯¨áª à §¤¥«®¢
|
||
ld bc,#0041
|
||
ld de,xE5A9+#1BF
|
||
ld (hl),#00
|
||
ldir
|
||
ld hl,#AA55
|
||
ld (xE5A9+#1FE),hl ;§ ¯¨è¥¬ ᨣ âãàã
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2E71 ®ç¨á⪠¡ãä¥à xEBF5 ¨ ãáâ ®¢ª ᨣ âãàë à §¤¥« MFS
|
||
x2E71 ld hl,xEBF5
|
||
ld bc,#03FF
|
||
ld de,xEBF5+#01
|
||
ld (hl),#00
|
||
ldir
|
||
ld hl,#AA54
|
||
ld (xEBF5+#3FE),hl ;xEFF3
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2E85 ¢¢®¤ ¨¬¥¨ ¯®¤à §¤¥«
|
||
;¢å: hl - áâனª¨ ®ª ¢¢®¤ áâப¨
|
||
;¢ëå: cy=1 ®â¬¥ ¢¢®¤ áâப¨
|
||
; de - ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
x2E85 ld (xE9EF),hl
|
||
set 5,(iy+#0E)
|
||
call x0CCA ;®ç¨á⪠¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
rst #30 ;¬®¦® ¨ ¯àï¬ãî ¢ë§¢ âì
|
||
dw rom5_x0C22 ;ãáâ ®¢ª ¯ à ¬¥â஢ ®ª ¤«ï ¢¢®¤ áâப¨ ¢ ¬¥î ¬®¨â®à
|
||
db #05
|
||
rst #30 ;¬®¦® ¨ ¯àï¬ãî ¢ë§¢ âì
|
||
dw rom5_x1CB8 ;¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
db #05
|
||
x2E97 ld de,xDE17 ;¡ãä¥à ¤«ï ¢¢®¤ áâப¨
|
||
ret nc ;áâப ¢¢¥¤¥
|
||
;®â¬¥ ¢¢®¤
|
||
cp #03
|
||
jr nz,x2EA1
|
||
scf ;break/cancel
|
||
ret
|
||
x2EA1 rst #30 ;¬®¦® ¨ ¯àï¬ãî ¢ë§¢ âì
|
||
dw rom5_x1CB3 ;¯à®¤®«¦¥¨¥ ¢¢®¤ áâப¨ (¢ëå: hl ¤à¥á ¢¢¥¤¥®© áâப¨)
|
||
db #05
|
||
jr x2E97
|
||
|
||
;€„<E282AC>…‘: #2EA7 ¯à®¢¥àª ¢¢¥¤¥®£® ¨¬¥¨
|
||
;¢å: hl - ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
; de - ¤à¥á ¢¢¥¤¥®© áâப¨
|
||
;¢ëå: cy=1 ®è¨¡ª ¯à¨ ¯à®¢¥àª¥
|
||
; cy=0 ¨¬ï ª®à४â®
|
||
x2EA7 push hl
|
||
ld bc,#000A
|
||
add hl,bc ; ç «® ¨¬¥¨ ¯®¤à §¤¥« ¢ ¤¥áªà¨¯â®à¥
|
||
ld a,(xDFFE) ;ª®¤ ⨯ ¯®¤à §¤¥«
|
||
ld c,a
|
||
ld b,#06
|
||
x2EB2 ld a,(de)
|
||
cp #21
|
||
jr nc,x2EC9 ;íâ® ¤®¯ãáâ¨¬ë© á¨¬¢®«
|
||
ld a,b
|
||
cp #06
|
||
jr z,x2EC1 ;¯ãá⮥ ¨¬ï
|
||
ld a,(de)
|
||
cp " "
|
||
jr c,x2EC6 ;¥¤®¯ãáâ¨¬ë© á¨¬¢®«. ª®¥æ ¨¬¥¨
|
||
x2EC1 ld a,c
|
||
cp #04
|
||
jr nz,x2F0D ;¯ãá⮥ ¨¬ï ⮫쪮 ¤«ï BAD ¬®¦®
|
||
x2EC6 ld a," "
|
||
dec de
|
||
x2EC9 inc de ;§ ¯®«ï¥¬ ®áâ ⮪ ¯à®¡¥« ¬¨
|
||
ld (hl),a
|
||
inc hl
|
||
djnz x2EB2
|
||
pop hl ; ¤à¥á ç « § ¯¨á¨ ¢ ª â «®£¥
|
||
ld a,c
|
||
cp #04
|
||
ret z ;¥á«¨ BAD ¯®¤à §¤¥«
|
||
;¯à®¢¥àª ᮢ¯ ¤¥¨ï ¨¬¥¨
|
||
push hl
|
||
ld a,(xDD89) ;ª®«¨ç¥á⢮ § ¯¨á¥© ¢ ª â «®£¥
|
||
ld b,a
|
||
ld hl,xEBF5 ; ç «® ª â «®£
|
||
x2EDB ld a,(hl)
|
||
cp #FF
|
||
jr z,x2F04 ;¯ãáâ ï § ¯¨áì
|
||
pop de
|
||
push de
|
||
or a
|
||
push hl
|
||
sbc hl,de
|
||
pop hl
|
||
jr z,x2F04 ;§ ¯¨áì, ¬¥á⥠ª®â®à© ᮧ¤ ¥¬ ¯®¤à §¤¥«
|
||
push bc
|
||
ex de,hl
|
||
ld bc,#000A
|
||
add hl,bc
|
||
ex de,hl
|
||
push hl
|
||
add hl,bc
|
||
ld bc,#0600 ;¯à®¢¥àª ᮢ¯ ¤¥¨ï ¨¬¥¨
|
||
x2EF5 ld a,(de)
|
||
cp (hl)
|
||
jr z,x2EFA
|
||
inc c
|
||
x2EFA inc hl
|
||
inc de
|
||
djnz x2EF5
|
||
pop hl
|
||
ld a,c
|
||
pop bc
|
||
or a
|
||
jr z,x2F0D ;¥áâì ᮢ¯ ¤¥¨¥ ¯® ¨¬¥¨. ¥«ì§ï ¤¢ ®¤¨ ª®¢ëå
|
||
x2F04 ld de,#0010
|
||
add hl,de
|
||
djnz x2EDB
|
||
pop hl
|
||
or a
|
||
ret
|
||
;®è¨¡ª ¯à¨ ¯à®¢¥àª¥ ¨¬¥¨
|
||
x2F0D pop hl
|
||
scf
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2F10 ¢ë¡®à ⨯ ¯®¤à §¤¥«
|
||
;¢å: hl - áâனª¨ ®ª ¢¢®¤ áâப¨
|
||
; de - ¤à¥á â ¡«¨æë á §¢ ¨ï¬¨ à §¤¥«®¢ MFS
|
||
;¢ëå: cy=1 ®â¬¥ ¢ë¡®à
|
||
; cy=0 ⨯ ¯®¤à §¤¥« ¢ë¡à
|
||
; hl - ¤à¥á á®®¡é¥¨ï á ⨯®¬ ¨ §¢ ¨¥¬ ¯®¤à §¤¥«
|
||
; a - ª®¤ ⨯ ¯®¤à §¤¥«
|
||
x2F10 ld (xE9EF),hl ; áâனª¨ ®ª ¢¢®¤ áâப¨
|
||
set 5,(iy+#0E)
|
||
push de
|
||
ld a,#64 ;á®®¡é¥¨¥: select
|
||
rst #30 ;¬®¦® ¨ ¯àï¬ãî ¢ë§¢ âì
|
||
dw rom5_x0C22 ;ãáâ ®¢ª ¯ à ¬¥â஢ ®ª ¤«ï ¢¢®¤ áâப¨ ¢ ¬¥î ¬®¨â®à
|
||
db #05
|
||
pop hl ; ¤à¥á â ¡«¨æë á §¢ ¨ï¬¨ à §¤¥«®¢ MFS
|
||
;¢ë¡®à ⨯ ¯®¤à §¤¥«
|
||
x2F1F push hl
|
||
x2F20 xor a ;!!!¥â ã«ï ¢ í⮩ â ¡«¨æ¥
|
||
cp (hl)
|
||
jr z,x2F49
|
||
;¯¥ç âì ⨯ ¯®¤à §¤¥« (tr-dos/is-dos/microdos/bad)
|
||
push hl
|
||
inc hl
|
||
ld (ix+1),#01 ;ª®®à¤¨ â X
|
||
set 0,(ix+7) ;
|
||
call x2BAC ;¯¥ç âì á®®¡é¥¨ï ¨§ hl
|
||
rst #30
|
||
dw rom2_x2FED ;¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª
|
||
db #02
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
res 0,(ix+7)
|
||
pop hl
|
||
cp #0D
|
||
jr z,x2F58 ;enter
|
||
cp #03
|
||
jr nz,x2F49 ;çâ®-â® ¦ â®
|
||
scf ;®â¬¥ ᮧ¤ ¨ï
|
||
pop hl
|
||
ret
|
||
;®¡à ¡®âª ¦ â¨ï «î¡®© ª« ¢¨è¨
|
||
x2F49 inc hl
|
||
x2F4A ld a,(hl) ;¨é¥¬ ª®¥æ á®®¡é¥¨ï
|
||
and #80
|
||
inc hl
|
||
jr z,x2F4A
|
||
ld a,(hl)
|
||
cp #FF
|
||
jr nz,x2F20 ;¥á«¨ ¥ ª®¥æ ¡«®ª
|
||
pop hl ;¥á«¨ ª®¥æ ¡«®ª , ¯¥à¥å®¤ ç «® ¡«®ª
|
||
jr x2F1F
|
||
;¢ë¡à «¨ ⨯ ¯®¤à §¤¥« ¢ (hl) - ⨯
|
||
x2F58 ld a,(hl)
|
||
ex (sp),hl
|
||
pop hl
|
||
or a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2F5D § ¯à®á á®åà ¥¨¥ ᥪâ®à MBR, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
x2F5D bit 6,(iy+#1C)
|
||
ret z
|
||
call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
ret nz
|
||
|
||
;€„<E282AC>…‘: #2F66 ä®à¬¨à®¢ ¨¥ ¨ § ¯¨áì ᥪâ®à MBR
|
||
x2F66 set 5,(iy+#1C)
|
||
ld hl,x2D5D
|
||
call x28C6 ;㯫®â¥¨¥ ª â «®£ MBR (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
call x2E5D ;áä®à¬¨à㥬 ¯ãá⮩ ᥪâ®à MBR ¢ ¡ãä¥à¥ xE5A9
|
||
ld de,xE5A9+#1BE ; ç « ¤¥áªà¨¯â®à®¢ à §¤¥«®¢ ¢ ᥪâ®à¥ MBR
|
||
ld hl,xEBF5 ;¡ãä¥à á ª â «®£®¬
|
||
ld a,(xDD89) ;§ ¯¨á¥© ¢ ª â «®£¥
|
||
cp #04
|
||
jr c,x2F82 ;¤®¯ãá⨬®¥ § 票¥
|
||
ld a,#04 ;¬®¦® ¥ ¡®«ìè¥ 4å
|
||
x2F82 or a
|
||
jr z,x2F8D ;à §¤¥«®¢ ¥â
|
||
dec a
|
||
ld bc,#0010
|
||
ldir ;ª®¯¨à㥬 ¤¥áªà¨¯â®à à §¤¥«
|
||
jr x2F82 ;¯®¢â®à¨¬
|
||
x2F8D ld hl,#0000 ;LBA ¤à¥á (ã«¥¢®© ᥪâ®à)
|
||
ld e,l
|
||
ld d,h
|
||
jr x2F9E ;§ ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9
|
||
|
||
;€„<E282AC>…‘: #2F94 !!!¥ ¨á¯®«ì§ã¥âáï!!! ç⥨¥ ᥪâ®à ¢ ¡ãä¥à xE5A9
|
||
x2F94 rst #30
|
||
dw rom7_x1D73 ;ç⥨¥ ᥪâ®à á ¢¨ç¥áâ¥à ¢ ¡ãä¥à xE5A9
|
||
db #07
|
||
ret nc ;¥â ®è¨¡®ª
|
||
rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
|
||
;§ ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9
|
||
x2F9E rst #30
|
||
dw rom7_x1D45 ;§ ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9 ¢¨ç¥áâ¥à ¯® ¤à¥áã ¢ dehl
|
||
db #07
|
||
ret nc ;¥â ®è¨¡®ª
|
||
rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FA8 § ¯à®á á®åà ¥¨¥ ª â «®£ MFS, ¥á«¨ ¡ë«¨ ¨§¬¥¥¨ï
|
||
x2FA8 bit 6,(iy+#1C)
|
||
ret z ;ᯨ᮪ à §¤¥«®¢ ¢ ¡ãä¥à¥ ¡¥§ ¨§¬¥¥¨©
|
||
call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
ret nz ;®âª § ®â á®åà ¥¨ï
|
||
|
||
;€„<E282AC>…‘: #2FB1 § ¯¨áì ª â «®£ MFS/¯®¤à §¤¥«
|
||
x2FB1 set 5,(iy+#1C)
|
||
ld hl,x2D5D
|
||
call x28C6 ;㯫®â¥¨¥ ª â «®£ (㤠«¥¨¥ ¢ ¡ãä¥à¥ § ¯¨á¥© unused)
|
||
call x270D ;§ £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠xE81B+8
|
||
;dehl - LBA ¤à¥á ç « à §¤¥« MFS
|
||
rst #30 ;§ ¯¨áì ª â «®£ MFS
|
||
dw rom7_x17EF ;§ ¯¨áì 2å ᥪâ®à®¢ ¨§ ¡ãä¥à xEBF5
|
||
db #07
|
||
jp nc,x2503 ;®è¨¡®ª ¥ ¡ë«®
|
||
rst #30
|
||
dw rom7_x1F41 ;®è¨¡ª HDD. ¢ë¢®¤ á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¢ ¨¦¥© áâப¥ ¬®¨â®à
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FCA áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
x2FCA rst #30
|
||
dw rom7_x1035 ;áà ¢¥¨¥ ¤¢ãå ç¨á¥« ¢ ¯ ¬ï⨠¯® ¤à¥á ¬ ¢ de ¨ hl
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FCF ®¡ã«¥¨¥ ¯¥à¥¬¥®© xE9EB
|
||
x2FCF push hl
|
||
ld hl,#0000
|
||
ld (xE9EB),hl
|
||
ld (xE9EB+#02),hl
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FDB ¨ªà¥¬â á«®¢ (xDD89)=(xDD89)+1
|
||
x2FDB push hl
|
||
ld hl,(xDD89)
|
||
inc hl
|
||
ld (xDD89),hl
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FE5 ¤¥ªà¥¬¥â á«®¢ (xDD89)=(xDD89)-1
|
||
x2FE5 push hl
|
||
ld hl,(xDD89)
|
||
dec hl
|
||
ld (xDD89),hl
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #2FEF 㬮¦¥¨¥ bc=bc*#10
|
||
x2FEF sla c
|
||
rl b
|
||
sla c
|
||
rl b
|
||
sla c
|
||
rl b
|
||
sla c
|
||
rl b
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3000 ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
x3000 rst #30
|
||
dw rom7_x1003 ;ª®¯¨à®¢ ¨¥ ¨§ (hl) ¢ (de) 4å ¡ ©â
|
||
db #07
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3005 § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+6 ¡ ©â ª ¤à¥áã hl
|
||
x3005 ld bc,#0006
|
||
jr x300D
|
||
|
||
;€„<E282AC>…‘: #300A § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ï⨠+12 ¡ ©â ª ¤à¥áã hl
|
||
x300A ld bc,#000C
|
||
x300D add hl,bc
|
||
|
||
;€„<E282AC>…‘: #300E § £à㧪 ç¨á« ¢ ॣ¨áâàë ¨§ ¯ ¬ïâ¨
|
||
;¢å: hl - ¤à¥á ®âªã¤ £à㧨¬
|
||
;¢ëå: dehl - ç¨á«®
|
||
x300E push hl
|
||
pop bc
|
||
ld a,(bc)
|
||
ld l,a
|
||
inc bc
|
||
ld a,(bc)
|
||
ld h,a
|
||
inc bc
|
||
ld a,(bc)
|
||
ld e,a
|
||
inc bc
|
||
ld a,(bc)
|
||
ld d,a
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #301C § £à㧪 ç¨á« ¨§ ॣ¨áâ஢ ¢ ¯ ¬ïâì
|
||
;¢å: dehl - ç¨á«®
|
||
; bc - ¤à¥á ªã¤ £à㧨¬
|
||
;¢ëå: de - ¤à¥á ªã¤ § £à㧨«¨
|
||
x301C push bc
|
||
ld a,l
|
||
ld (bc),a
|
||
inc bc
|
||
ld a,h
|
||
ld (bc),a
|
||
inc bc
|
||
ld a,e
|
||
ld (bc),a
|
||
inc bc
|
||
ld a,d
|
||
ld (bc),a
|
||
pop de
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #302A ¤¥ªà¥¬¥â (hl)=(hl)-1
|
||
x302A push hl
|
||
push de
|
||
x302C ld de,x3043
|
||
call x3035
|
||
pop de
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3035 ¢ëç¨â ¨¥ (hl)=(hl)-(de)
|
||
x3035 ex de,hl
|
||
push bc
|
||
xor a
|
||
ld b,#04
|
||
x303A ld a,(de)
|
||
sbc a,(hl)
|
||
ld (de),a
|
||
inc hl
|
||
inc de
|
||
djnz x303A
|
||
pop bc
|
||
ret
|
||
|
||
;¤«ï ¨ªà¥¬¥â
|
||
x3043 db #01,#00,#00,#00 ;dd #01
|
||
|
||
;€„<E282AC>…‘: #3047 ¨ªà¥¬¥â ç¨á« ¯® ¤à¥áã hl
|
||
x3047 push hl
|
||
push de
|
||
ld de,x3043
|
||
call x3052 ;á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
pop de
|
||
pop hl
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3052 á«®¦¥¨¥ ¤¢ãå 4å ¡ ©âëå ç¨á¥«
|
||
;¢å: hl - ¤à¥á ¯¥à¢®£® ç¨á«
|
||
; de - ¤à¥á ¢â®à®£® ç¨á«
|
||
;¢ëå: hl - á㬬 ç¨á¥«
|
||
x3052 ex de,hl
|
||
push bc
|
||
xor a
|
||
ld b,#04
|
||
x3057 ld a,(de)
|
||
adc a,(hl)
|
||
ld (de),a
|
||
inc hl
|
||
inc de
|
||
djnz x3057
|
||
pop bc
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3060 ¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
;¢ëå: z - ¦ â Y
|
||
x3060 ld hl,xE0D7 ;¤¥áªà¨¯â®à ®ª : § ¯à®á § ¯¨áì MBR
|
||
rst #30
|
||
dw rom2_x301C ;ix = ¤à¥á ¤¥áªà¨¯â®à ®ª ¬®¨â®à ¨§ hl
|
||
db #02
|
||
x3067 ld (ix+4),#18 ;¢ëá®â ®ª
|
||
ld (ix+6),#17 ; âਡãâë ®ª
|
||
rst #20
|
||
db #0C ;®ç¨á⪠®ª
|
||
db #1B,#09,#0F ;ª®®à¤¨ âë ¯¥ç â¨
|
||
db "Warning!"
|
||
db #1B,#0B,#08 ;ª®®à¤¨ âë ¯¥ç â¨
|
||
db "Partition will be changed."
|
||
db #1B,#0D,#0E ;ª®®à¤¨ âë ¯¥ç â¨
|
||
dc "Write (Y/N)?"
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
ld (ix+6),#31
|
||
ld (ix+4),#16
|
||
and #DF
|
||
cp "Y"
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #30B9 ¨¤¥â¨ä¨ª æ¨ï ¦¥á⪮£® ¤¨áª
|
||
x30B9 push ix
|
||
ld ix,xE5A9
|
||
rst #30
|
||
dw rom7_x1E74 ;R8DOS #22(34) ¨¤¥â¨ä¨ª æ¨ï ¦¥á⪮£® ¤¨áª
|
||
db #07
|
||
pop ix
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #30C6 ¯¥ç âì ®ª ¤«ï â¥áâ¨à®¢ ¨ï HDD
|
||
x30C6 call x0CF6 ;ãáâ ®¢ª ¨ ¨¨æ¨ «¨§ æ¨ï ®ª ¤«ï ¢¢®¤ áâப¨ ¢¨§ã íªà
|
||
x30C9 ld (ix+#01),#00 ;crd X =0
|
||
rst #20
|
||
dc "Press BREAK to exit. ONLY!"
|
||
rst #30
|
||
dw rom6_x064D ;ãáâ ®¢ª ¤¥áªà¨¯â®à ®ª : § ¯à®á § ¯¨áì MBR
|
||
db #06
|
||
rst #20
|
||
db #8C ;®ç¨á⪠®ª
|
||
ld (ix+#00),#15 ;crd Y =#15
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #30F3 ¯¥ç âì ª®¤ ®è¨¡ª¨
|
||
;¢å: a - ª®¤ ®è¨¡ª¨ (®¬¥à á®®¡é¥¨ï ¨§ ¡«®ª 0)
|
||
x30F3 push af
|
||
call x310F ;¯¥ç âì ⥪ãé¨å ®¬¥à £®«®¢ª¨ ¨ ᥪâ®à
|
||
pop bc
|
||
ld c,#00
|
||
rst #08
|
||
rst #20
|
||
db #8D ;¯¥à¥¢®¤ áâப¨
|
||
jr x315E
|
||
|
||
;¯¥ç âì ⥪ã饣® ®¬¥à 樫¨¤à HDD
|
||
x30FF ld (ix+#01),#00 ;crd X =0
|
||
rst #20
|
||
dc "C:"
|
||
ld bc,(xE047) ;®¬¥à 樫¨¤à
|
||
rst #30
|
||
dw rom2_x165E ;¯¥ç âì ¤¥áïâ¨ç®£® ç¨á« bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ìë¬ ¯à®¡¥«®¬
|
||
db #02
|
||
ret
|
||
|
||
;¯¥ç âì ⥪ãé¨å ®¬¥à £®«®¢ª¨ ¨ ᥪâ®à
|
||
x310F call x30FF ;¯¥ç âì ⥪ã饣® ®¬¥à 樫¨¤à HDD
|
||
x3112 rst #20
|
||
dc " H:"
|
||
ld a,(xE049) ;®¬¥à £®«®¢ª¨
|
||
and #0F
|
||
ld c,a
|
||
ld b,#00
|
||
rst #30
|
||
dw rom2_x165E ;¯¥ç âì ¤¥áïâ¨ç®£® ç¨á« bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ìë¬ ¯à®¡¥«®¬
|
||
db #02
|
||
rst #20
|
||
dc " S:"
|
||
ld a,(xE046) ;®¬¥à ᥪâ®à
|
||
ld c,a
|
||
ld b,#00
|
||
rst #30
|
||
dw rom2_x165E ;¯¥ç âì ¤¥áïâ¨ç®£® ç¨á« bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ìë¬ ¯à®¡¥«®¬
|
||
db #02
|
||
rst #30
|
||
dw rom2_x2B10 ;¯¥ç âì ¯à®¡¥« (rst #10)
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3135 ¯¥ç âì á®®¡é¥¨ï ®¡ ®è¨¡ª¥ ¥á®¢¯ ¤¥¨ï ¤ ëå ¯à¨ ç⥨¨/§ ¯¨á¨ HDD
|
||
;¢å: hl - ®¬¥à ¡ ©â ¢ ᥪâ®à¥
|
||
; c - ª®â஫쮥 § 票¥ ¡ ©â
|
||
; b - áç¨â ®¥ § 票¥ ¡ ©â
|
||
x3135 push bc
|
||
push hl
|
||
call x310F ;¯¥ç âì ⥪ãé¨å ®¬¥à £®«®¢ª¨ ¨ ᥪâ®à
|
||
rst #20
|
||
dc "data bad "
|
||
pop hl
|
||
rst #30
|
||
dw rom2_x16DE ;¯¥ç âì ç¨á« hl=[#0000..#FFFF]
|
||
db #02
|
||
rst #30
|
||
dw rom2_x2B10 ;¯¥ç âì ¯à®¡¥« (rst #10)
|
||
db #02
|
||
pop bc
|
||
push bc
|
||
ld a,c
|
||
rst #30
|
||
dw rom2_x16E3 ;¯¥ç âì ç¨á« a=[#00..#FF]
|
||
db #02
|
||
rst #20
|
||
dc ":"
|
||
pop bc
|
||
ld a,b
|
||
rst #30
|
||
dw rom2_x16E3 ;¯¥ç âì ç¨á« a=[#00..#FF]
|
||
db #02
|
||
rst #20
|
||
db #8D ;¯¥à¥¢®¤ áâப¨
|
||
|
||
;ã¯à ¢«¥¨¥ ¢ë¢®¤¨¬ë¬ «¨á⨣®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
|
||
x315E rst #30
|
||
dw rom2_x37B9
|
||
db #02
|
||
ret
|
||
|
||
;€„<E282AC>…‘: #3163 ¯¥ç âì ⥪ã饣® ®¬¥à 樫¨¤à
|
||
x3163 call x30FF ;¯¥ç âì ⥪ã饣® ®¬¥à 樫¨¤à HDD
|
||
call x0110 ;®¯à®á Break. cy=1 ¥ ¦ â
|
||
jr c,x3183
|
||
call x3112 ; ¦ â Break
|
||
rst #20
|
||
dc "Break"
|
||
x3174 ld b,#06 ;¯ 㧠¯à¨¬¥à® 245k ⠪⮢
|
||
x3176 rst #30
|
||
dw rom2_x3807 ;¯ 㧠40416t
|
||
db #02
|
||
djnz x3176
|
||
rst #30
|
||
dw rom6_x074A ;®¦¨¤ ¨¥ ¤¥©á⢨© ¯®«ì§®¢ ⥫ï (®¯à®á ã¯à ¢«¥¨ï, ¢ë¢®¤ ç ᮢ)
|
||
db #06
|
||
x3180 jp x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
x3183 rst #20
|
||
dc " of"
|
||
ld bc,(xDFF2) ;§ 票¥ Cylinders HDD
|
||
rst #30
|
||
dw rom2_x165E ;¯¥ç âì ¤¥áïâ¨ç®£® ç¨á« bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ìë¬ ¯à®¡¥«®¬
|
||
db #02
|
||
rst #30
|
||
dw rom2_x2B10 ;¯¥ç âì ¯à®¡¥« (rst #10)
|
||
db #02
|
||
ld a,(iy+#01)
|
||
inc (iy+#01)
|
||
and #03
|
||
ld hl,x31A6
|
||
add a,l
|
||
ld l,a
|
||
jr nc,x31A3
|
||
inc hl ;!!!Ž˜ˆ<CB9C>Š€!!! ¤®«¦® ¡ëâì inc h
|
||
x31A3 ld a,(hl)
|
||
rst #10
|
||
ret
|
||
x31A6 db #2D,#5C,#7C,#2F ;"-\|/" ¨¤¨ª æ¨ï à ¡®âë
|
||
|
||
;€„<E282AC>…‘: #31AA 㤠«¥¨¥ ¢á¥å à §¤¥«®¢ MBR
|
||
x31AA call x3060 ;¢ë¢®¤ á®®¡é¥¨ï á ¯à¥¤«®¦¥¨¥¬ á®åà ¨âì ¨§¬¥¥¨ï MBR ¨ ®¦¨¤ ¨¥ ¦ â¨ï ª« ¢¨è¨
|
||
jr nz,x3180 ; ¦ â ¥ Y. ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
ld hl,xE5A9 ;®ç¨â᪠¡ãä¥à
|
||
ld de,xE5A9+1
|
||
ld (hl),#00
|
||
ld bc,#01FF
|
||
ldir
|
||
xor a
|
||
ld l,a
|
||
ld h,a
|
||
ld e,a
|
||
ld d,a
|
||
rst #30
|
||
dw rom7_x1D45 ;§ ¯¨áì ᥪâ®à ¨§ ¡ãä¥à xE5A9 ¢¨ç¥áâ¥à ¯® ¤à¥áã ¢ dehl
|
||
db #07
|
||
jr nc,x3180 ;®è¨¡®ª ¥ ¡ë«®. ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
ld (ix+#00),#17 ;crd Y
|
||
ld (ix+#01),#00 ;crd X
|
||
call x30F3 ;¯¥ç âì ª®¤ ®è¨¡ª¨
|
||
jr x3174 ;¦¤¥¬ ¦ ⨥ ª« ¢¨è¨ ¨ ¯¥ç âì ⥪ã饣® ¬¥î ¬®¨â®à
|
||
|
||
;€„<E282AC>…‘: #31D4 ¥¨á¯®«ì§ã¥¬ ï ®¡« áâì
|
||
x31D4 ds #2C,#00
|
||
|
||
;€„<E282AC>…‘: #3200 ª â «®£ ROM-disk
|
||
x3200 dc "ZxUnZip" : ds 7 :db #0E,#04
|
||
dc "ZxZip" : ds 9 :db #39,#05
|
||
dc "TASM_4.0" : ds 6 :db #2F,#07
|
||
dc "SM_2.01" : ds 7 :db #36,#08
|
||
dc "HD_Copy_1.7" : ds 3 :db #02,#0A
|
||
dc "TESTFDD" : ds 7 :db #3D,#0A
|
||
DUP 10
|
||
ds #10
|
||
EDUP
|
||
|
||
;€„<E282AC>…‘: #3300 ROM-disk
|
||
x3300 INCBIN "prof_roms/rom5_ROMdisk.bin"
|
||
|
||
SAVEBIN "../Build/scorp/NewROM5.bin",#0000,#4000
|