Tolik-Trek/ZX-SP-ROMs
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/ZX-SP-ROMs.git synced 2026-06-15 09:21:45 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity
133cbaa603
ZX-SP-ROMs/ProfRom_Disasm/rom2_SrvMon.a80
Anatoliy Belyanskiy b7a39665e2 profROM
2023-06-27 01:29:58 +10:00

10350 lines
240 KiB
Plaintext
Executable File
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

DEVICE ZXSPECTRUM128
INCLUDE "!AllConst.asm"
INCLUDE "!ram8.asm"
ORG #0000
;#0000 rst #00 § ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
;#0006 ¯¥à¥å®¤ ­  ®¡à ¡®âªã ¢å®¤  ¢ ¬®­¨â®à ¯® NMI/rst 8
;#0008 rst #08 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
;#000B ¯¥à¥å®¤ ¢ ¤à㣮© rom
;#000D ®¡à ¡®âª  NMI ¯à¨  ªâ¨¢­®© rom2
;#0010 rst #10 ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
;*not used* #0013 ds 2
;#0015 ¢å®¤ ¯® rst #08 ¨§ basic 48k
;#0018 rst #18 ¢ë§®¢ ¯/¯ Tr-Dos
;#001B ¤«ï ¯à®¢¥àª¨ à §¬¥à  <20>‡“
;#001E ¢å®¤ ¯à¨ ¢ª«î祭¨¨/reset
;#0020 rst #20 ¯¥ç âì áâப¨
;*not used* #0023 ds 3
;#0026 ¢å®¤ ¯® rst #08 ¨§ basic 128k
;#0028 rst #28 ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;*not used* #002D ®¡à ¡®âª  ¢å®¤  ¢ ¬®­¨â®à ¯® NMI/rst 8
;#0030 rst #30 ¢ë§®¢ ¯/¯ ¨§ ¤à㣮£® rom
;*not used* #0033 ds 2
;*not used* #0035 ®¡à ¡®âª  ¢å®¤  ¢ ¬®­¨â®à ¯® NMI/rst 8
;#0038 rst #38 ¯¥à¥å®¤ ­  ®¡à ¡®âªã ¯à¥à뢠­¨© im 1
;#003B ¢å®¤ ¯à¨ ¢ª«î祭¨¨/reset
;#0092 ®¡à ¡®âª  ¯à¥à뢠­¨© im 1
;#009C ®¡à ¡®âª  NMI ¯à¨  ªâ¨¢­®© áâà ­¨æ¥ ¬®­¨â®à 
;#00B6 ¢å®¤ ¢ ¬®­¨â®à ¯® NMI/rst 8
;#00F1 ¯¥à¥¬¥­­ë¥ à §«¨ç­®£® å à ªâ¥à 
;#0101 ­®¬¥à ⥪ã饣® rom
;#0102 ’ ¡«¨æ  ¯¥à¥ª«î祭¨©  à¡¨âà  áâà ­¨æ <20>à®ä<C2AE>‡“ (#0E ¡ ©â)
;#0110 ’ ¡«¨æ  ¯¥à¥å®¤®¢ <20>à®ä<C2AE>‡“
;#0114 ¢å®¤ ¢ ¬®­¨â®à ¯® rst #08
;#0116 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ BC á § ¤¥à¦ª®© call (bc)
;#011D ¢å®¤ ¢ ¬®­¨â®à ¯® ª­®¯ª¥ NMI
;#013A ¢ë室 ¨§ ¬®­¨â®à 
;#0167 ¢å®¤ ¢ ¬®­¨â®à ¯® rst #08
;#01F5 ¢ë§®¢ ä㭪樨 rst #08
;#0241 ¯ ã§  26698t
;#024C ãáâ ­®¢ª  ­®¬¥à  ¤¨áª®¢®¤ 
;#025E ®¯à¥¤¥«¥­¨¥ ­ «¨ç¨ï ’ãà¡®¨ ¨ ®à¨£¨­ «ì­®á⨠(ª®«¢® ⠪⮢)
;#02A5 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
;#02AA rst 8: db #8B § £à㧪  zs-snap á ¤¨áª  (¡¥§ ¢®§¢à â )
;#02AE rst 8: db #8D åà¥­ì ª ª ï-â® ­¥¯®­ïâ­ ï
;#02CC rst 8: db #8C  ¢â®áâ àâ á ¤¨áª¥âë
;#02D1 ãáâ ­®¢ª  ¤¢®©­®© ᪮à®á⨠(rst 8: db #87)
;#02D7 ãáâ ­®¢ª  ®¡ëç­®© ᪮à®á⨠(rst 8: db #88)
;­¥ ¨á¯®«ì§ã¥âáï??? #02EB rst 8: db #8A ¢ë§®¢ ¯/¯ à ¡®âë á £à ä¨ç¥áª¨¬ ªãàá®à®¬ !!!Ž˜ˆ<CB9C>Š€!!!
;#02F4 rst 8: db #81 ¢ë§®¢ ä㭪樨 R8DOS
;#0310 á®åà ­¥­¨¥ ॣ¨áâ஢ ¤«ï ®á­®¢­®© ¯à®£à ¬¬ë
;#0321 à ¡®â  á ¬¨ªà®á奬®© CMOS (rst 8: db #89)
;#032A ç⥭¨¥ ॣ¨áâ஢ ®á­®¢­®© ¯à®£à ¬¬ë
;#0339 ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¬®­¨â®à  (rst 8: db #82)
;#035F ¢ë¢®¤ ᨬ¢®«  ­  íªà ­ ¯®«ì§®¢ â¥«ï (rst 8: db #84)
;#0368 ®âª«î祭¨¥ ¬®­¨â®à  - ®â« ¤ç¨ª  (rst 8: db #85)
;#0370 ¢®§¢à â ¢ ®â« ¤ç¨ª
;#0373 ãáâ ­®¢ª  ⥪ã騬 ¡«®ª  ¤¨áª®¢®¤®¢ ¬®­¨â®à 
;#0398 § ¯¨áì ¢ ॣ¨áâà 7 AY ç¨á«  #FF
;#03A7 ‡ ¯¨áì ॣ¨áâà  AY
;#03B6 ç⥭¨¥ ॣ¨áâà  AY
;#03C2 ¢®ááâ ­®¢«¥­¨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà  7 AY
;#03CE á®åà ­¥­¨¥ ॣ¨áâ஢ ¨ áâíª  ¢ ram 8
;#04CE ¢®ááâ ­®¢«¥­¨¥ ०¨¬  ’ãà¡®
;#04D5 ¢ª«î祭¨¥ ’ãà¡®-०¨¬ 
;#04D9 ¢ëª«î祭¨¥ ’ãà¡®-०¨¬ 
;#04E2 ¢®ááâ ­®¢«¥­¨¥ ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
;#0550 á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
;#0557 ¢å®¤ ¢ ¬®­¨â®à ¯®á«¥ âà áá¨à®¢ª¨ ª®¬ ­¤ë
;#055B á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
;#0581 ¢®ááâ ­®¢«¥­¨¥ íªà ­  ¢ áâà ­¨æ¥ 5
;#0589 ãáâ ­®¢ª  §¥«¥­®£® ¡®à¤îà  (¨­¤¨ª æ¨ï ®è¨¡ª¨)
;#058E ç⥭¨¥/§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
;#0603 ª®¯¨à®¢ ­¨¥ ¯ ¬ï⨠á #8000 ¢ áâà ­¨æã ¯®«ì§®¢ â¥«ï
;#0606 ª®¯¨à®¢ ­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï ¢ #8000
;#0665 ¢ª«î祭¨¥ ०¨¬  48k only
;#066D ¯®¢â®à­ ï ¨­¨æ¨ «¨§ æ¨ï áâà ­¨æ (¥á«¨ ¡¨â ï)
;#0732 ãáâ ­®¢ª  ª®®à¤¨­ â ¯¥ç â¨ crdY=ॣ C, crdX=#24
;#0739 ª®¯¨à®¢ ­¨¥ ç á⨠§ ª®¤¨à®¢ ­­ëå ¯à®æ¥¤ãà ¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
;#0749 ¢®ááâ ­®¢«¥­¨¥ ®¡« á⨠¯ ¬ï⨠¨§ ram 8
;#0753 á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
;#08B7 â ¡«¨æ  á  ¤à¥á ¬¨ ®¡à ¡®âª¨ ä㭪権 rst 8
;#08D3 rst 8: db #86 Š®¯¨ï £à ä¨ç¥áª®£® íªà ­  ­  ¯à¨­â¥à
;#08D7 ¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à 
;#0911 rst 8: db #80 ‚뢮¤ ᨬ¢®«  ¨§  ªªã¬ã«ïâ®à  ­  ¯à¨­â¥à
;#0922 ¢ë¢®¤ ᨬ¢®«  ¨§  ªªã¬ã«ïâ®à  ­  ¯à¨­â¥à (???¯® § ¯à®á㠮⠢­¥è¥­¥£® ãáâனá⢠???)
;#0950 ¢ë¢®¤ ᨬ¢®«  ­  ¯à¨­â¥à
;#0A33 ¯à®¢¥àª  ­ ¦ â¨ï BREAK
;#0A51 ¯¥ç âì íªà ­  ­  ¯à¨­â¥à
;#0AD7 Š®¬ ­¤ : EXit ¢ë室 ¨§ ®â« ¤ç¨ª  ¢ ¬¥­î
;#0AE0 ¯¥ç âì/®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;#0AEB ¢ë§®¢ ®â« ¤ç¨ª  M. Monitor
;#0AF2 ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;#0AFB ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª , ¡¥§ ¨­ä®à¬ æ¨®­­®£® ®ª­ 
;#0B06 ¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
;#0C98 ç⥭¨¥ ç¨á«®¢®£® ®¯¥à ­¤  ¨§ áâப¨ ª®¬ ­¤ë
;#0D3E ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
;#0D42 ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #20/#2C/#3B/#00/#0D
;#0D46 ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #2C/#3B/#00/#0D
;#0D55 ç⥭¨¥ ¨§ áâப¨ ª®¬ ­¤ë 稫®¢®£®/¡ ©â  áâப®¢®£® §­ ç¥­¨ï
;#0DEC â ¡«¨æ  ¯à¥ä¨ªá®¢ ¨ ®á­®¢ ­¨ï á¨á⥬ áç¨á«¥­¨©
;#0DF4 ¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«®
;#0E73 ¤¥«¥­¨¥ bc=hl/de á ¯à®¢¥àª®© de ­  ­®«ì
;#0E85 㬭®¦¥­¨¥ ahl=hl*de (0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â)
;#0EBA ¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
;#0EE3 ¯®¨áª ¢ ¡ãä¥à¥ ¢¢®¤  áâப¨ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
;#0EE6 ¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
;#0EF0 ¯®¨áª § ¤ ­­®© ª®¬ ­¤ë ¢ ᯨ᪥
;#0F91 ­ §¢ ­¨ï ॣ¨áâ஢ ¤«ï ¬®­¨â®à 
;#0FA0 ­ §¢ ­¨ï ॣ¨áâ஢ ¤«ï ¬®­¨â®à 
;#1037 ¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
;#1101 । ªâ¨à®¢ ­¨¥ ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥ ¬®­¨â®à 
;#1107 â ¡«¨æ  ¬­¥¬®­¨ª
;#1196 ®¯¥à ­¤ë/ä« £¨  áᥬ¡«¥à 
;#11F7 ¬­¥¬®­¨ª¨  áᥬ¡«¥à 
;#12D2 â ¡«¨æ  ¤«ï ä®à¬¨à®¢ ­¨ï ª®¬ ­¤ ¤¨§ á¬ 
;#14B2 â ¡«¨æ  ¤«ï ä®à¬¨à®¢ ­¨ï ª®¬ ­¤ ¤¨§ á¬ 
;#14F6 ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;#14FD ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;#1504 ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;#150B ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;#1512 ¯¥ç âì ª®¬ ­¤ë  áᥬ¡«¥à 
;#1570 ¯¥ç âì ¬­¥¬®­¨ª¨  áᥬ¡«¥à  á ¯à®¡¥«®¬ ­  ª®­æ¥
;#157F ¯¥ç âì ®¯¥à ­¤ /ç¨á«  ª®¬ ­¤ë  áᥬ¡«¥à 
;#15B3 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl ¤«¨­®© b
;#15B9 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl á § ¬¥­®© ­¥¯¥ç â­ëå ᨬ¢®«®¢ ­  ?
;#15C7 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
;#15D0 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã (­  íªà ­/¢ ¡ãä¥à)
;#15DB ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
;#15DD ¯¥ç âì á®®¡é¥­¨ï ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë
;#15F3 ¯¥ç âì ­¥áª®«ìª¨å ¯à®¡¥«®¢ (¢ B)
;#15FA ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A
;#15FC ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A, ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë ¢ ‘
;#1612 ¯¥ç âì ç¨á«  ¢ hl (dec/hex) á ¯à¥ä¨ªá®¬
;#1614 ¯¥ç âì ç¨á«  ¢ bc (dec/hex) á ¯à¥ä¨ªá®¬
;#1626 ¯¥ç âì ç¨á«  ¨§ (hl) (dec/hex) á ¯à¥ä¨ªá®¬
;#1629 ¯¥ç âì ç¨á«  ¢ bc (bin/oct/dec/hex) á ¯à¥ä¨ªá®¬
;#162C ¯¥ç âì ç¨á«  ¢ § ¤ ­­®© á¨á⥬¥ áç¨á«¥­¨ï
;#1658 ¯¥ç âì ç¨á«  A á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;#165E ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;#1661 ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨, á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;#1669 ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨
;#166E ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨
;#1673 ¯¥ç âì ç¨á«  bc (­  íªà ­/¢ ¡ãä¥à)
;#1677 ¯¥ç âì ç¨á«  bc (­  íªà ­/¢ ¡ãä¥à)
;#16AA ¤¥«¥­¨¥ bc=ac/de
;#16D0 ¯¥ç âì áâப¨ (rst #20)
;#16DE ¯¥ç âì ç¨á«  hl=[#0000..#FFFF]
;#16E3 ¯¥ç âì ç¨á«  a=[#00..#FF]
;#16EC ¯¥ç âì ç¨á«  a=[#0..#F]
;#16FF ¨á¯®«­¥­¨¥ § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  st0-st9
;#17F0 ¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë ¯®  ¤à¥áã ¢ PC
;#191E ¯à®¢¥àª  ¯®¯ ¤ ­¨ï  ¤à¥á  ­   ¤à¥á  #3D00-#3DFF
;#197F  ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
;#1DD0 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
;#1DE5 ¢ë¯®«­¥­¨¥ á«®¢   ­ «¨§ â®à 
;#1E0F ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
;#1E45 Š®¬ ­¤ : FLOAD track, sector, start, length
;#1E4F Š®¬ ­¤ : FSAVE track, sector, start, length
;#1E59 ®âªàë⨥ ä ©«  ¤«ï ç⥭¨ï/§ ¯¨á¨ ¯à®£à ¬¬ë  ­ «¨§ â®à 
;#1E76 Š®¬ ­¤ : DEFSave filename
;#1EA5 Š®¬ ­¤ : DEFLoad filename
;#1F25 Š®¬ ­¤ : CLear
;#1F42 Š®¬ ­¤ : ANalyser boolean
;#1F5B ¯®¨áª ¢¢¥¤¥­­®£® á«®¢  ¢ á«®¢ à¥/¯à®£à ¬¬¥ ¯®«ì§®¢ â¥«ï
;#1FB0 Š®¬ ­¤ : WORD word[:] program
;#2093 Š®¬ ­¤ : EDit
;#20C8 ¯¥ç âì । ªâ¨à㥬®£® á«®¢ 
;#2104 ¯¥ç âì á«®¢   ­ «¨§ â®à 
;#2112 ¯®¨áª ­ ç «  ¨ ¯¥ç âì á«®¢   ­ «¨§ â®à 
;#2121 ç⥭¨¥ ld bc,(hl+1): hl=hl+2
;#2148 Š®¬ ­¤ : WORD word[:] program <20>த®«¦¥­¨¥ (¤«ï ¯¥à¥®¯à¥¤¥«¥­¨ï 㦥 ®¯à¥¤¥«¥­­ëå á«®¢)
;#2214 Š®¬ ­¤ : PDEFinition ¢ë¢®¤ ­  ¯à¨­â¥à ”®àâ - ¯à®£à ¬¬ë
;#2218 Š®¬ ­¤ : LDEFinition ¢ë¢®¤ ­  íªà ­ ”®àâ - ¯à®£à ¬¬ë
;#2297 Š®¬ ­¤ : EVal word ¢ë¯®«­¨âì á«®¢® word
;#234D § ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;#2364 ãáâ ­®¢ª  ­®¢®£® §­ ç¥­¨ï ¢¥à設ë áâíª   ­ «¨§ â®à 
;#236A § ¯¨áì ­  áâíª  ­ «¨§ â®à  ¡ ©â  ¨§ ï祩ª¨ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;#2374 § ¯¨áì ­  áâíª  ­ «¨§ â®à  á«®¢  ¨§ ï祥ª ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;#237F ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
;#2398 ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
;#23A3 ¡ §®¢ë¥ á«®¢   ­ «¨§ â®à 
;#27DC ᯨ᮪ ã¯à ¢«ïîé¨å ª®¤®¢
;#27E7 â ¡«¨æ  á  ¤à¥á ¬¨ ®¡à ¡®âª¨ ã¯à ¢«ïîé¨å ª®¤®¢
;#27FD 㤠«¥­¨¥ ªãàá®à  ¨ ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
;#2800 ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
;#28B8 ¢®ááâ ­®¢«¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬, ¥á«¨ ­ã¦­® (6 ¯¨ªá¥«¥© ᨬ¢®«)
;#28C5 á®åà ­¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬ (6 ¯¨ªá¥«¥© ᨬ¢®«)
;#28E8 ¯¥ç âì/㤠«¥­¨¥ ªãàá®à  ¢ ®ª­¥
;#28F6 ¬¨£ ­¨¥ ⥪á⮢®£® ªãàá®à  ¢ áâப¥ ¢¢®¤ 
;#292F à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 6 ¯¨ªá¥«¥©
;#2959 à áç¥â ª®®à¤¨­ â ªãàá®à  ­  íªà ­¥ ¤«ï ᨬ¢®«®¢ è¨à¨­®© 8 ¯¨ªá¥«¥©
;#2969 à áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
;#297C à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
;#298E áªà®««¨­£ ®ª­  ¢¢¥àå
;#29D0 áªà®««¨­£ áâப¨ ¤ ­­ëå ®ª­ 
;#29FB áªà®««¨­£ áâப¨  âਡã⮢ ®ª­ 
;#2A1B ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #1E (áªà®««¨­£ ®ª­  ¢¢­¨§)
;#2A5B ®ç¨á⪠ ®ª­  ¯®«ì§®¢ â¥«ï (rst 8: db #83)
;#2A5E ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0C (®ç¨á⪠ ⥪ã饣® ®ª­ )
;#2A85 ®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
;#2AAD ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #04 (¢ë¢®¤ á ¢ëà ¢­¨¢ ­¨¥¬)
;#2ABB à áç¥â ¤«ï ¢ëà ¢­¨¢ ­¨ï áâப¨
;#2ACA ¯¥ç âì áâப¨ ¨§ ¡ãä¥à  á ¢ëà ¢­¨¢ ¥¬ ¯® 業âàã ®ª­  #05
;#2AED ¯¥ç âì áâப¨ ¨§ ¡ãä¥à  á ¢ëà ¢­¨¢ ¥¬ ¯® ¯à ¢®¬ã ªà îã ®ª­  #06
;#2AF2 ®¡à ¡®âª  ¡ ©â  ¯®á«¥ ã¯à ¢«ïî饣® ª®¤  #04
;#2B07 ¢®§¢à â ¨§ ¯/¯ ¯¥ç â¨ ᨬ¢®« 
;#2B0B ¯¥ç âì ᨬ¢®«  á® á¡à®á®¬ 7£® ¡¨â  (rst #10)
;#2B10 ¯¥ç âì ¯à®¡¥«  (rst #10)
;#2B12 ¯¥ç âì ᨬ¢®«  (rst #10)
;#2B63 ãáâ ­®¢ª   ¤à¥á  ¯/¯ ®¡à ¡®âª¨ ã¯à ¢«ïî饣® ª®¤ 
;#2B6E ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0D (¢®§¢à â ª à¥âª¨)
;#2B7D ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0A (¯¥à¥¢®¤ áâப¨)
;#2B9D ãáâ ­®¢ª  ­ ç «ì­ëå ª®®à¤¨­ â
;#2BA8 ª®à®âª¨© §¢ãª®¢®© ᨣ­ « c ãáâ ­®¢ª®© ¡®à¤îà 
;#2BCA ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #1B (¯®§¨æ¨®­¨à®¢ ­¨¥ ªãàá®à  ¢­ãâਠ®ª­ )
;#2BF8 ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #01 (ãáâ ­®¢ª   âਡã⮢)
;#2C18 ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #02 (¢®ááâ ­®¢«¥­¨¥  âਡã⮢)
;#2C1F ®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬ 
;#2C30 ®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬  ¢ª«/¢ëª«
;#2C4D ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
;­¥ ¨á¯®«ì§ã¥âáï #2C7A ç⥭¨¥ ¡ ©â  ¯®  ¤à¥áã #00FB
;#2C7E ¯®¨áª ¨ ¢ë§®¢ ¯à®æ¥¤ãàë ®¡à ¡®âª¨ ¡¥§ ¢®§¢à â (¥á«¨ ­¥ ­ ©¤¥­® ¢®§¢à â)
;#2C92 ¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë  áᥬ¡«¥à  á ª®­â஫¥¬ «®¢ã襪
;#2CA8 ¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
;#2E25 ¯¥ç âì ¡ ©â  ¨§ L ¢ ¤¢®¨ç­®¬ ¢¨¤¥
;#2E38 ¯¥ç âì ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
;#2E76 㤠«¥­¨¥ ªãàá®à  ­  ¯à¥¤ë¤ã饩 ï祩ª¥ ¤ ¬¯ 
;#2E3D ¯¥ç âì ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
;#2EBA ¯¥ç âì ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠(8 ¡ ©â)
;#2EBE ¯¥ç âì ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠(8 ¡ ©â)
;#2F74 ¢ë¢®¤ ¤¨á á¬  ¯ ¬ï⨠¯®  ¤à¥áã ¢ de
;#2F96  ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
;#2FAC ¯¥ç âì áâப¨ ¤¨§ á¬ 
;#2FED ¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª­ 
;#2FF1 ¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ­­®© ª®®à¤¨­ âë X
;#2FFB ãáâ ­®¢ª  ⥪ã騬 ®ª­ : ¢¢®¤ ç¨á« 
;#3005 ãáâ ­®¢ª  ⥪ã騬 ®ª­ : main menu
;#300A ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢ë¢®¤ ­  ¯à¨­â¥à
;#300F ç⥭¨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà  ix ®á­®¢­®© ¯à®£à ¬¬ë
;#3014 ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢¢®¤ áâப¨ ­¨§ã íªà ­ 
;#3019 ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¤ ¬¯ ¯ ¬ïâ¨
;#301C ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à  ¨§ hl
;#3023 ®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
;#302E ®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢) ¡¥§ ¢ë¢®¤  ªãàá®à  ¢ ®ª­¥
;#303C ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë, ­  ª®â®àãî 㪠§ë¢ ¥â PC (cs+3)
;#303F ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë, ­  ª®â®àãî 㪠§ë¢ ¥â PC á ¡ëáâàë¬ ¢ë¯®«­¥­¨¥¬ ¯®¤¯à®£à ¬¬ (cs+4)
;#3052 § £«ã誠 ¢å®¤  ¢ ¬®­¨â®à ¯à¨ ­¥á®¢¯ ¤¥­¨¨ ª®­â஫쭮© á㬬ë
;#305B ¡«®ª¨à®¢ª  à ¡®âë ¯à¨ ®è¨¡ª¥ ª®­â஫쭮© á㬬ë
;#3065 ãáâ ­®¢ª  ॣ¨áâ஢ ¤«ï § £à㧪¨/á®åà ­¥­¨ï
;#3074 Š®¬ ­¤ : ERAse filespec
;#3085 Š®¬ ­¤ : SAVE filespec start,length
;#3095 Š®¬ ­¤ : LOAD filespec [start[,length]]
;#30D8 ç⥭¨¥ ä ©«  ¢ ¯ ¬ïâì
;#3107 § ¯¨áì ®¡« á⨠¯ ¬ï⨠¢ ä ©«
;#3135 ¯®¤áç¥â ª®­â஫쭮© á㬬ë áâà ­¨æë
;#3161 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
;#318C Š®¬ ­¤  III (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
;#3194 Š®¬ ­¤  OOO (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
;#319C Š®¬ ­¤  CMOS (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
;#31A4 Š®¬ ­¤  RESNVRAM (çâ®-â® ¯¨è¥â ¢ NVRAM)
;#31AB Š®¬ ­¤ : SLOW type  ¢â®¬ â¨ç¥áª ï âà áá¨à®¢ª 
;#31C1 Š®¬ ­¤ : LISTBreak/LBreak
;#3201 ¯¥ç âì ON/OFF ®â ä« £  nz-ON/z-OFF
;#3210 ®¯à¥¤¥«¥­¨¥  ¤à¥á  «®¢ã誨
;#3222 ¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨
;#3228 á®åà ­¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨ ¨ ãáâ ­®¢ª  «®¢ã襪
;#3281 ãáâ ­®¢ª  ­ ç «  ᯨ᪠ «®¢ã襪
;#328B ¯à®¢¥àª  áà ¡ â뢠­¨ï «®¢ã誨
;#32AF Š®¬ ­¤ : DELBreak number
;#32E2 Š®¬ ­¤ : BRK number, [on|off]
;#3303 Š®¬ ­¤ : BREak number, type, addr, int_count[,bank]
;#330B ãáâ ­®¢ª  «®¢ã誨 #8, ¯® ⥪ãé¥¬ã  ¤à¥áã «¨á⨭£  ¤¨§ á¬ 
;#3326 㤠«¥­¨¥ «®¢ã誨 #8
;#3333 Š®¬ ­¤ : OPTion bit on|off
;#3360 Š®¬ ­¤ : OUT addr, data
;#336C Š®¬ ­¤ : OUTD addr, data
;#337A Š®¬ ­¤ : IND addr
;#3383 Š®¬ ­¤ : IN addr
;#3389 Š®¬ ­¤ : ?data
;#33BB ãáâ ­®¢ª  ¨ ®ç¨á⪠ ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
;#33CD ¯¥ç âì ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
;#33D2 Š®¬ ­¤ : SHow
;#3432 Š®¬ ­¤ : BASE 0|2|8|10|16
;#344F Š®¬ ­¤ : WORKspace addr
;#3461 Š®¬ ­¤ : SEarch addr_st, addr_end, bank, data
;#346A Š®¬ ­¤ : FINd addr_st, addr_end, data
;#3517 ¯à®¤®«¦¥­¨¥ ¯®¨áª  ¢ ®â« ¤ç¨ª¥ (¤«ï ª®¬ ­¤ FIND/SEARCH)
;#352F Š®¬ ­¤ : MOVe addr_st1, addr_fin1, addr_st2 [,bank]
;#356F Š®¬ ­¤ : CHeck addr_st1, addr_fin1, addr_st2 [,bank]
;#35D3 áà ¢­¥­¨¥ ix=xE075
;#35E0 á®åà ­¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
;#35F5 Š®¬ ­¤ : FILl addr_st, addr_end, byte [,bank]
;#360D Š®¬ ­¤ : DATA addr, data
;#3614 Š®¬ ­¤ : .PC data
;#361E Š®¬ ­¤ : .data
;#3640 pop de á® áâíª  ¯®«ì§®¢ â¥«ï
;#364D Š®¬ ­¤ : POP
;#3655 ¯¥à¥å®¤ ­   ¤à¥á, ᮤ¥à¦ é¨©áï ¢ ª®¬ ­¤¥, à á¯®«®¦¥­­ë© ¢ ⥪ã饩 ï祩ª¥ ¯ ¬ïâ¨
;#365C Š®¬ ­¤ : MEMory addr
;#3662 Š®¬ ­¤ : EXX
;#3666 Š®¬ ­¤ : EX AF
;#3683 Š®¬ ­¤ : INTerrupt on|off
;#3699 Š®¬ ­¤ : CALl [[addr],bank]
;#36B4 Š®¬ ­¤ : Jump [[addr],bank]
;#36C3 § ¯¨áì áâ ­¤ àâ­®£® Magic-ä ©« 
;#36DB Š®¬ ­¤ : ROM bank
;#36F9 ¯®«ã祭¨¥ ­®¬¥à  «®£¨ç¥áª®© áâà ­¨æë ¯®«ì§®¢ â¥«ï a=[#0..#F]
;#3707 áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®©
;#370C Š®¬ ­¤ : RAM
;#3713 ¥á«¨ ¯ à ¬¥âà § ¤ ­, ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
;#371D ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
;#3732 ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ L
;#3778 Š®¬ ­¤ : SCReen [on|off|5|7]
;#37B9 ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
;#3807 ¯ ã§  40416t
;#382E ®¦¨¤ ­¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
;#3837 ª®¯¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ï⨠¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
;­¥ ¨á¯®«ì§ã¥âáï #385D ­¥ ¨á¯®«ì§ã¥âáï
;­¥ ¨á¯®«ì§ã¥âáï #3860 ­¥ ¨á¯®«ì§ã¥âáï
;#3870 ¯¥ç âì á®®¡é¥­¨ï ¨ ¯à®¤®«¦¥­¨¥ à ¡®âë ⥪ã饣® ¬¥­î ¬®­¨â®à 
;#3884 ¯®«ãç¨âì  ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
;#38D8 ¡ëáâàë© ¢å®¤ ¢ ª®¬ ­¤ã DASM
;#38E2 Š®¬ ­¤ : DASm ¢ë¢®¤ «¨á⨭£  ¤¨§ á¬ 
;#39A8 <20>¥ç âì ®¤­®© áâப¨ «¨á⨭£  ¤¨§ á¬ 
;#39EB Š®¬ ­¤ : LCATalogue [num_drive]
;#39EF Š®¬ ­¤ : CATalogue [num_drive]
;#3A10 Š®¬ ­¤ : PUSH data
;#3A14 § ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
;#3A21 ª®¯¨à®¢ ­¨¥  ªâ¨¢­®£® íªà ­  ¯®«ì§®¢ â¥«ï ¢ #4000
;#3A4E ¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
;#3A57 Š®¬ ­¤ : LDISs [addr_st[,addr_end]] ॠáᥬ¡«¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ï⨠­  ¯à¨­â¥à.
;#3A60 Š®¬ ­¤ : DISs [addr_st [,addr_end]] ॠáᥬ¡«¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ïâ¨ á  ¤à¥á  addr_st ¯® addr_end ¢ª«îç¨â¥«ì­®
;#3A68 Š®¬ ­¤ : LDUmp [addr_st[,addr_end]]
;#3A71 Š®¬ ­¤ : DUmp [addr_st[,addr_end]]
;#3A93 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ bc - call (bc)
;#3A95 ¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
;#3AC8 Š®¬ ­¤ : VList
;#3AD0 Š®¬ ­¤ : Help
;#3AF9 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ de - call (de)
;#3AFB ¯¥ç âì ª®¬ ­¤ë ®â« ¤ç¨ª 
;#3B55 Š®¬ ­¤ : IM
;#3B75 ®¯à¥¤¥«¥­¨¥ ⨯  ¯à¥à뢠­¨© im 1/2
;#3B7F ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¯® ª®­ªà¥â­ë¬  ¤à¥á ¬
;#3B92 § ª®¤¨à®¢ ­­ë¥ ¯à®æ¥¤ãàë ¯¥à¥ª«î祭¨ï áâà ­¨æ -> ram 8 xE3BE
;#3C01 ­¥ª®¤¨à®¢ ­­ë¥ ¯à®æ¥¤ãàë ¯¥à¥ª«î祭¨ï áâà ­¨æ -> ram 8 xE42D
;#3D01 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
;#3E25 ç⥭¨¥ ¯®à⮢ #1FFD/#7FFD
;#3E2C  ¤à¥á  ®¡à ¡®âª¨ ª®¬ ­¤ ®â« ¤ç¨ª 
;#3ED2 § ª®¤¨à®¢ ­­ë© ¡«®ª  âਡã⮢ ¬¥­î ¬®­¨â®à  -> ram 8 xEAED
;#3EDA ¤ ­­ë¥ ¤«ï ãáâ ­®¢ª¨ ¯¥à¥¬¥­­ëå ¯® ª®­ªà¥â­ë¬  ¤à¥á ¬
;#3EE6 ­ §¢ ­¨ï ¬¥áï楢
;#3F0A <20> §¢ ­¨ï ¤­¥© ­¥¤¥«¨
;#3F1F free #00E1(225) bytes
;#4000
;€„<E282AC>…‘: #0000 § ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï (rst #00)
;¢å: hl -  ¤à¥á ¢ ¯ ¬ïâ¨
; a - ¡ ©â ¤«ï § ¯¨á¨
x0000 scf
bit 7,h
x0003 jp x058E
x0006 jr x0069
x0008 jp x02A5 ;rst #08 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
x000B out (c),a ;¯¥à¥å®¤ ¢ ¤à㣮© rom
x000D jp x009C ;®¡à ¡®âª  NMI ¯à¨  ªâ¨¢­®© rom2
x0010 jp x2B12 ;rst #10 ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
x0013 nop
nop
x0015 jp x00B6 ;¢å®¤ ¯® rst #08 ¨§ basic 48k
x0018 jp xE41B ;rst #18 ¢ë§®¢ ¯/¯ Tr-Dos
x001B ld a,#00 ;¤«ï ¯à®¢¥àª¨ à §¬¥à  <20>‡“
ret
x001E jr x003B ;¢å®¤ ¯à¨ ¢ª«î祭¨¨/reset
x0020 jp x16D0 ;rst #20 ¯¥ç âì áâப¨
x0023 nop
nop
nop
x0026 jr x0069 ;¢å®¤ ¯® rst #08 ¨§ basic 128k
;€„<E282AC>…‘: #0028 ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï (rst #28)
;¢å: hl -  ¤à¥á ¢ ¯ ¬ïâ¨
x0028 or a
bit 7,h
jr x0003
x002D jp x00B6
x0030 jp xE3D3 ;rst #30 ¢ë§®¢ ¯/¯ ¨§ ¤à㣮£® rom
x0033 nop
nop
x0035 jp x00B6 ;á ¯¥à¥å®¤¨¬ ¯® NMI ¨§ Tr-Dos
x0038 jp x0092 ;¯¥à¥å®¤ ­  ®¡à ¡®âªã ¯à¥à뢠­¨© im 1
;€„<E282AC>…‘: #003B ¢å®¤ ¯à¨ ¢ª«î祭¨¨/reset
;¢å: bc=#1FFD
x003B ld b,#7F
xor a
out (c),a ;ram 8
x0040 ld sp,#5BFF
ld b,#00
jr x0049
x0047 out (c),a ;§ ¢¥à襭¨¥ ¨­¨æ¨ «¨§ æ¨¨ ¨ ¯¥à¥å®¤ ¢ basic 128k
x0049 ld hl,#EAF5 ;¯à®¢¥à¨¬ ¯ ¬ïâì 8© áâà ­¨æë
x004C ld a,b
cp (hl)
inc hl
jr nz,x007B ;ram 8 ¨á¯®à祭 . ¯®«­ë© á¡à®á
djnz x004C
ld hl,(#E028)
x0056 push hl ;hl=#0000 ¯à¨ ¯®«­®© ¨­¨æ¨ «¨§ æ¨¨
call x1037 ;¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
pop hl
ld bc,#7FFD
xor a
ld (x5B88),a
out (c),a ;ram 0/8
jr x006C
x0066 jp x000D ;­ ¦ â¨¥ Magic ¯à¨  ªâ¨¢­®© rom2
x0069 jp x00B6
x006C ld b,#1F
rlc l
ld hl,#00C7
jr nc,x0078
ld hl,#00ED
x0078 push hl
jr x0047 ;rom 0 (basic 128k)
;8ï áâà ­¨æ  ¨á¯®à祭 . ¯®«­ ï ¨­¨æ ¨ «¨§ æ¨ï
x007B call x0672
pop bc ;bc=x3135
call x3A93 ;¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ bc (¯®¤áç¥â ª®­â஫쭮© á㬬ë áâà ­¨æë)
xor a ;hl=#00F6
ld l,a ;hl=#0000
ld i,a
im 0
ei
halt
im 1
halt
im 2
halt
jr x0056
;€„<E282AC>…‘: #0092 ®¡à ¡®âª  ¯à¥à뢠­¨© im 1
;¢ëå: a=0, b=0, d=d+1
x0092 ld a,#00
djnz $
cp b
jr nz,x009A
inc d
x009A ei
ret
;€„<E282AC>…‘: #009C ®¡à ¡®âª  NMI ¯à¨  ªâ¨¢­®© áâà ­¨æ¥ ¬®­¨â®à 
x009C push af
ld a,r
push af
ld a,#08 ;¢å®¤ ¯à¨  ªâ¨¢­®© áâà ­¨æ¥ ¬®­¨â®à 
push af
inc sp
push bc
push hl
ld hl,(xC001)
ex (sp),hl
ld a,#55
ld (xC001),a
cpl
ld (xC001+1),a
ld bc,#1FFD
;€„<E282AC>…‘: #00B6 ¢å®¤ ¢ ¬®­¨â®à ¯® NMI/rst 8
x00B6 di
ld a,#12
out (c),a ;rom 2
ld b,#7F
ld a,#10
out (c),a ;ram 8
ld (xDD6D),sp
ld (xDDF7),sp ;á®åà ­¨¬  ¤à¥á áâíª 
ld sp,xE38D ;­®¢ë© áâíª
ld bc,(xC064)
ld a,c
or b
jr nz,x0116 ;¢ë§®¢ ¯à®æ¥¤ãàë ¢¬¥áâ® ¢å®¤  ¢ ¬®­¨â®à
call x03CE ;á®åà ­¥­¨¥ ॣ¨áâ஢ ¨ áâíª  ¢ ram 8
call x0398 ;§ ¯¨áì ¢ ॣ¨áâà 7 AY ç¨á«  #FF
ld a,(xDD86) ;­®¬¥à rom ®âªã¤  § è«¨
cp #80
jp z,x0922
call x3222 ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨
ld a,(xDD86) ;­®¬¥à rom ®âªã¤  § è«¨
and #03
jr nz,x0114 ;¢å®¤ ¯® rst #08 ¨§ basic 128k ¨«¨ basic 48k
call x0373 ;ãáâ ­®¢ª  ⥪ã騬 ¡«®ª  ¤¨áª®¢®¤®¢ ¬®­¨â®à 
jr x011D ;¢å®¤ ¢ ¬®­¨â®à ¯® ª­®¯ª¥ NMI
x00F1 db #61 ;¢â®à®© ¡ ©â ᨣ­ âãàë ¯à®£à ¬¬ë  ­ «¨§ â®à 
x00F2 db #6F
x00F3 db #08
x00F4 db #35 ;¡ ©â ¤«ï à áª®¤¨à®¢ ­¨ï
x00F5 db #CA ;¡ ©â ¤«ï à áª®¤¨à®¢ ­¨ï ¡«®ª   âਡã⮢ ¬®­¨â®à 
x00F6 db #80
x00F7 db #71
x00F8 db #1A
x00F9 db #6B
x00FA db #D7
x00FB db #01
x00FC db #05 ;¡ ©â ¤«ï à áª®¤¨à®¢ ­¨ï ¯à®æ¥¤ãà
x00FD db #07 ;¡ ©â ¤«ï à áª®¤¨à®¢ ­¨ï ¯à®æ¥¤ãà
x00FE db #61 ;¡ ©â ¤«ï à áª®¤¨à®¢ ­¨ï ¯à®æ¥¤ãà
x00FF dw xE516 ; ¤à¥á ¯/¯ ®¡à ¡®âª¨ ¯à¥à뢠­¨© im 2
;€„<E282AC>…‘: #0101 ­®¬¥à ⥪ã饣® rom
x0101 db #02
;€„<E282AC>…‘: #0102 ’ ¡«¨æ  ¯¥à¥ª«î祭¨©  à¡¨âà  áâà ­¨æ <20>à®ä<C2AE>‡“ (#0E ¡ ©â)
x0102 ds #0E
;€„<E282AC>…‘: #0110 ’ ¡«¨æ  ¯¥à¥å®¤®¢ <20>à®ä<C2AE>‡“
x0110 db #00,#0C,#08,#04
;€„<E282AC>…‘: #0114 ¢å®¤ ¢ ¬®­¨â®à ¯® rst #08
x0114 jr x0167
;€„<E282AC>…‘: #0116 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ BC á § ¤¥à¦ª®© call (bc)
x0116 push bc
x0117 dec bc
ld a,b
or c
jr nz,x0117
ret
;€„<E282AC>…‘: #011D ¢å®¤ ¢ ¬®­¨â®à ¯® ª­®¯ª¥ NMI
x011D ld a,(xE039) ;§­ ç¥­¨¥ NMI debouncing
ld b,a
x0121 call x0241 ;¯ ã§  26698t
djnz x0121
call x2C30 ;®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬  ¢ª«/¢ëª«
x0129 bit 0,(iy+#12)
jr z,x0136 ;®â« ¤ç¨ª ­¥ § ¯ã饭
ld a,(xC063)
or a
jp z,x0AF2 ;¯¥ç âì ®ª­  ®â« ¤ç¨ª 
x0136 rst #30 ;®â« ¤ç¨ª ®âª«î祭
dw rom5_x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à  (¡¥§ ¢®§¢à â )
db #05
;€„<E282AC>…‘: #013A ¢ë室 ¨§ ¬®­¨â®à 
x013A call x0370 ;¢®§¢à â ¢ ®â« ¤ç¨ª
x013D ld sp,xE38D
call x0581 ;¢®ááâ ­®¢«¥­¨¥ íªà ­  ¢ áâà ­¨æ¥ 5
x0143 call x3228 ;á®åà ­¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨ ¨ ãáâ ­®¢ª  «®¢ã襪
x0146 call x024C ;ãáâ ­®¢ª  ­®¬¥à  ¤¨áª®¢®¤ 
res 3,(iy+#12) ;á¡à®á ¯à¨§­ ª  á®åà ­¥­¨ï íªà ­  ¢ ram 8
ld a,(xDD86) ;­®¬¥à rom ®âªã¤  § è«¨
and #0C
call nz,xE483 ;
call x03C2 ;¢®ááâ ­®¢«¥­¨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà  7 AY
res 7,(iy+#12) ;
call x04E2 ;¢®ááâ ­®¢«¥­¨¥ ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
xor a
ld sp,(xDD6D) ;㪠§ â¥«ì ¢¥à設ë áâíª  ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï, á ãç¥â®¬ 11 ¡ ©â 㦥 á®åà ­¥­­ëå ­  áâíª¥
jp x000B ;¢®§¢à â ¢ rom ¯®«ì§®¢ â¥«ï
;€„<E282AC>…‘: #0167 ¢å®¤ ¢ ¬®­¨â®à ¯® rst #08
x0167 ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
dec hl
ld (xDD6B),hl ;­ § ¤, ­  ¤«¨­ã ª®¬ ­¤ë rst 8
ld a,(xE026)
bit 5,a
jr z,x018E
;¢ë¯®«­ï¥âáï âà áá¨à®¢ª  ª®¬ ­¤ë ¨§ ®â« ¤ç¨ª 
ex de,hl
ld hl,(xE11A) ; ¤à¥á ­ ç «  ¡ãä¥à  ¤«ï âà áá¨à®¢ª¨ ª®¬ ­¤ë
push hl
scf
sbc hl,de
ex de,hl
pop de ; ¤à¥á ­ ç «  ¡ãä¥à  ¤«ï âà áá¨à®¢ª¨ ª®¬ ­¤ë
jr nc,x018E ;PC ­¥ ¢ ¯à¥¤¥« å ¡ãä¥à 
ex de,hl
push de
ld de,#0008
add hl,de
pop de
sbc hl,de
ex de,hl
jp nc,x0557 ;PC ¯®«ì§®¢ â¥«ï ¯®¯ ¤ ¥â ­  ¡ãä¥à á ª®¬ ­¤®© âà áá¨à®¢ª¨ -> §­ ç¨â íâ® ¢ë室 ¨§ âà áá¨à®¢ª¨
;¯à®¢¥àª  «®¢ã襪
x018E bit 4,a
res 4,(iy+#12)
jr nz,x01F2 ;¯à¨ ¢ë§®¢¥ ª®¬ ­¤ë CALL ®â« ¤ç¨ª 
call x328B ;¯à®¢¥àª  áà ¡ â뢠­¨ï «®¢ã誨
ld e,#00 ;de=#0000, b - ®¡à â­ë© ­®¬¥à «®¢ã誨
jr c,x01F5 ;­¥â áà ¡®â ¢è¨å «®¢ã襪. ¢ë§®¢ ä㭪樨 rst #08
; ¯à®¢¥àª  ¯à®å®¤®¢ ¯® «®¢ã誥
x019D ld l,(ix+#07)
ld h,(ix+#08)
ld a,l
or h
jr z,x01B2 ;­ã¦­ë© ¯à®å®¤ ¯® «®¢ã誥
dec hl ;㬥­ì訬 áç¥â稪 ¯à®å®¤®¢
ld (ix+#07),l
ld (ix+#08),h
ld a,h
or l
jr nz,x01E0 ;áç¥â稪 ¯à®å®¤®¢ ¥é¥ ­¥ ¯ãá⮩
; áà ¡®â «  «®¢ã誠
x01B2 ld l,(ix+#05)
ld (ix+#07),l
ld h,(ix+#06)
ld (ix+#08),h
push ix
pop hl
bit 1,(hl)
jr nz,x01C7 ;«®¢ã誠 ­¥  ªâ¨¢­ 
res 7,(hl) ;«®¢ã誠 ¡®«ìè¥ ­¥ § ¤ ­ 
x01C7 ld a,#09 ;b - ®¡à â­ë© ­®¬¥à «®¢ã誨
sub b ;a - ­®¬¥à «®¢ã誨
call x3210 ;®¯à¥¤¥«¥­¨¥  ¤à¥á  «®¢ã誨
; à ¡®â   ­ «¨§ â®à 
push af
call nz,x1DE5 ;¢ë¯®«­¥­¨¥ á«®¢   ­ «¨§ â®à 
pop af
; ¢å®¤ ¢ ®â« ¤ç¨ª ¯® áà ¡®â ¢è¥© «®¢ã誥
x01D2 ld l,a
ld a,#83 ;á®®¡é¥­¨¥: breackpoint _ç¨á«®_
x01D5 ld h,#00
ld (xDDA7),hl ;ç¨á«® ¤«ï ¯¥ç â¨
call x0373 ;ãáâ ­®¢ª  ⥪ã騬 ¡«®ª  ¤¨áª®¢®¤®¢ ¬®­¨â®à 
jp x0B06 ;¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
x01E0 bit 7,e
jp nz,x2C9D ;¯¥ç âì ®â« ¤ç¨ª 
ld sp,xE336
res 7,(iy+#16)
call x17F0 ;¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë ¯®  ¤à¥áã ¢ PC
x01EF jp x0143 ;¢ë室 ¨§ ¬®­¨â®à 
x01F2 xor a
jr x01D2
;€„<E282AC>…‘: #01F5 ¢ë§®¢ ä㭪樨 rst #08
;¢å: 7,e =1 - âà áá¨à®¢ª  ¢ ®â« ¤ç¨ª¥
; =0 - ¢ë§®¢ ä㭪樨 rst #08
; hl - PC ¯®«ì§®¢ â¥«ï
x01F5 push de
inc hl
rst #28 ;ç⥭¨¥ ­®¬¥à  ä㭪樨 rst #08
cp #FF
jr z,x0200
sla a
jr c,x0225 ;íâ® äã­ªæ¨ï rst #08
;®¡à ¡®â稪 ®è¨¡®ª áâ ­¤ àâ­®£® Basic
x0200 ex de,hl
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
bit 4,(iy-#02)
jr z,x01F2 ;¡ë« ¢ª«î祭 Basic 128k ¯à¨ ¢ë§®¢¥ rst #08
ld hl,(#5C5D)
ld (#5C5F),hl
ld hl,#0053 ;­®¢ë© pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
ld (xDD6B),hl
;¢®§¢à â ¯®á«¥ ®âà ¡®âª¨ ä㭪樨, ¢ë§¢ ­­®© ¯®«ì§®¢ â¥«¥¬
x0216 res 5,(iy+#0B) ;ä㭪樨 ¢ë§ë¢ îâáï ¨§ ¬®­¨â®à 
pop de
bit 7,e
jr z,x01EF ;;¢ë室 ¨§ ¬®­¨â®à 
ld hl,(xDD6B) ;PC ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
jp x18C0 ;¨á¯®«­¥­¨¥ § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  st0-st9
;®¯à¥¤¥«¥­¨¥  ¤à¥á  ¨ ¢ë§®¢ ä㭪樨 rst #08
x0225 cp #1B
jr nc,x0200 ;­¥ áãé¥áâ¢ãî騩 ­®¬¥à ä㭪樨
inc hl
ld (xDD6B),hl ;PC ¯®«ì§é®¢ â¥«ï
ld hl,x0216 ;á ¢¥à­¥¬áï ¯®á«¥ ®âà ¡®âª¨
push hl
set 5,(iy+#0B) ;äã­ªæ¨ï ¢ë§¢ ­  ¯®«ì§®¢ â¥«¥¬
ld hl,x08B7 ;â ¡«¨æ  á  ¤à¥á ¬¨ ®¡à ¡®âª¨ ä㭪権 rst 8
ld e,a
ld d,#00
add hl,de
ld a,(hl)
inc hl
ld h,(hl)
ld l,a
jp (hl)
;€„<E282AC>…‘: #0241 ¯ ã§  26698t
x0241 push bc
ld bc,#0400
x0245 dec bc
ld a,c
or b
jr nz,x0245
pop bc
ret
;€„<E282AC>…‘: #024C ãáâ ­®¢ª  ­®¬¥à  ¤¨áª®¢®¤ 
x024C ld a,(xFFDC)
bit 5,a
ld a,(xFFCA)
jr nz,x025A ;¡«®ª ¤¨áª®¢®¤®¢ ¬®­¨â®à 
ld (xE9F2),a ;¡«®ª ¤¨áª®¢®¤®¢ ¯®«ì§®¢ â¥«ï
ret
x025A ld (xE9F1),a
ret
;€„<E282AC>…‘: #025E ®¯à¥¤¥«¥­¨¥ ­ «¨ç¨ï ’ãà¡®¨ ¨ ®à¨£¨­ «ì­®á⨠(ª®«¢® ⠪⮢)
x025E call x04D9 ;¢ëª«î祭¨¥ ’ãà¡®-०¨¬ 
call x04D5 ;¢ª«î祭¨¥ ’ãà¡®-०¨¬ 
ld a,#AF ;xor a
ld (xE516),a
call x2C1F ;®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬ 
jr z,x0276 ;âãà¡® ¢ëª«î祭
ld a,(xE02D) ;âãà¡® ¢ª«î祭 ¨ ¤®áâ㯥­
or %11000000
ld (xE02D),a
x0276 ld (xE523+#08),hl ;!!! ­¥¯®­ïâ­® !!!
ld a,#CD ;call #nnnn
ld (xE51C),a
ld c,#FF ;???®¯à¥¤¥«¥­¨¥ ᪮à®áâ¨???
xor a
ld e,a
ld d,a
inc a
ld b,a
ei
halt
inc a
ld b,a
x0289 call xE483 ;ret
db #ED,#70 ;in (c)
call xE483
dec de
or a
jr nz,x0289
di
rst #30
dw rom4_x02E8 ;¯à®¢¥àª  ®à¨£¨­ «ì­ë©/ᮢ¬¥áâ¨¬ë© ª®¬¯ìîâ¥à
db #04
ld (xDFFC),de
xor a
jp nz,x3052 ;!!!âãâ ¯¥à¥å¤  ­¥ ¡ã¤¥â ­¨ª®£¤ !!!
jp x0056
;€„<E282AC>…‘: #02A5 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
x02A5 rst #30
dw rom5_x11CD ;¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
db #05
ret
;€„<E282AC>…‘: #02AA rst 8: db #8B § £à㧪  zs-snap á ¤¨áª  (¡¥§ ¢®§¢à â )
;¢å: +1 =#00 ¨á¯®«ì§ã¥¬ ¨¬ï bootm
; a - ­®¬¥à ¤¨áª®¢®¤ 
;¢å: +1 ="filename",#00 - ¨¬ï ä ©« 
x02AA rst #30
dw rom6_x093F ;rst 8:db #8B § £à㧪  zs-snap á ¤¨áª 
db #06
;€„<E282AC>…‘: #02AE rst 8: db #8D åà¥­ì ª ª ï-â® ­¥¯®­ïâ­ ï
;¢ëå: a =#07
x02AE ld a,#07
ld (xDD7F+#01),a ;ॣ¨áâà A ¯®«ì§®¢ â¥«ï
rst #30
dw rom7_x155A ;ç⥭¨¥ § £®«®¢ª  ¯¥à¢®£® ¯®¯ ¢è¥£®áï ᥪâ®à  ¤¨áª®¢®¤  A
db #07
rst #30
dw rom7_x0394 ;¯à®¢¥àª  bit 7,(xFFDC) ­ «¨ç¨¥ ¯®¤ª«î祭­®£® ®¡à §  ª ⥪ã饬㠤¨áª®¢®¤ã
db #07
ret nz ;¯®¤ª«î祭 ®¡à §
ld hl,#E005
x02BF in a,(#1F)
and h
jr z,x02BF
ret m ;7,a =1 ‚ƒ93 £®â®¢
ret pe ;7-5,a =011
res 5,h ;7-5,a =000/010
inc (hl)
inc hl
ld (hl),l
ret
;€„<E282AC>…‘: #02CC rst 8: db #8C  ¢â®áâ àâ á ¤¨áª¥âë
;¢å: a =#0C -> ¢ëå: ­ ¦ â¨¥ Enter ¨ ¯¥à¥å®¤ ­  rom 0: #259F
; =#08 -> ¢ëå: bc - ¤«¨­  ¡¥©á¨ª-áâப¨ ¤«ï  ¢â®áâ àâ 
; =#nn -> ¢ëå: ª®¯¨à®¢ ­¨¥ áâப¨  ¢â®áâ àâ  ¯®  ¤à¥áã ¢ de ¨ ¯¥à¥å®¤ ­  rom 0: #1B11
x02CC rst #30
dw rom7_x01AF ; ¢â®áâ àâ á ¤¨áª¥âë
db #07
ret
;€„<E282AC>…‘: #02D1 ãáâ ­®¢ª  ¤¢®©­®© ᪮à®á⨠(rst 8: db #87)
x02D1 call x02DD
set 6,(hl)
ret
;€„<E282AC>…‘: #02D7 ãáâ ­®¢ª  ®¡ëç­®© ᪮à®á⨠(rst 8: db #88)
x02D7 call x02DD
res 6,(hl)
ret
x02DD xor a
ld hl,xE02D
bit 7,(hl)
jr nz,x02E7
inc a
pop bc
x02E7 ld (xDD7F),a ;ॣ¨áâà f, ä« £ c
ret
;€„<E282AC>…‘: #02EB rst 8: db #8A ¢ë§®¢ ¯/¯ à ¡®âë á £à ä¨ç¥áª¨¬ ªãàá®à®¬ !!!Ž˜ˆ<CB9C>Š€!!!
x02EB call x032A ;ç⥭¨¥ ॣ¨áâ஢ ®á­®¢­®© ¯à®£à ¬¬ë
rst #30
dw rom5_x043B ;Ž˜ˆ<CB9C>Š€!!!! ¢ë§®¢ ¯à®æ¥¤ãàë ¯® ­®¬¥àã ¢ C
db #05
jr x0310 ;á®åà ­¥­¨¥ ॣ¨áâ஢ ¤«ï ®á­®¢­®© ¯à®£à ¬¬ë
;€„<E282AC>…‘: #02F4 rst 8: db #81 ¢ë§®¢ ä㭪樨 R8DOS
x02F4 ld hl,xEA49 ;¡«®ª ¯®«ì§®¢ â¥«ì᪨© ¤¨áª®¢®¤®¢
ld (xE9F3),hl
ld hl,xFFDC
bit 5,(hl)
jr z,x0309
res 5,(hl) ;à ¡®â  á ¤¨áª®¢®¤®¬ ¯®«ì§®¢ â¥«ï
ld a,(xE9F2)
call x2C4D ;ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
x0309 call x032A ;ç⥭¨¥ ॣ¨áâ஢ ®á­®¢­®© ¯à®£à ¬¬ë
rst #30 ;®¡à ¡®âª  ä㭪樨 rst8dos #81
dw rom7_x0229 ;¢ë§®¢ ä㭪樨 R8DOS
db #07
;€„<E282AC>…‘: #0310 á®åà ­¥­¨¥ ॣ¨áâ஢ ¤«ï ®á­®¢­®© ¯à®£à ¬¬ë
x0310 ld (xDD77),bc
ld (xDD75),de
ld (xDD73),hl
push af
pop hl
ld (xDD7F),hl
ret
;€„<E282AC>…‘: #0321 à ¡®â  á ¬¨ªà®á奬®© CMOS (rst 8: db #89)
x0321 call x032A
rst #30
dw rom5_x1C0D
db %00000101
jr x0310
;€„<E282AC>…‘: #032A ç⥭¨¥ ॣ¨áâ஢ ®á­®¢­®© ¯à®£à ¬¬ë
x032A ld hl,(xDD73)
ld de,(xDD75)
ld bc,(xDD77)
ld a,(xDD7F+#01)
ret
;€„<E282AC>…‘: #0339 ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¬®­¨â®à  (rst 8: db #82)
;¢å: ---
;
x0339 ld de,x0357
ld hl,(xDD75) ;ॣ¨áâà de (­®¬¥à ¡«®ª  ¯¥à¥¬¥­­ëå)
add hl,de
ld e,(hl)
inc hl
ld d,(hl) ; ¤à¥á ­ ç «  ¡«®ª  ¯¥à¥¬¥­­ëå
ld hl,(xDD77) ;ॣ¨áâà bc (­®¬¥à ¯¥à¥¬¥­­®©)
add hl,de ; ¤à¥á ¯¥à¥¬¥­­®©
ld a,(xDD7F) ;ॣ¨áâà f (ä« £ cy)
rrca
jr c,x0352 ;§ ¯¨áì
ld a,(hl) ;ç⥭¨¥
ld (xDD7F+#01),a ;ॣ¨áâà a (१ã«ìâ â)
ret
x0352 ld a,(xDD7F+#01) ;§ ¯¨áì
ld (hl),a
ret
x0357 dw xE014 ;de =0
dw xE04E ;de =2
dw xFFC0 ;de =4
dw xEAED ;de =6
;€„<E282AC>…‘: #035F ¢ë¢®¤ ᨬ¢®«  ­  íªà ­ ¯®«ì§®¢ â¥«ï (rst 8: db #84)
x035F call x300F ;ॣ¨áâà ix
ld a,(xDD7F+#01) ;ॣ¨áâà a
jp x2B12 ;¯¥ç âì ᨬ¢®« 
;€„<E282AC>…‘: #0368 ®âª«î祭¨¥ ¬®­¨â®à  - ®â« ¤ç¨ª  (rst 8: db #85)
;¢å: a<>0
;
x0368 ld (xC063),a
res 7,(iy+#14)
ret
;€„<E282AC>…‘: #0370 ¢®§¢à â ¢ ®â« ¤ç¨ª
x0370 push af
jr x0388
;€„<E282AC>…‘: #0373 ãáâ ­®¢ª  ⥪ã騬 ¡«®ª  ¤¨áª®¢®¤®¢ ¬®­¨â®à 
x0373 push af
ld hl,xE9F5
ld (xE9F3),hl ;ãáâ ­®¢ª  ¡«®ª  ®¯¨á â¥«¥© ¤¨áª®¢®¤®¢
ld hl,xFFDC
set 5,(hl)
ld a,(xE9F1)
call x2C4D ;ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
call x0550 ;á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
x0388 ld a,(x00FB) ;¯à®¢à¥ª  áâà ­¨æë
ld hl,xE00D
cp (hl)
call nz,x2BA8 ;íâ® ­¥ áâà ­¨æ  á ¬®­¨â®à®¬. ª®à®âª¨© §¢ãª®¢®© ᨣ­ « c ãáâ ­®¢ª®© ¡®à¤îà 
pop af
pop hl
ld sp,xE336
jp (hl) ;¢®§¢à â (ret)
;€„<E282AC>…‘: #0398 ‡ ¯¨áì ¢ ॣ¨áâà 7 AY ç¨á«  #FF
x0398 bit 0,(iy+#14)
ret nz
ld b,#07 ;ç⥭¨¥ ॣ¨áâà  #7 AY
call x03B6
ld (xE004),a
ld a,#FF
;€„<E282AC>…‘: #03A7 ‡ ¯¨áì ॣ¨áâà  AY
x03A7 push bc
push af
ld a,b
ld bc,#FFFD
out (c),a
pop af
ld b,#BF
out (c),a
pop bc
ret
;€„<E282AC>…‘: #03B6 ç⥭¨¥ ॣ¨áâà  AY
;¢å: b - ­®¬¥à ॣ¨áâà 
;¢ëå: a - §­ ç¥­¨¥ ॣ¨áâà 
;
x03B6 push bc
ld a,b
ld bc,#FFFD
out (c),a
nop
in a,(c)
pop bc
ret
;€„<E282AC>…‘: #03C2 ‚®ááâ ­®¢«¥­¨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà  7 AY
x03C2 bit 0,(iy+#14)
ret nz
ld b,#07
ld a,(xE004)
jr x03A7
;€„<E282AC>…‘: #03CE ‘®åà ­¥­¨¥ ॣ¨áâ஢ ¨ áâíª  ¢ ram 8
x03CE ld bc,#1FFD
ld (xDDA7),sp
ld sp,xDD83
ex af,af'
push af
ex af,af'
push af
exx
push bc
push de
push hl
exx
push bc
push de
push hl
push iy
push ix
ld iy,xE014
ld hl,(xDD6D) ;¯®¨áª áâà ­¨æë ãáâ ­®¢«¥­­®© ¯à¨ ¢å®¤¥ ¢ ¬®­¨â®à
ld de,#0200 ;¨ ®¯à¥¤¥«¥­¨¥ ª®­ä¨£ãà æ¨¨ 128k/48k
x03F2 ld bc,#7FFD
out (c),e
ld b,#1F
out (c),d ;rom 2, ram 0
ld a,(#C001)
cp #55
x0400 jr z,x0412
x0402 inc e
bit 3,e
jr z,x03F2
ld e,#00
bit 4,d
jp nz,x0589 ;­¥ ­ ©¤¥­® §¥«¥­ë© ¡®à¤îà ¨ ¢ë室
ld d,#12
jr x03F2
x0412 ld a,(#C002)
cp #AA
jr nz,x0402
ld sp,hl ;áâà ­¨æ  ­ ©¤¥­ 
pop hl
ld (#C001),hl ;¢®ááâ ­®¢¨¬ ¡ ©âë ­  í⮩ áâà ­¨æ¥
ld b,#1F
ld a,#12
out (c),a
ld b,#7F
ld a,#10
out (c),a ;rom 2, ram 8
res 1,d
ld (xE012),de
ld a,#15 ;¯à®¢¥à¨¬ ¤®áâã­  ¤¨ ¯ ¬ïâì ¢ëè¥ 128k
out (c),a ;ram #D
ld hl,(#C001)
ld (#C001),a
ld a,#10
out (c),a ;ram 8
ld (#C001),a
ld a,#15
out (c),a ;ram #D
ld a,(#C001)
ld (#C001),hl
cp #15
jr z,x0453 ;¯ ¬ïâì ¤®áâ㯭 
ld a,e ;०¨¬ 48k
or #30
ld e,a
x0453 ld a,#10
out (c),a ;ram 8
ld sp,(xDDA7)
ld a,(#5B5C) ;®¯à¥¤¥«ï¥¬  ªâ¨¢­ë© íªà ­ ¯® ¯¥à¥¬¥­­®© bas128k
and %00001000
bit 5,e
jr nz,x0466 ;only 48k
or e ;scr 5/7 ¯à¨ ¢å®¤¥
ld e,a
x0466 ld a,(xE012)
or e
ld (xE012),a
ld hl,(xDD6D) ;ª®à४æ¨ï ¢¥à設ë áâíª  ¯à®£à ¬¬ë
push hl
ld bc,#000B
add hl,bc
ld (xDD6D),hl
pop hl
ld de,xDD99 ;á®åà ­¥­¨¥ áâíª  ¢ ram 8
call x0753
ld hl,(xDDA2) ; ¤à¥á ¢®§¢à â 
ld (xDD6B),hl
ld hl,(xDDA0) ;ॣ¨áâà af
ld (xDD7F),hl
ld hl,(xDD9E) ;ª®à४æ¨ï ॣ¨áâà  r
ld a,h
sub #04
rlca
sla h
rra
ld h,a
ld (xDD83),hl
ld hl,(xDD9B) ;ॣ¨áâà bc
ld (xDD77),hl
ld a,i ;á®åà ­¨¬ ॣ¨áâà i
ld (xDD85),a
xor a
ld i,a
ld a,(xDD9D) ;­®¬¥à rom ®âªã¤  § è«¨
ld (xDD86),a
and %00000110
ld a,(xE012)
jr z,x04B6
or #10
x04B6 ld (xE012),a
ld hl,xE026
bit 7,(hl)
set 7,(hl)
jr z,x04CD
ld b,#00
x04C4 ld a,#06
out (#FE),a
xor a
out (#FE),a
djnz x04C4
x04CD ret
;€„<E282AC>…‘: #04CE ¢®ááâ ­®¢«¥­¨¥ ०¨¬  ’ãà¡®
;
x04CE ld a,(xE02D)
bit 6,a
jr z,x04D9 ;âãà¡® ¢ëª«î祭®
;€„<E282AC>…‘: #04D5 ‚ª«î祭¨¥ ’ãà¡®-०¨¬ 
;
x04D5 ld b,#7F
jr x04DB
;€„<E282AC>…‘: #04D9 ‚몫î祭¨¥ ’ãà¡®-०¨¬ 
;
x04D9 ld b,#1F
x04DB ld c,#FD
in a,(c)
in a,(c)
ret
;€„<E282AC>…‘: #04E2 ¢®ááâ ­®¢«¥­¨¥ ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
x04E2 ld hl,(xDD75) ;de ¯®«ì§®¢ â¥«ï
ld (xDD99),hl
ld hl,(xDD77) ;bc ¯®«ì§®¢ â¥«ï
ld (xDD9B),hl
ld a,(xDD85) ;i ¯®«ì§®¢ â¥«ï
ld i,a
ld (xDD9D),a
ld hl,(xDD83) ;r ¨ IFFF2 ¯®«ì§®¢ â¥«ï
ld a,h ;ª®à४æ¨ï ॣ¨áâà  r
sub #06
rlca
sla h
rra
ld h,a
ld (xDD9E),hl
ld hl,(xDD7F) ;af ¯®«ì§®¢ â¥«ï
ld (xDDA0),hl
ld hl,(xDD6B) ;PC ¯®«ì§®¢ â¥«ï
ld (xDDA2),hl
ld hl,(xDD6D) ;SP ¯®«ì§®¢ â¥«ï
ld bc,#FFF5 ;bc = -#0B
add hl,bc
ld (xDD6D),hl
ld de,xDD99
ex de,hl
ld bc,#000B
call x0749 ;¢®ááâ ­®¢«¥­¨¥ áâíª  ¨§ ram 8
ld (xDDA7),sp
ld sp,xDD6F
pop ix
pop iy
pop hl
pop de
pop bc
exx
pop hl
pop de
pop bc
exx
pop af
ex af,af'
pop af
ex af,af'
ld sp,(xDDA7)
call x04CE ;¢®ááâ ­®¢«¥­¨¥ ०¨¬  ’ãà¡®
ld de,(xE012) ;<3B>‡“ ¯®«ì§®¢ â¥«ï
ld a,e
ld b,#7F
and #10
out (c),a
ld b,#1F
ret
;€„<E282AC>…‘: #0550 á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
x0550 bit 3,(iy+#12)
ret nz ;íªà ­ 㦥 á®åà ­¥­ ¢ ram 8
jr x055B
;€„<E282AC>…‘: #0557 ¢å®¤ ¢ ¬®­¨â®à ¯®á«¥ âà áá¨à®¢ª¨ ª®¬ ­¤ë
x0557 ld sp,(xE38D)
;€„<E282AC>…‘: #055B á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
x055B ld hl,xE026 ;á®å࠭塞 íªà ­
bit 1,(hl)
ret nz ;§ ¯à¥â ­  á®åà ­¥­¨¥ íªà ­ 
set 3,(hl)
or a
x0564 ld bc,#7FFD
ld a,#10
out (c),a ;ram 8, scr 5
ld hl,#4000
ld de,#C069
jr nc,x0574 ;cy =1/0 ¢®ááâ ­ ¢«¨¢ ¥¬/á®å࠭塞
ex de,hl
x0574 ld bc,#1B00
ldir
ld bc,#7FFD
ld a,#10
out (c),a ;ram 8, scr 5
ret
;€„<E282AC>…‘: #0581 ¢®ááâ ­®¢«¥­¨¥ íªà ­  ¢ áâà ­¨æ¥ 5
x0581 bit 1,(iy+#12) ;¢®ááâ ­ ¢«¨¢ ¥¬ íªà ­
ret nz
scf
jr x0564
;€„<E282AC>…‘: #0589 ãáâ ­®¢ª  §¥«¥­®£® ¡®à¤îà  (¨­¤¨ª æ¨ï ®è¨¡ª¨)
;
x0589 ld a,#04 ;§¥«¥­ë© ¡®à¤îà
out (#FE),a
halt ;Ž˜ˆ<CB9C>Š€??? ¤®«¦¥­ ¡ëâì ret ¯®á«¥ halt
;€„<E282AC>…‘: #058E ç⥭¨¥/§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
;¢å: hl -  ¤à¥á ¢ ¯ ¬ïâ¨
; cy =1/0 § ¯¨áì/ç⥭¨¥
; a - ¡ ©â ¤«ï § ¯¨á¨
;
x058E jr nz,x05CD ; ¤à¥á >=#8000
ex af,af'
push bc
push de
bit 6,h
jr nz,x05A5 ; ¤à¥á [#4000..#7FFF]
ld de,(xE012) ; ¤à¥á [#0000..#3FFF]
ld bc,#7FFD
jp xE4CF
;¢ë室
x05A1 pop de
pop bc
ex af,af'
ret
;ç⥭¨¥/§ ¯¨áì ¡ ©â  ¨§ ¯ ¬ï⨠[#4000..#7FFF]
x05A5 ld de,#5B00
or a
sbc hl,de
add hl,de
jr nc,x05FB ; ¤à¥á [#5B00..#7FFF]
bit 3,(iy+#12)
jr z,x05FB ;íªà ­ ­¥ á®åà ­¥­ ¢ ram 8
ld de,#8069
add hl,de
ld bc,#7FFD
ld a,#10
out (c),a ;ram 8
ex af,af'
jr c,x05C3 ;§ ¯¨áì
ld a,(hl)
x05C3 ld (hl),a
ex af,af'
and #10
out (c),a
sbc hl,de
jr x05A1
;ç⥭¨¥/§ ¯¨áì ¡ ©â  ¨§ ¯ ¬ï⨠[#8000..#FFFF]
x05CD bit 6,h
jr z,x05FE ; ¤à¥á [#8000..#BFFF]
ex af,af' ; ¤à¥á >=#C000
push bc
push de
ld de,(xE012)
ld bc,#7FFD
ld a,e
and #17
out (c),a
ld a,d
and #10
or #02
ld b,#1F
out (c),a ;áâà ­¨æ  ¯®«ì§®¢ â¥«ï
ex af,af'
jr c,x05ED ;§ ¯¨áì
ld a,(hl)
x05ED ld (hl),a
ex af,af'
ld a,#12
out (c),a
ld b,#7F
ld a,#10
out (c),a ;rom 2, ram 8
jr x05A1
x05FB pop de ; ¤à¥á [#5B00..#7FFF]
pop bc
ex af,af'
x05FE jr c,x0601 ;§ ¯¨áì
ld a,(hl)
x0601 ld (hl),a
ret
;€„<E282AC>…‘: #0603 ª®¯¨à®¢ ­¨¥ ¯ ¬ï⨠á #8000 ¢ áâà ­¨æã ¯®«ì§®¢ â¥«ï
x0603 scf
jr x0607
;€„<E282AC>…‘: #0606 ª®¯¨à®¢ ­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï ¢ #8000
;¢å: a - ­®¬¥à áâà ­¨æë
x0606 or a
x0607 ex af,af'
push de
ld l,#05 ;­®¬¥à «®£¨ç¥áª®© áâà ­¨æë
call x3707 ;áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®©
jr z,x0644 ;áâà ­¨æ  ᮢ¯ ¤ ¥â
;á®åà ­¥­¨¥/¢®ááâ ­®¢«¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï
x0610 ld de,(xE012)
ld bc,#7FFD
ld a,e
and #17
out (c),a
ld a,d
and #10
or #02
ld b,#1F
out (c),a ;rom 2, ram ¯®«ì§®¢ â¥«ï
ld hl,#C000
ld de,#8000
ld bc,#4000
ex af,af'
jr nc,x0632
ex de,hl
x0632 ex af,af'
ldir
ld bc,#1FFD
ld a,#12
out (c),a
ld b,#7F
ld a,#10
out (c),a ;rom 2, ram 8
pop de
ret
;á®åà ­¥­¨¥/¢®ááâ ­®¢«¥­¨¥ 5© áâà ­¨æë
x0644 ld hl,#4000
ld de,#8000
ld c,l
ld b,h
ex af,af'
jr nc,x0650
ex de,hl
x0650 ex af,af'
ldir
ld hl,xC069 ;ª®¯¨à㥬 íªà ­
ld de,#8000
ld bc,#1B00
ex af,af'
jr nc,x0660
ex de,hl
x0660 ex af,af'
ldir
pop de
ret
;€„<E282AC>…‘: #0665 ¢ª«î祭¨¥ ०¨¬  48k only
x0665 ld bc,#7FFD
ld a,#30
out (c),a
ret
;€„<E282AC>…‘: #066D ¯®¢â®à­ ï ¨­¨æ¨ «¨§ æ¨ï áâà ­¨æ (¥á«¨ ¡¨â ï)
x066D ld a,#04
out (#FE),a
halt ;§¥«¥­ë© ¡®à¤îà
;€„<E282AC>…‘: #0672 ¨­¨æ¨ «¨§ æ¨ï ram 8 (¢å®¤ ¯à¨ 宫®¤­®¬ á¡à®á¥)
x0672 ld iy,xE014 ;¡«®ª ¯¥à¥¬¥­­ëå
call x04D5 ;¢ª«î稬 ’ãà¡®-०¨¬
;®ç¨á⪠ ¢á¥å áâà ­¨æ ¯ ¬ïâ¨
ld bc,#1FFD
ld a,#12
out (c),a ;rom 2
ld a,#18
jr x0691
x0684 ld hl,#C000 ;®ç¨á⪠ áâà ­¨æë
ld (hl),#00
ld de,#C001
ld bc,#3FFF
ldir
x0691 dec a ;®ç¨á⪠ áâà ­¨æ #0F-#09
ld bc,#7FFD
out (c),a
cp #10
jr nz,x0684
xor a ;®ç¨á⪠ ç á⨠8© áâà ­¨æë
ld hl,#C069 ;#C000-#C068 ­¥ ®ç¨é îâáï
push hl
ld (hl),a
ld de,xC069+1
ld bc,#3F96
ldir
pop hl
x06AA cp (hl) ;¯à®¢¥àª  楫®áâ­®á⨠ram 8 áâà ­¨æë
inc hl
jr nz,x066D ;¥á«¨ ¡¨â ï, §¥«¥­ë© ¡®à¤îà ¨ â¥áâ á­ ç « 
cp h
jr nz,x06AA
;ª®¯¨à®¢ ­¨¥ ¡«®ª   âਡã⮢ ¬¥­î ¬®­¨â®à  ¢ ram8
ld hl,x3ED2 ;§ ª®¤¨à®¢ ­­ë© ¡«®ª  âਡã⮢ ¬¥­î ¬®­¨â®à 
ld de,xEAED ;¡«®ª  âਡãâë ¤«ï ¬®­¨â®à 
call x3837 ;ª®¯¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ï⨠ram 8 á à áª®¤¨à®¢ ­¨¥¬
db #DD
db #2A
db #08 ;¤«¨­ 
db #F5 ; ¤à¥á ¡ ©â  ¤«ï à áª®¤¨à®¢ ­¨ï
;ª®¯¨à®¢ ­¨¥ ¯à®æ¥¤ãà ¯¥à¥ª«î祭¨ï áâà ­¨æ ¢ ram 8
call x0739 ;ª®¯¨à®¢ ­¨¥ ç á⨠§ ª®¤¨à®¢ ­­ëå ¯à®æ¥¤ãà ¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
ld bc,#0100
ldir
rst #30
dw rom7_x0CFF ;ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¤¨áª®¢®© BIOS
db #07
rst #30
dw rom4_x057F ;à á¯ ª®¢ª  èà¨äâ  ¢ rom 8
db #04
rst #30
dw rom4_x0122 ;ª®¯¨à®¢ ­¨¥ ¯¥à¥¬¥­­ëå ¬®­¨â®à  ¨ ¯à®¢¥àª  ç⥭¨ï ¯®à⮢ #7FFD/#1FFD
db #04
call x3B7F ;ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¯® ª®­ªà¥â­ë¬  ¤à¥á ¬
ld (iy+#08),#30 ;¤«ï ¯¥à¥¢®¤  ¢à¥¬¥­¨ ¢ ASCII =#30
;ä®à¬¨à®¢ ­¨¥ áâப¨ á ¢¥àᨥ© ¬®­¨â®à 
ld hl,xE17B+#02
res 7,(hl)
inc hl
ld (xE3BC),hl
set 6,(iy+#09) ;¤«ï ¯/¯ ¯¥ç â¨: ç⥭¨¥ ¤ ­­ëå ¯®á«¥ ã¯à ¢«ïî饣® ª®¤ 
ld c,#00
call x0732 ;ãáâ ­®¢ª  ª®®à¤¨­ â ¯¥ç â¨ crdY=#00, crdX=#24
rst #20
dc "N"
ld l,#F4
ld h,c
ld a,(hl)
db #ED,#6C ;neg
inc hl
ld h,(hl)
ld l,a ;hl=#CACB
call x16DE ;¯¥ç âì ç¨á«  hl=[#0000..#FFFF]
ld c,#01
call x0732 ;ãáâ ­®¢ª  ª®®à¤¨­ â ¯¥ç â¨ crdY=#01, crdX=#24
ld e,#FC
ld d,c
dec d ;de=#00FC
ld a,(de) ;a=#05
inc de
push de ;de=#00FD
ld b,#02
call x1658 ;¯¥ç âì ç¨á«  A á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
rst #20
dc "-"
pop de
ld a,(de) ;a=#07
ld b,#02
call x1658 ;¯¥ç âì ç¨á«  A á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
ld c,#02
call x0732 ;ãáâ ­®¢ª  ª®®à¤¨­ â ¯¥ç â¨ crdY=#02, crdX=#24
rst #20
dc "V"
rst #20
dc "4."
rst #20
dc "01"
ld hl,(xE3BC)
dec hl
set 7,(hl)
res 6,(iy+#09)
call x1F25 ;Š®¬ ­¤ : CLear
ld hl,x3135
ex (sp),hl
jp (hl)
;€„<E282AC>…‘: #0732 ãáâ ­®¢ª  ª®®à¤¨­ â ¯¥ç â¨ crdY=ॣ C, crdX=#24
x0732 rst #20
db #9B ;¯à¨§­ ª ¯¥à¥¤ ç¨ ª®®à¤¨­ â ¯¥ç â¨
ld a,c
rst #10 ;crd Y
rst #20
db #A4 ;crd X=#24
ret
;€„<E282AC>…‘: #0739 ª®¯¨à®¢ ­¨¥ ç á⨠§ ª®¤¨à®¢ ­­ëå ¯à®æ¥¤ãà ¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
x0739 ld hl,x3B92
ld de,xE3BE
call x3837 ;ª®¯¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ï⨠ram 8 á à áª®¤¨à®¢ ­¨¥¬
db #DD
db #E9
db #6F ;¤«¨­ 
db #F4 ; ¤à¥á ¢ <20>‡“
ret
;¢®§¢à â ¨§ ¯/¯ x0749
x0747 ex de,hl
ret
;€„<E282AC>…‘: #0749 ¢®ááâ ­®¢«¥­¨¥ ®¡« á⨠¯ ¬ï⨠¨§ ram 8
;¢å: hl - ­ ç «® ®¡« áâ¨
; de -  ¤à¥á ¡ãä¥à  ¤«ï á®åà ­¥­¨ï
; bc - à §¬¥à ¤«ï á®åà ­¥­¨ï
; cy =1/0 ¢®ááâ ­®¢«¥­¨¥/á®åà ­¥­¨¥
;
x0749 scf ;cy =1 ¢®ááâ ­®¢«¥­¨¥
ex de,hl
exx
ld hl,x0747
push hl
exx
jr x0754
;€„<E282AC>…‘: #0753 á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
;¢å: hl - ­ ç «® ®¡« áâ¨
; de -  ¤à¥á ¡ãä¥à  ¤«ï á®åà ­¥­¨ï
; bc - à §¬¥à ¤«ï á®åà ­¥­¨ï
;
x0753 or a ;cy =0 á®åà ­¥­¨¥
;¢®ááâ ­®¢«¥­¨¥ áâíª  ¨§ ¡ãä¥à  ¢ ram 8
x0754 ex af,af'
bit 7,h
jr nz,x079D ;¢¥à設  áâíª  >= #8000
bit 6,h
jr nz,x0775 ;¢¥à設  áâíª  >= #4000
push hl ;¢¥à設  áâíª  < #4000
add hl,bc
dec hl
bit 6,h
pop hl
jp z,x07F1 ;¢¥áì áâíª ¢ ¯à¥¤¥« å [#0000..#3FFF]
push bc
ld bc,#4000
ex de,hl
ex (sp),hl
call x07E0
ex (sp),hl
ex de,hl
call x07F1 ;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#0000..#3FFF]
pop bc
;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#4000..#7FFF]
x0775 push hl
call x07D7 ;¯à®¢¥àª  ¯®¯ ¤ ­¨ï áâíª  ­  íªà ­
pop hl
jr nc,x07A1 ;áâíª ­¥ ­  íªà ­¥
bit 3,(iy+#12)
jr z,x07A1 ;ª®¯¨à㥬 ¨§ ¯ ¬ïâ¨
push hl ;ª®¯¨à㥬 ¨§ ®¡« á⨠á®åà ­¥­­®£® íªà ­ 
add hl,bc
dec hl
call x07D7
pop hl
jp c,x0807 ;¢¥áì áâíª ¢ ¯à¥¤¥« å [#4000..#5AFF]
push bc
ld bc,#5B00
ex de,hl
ex (sp),hl
call x07E0
ex (sp),hl
ex de,hl
call x0807
pop bc
jr x07A1
;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#8000..#FFFF]
x079D bit 6,h
jr nz,x07BC ;¢¥à設  áâíª  >= #C000
;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#5B00..#BFFF]
x07A1 push hl
add hl,bc
dec hl
ld a,h
and #C0
cp #C0
pop hl
jp nz,x07FC ;¢¥áì áâíª ¢ ¯à¥¤¥« å [#8000..#BFFF].á®å࠭塞
push bc
ld bc,#C000 ;¢ëç¨á«¥­¨¥ à §¬¥à  áâíª  ¤® #C000
ex de,hl
ex (sp),hl
call x07E0
ex (sp),hl
ex de,hl
call x07FC ;á®å࠭塞 ç áâì áâíª 
pop bc
x07BC push hl ;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#‘000..#FFFF]
add hl,bc ;¯à®¢¥à¨¬ ­¥ ¢ë室¨â «¨ áâíª §  ¯à¥¤¥«ë ®ª­ 
dec hl
bit 6,h
pop hl
jp nz,x0821 ;áâíª §  ¯à¥¤¥«ë ®ª­  ­¥ ¢ë室¨â
push bc ;áâíª ¢ë室¨â §  ¯à¥¤¥«ë #FFFF
ld bc,#0000
ex de,hl
ex (sp),hl
call x07E0
ex (sp),hl
ex de,hl
call x0821
pop bc
jp x07F1
;¯à®¢¥àª   ¤à¥á  ­  ¯à¨­ ¤«¥¦­®áâì íªà ­ã
x07D7 push de
ld de,#5B00
or a
sbc hl,de
pop de
ret
;¢ëç¨á«¥­¨¥ à §¬¥à®¢ ­  £à ­¨æ¥ ®ª®­ ¯ ¬ïâ¨
;¢ëå: hl = hl-(bc-de)
; bc = bc-de
x07E0 ex de,hl
or a
push hl
ld l,c
ld h,b
pop bc
sbc hl,bc
push bc
ld c,l
ld b,h
pop hl
ex de,hl
or a
sbc hl,bc
ret
;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#0000..#3FFF]
x07F1 exx
ld de,(xE012) ;áâà ­¨æ  ¯à¨ ¢å®¤¥
ld bc,#7FFD
jp xE4F0
;á®åà ­¥­¨¥ áâíª  ¨§ ¯ ¬ïâ¨
x07FC ex af,af'
jr nc,x0800
ex de,hl
x0800 ldir
jr nc,x0805
ex de,hl
x0805 ex af,af'
ret
;á®åà ­¥­¨¥ áâíª  ¨§ ª®¯¨¨ ®ª­  [#4000..#5AFF]
x0807 push bc
ld bc,#8069 ; ¤à¥á ¢ ª®¯¨¨ íªà ­ 
add hl,bc
pop bc
push hl
ld hl,x081A ; ¤à¥á ¢®§¢à â 
ex (sp),hl
push iy
ld iy,#1010 ;rom 1, ram 8, scr 5
jr x0827
x081A push bc
ld bc,#7F97 ;-#8069
add hl,bc
pop bc
ret
;á®åà ­¥­¨¥ áâíª  ¨§ ®ª­  [#C000..#FFFF]
x0821 push iy
ld iy,(xE012) ;­®¬¥à áâà ­¨æë ¯à¨ ¢å®¤¥
x0827 push hl
ld hl,(#8000)
ex (sp),hl ;á®åà ­¨¬ (#8000/1)
push ix
ld xh,b
ld xl,c
exx
ld bc,#7FFD
ld a,#10
out (c),a ;ram 8
ld b,xh
ld c,xl
ld hl,#8002
ld de,xDB69
ldir
ld hl,#1210 ;á®åà ­¨¬/¢®ááâ ­®¢¨¬ ®¡« áâì ¯ ¬ïâ¨
ld a,yl
and %00010111
ld e,a
ld a,yh
and %00010000
or %00000010
ld d,a ;de = rom 2, ram ¯à¨ ¢å®¤¥
ex af,af'
jr nc,x0859 ;á®å࠭塞
ex de,hl
x0859 ld bc,#7FFD
out (c),e
ld b,#1F
out (c),d
exx
jr nc,x0866 ;á®å࠭塞
ex de,hl
x0866 ld (#8000),de
ld de,#8002
ldir ;á®åà ­¨¬/¢®ááâ ­®¢¨¬ áâíª/¯ ¬ïâì
ld de,(#8000)
ld b,xh
ld c,xl
exx
out (c),h
ld b,#7F
out (c),l ;¬¥­ï¥¬ áâà ­¨æã
exx
ld (#8000),hl
ld hl,#8002
ldir
ld hl,(#8000)
jr nc,x088D ;á®å࠭塞
ex de,hl
x088D ex af,af'
exx
ld a,#10
out (c),a
ld b,#1F
ld a,#12
out (c),a ;rom 2, ram 8
ld hl,xDB69 ;¢®ááâ ­ ¢«¨¢ ¥¬ ¯ ¬ïâì
ld de,#8002
ld b,xh
ld c,xl
ldir
ld bc,#7FFD
ld a,#10
out (c),a
exx
pop ix
ex (sp),hl
ld (#8000),hl
pop hl
pop iy
ret
;€„<E282AC>…‘: #08B7 â ¡«¨æ  á  ¤à¥á ¬¨ ®¡à ¡®âª¨ ä㭪権 rst 8
x08B7 dw x0911 ;rst 8: db #80 ‚뢮¤ ᨬ¢®«  ¨§  ªªã¬ã«ïâ®à  ­  ¯à¨­â¥à
dw x02F4 ;rst 8: db #81 ‚맮¢ äã­æ¨© ¢áâ஥­­®© ¤¨áª®¢®© BIOS
dw x0339 ;rst 8: db #82 ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¬®­¨â®à 
dw x2A5B ;rst 8: db #83 ®ç¨á⪠ ®ª­  ¯®«ì§®¢ â¥«ï
dw x035F ;rst 8: db #84 ‚뢮¤ ᨬ¢®«  ­  íªà ­ ¯®«ì§®¢ â¥«ï
dw x0368 ;rst 8: db #85 Žâª«î祭¨¥ ¬®­¨â®à  - ®â« ¤ç¨ª 
dw x08D3 ;rst 8: db #86 Š®¯¨ï £à ä¨ç¥áª®£® íªà ­  ­  ¯à¨­â¥à
dw x02D1 ;rst 8: db #87 “áâ ­®¢ª  ¤¢®©­®© ᪮à®áâ¨
dw x02D7 ;rst 8: db #88 “áâ ­®¢ª  ®¡ëç­®© ᪮à®áâ¨
dw x0321 ;rst 8: db #89 <20> ¡®â  á ¬¨ªà®á奬®© CMOS
dw x02EB ;rst 8: db #8A ¢ë§®¢ ¯/¯ à ¡®âë á £à ä¨ç¥áª¨¬ ªãàá®à®¬ !!!Ž˜ˆ<CB9C>Š€!!!
dw x02AA ;rst 8: db #8B § £à㧪  zs-snap á ¤¨áª  (¡¥§ ¢®§¢à â )
dw x02CC ;rst 8: db #8C  ¢â®áâ àâ á ¤¨áª¥âë
dw x02AE ;rst 8: db #8D åà¥­ì ª ª ï-â® ­¥¯®­ïâ­ ï
;€„<E282AC>…‘: #08D3 rst 8: db #86 Š®¯¨ï £à ä¨ç¥áª®£® íªà ­  ­  ¯à¨­â¥à
x08D3 xor a
scf
jr x08D8
;€„<E282AC>…‘: #08D7 ¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à 
x08D7 xor a
x08D8 ld hl,x08F7 ; ¤à¥á ¢®§¢à â  ¯® Break
ld (xDE12),hl
ld hl,(xE3B7) ; ¤à¥á ¤¥áªà¨¯â®à  ⥪ã饣® ®ª­ 
push hl
call x300A ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢ë¢®¤ ­  ¯à¨­â¥à
push af
ld (xDDA7),sp
set 4,(iy+#09) ;¢¬¥áâ® íªà ­  ¢ë¢®¤ ­  ¯à¨­â¥à
call nc,x3A21 ;ª®¯¨à®¢ ­¨¥  ªâ¨¢­®£® íªà ­  ¯®«ì§®¢ â¥«ï ¢ #4000
call x0A51 ;¯¥ç âì íªà ­  ­  ¯à¨­â¥à
pop af
jr x08FE
;¢®§¢à â ¯® Break
x08F7 ld sp,(xDDA7)
pop af
ld a,#01
;¢å: a =#00/#01
x08FE ld hl,xE01D
res 4,(hl) ;¢ë¢®¤ ­  íªà ­
res 5,(hl)
pop ix
ld (xE3B7),ix ;¢®ááâ ­®¢¨¬  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
ret nc ;¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à 
or a
jr z,x0937 ;ãᯥ譮 ­ ¯¥ç â «¨
jr x091E ;¢ë室 ¯® Break
;€„<E282AC>…‘: #0911 rst 8: db #80 ‚뢮¤ ᨬ¢®«  ¨§  ªªã¬ã«ïâ®à  ­  ¯à¨­â¥à
x0911 ld hl,x091A
ld (xDDA7),sp
jr x0929
;¢®§¢à â ¯® Break
x091A ld sp,(xDDA7)
x091E ld a,#01 ;­®¢ë¥ ä« £¨ ¯à®£à ¬¬ë cy=1
jr x0939
;€„<E282AC>…‘: #0922 ¢ë¢®¤ ᨬ¢®«  ¨§  ªªã¬ã«ïâ®à  ­  ¯à¨­â¥à (???¯® § ¯à®á㠮⠢­¥è¥­¥£® ãáâனá⢠???)
x0922 ld hl,#0146 ;¢ë室 ¨§ ¬®­¨â®à 
push hl
ld hl,#0941
x0929 ld (xDE12),hl ;¯à¥à뢠­¨¥ ¯® Break
call x300A ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢ë¢®¤ ­  ¯à¨­â¥à
set 4,(iy+9) ;¢ë¢®¤ ­  ¯à¨­â¥à
ld a,(xDD7F+#01) ;ॣ¨áâà a ¯à®£à ¬¬ë
rst #10
x0937 ld a,%01000000 ;­®¢ë¥ ä« £¨ ¯à®£à ¬¬ë Z
x0939 ld (xDD7F),a
x093C res 4,(iy+9) ;¢ë¢®¤ ­  íªà ­
ret
;¯à¥à뢠­¨¥ ¯® Break
x0941 ld sp,xE336
call x093C
ld hl,#05E2
ld (xDD6B),hl
jp x0146
;€„<E282AC>…‘: #0950 ¢ë¢®¤ ᨬ¢®«  ­  ¯à¨­â¥à
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
x0950 bit 5,(iy+9)
jr nz,x09A9 ;¥áâì ã¯à ¢«ïî騥 ª®¤ë
cp #0D
jr nz,x0987 ;íâ® ­¥ ¯¥à¥¢®¤ áâப¨
ld (ix+#01),#00 ;crd X =#00
call x0A05 ;¯¥à¥¤ ç  ª®¤  "¢®§¢à â  ª à¥âª¨" ¤«ï ¯à¨­â¥à 
bit 2,(ix+#07)
jr z,x0970 ;¢ë¯®«­ïâì  ¢â®¬ â¨ç¥áª¨© ¯¥à¥¢®¤ áâப¨ ¯à¨ ¯à¨å®¤¥ ᨬ¢®«  ¢®§¢à â ª à¥âª¨
ld a,(xE055) ;ª®¤ ᨬ¢®«  "¯¥à¥¢®¤  áâப¨" ¤«ï ¯à¨­â¥à 
or a
jr z,x0970
call x09A9 ;¯¥à¥¢®¤ áâப¨ ­  ¯à¨­â¥à¥
; ¯¥à¥¢®¤ áâப¨, ¥á«¨ ¢ë諨 §  ¯à¥¤¥«ë ®ª­ 
x0970 ld a,(ix+#04)
or a
ret z ;¢ëá®â  ®ª­  ¢ §­ ª®¬¥áâ å
inc (ix+#00)
cp (ix+#00)
ret nc
ld (ix+#00),#00
ld a,(xE056) ;ª®¤ ᨬ¢®«  "¯¥à¥¢®¤  ä®à¬ â " ¤«ï ¯à¨­â¥à 
or a
ret z
jr x09A9
;¯¥ç âì ᨬ¢®«  ­  ¯à¨­â¥à¥
;¢å: a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
x0987 cp #20
jr c,x09A9 ;íâ® ã¯à ¢«ïî騩 ª®¤
cp #7F ;ª®à४æ¨ï ¯¥ç â­®£® ᨬ¢®« 
jr nz,x0991
ld a,#2E ;"."
x0991 ld e,a
; ¢®§¢à â ª à¥âª¨, ¥á«¨ ¢ë諨 §  ¯à¥¤¥«ë ®ª­ 
ld a,(ix+#05) ;è¨à¨­  ®ª­  ¢ §­ ª®¬¥áâ å
or a
jr z,x09A8
inc (ix+#01) ;crd X +1
cp (ix+#01)
jr nc,x09A8
push de ;¯¥à¥¢®¤ áâப¨
rst #20
db #8D
pop de
xor a
ld (ix+#01),a ;crd X =#00
x09A8 ld a,e
;¯¥ç âì ᨬ¢®«  ­  ¯à¨­â¥à¥
;¢å: a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
x09A9 ld d,(iy+#15)
bit 7,d
jr z,x09B1 ;positive
cpl
x09B1 bit 0,d
jr z,x0A10 ;Centronics
;¨­â¥à䥩á RS232
push af
xor #FF
rlca
rlca
rlca
push af
call x04D9 ;¢ëª«î祭¨¥ ’ãà¡®-०¨¬ 
pop bc
ld c,b ;ᨬ¢®« ¤«ï ¯¥ç â¨
; ®¦¨¤ ­¨¥ £®â®¢­®áâ¨???
x09C1 call x0A33 ;¯à®¢¥àª  ­ ¦ â¨ï BREAK
jr nc,x0A2F ;­ ¦ â BREAK
ld a,#FF
in a,(#FE)
bit 5,a
jr z,x09C1 ;®¦¨¤ ­¨¥ £®â®¢­®áâ¨???
; ¯®¡¨â®¢ ï ¯¥à¥¤ ç  ª®¤  ᨬ¢®« 
ld b,#08
bit 2,d
jr z,x09D5 ;data bits 8
dec b
x09D5 push bc
ld bc,#1FFD
ld a,%00011010
out (c),a
pop bc
x09DE call x0A3F ;§ ¤¥à¦ª  ¯à¨ ¯¥à¥¤ ç¥ ¤ ­­ëå ­  ¯à¨­â¥à
push bc
ld a,c
ld bc,#1FFD
and %00001000
or %00010010
out (c),a
pop bc
rrc c
djnz x09DE
; § ¢¥à襭¨¥ ¯¥ç â¨
call x0A3F ;§ ¤¥à¦ª  ¯à¨ ¯¥à¥¤ ç¥ ¤ ­­ëå ­  ¯à¨­â¥à
ld bc,#1FFD
ld a,%00010010
out (c),a
call x0A3F ;§ ¤¥à¦ª  ¯à¨ ¯¥à¥¤ ç¥ ¤ ­­ëå ­  ¯à¨­â¥à
bit 3,d ;stop bits 2/1
call z,x0A3F ;§ ¤¥à¦ª  ¯à¨ ¯¥à¥¤ ç¥ ¤ ­­ëå ­  ¯à¨­â¥à
pop af
ret
;¯¥à¥¤ ç  ª®¤  "¢®§¢à â  ª à¥âª¨" ¤«ï ¯à¨­â¥à 
x0A05 ld a,(xE054) ;ª®¤ ᨬ¢®«  "¢®§¢à â  ª à¥âª¨" ¤«ï ¯à¨­â¥à 
or a
ret z
push bc
call x09A9
pop bc
ret
;¨­â¥à䥩á Centronics
x0A10 ld c,a
x0A11 call x0A33 ;¯à®¢¥àª  ­ ¦ â¨ï BREAK
jr nc,x0A2F ;­ ¦ â
ld a,#FF
in a,(#FE)
rlca
jr c,x0A11 ;®¦¨¤ ­¨¥ £®â®¢­®áâ¨???
ld a,c ;¢ë¢®¤ ᨬ¢®«  ­  ¯à¨­â¥à
ld bc,#FFDD
out (c),a
ld bc,#1FFD
ld a,%00110010
out (c),a
ld a,%00010010
out (c),a
ret
;¯à¥à뢠­¨¥ ¯® Break
x0A2F ld hl,(xDE12)
jp (hl)
;€„<E282AC>…‘: #0A33 ¯à®¢¥àª  ­ ¦ â¨ï BREAK
;¢ëå: cy=0 ­ ¦ â BREAK
;
x0A33 ld a,#7F ;¯à®¢¥àª  ­ ¦ â¨ï ¯à®¡¥« 
in a,(#FE)
rra
ret c ;­¥ ­ ¦ â
ld a,#FE ;¯à®¢¥àª  ­ ¦ â¨ï CapsShift
in a,(#FE)
rra
ret
;§ ¤¥à¦ª  ¯à¨ ¯¥à¥¤ ç¥ ¤ ­­ëå ­  ¯à¨­â¥à
x0A3F push af
ld hl,(xE057)
bit 1,d
jr z,x0A4A
ld hl,(xE059)
x0A4A dec hl
ld a,h
or l
jr nz,x0A4A
pop af
ret
;€„<E282AC>…‘: #0A51 ¯¥ç âì íªà ­  ­  ¯à¨­â¥à
x0A51 ld bc,#0000
x0A54 set 5,(iy+#09) ;¯à®ç¨¥ ã¯à ¢«ïî騥 ª®¤ë
;०¨¬ ¯¥ç â¨
x0A58 bit 5,(iy+#15) ;०¨¬ ¯¥ç â¨
ld a,#01
jr z,x0A62 ;®¤­  â®çª 
ld a,#03
x0A62 ld (xE05B+#06),a
;¯¥à¥¤ ç  ã¯à ¢«ïîé¨å ª®¤®¢
push bc
ld hl,xE05B ;ᯨ᮪ ª®¤®¢ ¤«ï ¯¥à¥¢®¤  ¯à¨­â¥à  ¢ £à ä¨ç¥áª¨© ०¨¬
call x0AD2 ;¯¥à¥¤ ç  ª®¤®¢ ­  ¯à¨­â¥à
pop bc
;¯¥ç âì áâà®çª¨ íªà ­ 
x0A6D push bc
bit 5,(iy+#15)
ld d,#08
jr z,x0A78
ld d,#04
;¯¥ç âì ®¤­®£® ¡ ©â 
x0A78 push bc
; à áç¥â íªà ­­®£®  ¤à¥á  ¨§ ¯¨ªá¥«ì­ëå ª®®à¤¨­ â
ld a,b
and a
rra
scf
rra
and 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 ;hl -  ¤à¥á
ld a,c
and #07
; ¯®«ã祭¨¥ ¡ ©â  ¤«ï ¯¥ç â¨
ld b,a
inc b
ld a,(hl)
x0A96 rlca
djnz x0A96
push af
rl e
pop af
bit 5,(iy+#15) ;०¨¬ ¯¥ç â¨
jr z,x0AA5 ;®¤­  â®çª 
rl e
x0AA5 pop bc
inc b
dec d
x0AA8 jr nz,x0A78 ;e - ¡ ©â ¤«ï ¯¥ç â¨
; ãáâ ­®¢ª  positive/negative
ld a,e
x0AAB bit 2,(iy+#12)
jr z,x0AB2 ;¯¥ç âì positive/negative
cpl
; ¯¥ç âì ¡ ©â 
x0AB2 rst #10
bit 5,(iy+#15)
jr z,x0ABB ;०¨¬ ¯¥ç â¨ ®¤­  â®çª 
rst #10
rst #10
x0ABB inc c
ld a,c
jr z,x0AC3
pop bc
ld c,a
jr x0A6D
x0AC3 pop de
;á«¥¤ãîé ï áâப 
x0AC4 res 5,(iy+#09)
rst #20
dc #8D
ld a,#BF
cp b
jr nc,x0A54
;¯¥à¢®¤ ¢ ⥪áâ®¢ë© à¥¦¨¬ ¨ ¢ë室
ld hl,xE063 ;ᯨ᮪ ª®¤®¢ ¤«ï ¯¥à¥¢®¤  ¯à¨­â¥à  ¢ ⥪áâ®¢ë© à¥¦¨¬
;¯¥à¥¤ ç  ª®¤®¢ ­  ¯à¨­â¥à
x0AD2 ld b,(hl)
inc hl
jp x15B3
;€„<E282AC>…‘: #0AD7 Š®¬ ­¤ : EXit ¢ë室 ¨§ ®â« ¤ç¨ª  ¢ ¬¥­î
x0AD7 res 0,(iy+#12)
rst #30
dw rom5_x0EB5 ;¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à 
db #05
ret
;€„<E282AC>…‘: #0AE0 ¯¥ç âì/®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;¢å: a - ­®¬¥à á®®¡é¥­¨ï ¤«ï ¯¥ç â¨ ­ ¤ áâப®© ¢¢®¤ 
x0AE0 ld (iy+#0A),#00
push af
call x2CA8 ;¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
pop af
jr x0B06
;€„<E282AC>…‘: #0AEB ¢ë§®¢ ®â« ¤ç¨ª  M. Monitor
x0AEB ld sp,xE336
set 0,(iy+#12)
;€„<E282AC>…‘: #0AF2 ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
x0AF2 call x04D5 ;¢ª«î祭¨¥ ’ãà¡®-०¨¬ 
xor a
ld (xE01E),a ;­ áâனª¨ ®â« ¤ç¨ª 
jr x0AFC
;€„<E282AC>…‘: #0AFB ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª , ¡¥§ ¨­ä®à¬ æ¨®­­®£® ®ª­ 
x0AFB scf
x0AFC push af
call x2CA8 ;¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
pop af
call nc,x33CD ;¯¥ç âì ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
ld a,#81 ;á®®¡é¥­¨¥: enter command
;€„<E282AC>…‘: #0B06 ¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
x0B06 ld sp,xE336
call x0550 ;á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
ld hl,x0B06 ;á ¢¥à­¥¬áï
push hl
rst #30 ;¢¢®¤ ª®¬ ­¤ë ®â« ¤ç¨ª 
dw rom5_x1C73 ;¢¢®¤ ⥪á⮢®© áâப¨ ¢ ­¨¦­¥© áâப¥ íªà ­ 
db #05
jr nc,x0B40 ;ª®¬ ­¤ã ¢¢¥«¨
call x2C7E ;¯®¨áª ¨ ¢ë§®¢ ¯à®æ¥¤ãàë ®¡à ¡®âª¨ ª« ¢¨è¨ ¡¥§ ¢®§¢à â (¥á«¨ ­¥ ­ ©¤¥­® ¢®§¢à â )
db #87 ;cs+3
dw x303C ;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë, ­  ª®â®àãî 㪠§ë¢ ¥â PC
db #88 ;cs+4
dw x303F ;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë á ¡ëáâàë¬ ¢ë¯®«­¥­¨¥¬ ¯®¤¯à®£à ¬¬
db #89 ;cs+9
dw x1019 ;¯à®¯ã᪠¯à®£à ¬¬ë, ᮤ¥à¦ ­¨¥ ॣ¨áâà  PC 㢥«¨ç¨¢ ¥âáï ­  ¤«¨­ã ⥪ã饩 ª®¬ ­¤ë (á ¬  ª®¬ ­¤  ­¥ ¢ë¯®«­ï¥âáï)
db #8A ;ss+a
dw x0FFF ;­  á«¥¤ãîéãî ª®¬ ­¤ã (¥á«¨ ª®¬ ­¤  ­¥ ¢ë¯®«­ï¥âáï)
db #1C ;ss+q
dw x0FF5 ;­  ®¤¨­ ¡ ©â ¢«¥¢®
db #1E ;ss+e
dw x0FFA ;­  ®¤¨­ ¡ ©â ¢¯à ¢®
db #1D ;ss+w
dw x0FEB ;­  ®¤­ã áâப㠢¢¥àå
db #8B ;ss+s
dw x0FF0 ;­  ®¤­ã áâப㠢­¨§
db #8C ;ss+f
dw x3517 ;¯à®¤®«¦¥­¨¥ ¯®¨áª  ¢ ®â« ¤ç¨ª¥ (¤«ï ª®¬ ­¤ FIND/SEARCH)
db #8E ;ss+d
dw x38D8 ;¡ëáâàë© ¢å®¤ ¢ ª®¬ ­¤ã DASM
db #8D ;ss+g
dw x3655 ;¯¥à¥å®¤ ­   ¤à¥á, ᮤ¥à¦ é¨©áï ¢ ª®¬ ­¤¥, à á¯®«®¦¥­­ë© ¢ ⥪ã饩 ï祩ª¥ ¯ ¬ïâ¨
db #04 ;cs+1+d
dw x1101 ;। ªâ¨à®¢ ­¨¥ ¤ ¬¯  ¯ ¬ïâ¨
db #FF
xor a
ret
; ­ «¨§ ¢¢¥¤¥­­®© ª®¬ ­¤ë
;hl - ¢¢¥¤¥­­ ï áâப 
x0B40 call x0EE3 ;¯®¨áª ¢ ¡ãä¥à¥ ¢¢®¤  áâப¨ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
ld e,#00
cp #0D
jp z,x0AF2 ;¯ãáâ ï áâப . ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
cp "["
jr z,x0B56 ;
cp "("
jr nz,x0B59
ld e,#04
jr x0B58
x0B56 ld e,#84
x0B58 inc hl
x0B59 ld (iy+#00),e
bit 2,e
jr nz,x0BCC ;ª®¬ ­¤  ­ ç¨­ ¥âáï ᮠ᪮¡ª¨
;®¯à¥¤¥«¥­¨¥ ª®¤  ª®¬ ­¤ë (¤«ï ãáâ ­®¢ª¨ ॣ¨áâ஢ ¨ ¯¥à¥¬¥­­®© MEM)
ld de,x0FA5
ld bc,x0F66
call x0F2E ;®¯à¥¤¥«¥­¨¥ ª®¤  ª®¬ ­¤ë ¯® ¢¢¥¤¥­­®© áâப¥
jp z,x0C0F ;¢ë¯®«­¥­¨¥ ¢¢¥¤¥­­®© ª®¬ ­¤ë
ex de,hl ;de  ¤à¥á ¢¢¥¤¥­­®© áâப¨
cp #21
jr nc,x0B7D ;ॣ¨áâà R ¨«¨ I
cp #0D
jr nc,x0B7E ;8 ¡¨â ॣ¨áâà
set 3,(iy+#00) ;16 ¡¨â ॣ¨áâà
sla c
jr x0B82
x0B7D inc bc
x0B7E ld a,c
sub #07
ld c,a ;bc ᬥ饭¨¥ ¤® ॣ¨áâà  ¯®«ì§®¢ â¥«ï
;¯à¨á¢®¥­¨¥ §­ ç¥­¨ï, ¥á«¨ ¥áâì §­ ª =
x0B82 ld a,(de)
cp #3D ;=
jp nz,x0C0F ;¢ë¯®«­¥­¨¥ ¢¢¥¤¥­­®© ª®¬ ­¤ë
inc de
ex de,hl ;hl  ¤à¥á ¢¢¥¤¥­­®© áâப¨
push bc
call x0EBA ;¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
pop bc ;de §­ ç¥­¨¥ ®¯¥à ­¤ 
cp #01
ld a,#0A ;á®®¡é¥­¨¥: too few operands
ret c ;®è¨¡ª . ­¥â ®¯¥à ­¤®¢
ld a,#0B ;á®®¡é¥­¨¥: too many operands
ret nz ;®è¨¡ª . ᫨誮¬ ¬­®£® ®¯¥à ­¤®¢
bit 2,(iy+#00)
jr nz,x0BF0 ;¥áâì ­¥§ ªàëâ ï ᪮¡ª 
ld hl,xDD69
add hl,bc ; ¤à¥á ॣ¨áâà  ¯®«ì§®¢ â¥«ï
bit 3,(iy+#00)
jr nz,x0BB1 ;16 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
; 8 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
ld a,d
or a
jr nz,x0BC9 ;®è¨¡ª : out of range
call x0EAA ;ãáâ ­®¢ª  ä« £®¢ ®¡­®¢«¥­¨ï: ॣ¨áâ஢
ld (hl),e
jr x0BC6
; 16 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
x0BB1 ld a,c
cp #02
jr nz,x0BBA ;íâ® ­¥ ॣ¨áâà PC
res 6,(iy+#0A) ;®¡­®¢¨âì ¤¨§ áᥬ¡«¥à ¢ ¬®­¨â®à¥
x0BBA or a
push af ;a=#00 í⮠㪠§ â¥«ì MEM
call z,x0EB1 ;®¡­®¢¨âì ¤ ¬¯ ¯ ¬ï⨠¨ ®¡­®¢«ïâì ¤¨§ áᥬ¡«¥à ¯ ¬ïâ¨
pop af
call nz,x0EAA ;®¡­®¢¨âì ॣ¨áâàë
ld (hl),e
inc hl
ld (hl),d
x0BC6 jp x0AFB ;®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
;®è¨¡ª 
x0BC9 ld a,#0C ;á®®¡é¥­¨¥: out of range
ret
;¢ëç¨á«¥­¨¥ §­ ç¥­¨ï ®¯¥à ­¤  ¢ ᪮¡ª å
;¢å: hl -  ¤à¥á ¢¢¥¤¥­­®© áâப¨ (­ ç «® ®¯¥à ­¤ )
x0BCC call x0C98 ;¢ëç¨á«¥­¨¥ §­ ç¥­¨ï ¢ ¢¢¥¤¥­­®© áâப¥
ret c ;®è¨¡ª  ¢ áâப¥: operand not found
ex de,hl ;hl - ¢ëç¨á«¥­­®¥ §­ ç¥­¨¥
ld c,l
ld b,h
ld a,(de)
inc de
ld hl,xE014
cp #29 ;)
jr z,x0BE9
cp #5D
jp nz,x0C0F ;¢ë¯®«­¥­¨¥ ¢¢¥¤¥­­®© ª®¬ ­¤ë
; § ªàë⨥ ᪮¡ª¨ ]
bit 7,(hl)
jr z,x0BED ;®è¨¡ª : invalid type brackets
set 3,(hl)
jr x0B82 ;¯à¨á¢®¥­¨¥ §­ ç¥­¨ï, ¥á«¨ ¥áâì §­ ª =
; § ªàë⨥ ᪮¡ª¨ )
x0BE9 bit 7,(hl)
jr z,x0B82 ;¯à¨á¢®¥­¨¥ §­ ç¥­¨ï, ¥á«¨ ¥áâì §­ ª =
; ®è¨¡ª : invalid type brackets
x0BED ld a,#15
ret
;¥áâì ­¥§ ªàëâ ï ᪮¡ª 
x0BF0 bit 3,(iy+#00)
ld l,c
ld h,b
jr nz,x0C08 ;16 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
; 8 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
ld a,d
or a
jr nz,x0BC9 ;®è¨¡ª : out of range
ld a,e
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
; ®¡­®¢¨âì ¢á¥ §­ ç¥­¨ï ¢ ®â« ¤ç¨ª¥
x0BFE ld a,(xE01E)
and #81
ld (xE01E),a
jr x0BC6 ;®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
; 16 ¡¨â §­ ç¥­¨¥ ª®¬ ­¤ë
x0C08 ld a,e
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
inc hl
ld a,d
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
jr x0BFE ;®¡­®¢¨âì ¢á¥ §­ ç¥­¨ï ¢ ®â« ¤ç¨ª¥
;¢ë¯®«­¥­¨¥ ¢¢¥¤¥­­®© ª®¬ ­¤ë
x0C0F ld hl,xE11E
ld b,#03
x0C14 ld e,(hl)
inc hl
ld d,(hl)
inc hl
ld (xDDA7),de ;de -  ¤à¥á â ¡«¨æë á  ¤à¥á ¬¨ ¯à®æ¥¤ãà ®¡à ¡®âª¨ ª®¬ ­¤ë
ld a,e
or d
jr z,x0C32 ;®è¨¡ª : command not found
ld e,(hl)
inc hl
ld d,(hl)
inc hl ;de -  ¤à¥á ᯨ᪠ ª®¬ ­¤
push hl
push bc
call x0EE3 ;¯®¨áª ¢ ¡ãä¥à¥ ¢¢®¤  áâப¨ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
call x0EF0 ;¯®¨áª § ¤ ­­®© ª®¬ ­¤ë ¢ ᯨ᪥
jr nz,x0C37 ;ª®¬ ­¤  ­ ©¤¥­ 
pop bc
pop hl
djnz x0C14
; ®è¨¡ª : command not found
x0C32 ld a,#16 ;á®®¡é¥­¨¥: command not found
jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;ª®¬ ­¤  ­ ©¤¥­ . ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë
x0C37 pop de
ex (sp),hl ;(sp) á«¥¤ãî騩  ¤à¥á ¢ áâப¥
add a,c
add a,c
ld c,a ;*3
ld hl,(xDDA7) ;hl -  ¤à¥á â ¡«¨æë á  ¤à¥á ¬¨ ¯à®æ¥¤ãà ®¡à ¡®âª¨ ª®¬ ­¤ë
add hl,bc
ld e,(hl)
inc hl
ld d,(hl) ;de - ¯à®æ¥¤ãà  ®¡à ¡®âª¨ ª®¬ ­¤ë
inc hl
ld c,(hl) ;c - ä« £¨ ª®¬ ­¤ë
pop hl ;á«¥¤ãî騩  ¤à¥á ¢ áâப¥
push de
bit 7,c
jr nz,x0C67 ;¯à®¢¥àª  ª®à४⭮á⨠ª®¬ ­¤ë. ¢ ¯ à ¬¥âà å ª®¬ ­¤ë ¥áâì áâப 
bit 5,c
ret nz ;¯¥à¥å®¤ ­  ®¡à ¡®âªã ª®¬ ­¤ë
push bc
call x0EBA ;¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
pop bc ;de - ¯¥à¢ë© ®¯¥à ­¤, hl - ¢â®à®© ®¯¥à ­¤, a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
bit 6,c
jr nz,x0C62 ;¯¥à¥å®¤ ­  ®¡à ¡®âªã ª®¬ ­¤ë
cp c
jr z,x0C62 ;ª®«¨ç¥á⢮ ¯à®ç¨â ­­ëå ®¯¥à ­¤®¢ ᮢ¯ ¤ ¥â
ld a,#0A ;®è¨¡ª : too few operands
jr c,x0C5F ;¢¢¥¤¥­® ¬¥­ìè¥ ®¯¥à ­¤®¢ 祬 ­ ¤®
inc a ;®è¨¡ª : too many operands
x0C5F jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
x0C62 ld bc,(xDD9D) ;bc - âà¥â¨© ®¯¥à ­¤
ret ;¯¥à¥å®¤ ­  ®¡à ¡®âªã ª®¬ ­¤ë
;¯à®¢¥àª  áâப¨ ª®¬ ­¤ë (¢ ¯ à ¬¥âà å ª®¬ ­¤ë ¥áâì áâப )
;¢ëå: b - ª®«¨ç¥áâ¢®à ¯ à ¬¥â஢ ¢ áâப¥
x0C67 ld b,#00
push hl
x0C6A dec c
bit 7,c
jr nz,x0C73 ;íâ® ¥é¥ ç¨á«®¢®¥ §­ ç¥­¨¥
set 1,(iy+#00) ;ç¨â ¥¬ ¨§ ¯ à ¬¥â஢ áâபã
x0C73 bit 1,(iy+#00)
push bc
jr nz,x0C7F ;ç¨â ¥¬ ¨§ ¯ à ¬¥â஢ áâபã
call x0C98 ;ç¨â ¥¬ ¨§ ¯ à ¬¥â஢ ç¨á«®
jr x0C82
x0C7F call x0D55 ;ç¨â ¥¬ ¨§ ¯ à ¬¥â஢ áâபã
x0C82 pop bc
jr z,x0C8A ;¯à®ç¨â ­® ¡¥§ ®è¨¡®ª
jp nc,x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
; ª®­¥æ áâப¨ ª®¬ ­¤ë
pop hl
ret ;¯¥à¥å®¤ ­  ®¡à ¡®âªã ª®¬ ­¤ë
x0C8A inc b
bit 7,c
jr nz,x0C6A ;¯à®ç¨â ­ ç¨á«®¢®© ®¯¥à ­¤
ld a,d
or a
jr z,x0C6A
ld a,#0C ;®è¨¡ª : out of range
jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;€„<E282AC>…‘: #0C98 ç⥭¨¥ ç¨á«®¢®£® ®¯¥à ­¤  ¨§ áâப¨ ª®¬ ­¤ë
;¢å: hl -  ¤à¥á ¢¢¥¤¥­­®© áâப¨
;¢ëå: de - ¢ëç¨á«¥­­®¥ §­ ç¥­¨¥
; hl - á«¥¤ãî騩  ¤à¥á ¢ ¢¢¥¤¥­­®© áâப¥
; nz - ¡ë«¨ ®è¨¡ª¨
; cy=1 - ®è¨¡ª  ¢ áâப¥: operand not found
x0C98 dec hl
x0C99 inc hl
call x0D42 ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) ¯à®¡¥« , ; #00 #0D
jr nz,x0CA7 ;cy=1 ᨬ¢®« =#00/#0D
jr nc,x0C99
xor a
inc a
ld a,#12 ;á®®¡é¥­¨¥: operand not found
scf
ret
x0CA7 ld (iy+#0F),#00 ;ª®«¨ç¥á⢮ ­¥§ ªàëâëå ᪮¡®ª
x0CAB ld de,#0000 ;¡ §®¢®¥ ç¨á«® (ª ­¥¬ã ¡ã¤¥¬ ¯à¨¡ ¢«ïâì/®â­¨¬ âì)
push de
;¯à®¢¥àª  §­ ª  ¢ áâப¥
ld d,#2B ;"+"
ld a,(hl)
call x0D38 ;¯à®¢¥àª  A = "+" ¨«¨ "-"
jr nz,x0CB9
inc hl
x0CB8 ld d,a ;§­ ª +/-
;¯à®¢¥àª  ®âªàë¨ï ᪮¡ª¨
x0CB9 push de
ld a,(hl)
cp #28 ;(
jr z,x0CC3
cp #5B ;[
jr nz,x0CCC
x0CC3 inc hl
inc (iy+#0F)
pop de
ld e,a ;®âªàëâ ï ᪮¡ª  ( ¨«¨ [
push de
jr x0CAB ;᪮¡ª  ®âªàëâ , ç¨â ¥¬ á«¥¤ãî騩 ᨬ¢®«
;¢ë¤¥«¥­¨¥ ç¨á«  ¨§ áâப¨ ¯®  ¤à¥áã ¢ hl
x0CCC call x0D55 ;z a =#00 ãᯥ譮 -> de - ç¨á«®
jr nz,x0CF8 ;­¥ ç¨á«®. ¢ a - á®®¡é¥­¨¥ ®¡ ®è¨¡ª¥. ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;¢ëç¨á«¥­¨¥ á㬬ë/à §­®á⨠ç¨á¥«
;de - ç¨á«®
x0CD1 pop af ;§­ ª ®¯¥à æ¨¨ +/-
ex (sp),hl ;¢â®à®¥ ç¨á«®
cp #2D ;-
jr z,x0CDA
add hl,de
jr x0CDD
x0CDA or a
sbc hl,de
x0CDD ex (sp),hl
;¯à®¢¥àª  §­ ª  ¢ áâப¥
ld a,(hl)
inc hl
call x0D38 ;¯à®¢¥àª  A = "+" ¨«¨ "-"
jr z,x0CB8 ;¯®¢â®à¨¬ á«®¦¥­¨¥/¢ëç¨â ­¨¥
cp #29 ;)
jr z,x0CFB ;§ ªà®¥¬ ᪮¡ªã )
cp #5D ;]
jr z,x0D0E ;§ ªà®¥¬ ᪮¡ªã ]
dec hl
xor a
cp (iy+#0F)
jr nz,x0CF6 ;«¨è­ïï ᪮¡ª 
pop de
ret
x0CF6 ld a,#13 ;á®®¡é¥­¨¥: quit operand not found
x0CF8 jp x0B06
;§ ªà®¥¬ ᪮¡ªã )
x0CFB pop de ;¯®«ã祭­®¥ ç¨á«®
call x0D22 ;㬥­ì訬 ª®«¨ç¥á⢮ ­¥§ ªàëâëå ᪮¡®ª
pop af ;f=ª®¤ ᪮¡ª¨ 1,f(cy) =1/0 ª¢ ¤à â­ ï/ªà㣫 ï
push af
ld a,#15 ;á®®¡é¥­¨¥: invalid type brackets
jr c,x0CF8 ;­¥á®®â¢¥âá⢨¥ ᪮¡®ª. ®è¨¡ª . ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
; ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
push hl
ex de,hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld e,a
ld d,#00
pop hl
jr x0CD1 ;¯à®¤®«¦¨¬  ­ «¨§
;§ ªà®¥¬ ᪮¡ªã ]
x0D0E pop de
call x0D22 ;㬥­ì訬 ª®«¨ç¥á⢮ ­¥§ ªàëâëå ᪮¡®ª
pop af ;f=ª®¤ ᪮¡ª¨ 1,f(cy) =1/0 ª¢ ¤à â­ ï/ªà㣫 ï
push af
ld a,#15 ;á®®¡é¥­¨¥: invalid type brackets
jr nc,x0CF8 ;­¥á®®â¢¥âá⢨¥ ᪮¡®ª. ®è¨¡ª . ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
; ç⥭¨¥ á«®¢  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
push hl
ex de,hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld e,a
inc hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld d,a
pop hl
jr x0CD1 ;¯à®¤®«¦¨¬  ­ «¨§
;㬥­ì訬 ª®«¨ç¥á⢮ ­¥§ ªàëâëå ᪮¡®ª
x0D22 xor a
cp (iy+#0F)
jr z,x0D2C ;­¥â ®âªàëâëå ᪮¡®ª
dec (iy+#0F)
ret
x0D2C bit 2,(iy+#00)
ld a,#14 ;á®®¡é¥­¨¥: too many >
jr z,x0CF8 ;®è¨¡ª . ¬­®£® ᪮¡®ª
pop bc
dec hl
xor a
ret
;¯à®¢¥àª  A = "+" ¨«¨ "-"
x0D38 cp #2B ;+
ret z
cp #2D ;-
ret
;€„<E282AC>…‘: #0D3E ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
;¢ëå: z - íâ® à §¤¥«¨â¥«ì
; cy=1 íâ® ª®­¥æ áâப¨
x0D3E ld a,(hl)
cp #3A ;:
ret z
;€„<E282AC>…‘: #0D42 ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #20/#2C/#3B/#00/#0D
;¢ëå: z - íâ® à §¤¥«¨â¥«ì
; cy=1 íâ® ª®­¥æ áâப¨
x0D42 ld a,(hl)
cp #20 ;" "
ret z
;€„<E282AC>…‘: #0D46 ¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #2C/#3B/#00/#0D
;¢ëå: z - íâ® à §¤¥«¨â¥«ì
; cy=1 íâ® ª®­¥æ áâப¨
x0D46 ld a,(hl)
cp #2C ;","
ret z
cp #3B ;";"
ret z
or a
scf
ret z
cp #0D
ret nz
scf
ret
;€„<E282AC>…‘: #0D55 ç⥭¨¥ ¨§ áâப¨ ª®¬ ­¤ë 稫®¢®£®/¡ ©â  áâப®¢®£® §­ ç¥­¨ï
;¢å: hl -  ¤à¥á ¢¢¥¤¥­­®© áâப¨ (­ ç «® ¯ à ¬¥âà  ª®¬ ­¤ë)
;¢ëå: nz - ®è¨¡ª . ¢ A - ª®¤ ®è¨¡ª¨
; cy=1 ᨭ⠪á¨ç¥áª ï ®è¨¡ª 
; z a =#00 ãᯥ譮 -> de - ç¨á«®
; hl -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢  ¢ ¢¢¥¤¥­­®© áâப¥
x0D55 bit 0,(iy+#00)
ld a,#10
ld (xE024),a ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
jr nz,x0D74 ; ­ «¨§ áâப¨ ¯®á«¥ ª ¢ë祪
;¯®¨áª §­ ç¨¬®£® ᨬ¢®«  ¢ áâப¥
dec hl
x0D61 inc hl
res 0,(iy+#00)
call x0D42 ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) z -> ¯à®¡¥« , ; #00 #0D
jr nz,x0D6F ;cy=1 ᨬ¢®« =#00/#0D
jr c,x0DA6 ;®è¨¡ª : syntax error
jr x0D61
x0D6F cp #22 ;"
jr nz,x0DAC ;­¥ ª ¢ë窨. ç⥭¨¥ ç¨á«  ¨§ ¢¢¥¤¥­­®© áâப¨
; ­ «¨§ áâப¨ ¢ ª ¢ë窠å (¤®¯ãá⨬ ⮫쪮 ®¤¨­ ᨬ¢®« 稫®=ª®¤ ᨬ¢®« )
inc hl
x0D74 ld a,(hl)
cp #0D
jr z,x0DA2 ;ª®­¥æ áâப¨. ®è¨¡ª : bad string
cp #22 ;"
jr z,x0D9C ;ª ¢ë窨 § ªà뫨
ld e,a
ld d,#00 ;ª®¤ ᨬ¢®«  ¨§ áâப¨
bit 1,(iy+#00)
jr nz,x0D8E ;¯ à ¬¥âà =áâப 
inc hl
ld a,#22 ;"
cp (hl)
jr nz,x0DA2 ;®è¨¡ª : bad string
jr x0D92
; ç¨â ¥¬ ¯ à ¬¥âà-áâபã
x0D8E set 0,(iy+#00)
; ¢ë室
x0D92 inc hl
xor a
ld (xE024),a
ret
;®è¨¡ª : known number
ld a,#0D ;á®®¡é¥­¨¥: known number
or a
ret
;ª ¢ë窨 § ªà뫨
x0D9C bit 1,(iy+#00)
jr nz,x0D61 ;¯ à ¬¥âà-áâப .
;®è¨¡ª : bad string
x0DA2 ld a,#0E ;á®®¡é¥­¨¥: bad string
or a
ret
;®è¨¡ª : syntax error
x0DA6 xor a
inc a
ld a,#0F ;á®®¡é¥­¨¥: syntax error
scf
ret
;ç⥭¨¥ ç¨á«  ¨§ ¢¢¥¤¥­­®© áâப¨
;¢å: hl -  ¤à¥á áâப¨
;¢ëå: z a =#00 ãᯥ譮 -> de - ç¨á«®
; nz a =#10 ­¥ ç¨á«®. á®®¡é¥­¨¥: not number
; nz a =#11 १ã«ìâ â ¡®«¥¥ 16 ¡¨â. á®®¡é¥­¨¥: number too big
; hl -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢  ¢ ¢¢¥¤¥­­®© áâப¥
x0DAC ld de,x0FA0
ld bc,x0F41
call x0F2E ;®¯à¥¤¥«¥­¨¥ ª®¤  ª®¬ ­¤ë ¯® ¢¢¥¤¥­­®© áâப¥
jr nz,x0DBD ;ª®¬ ­¤ (ॣ¨áâà) ­ ©¤¥­  ¢ ᯨ᪥
call x0DF4 ;¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«®
ret z
or a
ret
x0DBD ld de,#0001
ld a,c
or a
ret z ;ON -> de=#0001, a=#00
dec de
dec a
ret z ;OFF -> de=#0000, a=#00
push hl
ld hl,xDD83+#01 ; ¤à¥á ॣ¨áâà  R ¯®«ì§®¢ â¥«ï
ld a,c
sub #23
jr nc,x0DE4 ;ॣ¨âà R ¨«¨ I
ld hl,xDD6F ;­ ç «® ᯨ᪠ ॣ¨áâ஢ ¯®«§ì§®¢ â¥«ï
ld a,c
sub #0F
jr nc,x0DE4 ;ॣ¨áâà 8 bit
; 16 ¡¨â ॣ¨áâà
dec bc
dec bc
ld hl,xDD6F-#06
add hl,bc
add hl,bc
ld e,(hl)
inc hl
ld d,(hl)
x0DE1 pop hl
xor a
ret
; 8 ¡¨â ॣ¨áâà
x0DE4 add a,l
ld l,a
jr nc,x0DE9
inc h
x0DE9 ld e,(hl)
jr x0DE1
;€„<E282AC>…‘: #0DEC â ¡«¨æ  ¯à¥ä¨ªá®¢ ¨ ®á­®¢ ­¨ï á¨á⥬ áç¨á«¥­¨©
x0DEC db "%",#02
db "@",#08
db ".",#0A
db "#",#10
;€„<E282AC>…‘: #0DF4 ¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«® (!!!¯à¨ base 0 à ¡®â ¥â ­¥¢¥à­®!!!)
;¢å: hl -  ¤à¥á áâப¨
;¢ëå: z a =#00 ãᯥ譮 -> de - १ã«ìâ â
; nz a =#10 ­¥ ç¨á«®. á®®¡é¥­¨¥: not number
; nz a =#11 १ã«ìâ â ¡®«¥¥ 16 ¡¨â. á®®¡é¥­¨¥: number too big
;
x0DF4 ld a,(xE02B) ;⥪ãé ï á¨á⥬  áç¨á«¥­¨ï =2/8/10/16
ld b,#0A
or a
jr z,x0DFD
ld b,a
x0DFD call x0E51 ;¯à®¢¥àª  ¢ (hl) æ¨äà  ¨«¨ ­¥â (cy=1 ­¥ æ¨äà )
jr nc,x0E17 ;íâ® æ¨äà 
ld de,x0DEC ;¯à®¢¥à¨¬ ï¥âáï «¨ ᨬ®¢®« ¯à¥ä¨ªá®¬ á¨á⥬ë áç¨á«¥­¨ï
ld b,#04
x0E07 ld a,(de)
inc de
cp (hl)
ld a,(de)
inc de
jr z,x0E15 ;¤ , íâ® ¯à¥ä¨ªá. ¢ A ®á­®¢ ­¨¥ á¨á⥬ë áç¨á«¥­¨©
djnz x0E07
ld b,(iy+#17)
jr x0E17
x0E15 inc hl ;áâப  ¯®á«¥ ¯à¥ä¨ªá 
ld b,a ;®á­®¢ ­¨¥ á¨á⥬ë áç¨á«¥­¨©
x0E17 ld (iy+#10),b ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
call x0E1F ;¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«®
or a
ret
;¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«® (!!!¯à¨ base 0 à ¡®â ¥â ­¥¢¥à­®!!!)
;¢å: hl - áâப  ç¨á¥«
;¢ëå: a =#00 ãᯥ譮 -> de - १ã«ìâ â
; a =#10 ­¥ ç¨á«®
; a =#11 १ã«ìâ â ¡®«¥¥ 16 ¡¨â
x0E1F call x0E59 ;¯à¥®¡à §®¢ ­¨¥ ᨬ¢®«  ¢ ç¨á«®, á ãç¥â®¬ á¨á⥬ë áç¨á«¥­¨ï
ld a,#10
ret c ;¢ë室. ­¥ ç¨á«®
ld b,#00
ld d,b
ld e,c
inc hl
x0E2A call x0E59 ;¯à¥®¡à §®¢ ­¨¥ ᨬ¢®«  ¢ ç¨á«®, á ãç¥â®¬ á¨á⥬ë áç¨á«¥­¨ï
jr c,x0E45 ;ç¨á«  ª®­ç¨«¨áì
push hl
ld hl,(xE024) ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
ld h,#00
ex de,hl
push bc
call x0E85 ;㬭®¦¥­¨¥ ahl=hl*de (0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â)
pop bc
jr nz,x0E4D ;१ã«ìâ â ¡®«¥¥ 16 ¡¨â
add hl,bc
jr c,x0E4D ;१ã«ìâ â ¡®«¥¥ 16 ¡¨â
ex de,hl
pop hl
inc hl
jr x0E2A
x0E45 call x0E51 ;¯à®¢¥àª  ¢ (hl) æ¨äà  ¨«¨ ­¥â (cy=1 ­¥ æ¨äà )
ld a,#10
ret nc
xor a
ret
;-१ã«ìâ â ¡®«¥¥ 16 ¡¨â
x0E4D pop hl
ld a,#11
ret
;-¯à®¢¥àª  ¢ (hl) æ¨äà  ¨«¨ ­¥â (cy=1 ­¥ æ¨äà )
;¢å: hl -  ¤à¥á ¢ áâப¥
x0E51 ld a,(hl)
cp #30
ret c
cp #3A
ccf
ret
;-¯à¥®¡à §®¢ ­¨¥ ᨬ¢®«  ¢ ç¨á«®, á ãç¥â®¬ á¨á⥬ë áç¨á«¥­¨ï
;¢å: hl -  ¤à¥á áâப¨ ç¨á¥«
;¢ëå: c - ç¨á«®
; cy=1 ®è¨¡ª . íâ® ­¥ ç¨á«®
x0E59 ld a,(hl)
cp #61
jr c,x0E60
sub #20 ;¡ãª¢  ¢ ¢¥àå­¥¬ ॣ¨áâà¥
x0E60 sub #30
ret c ;­¥¨§¢¥áâ­ë© ᨬ¢®«
cp #0A
jr c,x0E6C ;íâ® æ¨äà 
cp #11
ret c ;­¥¨§¢¥áâ­ë© ᨬ¢®«
sub #07
x0E6C ld c,a
ld a,(xE024) ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
dec a
cp c
ret
;€„<E282AC>…‘: #0E73 ¤¥«¥­¨¥ bc=hl/de á ¯à®¢¥àª®© de ­  ­®«ì
;
x0E73 res 2,(iy+#0E)
ld a,d
or e
jr z,x0E80
ld a,h
ld c,l
jp x16AA
x0E80 set 2,(iy+#0E)
ret
;€„<E282AC>…‘: #0E85 㬭®¦¥­¨¥ ahl=hl*de (0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â)
;¢ëå: ahl - १ã«ìâ â
; 0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â
;
x0E85 res 0,(iy+#0E)
ld c,h
ld a,l
ld b,#10
ld hl,#0000
x0E90 add hl,hl
jr nc,x0E97
set 0,(iy+#0E)
x0E97 rla
rl c
jr nc,x0EA3
add hl,de
jr nc,x0EA3
set 0,(iy+#0E)
x0EA3 djnz x0E90
bit 0,(iy+#0E)
ret
;ãáâ ­®¢ª  ä« £®¢ ®¡­®¢«¥­¨ï: ᮤ¥à¦¨¬®£® ॣ¨áâ஢ ¨ ¤ ¬¯ ¯® ᮤ¥à¦¨¬®¬ã ॣ¨áâ஢
x0EAA ld a,(xE01E)
and #F5 ;%11110101
jr x0EB6
;ãáâ ­®¢ª  ä« £®¢ ®¡­®¢«¥­¨ï: ®¡­®¢«ïâì ¤ ¬¯ ¯ ¬ï⨠¨ ®¡­®¢«ïâì ¤¨§ áᥬ¡«¥à ¯ ¬ï⨠¯® ᮤ¥à¦¨¬®¬ã ï祩ª¨ ¯ ¬ïâ¨
x0EB1 ld a,(xE01E)
and #CF ;%11001111
x0EB6 ld (xE01E),a
ret
;€„<E282AC>…‘: #0EBA ¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
;¢å: hl -  ¤à¥á ¢¢¥¤¥­­®© áâப¨
;¢ëå: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x0EBA xor a
ld bc,xDD99
x0EBE push af
push bc
call x0C98 ;¢ëç¨á«¥­¨¥ §­ ç¥­¨ï ¢ ¢¢¥¤¥­­®© áâப¥
pop bc ;de ¢ëç¨á«¥­­®¥ §­ ç¥­¨¥
jr c,x0EDA ;®è¨¡ª  ¢ áâப¥
jp nz,x0B06 ;®è¨¡ª . ¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
ld a,e
ld (bc),a
inc bc
ld a,d
ld (bc),a
inc bc
pop af
inc a
cp #06
jr nz,x0EBE
ld a,#0B ;®è¨¡ª : too many operands
jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
x0EDA pop af
ld de,(xDD99)
ld hl,(xDD99+#02)
ret
;€„<E282AC>…‘: #0EE3 ¯®¨áª ¢ ¡ãä¥à¥ ¢¢®¤  áâப¨ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
;¢ëå: hl -  ¤à¥á ¢ ¡ãä¥à¥
; z - íâ®â ᨬ¢®« ¯¥à¥¢®¤ áâப¨
x0EE3 ld hl,xDE17 ;¡ãä¥à ¤«ï ¢¢®¤  áâப¨
;€„<E282AC>…‘: #0EE6 ¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
;¢ëå: hl -  ¤à¥á ¢ áâப¥
; z - íâ®â ᨬ¢®« ¯¥à¥¢®¤ áâப¨
x0EE6 ld a,(hl)
cp " "
inc hl
jr z,x0EE6
dec hl
cp #0D
ret
;€„<E282AC>…‘: #0EF0 ¯®¨áª § ¤ ­­®© ª®¬ ­¤ë ¢ ᯨ᪥
;¢å: hl - áâப  á ¢¢¥¤¥­­®© ª®¬ ­¤®©
; de - ᯨ᮪ ª®¬ ­¤
;¢ëå: nz - ª®¬ ­¤  ­ ©¤¥­  ¢ ᯨ᪥
; a,bc - ­®¬¥à ­ ©¤¥­­®© ª®¬ ­¤ë ¢ ᯨ᪥
x0EF0 ld c,#00
x0EF2 push hl
ld a,(de) ;¯à®¯ã᪠á«ã¦¥¡­ëå ¡ ©â®¢
cp #20 ;space
jr nc,x0EFA
inc de
inc de
x0EFA ld a,(de)
ld b,a
and #7F
cp #61 ;a
jr c,x0F04 ;¡ãª¢  ¢ ª®­â஫쭮¬ á«®¢¥ ¢ ¢¥àå­¥¬ ॣ¨áâà¥
set 7,c ;¥á«¨ ¢ ­¨¦­¥¬, â® ­¥ ï¥âáï §­ ç¨¬®©
x0F04 ld a,b
call x0F89 ;¯¥à¥¢®¤ ᨬ¢®«  ¢ ¢¥àå­¨© ॣ¨áâà
ld b,a
ld a,(hl)
call x0F89 ;¯¥à¥¢®¤ ᨬ¢®«  ¢ ¢¥àå­¨© ॣ¨áâà
cp b
jr nz,x0F1E ;­¥â ᮢ¯ ¤¥­¨ï
ld a,(de)
bit 7,a
inc hl
inc de
jr z,x0EFA ;á«¥¤ãîé ï ¡ãª¢ 
;á«®¢® ­ ©¤¥­®
x0F17 pop de
res 7,c
ld a,c
ld b,#00
ret
x0F1E bit 7,c
jr nz,x0F17 ;¡ãª¢  ¢ ª®­â஫쭮¬ á«®¢¥ ¢ ­¨¦­¥¬ ॣ¨áâà¥
;áà ¢­¨¢ ¥¬ á® á«¥¤ãî騬 á«®¢®¬
pop hl
x0F23 ld a,(de)
rlca
inc de
jr nc,x0F23
inc c
ld a,(de)
or a
jr nz,x0EF2
ret
;®¯à¥¤¥«¥­¨¥ ª®¤  ª®¬ ­¤ë ¯® ¢¢¥¤¥­­®© áâப¥
;¢å: hl -  ¤à¥á áâப¨ á ¢¢¥¤¥­­®© ª®¬ ­¤®©
; de - ᯨ᮪ ª®¬ ­¤
; bc - ᯨ᮪ ª®¤®¢ ᮮ⢥âáâ¢ãîé¨å ª®¬ ­¤¥
;¢ëå: z - ª®¬ ­¤  ­¥ ­ ©¤¥­  ¢ ᯨ᪥
; nz - ª®¬ ­¤  ­ ©¤¥­  ¢ ᯨ᪥
; a,bc - ª®¤ ­ ©¤¥­­®© ª®¬ ­¤ë ¢ ᯨ᪥
; hl -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢  ¢ ¢¢¥¤¥­­®© áâப¥
x0F2E push bc
call x0EF0 ;¯®¨áª § ¤ ­­®© ª®¬ ­¤ë ¢ ᯨ᪥
pop de
ret z ;ª®¬ ­¤  ­¥ ­ ©¤¥­ 
push de
ex (sp),hl
push af
add a,l
ld l,a
jr nc,x0F3C
inc h
x0F3C pop af
ld a,(hl)
ld c,a
pop hl
ret
;­®¬¥à  ª®¤®¢ ᮮ⢥âá¢ãîé¨å ᯨáªã x0FA0 (­ §¢ ­¨ï ॣ¨áâ஢ ¤«ï ¬®­¨â®à )
x0F41 db #00,#01,#02,#23 ;ON / OFF/ MEM/ R
db #0E,#0D,#22,#20 ;AF'/ AF / A' / A
db #21,#1F,#0F,#10 ;F' / F / IXL/ IXH
db #11,#12,#05,#06 ;IYL/ IYH/ IX / IY
db #03,#04,#0A,#0B ;PC / SP / HL'/ DE'
db #0C,#07,#08,#09 ;BC'/ HL / DE / BC
db #19,#1A,#1B,#1C ;L' / H' / E' / D'
db #1D,#1E,#13,#14 ;C' / B' / L / H
db #15,#16,#17,#18 ;E / D / C / B
db #24 ;I
;­®¬¥à  ª®¤®¢ ᮮ⢥âá¢ãîé¨å ᯨáªã x0FA5 (­ §¢ ­¨ï ॣ¨áâ஢ ¤«ï ¬®­¨â®à )
x0F66 db #00,#21,#0C,#0B ;MEM/ R / AF'/ AF
db #20,#1E,#1F,#1D ;A' / A / F' / F
db #0D,#0E,#0F,#10 ;IXL/ IXH/ IYL/ IYH
db #03,#04,#01,#02 ;IX / IY / PC / SP
db #08,#09,#0A,#05 ;HL'/ DE'/ BC'/ HL"
db #06,#07,#17,#18 ;DE / BC / L' / H'
db #19,#1A,#1B,#1C ;E' / D' / C' / B'
db #11,#12,#13,#14 ;L / H / E / D
db #15,#16,#22 ;C / B / I
;¯¥à¥¢®¤ ᨬ¢®«  ¢ ­¨¦­¨© ॣ¨áâà
x0F89 and #7F
cp #40
ret c
and #5F
ret
;€„<E282AC>…‘: #0F91 ­ §¢ ­¨ï ॣ¨áâ஢ ¤«ï ¬®­¨â®à 
x0F91 dc "PC"
dc "SP"
dc "IX"
dc "IY"
dc "HL"
dc "DE"
dc "BC"
db #00
;€„<E282AC>…‘: #0FA0 ­ §¢ ­¨ï ª®¬ ­¤/ॣ¨áâ஢
x0FA0 dc "ON"
x0FA2 dc "OFF"
x0FA5 dc "MEM"
dc "R"
dc "AF'"
dc "AF"
dc "A'"
dc "A"
dc "F'"
dc "F"
dc "IXL"
dc "IXH"
dc "IYL"
dc "IYH"
dc "IX"
dc "IY"
dc "PC"
dc "SP"
dc "HL'"
dc "DE'"
dc "BC'"
dc "HL"
dc "DE"
dc "BC"
dc "L'"
dc "H'"
dc "E'"
dc "D'"
dc "C'"
dc "B'"
dc "L"
dc "H"
dc "E"
dc "D"
dc "C"
dc "B"
dc "I"
db #00
;€„<E282AC>…‘: #0FEB ­  ®¤­ã áâப㠢¢¥àå ¢ ®â« ¤ç¨ª¥
x0FEB ld bc,#FFF8
jr x1005
;€„<E282AC>…‘: #0FF0 ­  ®¤­ã áâப㠢­¨§ ¢ ®â« ¤ç¨ª¥
x0FF0 ld bc,#0008
jr x1005
;€„<E282AC>…‘: #0FF5 ­  ®¤¨­ ¡ ©â ¢«¥¢® ¢ ®â« ¤ç¨ª¥
x0FF5 ld bc,#FFFF
jr x1005
;€„<E282AC>…‘: #0FFA ­  ®¤¨­ ¡ ©â ¢¯à ¢® ¢ ®â« ¤ç¨ª¥
x0FFA ld bc,#0001
jr x1005
;€„<E282AC>…‘: #0FFF ­  á«¥¤ãîéãî ª®¬ ­¤ã (¥á«¨ ª®¬ ­¤  ­¥ ¢ë¯®«­ï¥âáï)
x0FFF ld hl,(xDD69) ;ï祩ª  mem
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
x1005 ld hl,(xDD69) ;ï祩ª  mem
add hl,bc
ld (xDD69),hl
ld a,#01
bit 0,(iy+#0A)
jr z,x102B ;®ç¨é âì íªà ­ ¬®­¨â®à  ¯à¨ ®¡­®¢«¥­¨¨ ¨­ä®à¬ æ¨¨
call x2E3D ;¯¥ç âì ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
xor a
ret
;€„<E282AC>…‘: #1019 ¯à®¯ã᪠¯à®£à ¬¬ë, ᮤ¥à¦ ­¨¥ ॣ¨áâà  PC 㢥«¨ç¨¢ ¥âáï ­  ¤«¨­ã
; ⥪ã饩 ª®¬ ­¤ë (á ¬  ª®¬ ­¤  ­¥ ¢ë¯®«­ï¥âáï)
x1019 ld hl,(xDD6B) ;PC
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
ld (xDD6B),hl
ld a,(iy+#0A)
and %10110101
ld (iy+#0A),a
xor a
x102B push af
call x2CA8 ;¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
pop af
ret
;­ ¦ â  áâ५ª  ¢«¥¢®. ¯®«­ë© á¡à®á
x1031 ld (xEAF5+#18),hl ;¯®à⨬ ¯ ¬ïâì ¢ ram 8
jp x0040 ;¨­¨æ¨ «¨§ æ¨ï
;€„<E282AC>…‘: #1037 ¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
x1037 call x1048 ;¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
set 6,(iy+#14) ;"⥯«ë©" á¡à®á
ld b,#00
ld hl,xEAF5 ;¡ ©âë - ¯à¨§­ ª 楫®áâ­®á⨠áâà ­¨æë
x1043 ld (hl),b
inc hl
djnz x1043
ret
;¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
x1048 ld iy,xE014
call x0739 ;ª®¯¨à®¢ ­¨¥ ¯à®æ¥¤ãàë ¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
ld bc,#FEFE ;¯à®¢¥àª  ­ ¦ â¨ï CapsShift+5
in a,(c)
rrca
jr c,x105F ;­¥ ­ ¦ â 
ld b,#F7 ;¯à®¢¥àª  ­ ¦ â¨ï 5
in a,(c)
bit 4,a
jr z,x1031 ;cs+5 ­ ¦ â 
x105F scf
jr x107A ;ç⥭¨¥ ­ áâ஥ª Autoconfig
x1062 ld de,xC006
ld a,(de)
sub e
dec de
jr z,x1073
call x3E25 ;ç⥭¨¥ ¯®à⮢ #1FFD/#7FFD
scf
jr x107A ;ç⥭¨¥ ­ áâ஥ª Autoconfig
x1070 ex de,hl
inc (hl)
ex de,hl
x1073 ld a,(de)
sbc a,e
and #07
jp z,x001E ;á¡à®á
;¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ç⥭¨¥ ­ áâ஥ª Autoconfig
;cy=1 ç⥭¨¥ ­ áâ஥ª Autoconfig ¢ ᮮ⢥âá⢨¨ á ¯ à ¬¥âà ¬¨ ¯¥à¥¬¥­­®©
; =0 ¡¥§ãá«®¢­®¥ ç⥭¨¥ ­ áâ஥ª Autoconfig
x107A push af
; ¯®¤áç¥â ª®­â஫쭮© á㬬ë Basic128 á  ¤à¥á  #500-#5FF
ld hl,#0000
ld b,h
ld c,#FE
ld (xE012),hl ;rom 0, ram 0 ¯®«ì§®¢ â¥«ï
ld h,#05 ;hl=#0500  ¤à¥á ®âªã¤  ç¨â ¥¬
x1086 rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
add a,b
ld b,a
inc hl
ld a,h
sub #06
jr nz,x1086
ld a,(x2BB2)
sub b
jp nz,x001E ;­¥ ᮢ¯ ¤ ¥â. á¡à®á
call x04CE ;¢®ááâ ­®¢«¥­¨¥ ०¨¬  ’ãà¡®
rst #30
dw rom4_x0A5A ;¨­¨æ¨ «¨§ æ¨ï á¨áâ¥¬ë ¨ ¯¥ç âì á®®¢¥âáâ¢ãîé¨å á®®¡é¥­¨©
db #04
pop af
jr nc,x10B5 ;ç⥭¨¥ ¨ ãáâ ­®¢ª  ­ áâ஥ª ¨§ ª®­ä¨£ãà æ¨®­­®£® ᥪâ®à 
bit 1,(iy+#14)
ret nz ;Autoconfig Off
ld a,(xFFD0)
push af
call x10B5 ;ç⥭¨¥ ¨ ãáâ ­®¢ª  ­ áâ஥ª ¨§ ª®­ä¨£ãà æ¨®­­®£® ᥪâ®à 
rst #30
dw rom5_x08EF ;ãáâ ­®¢ª  ¤®áâ㯭®á⨠¬ëè¨
db #05
pop af
ld (xFFD0),a
ret
;ç⥭¨¥ ¨ ãáâ ­®¢ª  ­ áâ஥ª ¨§ ª®­ä¨£ãà æ¨®­­®£® ᥪâ®à 
x10B5 xor a
call x2C4D ;ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
ld bc,#FEFE
in a,(c)
rrca
jr c,x10C8 ;cs ­¥ ­ ¦ â 
ld b,#EF
in a,(c)
bit 2,a
ret z ;­ ¦ â® cs+8
x10C8 bit 6,(iy+#14)
jr nz,x10D6 ;"⥯«ë©" á¡à®á
ld d,#02
ld c,#0E ;䨧¨ç¥áª®¥ ¯®§¨æ¨®­¨à®¢ ­¨¥ ­  â४, ­®¬¥à ª®â®à®£® § ¤ ­ ¢ ॣ¨áâॠD
rst #30
dw rom7_x0229 ;¢ë§®¢ ä㭪樨 R8DOS
db #07
x10D6 rst #30
dw rom7_x107B ;¨­¨æ¨ «¨§ æ¨ï ¤¨áª®¢®¤  ¨ ­ áâனª  ­  ¤¨áª¥âã
db #07
ret c ;®è¨¡ª 
ld (ix+1),#00 ;crd X
ld bc,#5D00 ;á®®¡é¥­¨¥: "boot record"
rst #08 ;¯¥ç âì á®®¡é¥­¨ï
call x2FED ;¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª­ 
; ç⥭¨¥ ª®­ä¨£ãà æ¨®­­®£® ᥪâ®à 
ld hl,xDB69
push hl
ld bc,#0105
ld de,#000F ;trk 0, sec #0F
rst #30
dw rom7_x0229 ;R8DOS #05(5) ç⥭¨¥ £à㯯ë ᥪâ®à®¢
db #07
pop hl
ret c ;®è¨¡ª  ç⥭¨ï
ld a,"A"
cpi
ret nz
ld a,"M"
cpi
ret nz
jp (hl) ;ãáâ ­®¢ª  ­ áâ஥ª ¨§ ª®­ä¨£ãà æ¨®­­®£® ᥪâ®à 
;€„<E282AC>…‘: #1101 । ªâ¨à®¢ ­¨¥ ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥ ¬®­¨â®à 
x1101 rst #30
dw rom5_x2278 ;। ªâ¨à®¢ ­¨¥ ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥ ¬®­¨â®à 
db #05
xor a
ret
;€„<E282AC>…‘: #1107 â ¡«¨æ  ¬­¥¬®­¨ª
x1107 db #5C,#01 ;#00 ;#30 LD IXH
db #5C,#02 ;#30 LD IXL
db #5C,#03 ;#30 LD IYH
db #5C,#04 ;#30 LD IYL
db #53,#15 ;#27 JP Z
db #53,#14 ;#27 JP NZ
db #53,#0D ;#27 JP C
db #53,#16 ;#27 JP NC
db #53,#17 ;#08 ;#27 JP M
db #53,#1A ;#27 JP P
db #53,#19 ;#27 JP PE
db #53,#18 ;#27 JP PO
db #53,#22 ;#27 JP (HL)
db #53,#23 ;#27 JP (IX)
db #53,#24 ;#27 JP (IY)
db #54,#15 ;#28 JR Z
db #54,#14 ;#10 ;#28 JR NZ
db #54,#0D ;#28 JR C
db #54,#16 ;#28 JR NC
db #55,#15 ;#29 CALL Z
db #55,#14 ;#29 CALL NZ
db #55,#0D ;#29 CALL C
db #55,#16 ;#29 CALL NC
db #55,#17 ;#29 CALL M
db #55,#1A ;#18 ;#29 CALL P
db #55,#19 ;#29 CALL PE
db #55,#18 ;#29 CALL PO
db #56,#0B ;#2A ADC A
db #56,#07 ;#2A ADC HL
db #57,#0B ;#2B ADD A
db #57,#07 ;#2B ADD HL
db #57,#12 ;#2B ADD IX
db #57,#13 ;#20 ;#2B ADD IY
db #58,#0B ;#2C SBC A
db #58,#07 ;#2C SBC HL
db #59,#0B ;#2D IN A
db #59,#0C ;#2D IN B
db #59,#0D ;#2D IN C
db #59,#0E ;#2D IN D
db #59,#0F ;#2D IN E
db #59,#10 ;#28 ;#2D IN H
db #59,#11 ;#2D IN L
db #5A,#26 ;#2E OUT (C)
db #5A,#2B ;#2E OUT (
db #5B,#06 ;#2C ;#2F EX DE
db #5B,#0A ;#2F EX AF
db #5B,#25 ;#2F EX (SP)
db #5C,#20 ;#30 LD (BC)
db #5C,#21 ;#30 ;#30 LD (DE)
db #5C,#22 ;#30 LD (HL)
db #5C,#29 ;#30 LD (IY+
db #5C,#2A ;#30 LD (IY-
db #5C,#27 ;#30 LD (IX+
db #5C,#28 ;#30 LD (IX-
db #5C,#2B ;#30 LD (
db #5C,#0B ;#30 LD A
db #5C,#0C ;#38 ;#30 LD B
db #5C,#0D ;#30 LD C
db #5C,#0E ;#30 LD D
db #5C,#0F ;#30 LD E
db #5C,#10 ;#30 LD H
db #5C,#11 ;#30 LD L
db #5C,#05 ;#30 LD BC
db #5C,#06 ;#30 LD DE
db #5C,#07 ;#40 ;#30 LD HL
db #5C,#13 ;#30 LD IY
db #5C,#12 ;#30 LD IX
db #5C,#1B ;#30 LD I
db #5C,#1C ;#30 LD R
db #5C,#08 ;#30 LD SP
db #59,#22 ;#46 ;#2D IN (HL)
db #00
;€„<E282AC>…‘: #1196 ®¯¥à ­¤ë/ä« £¨  áᥬ¡«¥à 
x1196 dc "IXH" ;#00
dc "IXL"
dc "IYH"
dc "IYL"
dc "BC"
dc "DE"
dc "HL"
dc "SP"
dc "AF'" ;#08
dc "AF"
dc "A"
dc "B"
dc "C"
dc "D"
dc "E"
dc "H"
dc "L" ;#10
dc "IX"
dc "IY"
dc "NZ"
dc "Z"
dc "NC"
dc "M"
dc "PO"
dc "PE" ;#18
dc "P"
dc "I"
dc "R"
dc "F"
db #80
db #80
dc "(BC)"
dc "(DE)" ;#20
dc "(HL)"
dc "(IX)"
dc "(IY)"
dc "(SP)"
dc "(C)"
dc "(IX+"
dc "(IX-"
dc "(IY+" ;#28
dc "(IY-"
dc "(" ;#2A
db #00 ;#2B
;€„<E282AC>…‘: #11F7 ¬­¥¬®­¨ª¨  áᥬ¡«¥à 
x11F7 dc "CCF" ;#00 / #2C
dc "CPL"
dc "DAA"
dc "DI"
dc "EI"
dc "EXX"
dc "HALT"
dc "NOP"
dc "RLA" ;#08 / #34
dc "RLCA"
dc "RRA"
dc "RRCA"
dc "SCF"
dc "LDIR"
dc "LDDR"
dc "CPIR"
dc "CPDR" ;#10 / #3C
dc "INIR"
dc "INDR"
dc "OTIR"
dc "OTDR"
dc "LDI"
dc "LDD"
dc "CPI"
dc "CPD" ;#18 / #44
dc "INI"
dc "IND"
dc "OUTI"
dc "OUTD"
dc "RLD"
dc "RRD"
dc "RETI"
dc "RETN" ;#20 / #4C
dc "NEG"
db #80
db #80
db #80
dc "DEC"
dc "INC"
dc "JP"
dc "JR" ;#28 / #54
dc "CALL"
dc "ADC"
dc "ADD"
dc "SBC"
dc "IN"
dc "OUT"
dc "EX"
dc "LD" ;#30 / #5C
dc "ORG"
dc "AND"
dc "OR"
dc "XOR"
dc "SUB"
dc "CP"
dc "PUSH"
dc "POP" ;#38 / #64
dc "DJNZ"
dc "RET"
dc "BIT"
dc "SET"
dc "RES"
dc "RLC"
dc "RL"
dc "RRC" ;#40 / #6C
dc "RR"
dc "SLA"
dc "SRA"
dc "SRL"
dc "IM"
dc "RST"
dc "DB"
dc "SLI" ;#48 / #74
db #00
;€„<E282AC>…‘: #12D2 â ¡«¨æ  ¤«ï ä®à¬¨à®¢ ­¨ï ª®¬ ­¤ ¤¨§ á¬ 
x12D2 db %00000111,%00000001 ;#01
dw x135E
db %00111000,%00000001 ;#02
dw x135E
db %00111000,%00000001 ;#03
dw x1366
db %00110000,%00000001 ;#04
dw x136E
db %00110000,%00000001 ;#05
dw x1372
db %00111000,%00000001 ;#06
dw x1376
db %00111000,%00000001 ;#07
dw x137E
db %00111000,%00000001 ;#08
dw x1386
db %11000000,%00000010 ;#09
dw x138E
db %00111000,%00000001 ;#0A
dw x1396
db %00111000,%00000001 ;#0B
dw x139E
db %00001111,%00000010 ;#0C
dw x13A6
db %00111000,%00000010 ;#0D
dw x13C6
db %00111000,%00000001 ;#0E
dw x13D6
db %00110000,%00000001 ;#0F
dw x13DE
db %00110000,%00000010 ;#10
dw x13E2
db %00110000,%00000010 ;#11
dw x13EA
db %00001111,%00000010 ;#12
dw x13F2
db %00111000,%00000010 ;#13
dw x1412
db %00110000,%00000010 ;#14
dw x1422
db %00110000,%00000010 ;#15
dw x142A
db %11000000,%00000010 ;#16
dw x1432
db %00111000,%00000001 ;#17
dw x143A
db %11100000,%00000001 ;#18
dw x1442
db %00001111,%00000010 ;#19
dw x144A
db %00000111,%00000001 ;#1A
dw x146A
db %00111000,%00000001 ;#1B
dw x1472
db %00111000,%00000001 ;#1C
dw x147A
db %00111000,%00000001 ;#1D
dw x1482
db %00111000,%00000001 ;#1E
dw x148A
db %00111000,%00000010 ;#1F
dw x1492
db %00011000,%00000001 ;#20
dw x14A2
db %00011000,%00000001 ;#21
dw x14A6
db %00011000,%00000001 ;#22
dw x14AA
db %00011000,%00000001 ;#23
dw x14AE
x135E db #0C,#0D,#0E,#0F,#10,#11,#22,#0B
x1366 db #0C,#0D,#0E,#0F,#10,#11,#EA,#0B
x136E db #05,#06,#07,#08
x1372 db #05,#06,#07,#0A
x1376 db #14,#15,#16,#0D,#18,#19,#1A,#17
x137E db #83,#82,#85,#84,#89,#88,#87,#86
x1386 db #92,#91,#94,#93,#98,#97,#96,#95
x138E db #D2,#00,#D0,#C7,#D1,#C7,#D8,#00
x1396 db #B6,#B7,#B8,#B9,#BA,#BB,#AF,#B5
x139E db #9B,#99,#61,#9F,#5E,#60,#5F,#62
x13A6 db #D3,#00,#D5,#EB,#D6,#00,#52,#CA
db #52,#C8,#51,#C8,#D0,#EC,#D4,#00
db #D3,#00,#9C,#CA,#D7,#00,#51,#CA
db #52,#C8,#51,#C8,#D0,#EC,#D4,#00
x13C6 db #33,#00,#AB,#09,#65,#ED,#54,#ED
db #8E,#ED,#8D,#ED,#90,#ED,#8F,#ED
x13D6 db #35,#37,#34,#36,#2E,#2D,#38,#2C
x13DE db #BC,#BD,#BE,#C3
x13E2 db #AD,#0B,#AE,#0B,#B4,#07,#B4,#0B
x13EA db #B5,#20,#B5,#21,#BE,#2B,#B5,#2B
x13F2 db #66,#CC,#64,#CB,#CD,#EB,#D9,#00
db #CE,#EB,#63,#CB,#D1,#EC,#72,#00
db #66,#CC,#DA,#00,#CD,#EB,#D9,#00
db #CE,#EB,#DB,#00,#D1,#EC,#72,#00
x1412 db #53,#EB,#EA,#00,#A9,#0B,#A1,#2B
db #AC,#07,#EA,#00,#2F,#00,#30,#00
x1422 db #66,#00,#31,#00,#8A,#00,#C3,#07
x142A db #55,#EB,#EA,#00,#EA,#00,#EA,#00
x1432 db #DD,#C7,#67,#C7,#69,#C7,#68,#C7
x143A db #6A,#6C,#6B,#6D,#6E,#6F,#74,#70
x1442 db #EA,#EA,#DF,#DF,#EA,#E0,#EA,#EA
x144A db #E1,#26,#A8,#C8,#A0,#CA,#B4,#CA
db #E2,#00,#E3,#00,#E4,#00,#E5,#00
db #E1,#26,#A8,#C8,#9A,#CA,#D5,#2B
db #E2,#00,#E3,#00,#E4,#00,#E5,#00
x146A db #E6,#E7,#E8,#E9,#EA,#EA,#EA,#EA
x1472 db #A2,#A3,#A4,#A5,#A6,#A7,#C4,#A1
x147A db #4D,#4E,#4E,#4E,#4E,#4E,#4E,#4E
x1482 db #4C,#4B,#4F,#4F,#4F,#4F,#4F,#4F
x148A db #71,#71,#71,#71,#71,#71,#71,#71
x1492 db #C1,#0B,#C2,#0B,#B5,#1B,#B5,#1C
db #4A,#00,#49,#00,#50,#00,#50,#00
x14A2 db #41,#42,#39,#3A
x14A6 db #43,#44,#3B,#3C
x14AA db #45,#46,#3D,#3E
x14AE db #47,#48,#3F,#40
;€„<E282AC>…‘: #14B2 â ¡«¨æë ¤«ï ä®à¬¨à®¢ ­¨ï ª®¬ ­¤ ¤¨§ á¬ 
x14B2 db #4E,#74,#BB,#BA,#11,#10,#31,#AB
db #18,#19,#1A,#17,#16,#0D,#14,#15
db #66,#4C,#4B,#07,#BE,#8A,#9C,#22
db #AF
x14CB db #71,#72,#67,#68,#69,#2B,#B4,#A9
db #EC,#EB,#ED,#B2,#27,#9D,#8B,#C0
db #12,#B0,#29,#9E,#8C,#BF,#13
x14E2 db #49,#4A,#B4,#AE,#AD,#AF,#2B,#21
db #20,#22
x14EC db #52,#51,#6A,#6C,#6B,#6D,#6E,#6F
db #70,#74
;€„<E282AC>…‘: #14F6 ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;¢ëå: cy=1 -> a<#7E ¨«¨ a>#C4
x14F6 cp #7E
ret c
cp #C5
ccf
ret
;€„<E282AC>…‘: #14FD ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;¢ëå: cy=1 -> a<#2C ¨«¨ a>#74
x14FD cp #2C
ret c
cp #75
ccf
ret
;€„<E282AC>…‘: #1504 ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;¢ëå: cy=1 -> a<#2C ¨«¨ a>#C4
x1504 cp #2C
ret c
cp #C5
ccf
ret
;€„<E282AC>…‘: #150B ¯à®¢¥àª  §­ ç¥­¨ï  ªªã¬ã«ïâ®à 
;¢ëå: cy=1 -> a<#01 ¨«¨ a>#2B
x150B cp #01
ret c
cp #2C
ccf
ret
;€„<E282AC>…‘: #1512 ¯¥ç âì ª®¬ ­¤ë  áᥬ¡«¥à 
;¢å: hl -  ¤à¥á áâப¨ ¤¨§ áᥬ¡«¨à®¢ ­­®© ª®¬ ­¤ë
x1512 res 6,(iy+#0E) ;§ ¯ïâ ï ­¥ ­ ¯¥ç â ­ 
call x2B10 ;¯¥ç âì ¯à®¡¥« 
ld a,(hl)
call x14F6 ;cy=1 -> a<#7E ¨«¨ a>#C4
jr c,x1538
;¯¥ç âì ¬­¥¬®­¨ª¨ ¨§ â ¡«¨æë x1107
push hl ;a=[#7E..#C4] -> a=a-#7E =[#00..#46] ¨§ â ¡«¨æë x1107
ld hl,x1107
sub #7E
add a,a
ld e,a
ld d,#00
add hl,de
ld a,(hl) ;¬­¥¬®­¨ª  (­®¬¥à á®®¡é¥­¨ï)
call x1570 ;¯¥ç âì ¬­¥¬®­¨ª¨  áᥬ¡«¥à  á ¯à®¡¥«®¬ ­  ª®­æ¥
ld a,(hl) ;­ ç «® ®¯¥à ­¤  ª®¬ ­¤ë
and #7F
pop hl
;¯¥ç âì ¯¥à¢®£® ®¯¥à ­¤ 
inc hl
call x157F ;¯¥ç âì ®¯¥à ­¤ /ç¨á«  ª®¬ ­¤ë  áᥬ¡«¥à 
jr x1543
x1538 call x14FD ;cy=1 -> a<#2C ¨«¨ a>#74
jr c,x1548 ;+0 =[#00..#2C][#74..#7D][#C5..#FF]
call x1570 ;¬­¥¬®­¨ª  ¡¥§ ®¯¥à ­¤®¢
x1540 call x1599 ;¯¥ç âì ®¯¥à ­¤ /ç¨á« 
x1543 ld a,(hl)
call x1504 ;cy=1 -> a<#2C ¨«¨ a>#C4
ret nc ;a=[#2C..#C4]
x1548 cp #F1
ret z
cp #F7
ret z
cp #EE
jr nz,x1561
;¯¥ç âì ª®¬¬¥­â à¨ï (¤«ï db #nn ;BAD)
call x2B10 ;¯¥ç âì ¯à®¡¥« 
ld a,";"
rst #10
inc hl
x1559 ld a,(hl)
inc hl
cp #F0
ret z
rst #10
jr x1559
;¯¥ç âì §ï¯ï⮩, ¥á«¨ ¥é¥ ­¥ ­ ¯¥ç â ­ 
x1561 bit 6,(iy+#0E)
set 6,(iy+#0E)
jr nz,x1540
ld a,","
rst #10
jr x1540
;€„<E282AC>…‘: #1570 ¯¥ç âì ¬­¥¬®­¨ª¨  áᥬ¡«¥à  á ¯à®¡¥«®¬ ­  ª®­æ¥
;¢å: a - ­®¬¥à á®®¡é¥­¨ï á ¬­¥¬®­¨ª®© =[#2C..#74]
;¢ëå: hl=hl+1
x1570 ld c,(iy+#06)
sub #2C
ld de,x11F7
call x15FC ;¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A, ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë ¢ ‘
inc hl
jp x2B10 ;¯¥ç âì ¯à®¡¥« 
;€„<E282AC>…‘: #157F ¯¥ç âì ®¯¥à ­¤ /ç¨á«  ª®¬ ­¤ë  áᥬ¡«¥à 
;¢å: a - ­®¬¥à ®¯¥à ­¤ /ç¨á«  ª®¬ ­¤ë  áᥬ¡«¥à 
;¢ëå: a - ­®¬¥à á«¥¤ãî饣® ®¯¥à ­¤ /ç¨á«  ª®¬ ­¤ë  áᥬ¡«¥à 
x157F call x150B ;cy=1 -> a<#01 ¨«¨ a>#2B
jr c,x159D
;¯¥ç âì ®¯¥à ­¤  a=[#01..#2B] ¨§ ᯨ᪠ x1196
push af
sub #01
ld de,x1196
call x15FA ;¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A
pop af
cp #27 ;a=[#01..#26]
jr c,x15B1 ;­¥â ᬥ饭¨ï ¤«ï ª®¬ ­¤ (ix/iy+nn),
;¯¥ç â ¬ ç¨á«® á § ªà뢠î饩 ᪮¡ª®©
call x1599 ;a=[#27..#2B]
ld a,")"
rst #10
ret
;¯¥ç âì ®¯¥à ­¤ 
x1599 ld a,(hl)
inc hl
jr x157F
;¯¥ç âì ç¨á«  (a<#01 ¨«¨ a>#2B)
x159D cp #F8
jr c,x15A6 ;a=[#00,#2C..#F7]
call x1626 ;a=[#F8..#FF] ¯¥ç âì ç¨á«  ¨§ (hl) (dec/hex) á ¯à¥ä¨ªá®¬
jr x15B1
;¯¥ç âì á®®¡é¥­¨ï (a=[#00,#2C..#F7])
x15A6 cp #EC
jr nz,x15AF
call x15DB ;a=#EC ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
jr x15B1
;¢ë室
x15AF dec hl
ret
x15B1 ld a,(hl)
ret
;€„<E282AC>…‘: #15B3 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
;¢å: hl -  ¤à¥á ­ ç «  á®®¡é¥­¨ï
; b - ¤«¨­  á®®¡é¥­¨ï
;
x15B3 ld a,(hl)
rst #10
inc hl
djnz x15B3
ret
;€„<E282AC>…‘: #15B9 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl á § ¬¥­®© ­¥¯¥ç â­ëå ᨬ¢®«®¢ ­  ?
;¢å: hl -  ¤à¥á ­ ç «  á®®¡é¥­¨ï
; b - ¤«¨­  á®®¡é¥­¨ï
;
x15B9 ld a,(hl)
cp #20
jr nc,x15C0
ld a,"?"
x15C0 call x2B0B ;¯¥ç âì ᨬ¢®« 
inc hl
djnz x15B9
ret
;€„<E282AC>…‘: #15C7 ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
;¢å: hl -  ¤à¥á ­ ç «  á®®¡é¥­¨ï
;
x15C7 ld a,(hl)
call x2B0B ;¯¥ç âì ᨬ¢®« 
inc hl
rlca
ret c
jr x15C7
;€„<E282AC>…‘: #15D0 ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã (­  íªà ­/¢ ¡ãä¥à)
;¢å: a,e - ­®¬¥à á®®¡é¥­¨ï
; hl -  ¤à¥á ­ ç «  ¡«®ª  á®®¡é¥­¨©
;
x15D0 inc a ;¯®¨áª á®®¡é¥­¨ï ¯® ­®¬¥àã
x15D1 dec a
jr z,x15DB
x15D4 bit 7,(hl)
inc hl
jr z,x15D4
jr x15D1
;€„<E282AC>…‘: #15DB ¯¥ç âì á®®¡é¥­¨ï ¨§ hl
;¢å: hl -  ¤à¥á á®®¡é¥­¨ï
;
x15DB ld b,#01
;€„<E282AC>…‘: #15DD ¯¥ç âì á®®¡é¥­¨ï ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë
;¢å: b - ¬¨­¨¬ «ì­ ï ¤«¨­  á®®¡é¥­¨ï (¤®¯®«­ï¥âáï ¯à®¡¥« ¬¨)
; hl -  ¤à¥á á®®¡é¥­¨ï
;
x15DD or a
x15DE ld a,(hl)
bit 7,a
call x2B0B ;¯¥ç âì ᨬ¢®«  á® á¡à®á®¬ 7£® ¡¨â  (rst #10)
inc hl
jr z,x15EC
ret c
ld a," " ;­ ¯¥ç â ¥¬ ¯à®¡¥«
jr x15F6
x15EC djnz x15DE
scf
ld b,#00
jr x15DE
;€„<E282AC>…‘: #15F3 ¯¥ç âì ­¥áª®«ìª¨å ¯à®¢¥«®¢ (¢ B)
;¢å: b - ª®«¨ç¥á⢮ ¯à®¡¥«®¢
;
x15F3 ld a," "
x15F5 rst #10
x15F6 djnz x15F5
or a
ret
;€„<E282AC>…‘: #15FA ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A
;¢å: de -  ¤à¥á ¡«®ª  á®®¡é¥­¨©
; a - ­®¬¥à á®®¡é¥­¨ï
;
x15FA ld c,#01
;€„<E282AC>…‘: #15FC ¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A, ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë ¢ ‘
;¢å: c - ¬¨­¨¬ «ì­ ï ¤«¨­  á®®¡é¥­¨ï (¤®¯®«­ï¥âáï ¯à®¡¥« ¬¨)
; de -  ¤à¥á ¡«®ª  á®®¡é¥­¨©
; a - ­®¬¥à á®®¡é¥­¨ï
;
x15FC ex de,hl
call x1606 ;¯®¨áª á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A
ld b,c
call x15DD
ex de,hl
ret
;¯®¨áª á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ A
x1606 or a
ret z
ld b,a
x1609 bit 7,(hl)
inc hl
jp z,x1609
djnz x1609
ret
;€„<E282AC>…‘: #1612 ¯¥ç âì ç¨á«  ¢ hl (dec/hex) á ¯à¥ä¨ªá®¬
;¢å: hl - ç¨á«®
;
x1612 ld c,l
ld b,h
;€„<E282AC>…‘: #1614 ¯¥ç âì ç¨á«  ¢ bc (dec/hex) á ¯à¥ä¨ªá®¬
;¢å: bc - ç¨á«®
;
x1614 push de
bit 0,(iy+5)
ld de,#0A00 ;¤¥áïâ¨ç­®¥, ¡¥§ ¯à¥ä¨ªá 
jr nz,x1621
ld de,#1023 ;è¥áâ­ ¤æ â¨à¨ç­®¥, ¯à¥ä¨ªá #
x1621 call x162C ;¯¥ç âì ç¨á«  á ¯à¥ä¨ªá®¬
pop de
ret
;€„<E282AC>…‘: #1626 ¯¥ç âì ç¨á«  ¨§ (hl) (dec/hex) á ¯à¥ä¨ªá®¬
;¢å: 0,a =0/1 ¤¢ãå¡ ©â­®¥/®¤­®¡ ©â­®¥ ç¨á«®
; 1-2,a - á¨á⥬  áç¨á«¥­¨ï (bin/oct/dec/hex)
; hl -  ¤à¥á ï祩ª¨ á ç¨á«®¬
;
x1626 call x1638 ;§ £à㧪  ç¨á«  ¢ bc
;€„<E282AC>…‘: #1629 ¯¥ç âì ç¨á«  ¢ bc (bin/oct/dec/hex) á ¯à¥ä¨ªá®¬
;¢å: bc - ç¨á«®
; 1-2,a - á¨á⥬  áç¨á«¥­¨ï
;
x1629 call x1642 ;ãáâ ­®¢ª  ¯à¥ä¨ªá 
;€„<E282AC>…‘: #162C ¯¥ç âì ç¨á«  ¢ § ¤ ­­®© á¨á⥬¥ áç¨á«¥­¨ï
; bc - ç¨á«®
; d - ¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
; e - ª®¤ ¯à¥ä¨ªá 
x162C ld a,d
ld (xE024),a
ld a,e
rst #10 ;¯¥ç âì ¯à¥ä¨ªá 
ld (iy+7),#01
jr x1673 ;¯¥ç âì ç¨á« 
;§ £à㧪  ç¨á«  ¢ bc
x1638 ld b,#00
ld c,(hl)
inc hl
bit 0,a
ret nz
ld b,(hl)
inc hl
ret
;ãáâ ­®¢ª  ¯à¥ä¨ªá  ¤«ï á¨á⥬ë áç¨á«¥­¨ï
x1642 and %00000110
ld de,#0225 ;bin
cp #02
ret c
ld de,#0840 ;oct
ret z
cp #06
ld de,#0A00 ;dec
ret c
ld de,#1023 ;hex
ret
;€„<E282AC>…‘: #1658 ¯¥ç âì ç¨á«  A á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;¢å: a - ç¨á«®
; b - ¬¨­¨¬ «ì­ ï ¤«¨­ 
;
x1658 ld c,a
ld a,b
ld b,#00
jr x166B
;€„<E282AC>…‘: #165E ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] ¡¥§ ¢¥¤ãé¨å ¯à®¡¥«®¢, á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;¢å: bc - ç¨á«®
;
x165E
scf
jr x1662
;€„<E282AC>…‘: #1661 ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨, á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;¢å: bc - ç¨á«®
;
x1661 or a
x1662 ld a," " ;cy=1/0 ¬¨­¨¬ «ì­ ï ¤«¨­  1/5
rst #10 ;¯¥ç âì ¯à®¡¥« 
ld a,#01
jr c,x166B
;€„<E282AC>…‘: #1669 ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨
;¢å: bc - ç¨á«®
; (xE3BC)  ¤à¥á áâப¨
;
x1669 ld a,#05
x166B ld (iy+#07),a
;€„<E282AC>…‘: #166E ¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨
;¢å: bc - ç¨á«®
; (xE3BC)  ¤à¥á áâப¨
x166E ld de,#000A
jr x1677
;€„<E282AC>…‘: #1673 ¯¥ç âì ç¨á«  bc (­  íªà ­/¢ ¡ãä¥à)
;¢å: bc - ç¨á«®
; (xE024) ¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à冷¢
; (xE01B) ª®«¨ç¥á⮢ à §à冷¢
; (xE3BC)  ¤à¥á áâப¨
;
x1673 ld de,(xE024) ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à冷¢
;€„<E282AC>…‘: #1677 ¯¥ç âì ç¨á«  bc (­  íªà ­/¢ ¡ãä¥à)
;¢å: bc - ç¨á«®
; de - ¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à冷¢
; (xE01B) ª®«¨ç¥á⮢ à §à冷¢
; (xE3BC)  ¤à¥á áâப¨
;
x1677 push hl
call x1681 ;¯à¥®¡à §®¢ ­¨¥ ç¨á«  ¢ áâபã
pop hl
ret
x167D ld a,b
or c
jr z,x169E
x1681 dec (iy+7) ;¯à¥®¡à §®¢ ­¨¥ ç¨á«  ¢ áâபã
ld a,b
call x16AA ;¤¥«¥­¨¥ bc=ac/de
push hl ;hl ®áâ â®ª ®â ¤¥«¥­¨ï
call x167D
pop hl
ld a,l
add a,#90
daa
adc a,#40
daa
and #7F
cp #20
jr nc,x169C
ld a," "
x169C rst #10
ret
x169E dec (iy+7)
ret m
call x167D
ld a,(iy+8)
rst #10
ret
;€„<E282AC>…‘: #16AA ¤¥«¥­¨¥ bc=ac/de
;¢ëå: bc=ac/de
; hl ®áâ â®ª ®â ¤¥«¥­¨ï
;
x16AA ld hl,#0000
ld b,#10
x16AF rl c
rla
adc hl,hl
sbc hl,de
ccf
jr nc,x16C8
x16B9 djnz x16AF
rl c
rla
ld b,a
ret
x16C0 rl c
rla
adc hl,hl
add hl,de
jr c,x16B9
x16C8 djnz x16C0
rl c
rla
add hl,de
ld b,a
ret
;€„<E282AC>…‘: #16D0 ¯¥ç âì áâப¨ (rst #20)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x16D0 ex (sp),hl
push af
x16D2 ld a,(hl)
call x2B0B ;¯¥ç âì ᨬ¢®«  á® á¡à®á®¬ 7£® ¡¨â  (rst #10)
and #80
inc hl
jr z,x16D2
pop af
ex (sp),hl
ret
;€„<E282AC>…‘: #16DE ¯¥ç âì ç¨á«  hl=[#0000..#FFFF]
;¢å: hl - ç¨á«®
;
x16DE ld a,h
call x16E3
ld a,l
;€„<E282AC>…‘: #16E3 ¯¥ç âì ç¨á«  [#00..#FF]
;¢å: a - ç¨á«®
;
x16E3 push af
rlca
rlca
rlca
rlca
call x16EC
pop af
;€„<E282AC>…‘: #16EC ¯¥ç âì ç¨á«  [#0..#F]
;¢å: 0-3,a - ç¨á«®
;
x16EC and #0F
add a,#90
daa
adc a,#40
daa
rst #10
ret
;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
x16F6 ld l,(iy+#02) ;¤«¨­  ª®¬ ­¤ë ¤«ï ¤¨§ á¬  ¢ ¡ ©â å
jr x1744
;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
x16FB ld l,#01
jr x1744
;€„<E282AC>…‘: #16FF ¨á¯®«­¥­¨¥ § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  st0-st9
x16FF bit 4,(iy+#14)
ret z ; ­ «¨§ â®à ¢ëª«î祭
ld hl,xE9A9 ;â ¡«¨æ   ¤à¥á®¢ á«®¢ st0-st9  ­ «¨§ â®à 
xor a
x1708 push af
ld e,(hl)
inc hl
ld d,(hl)
inc hl
push hl
ld a,d
or e
call nz,x1DE5 ;¢ë¯®«­¥­¨¥ á«®¢   ­ «¨§ â®à 
pop hl
pop af
inc a
cp #0A
jr nz,x1708
ret
;€„<E282AC>…‘: #171B ¢ë¯®«­¥­¨¥(âà áá¨à®¢ª ) áä®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
x171B ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
push hl
ld hl,(xE11A) ; ¤à¥á ­ ç «  á®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¤«ï âà áá¨à®¢ª¨
ld (xDD6B),hl ;­®¢ë© PC
ld hl,x173A ; ¤à¥á ¢®§¢à â 
push hl
ld (xE38D),sp ;á®åà ­¨¬ áâíª
ld hl,xE026
set 5,(hl) ;¢ë¯®«­ï¥âáï âà áá¨à®¢ª  ¨§ ®â« ¤ç¨ª 
bit 3,(hl)
call nz,x0581 ;¢®ááâ ­®¢«¥­¨¥ íªà ­  ¢ áâà ­¨æ¥ 5
jp x0143 ;¢ë室 ¨§ ¬®­¨â®à  ¨ ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë
x173A res 5,(iy+#12)
pop hl
ld (xDD6B),hl ;¢®ááâ ­®¢¨¬ PC ¯®«ì§®¢ â¥«ï
;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
x1742 ld l,#FF
x1744 ld a,(xDD83+#01) ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
ld h,a
add a,l
rlca
sla h
rra
ld (xDD83+#01),a
ret
;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jr cc
;¢ëå: cy=1 ãá«®¢¨¥ ¢ë¯®«­¥­®
x1751 ld hl,(xE11A)
inc hl
inc hl
ld (hl),#02 ;jr cc,$+4
jr x1782
;¡ëáâà ï âà áá¨à®¢ª  ª®¬ ­¤ë call
x175A ld hl,(xDDAA)
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld e,a
inc hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld d,a
inc hl
ld (xDDAA),hl
ld hl,(xE11A)
inc hl
inc hl
ld (hl),e
inc hl
ld (hl),d
inc hl
ld (hl),#CF ;rst #08
jr x171B ;¢ë¯®«­¥­¨¥(âà áá¨à®¢ª ) áä®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jp cc/call cc/ret cc
;¢ëå: cy=1 ãá«®¢¨¥ ¢ë¯®«­¥­®
x1773 ld hl,(xE11A)
inc hl
inc hl
push hl ;ãáâ ­®¢ª  ª®¬ ­¤ë: jp cc,$+5
ld de,#0004
add hl,de
ex de,hl
pop hl
ld (hl),e
inc hl
ld (hl),d
x1782 inc hl
ld (hl),#B7 ;or a
inc hl
ld (hl),#CF ;rst #08
inc hl
ld (hl),#37 ;scf
inc hl
ld (hl),#CF ;rst #08
ld a,(xDD7F) ;ä« £¨ ¯®«ì§®¢ â¥«ï
push af
call x171B ;¢ë¯®«­¥­¨¥(âà áá¨à®¢ª ) áä®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
call x1742 ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
ld a,(xDD7F) ;ॣ¨áâà f
rrca ;ä« £ CY ¯®«ì§®¢ â¥«ï
pop hl
ld a,h
ld (xDD7F),a ;¢®ááâ ­®¢¨¬ ä« £¨
ret
;exx ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
x17A2 ld hl,xDD73 ;ॣ¨áâà hl
ld de,xDD79 ;ॣ¨áâà hl'
ld b,#06
x17AA ld a,(de)
ld c,(hl)
ex de,hl
ld (de),a
ld (hl),c
inc de
inc hl
djnz x17AA
ret
;ex af,af' ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
x17B4 ld hl,xDD7F ;ॣ¨áâà af
ld de,xDD81 ;ॣ¨áâà af'
ld b,#02
jr x17AA
;âà áá¨à®¢ª  ª®¬ ­¤ë rst #08
x17BE ld de,#0008
ld hl,(xDDD0) ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë ¤¨§ á¬ 
or a
sbc hl,de
jr nz,x1807 ;ä®à¬¨à㥬 ª®¬ ­¤ã ¤«ï ¨á¯®«­¥­¨ï
ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
ld e,#FF
jp x01F5 ;¢ë§®¢ ®¡à ¡®â稪  ®è¨¡®ª Basic 48k
;âà áá¨à®¢ª  ª®¬ ­¤ë halt
x17D1 ld a,(xDD83) ;ä« £ IFFF2
bit 2,a
jr nz,x17EA ;¯à¥à뢠¥­¨ï à §à¥è¥­ë
ld a,#AB ;di:halt -> á®®¡é¥­¨¥: finish program
jp x0AE0 ;¯¥ç âì/®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;ª®¬ ­¤ë: ex af,af' ¨ exx
x17DD ld a,(xDDB4) ;1© ¡ ©â ª®¬ ­¤ë ¤¨§ áᥬ¡«¥à  ¡¥§ ¯à¥ä¨ªá®¢
cp #08 ;ª®¬ ­¤  ex af,af'
push af
call z,x17B4 ;ex af,af' ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
pop af
call nz,x17A2 ;exx ॣ¨áâ஢ ¯®«ì§®¢ â¥«ï
x17EA call x16FB ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
jp x18BD ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
;€„<E282AC>…‘: #17F0 ¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë ¯®  ¤à¥áã ¢ PC
x17F0 ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
call x191E ;¯à®¢¥àª  ¯®¯ ¤ ­¨ï  ¤à¥á  ­   ¤à¥á  #3D00-#3DFF
jp nc,x18F1 ;¢®§¬®¦­  ⮫쪮 ¡ëáâà ï âà áá¨à®¢ª , pc ¯®«ì§®¢ â¥«ï ¢ ¯à¥¤¥« å #3D00..#3DFF
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à  ¯®  ¤à¥áã ¢ hl
ld a,(xDDB7)
cp #32 ;íâ® halt
jr z,x17D1
cp #72 ;íâ® rst #08
jr z,x17BE
;ä®à¬¨à㥬 ª®¬ ­¤ã ¤«ï ¨á¯®«­¥­¨ï
; á®åà ­¨¬ ¯ ¬ïâì ¢ ¡ãä¥à¥
x1807 ld hl,(xE11A) ; ¤à¥á ¯ ¬ïâ¨(8 ¡ ©â) ­ ç «  á®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¤«ï âà áá¨à®¢ª¨
push hl
ld de,xE39A ;¡ãä¥à ¤«ï á®åà ­¥­¨ï ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯à¨ âà áá¨à®¢ª¥ ª®¬ ­¤ë ¤¨§ á¬ 
ld bc,#0008
ldir
pop de
; ãáâ ­®¢¨¬ ०¨¬ ¯à¥à뢠­¨©
ld a,(xDD83) ;ä« £ IFFF2
bit 2,a
ld a,#F3 ;di
jr z,x181F
ld a,#FB ;ei
x181F ld (de),a
inc de
; ª®¯¨à㥬 ª®¬ ­¤ã ¢ ¡ãä¥à ¤«ï ¨á¯®«­¥­¨ï
ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
ld c,(iy+#02) ;¤«¨­  ª®¬ ­¤ë ¢ ¡ ©â å
ld b,#00
call x0753 ;á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
; áâ ¢¨¬ rst #08 ¤«ï ¢®§¢à â 
ld a,#CF ;rst #08
ld (de),a
ld a,(iy+#03)
or a
jp z,x18BA ;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë ¯à¨ âà áá¨à®¢ª¥
;¤«ï ª®¬ ­¤ë exx/ex af,af'
bit 7,a
jr nz,x17DD ;ª®¬ ­¤ë: ex af,af' ¨ exx
;¤«ï ª®¬ ­¤ë ret/ret cc
bit 1,a
jr z,x185A ;íâ® ­¥ ret
bit 5,a
jr z,x1851 ;íâ® ª®¬ ­¤  ret
; ª®¬ ­¤  ret cc
ld hl,(xE11A) ; ¤à¥á ¯ ¬ïâ¨(8 ¡ ©â) ­ ç «  á®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¤«ï âà áá¨à®¢ª¨
inc hl ;¯®¯à ¢ª  ­  di/ei
ld a,(hl)
and %00111000
or %11000010
ld (hl),a
call x1773 ;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jp cc/jr cc/call cc/ret cc
jr nc,x1861 ;ãá«®¢¨¥ ­¥ ¢ë¯®«­¥­®
x1851 call nc,x16F6 ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
call x3640 ;pop de á® áâíª  ¯®«ì§®¢ â¥«ï
ex de,hl
jr x18C0 ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
;¤«ï ª®¬ ­¤ jr cc
x185A bit 2,a
jr z,x1865
call x1751 ;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jr cc
x1861 jr nc,x18BD ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
jr x18A7 ;ãá«®¢¨¥ ¢ë¯®«­¥­®
;¤«ï ª®¬ ­¤ call/call cc
x1865 bit 0,a
jr z,x1894
bit 7,(iy+#16)
jr nz,x18D5 ;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥ á ¡ëáâàë¬ ¢ë¯®«­¥­¨¥¬ ¯®¤¯à®£à ¬¬
; ¯®è £®¢ ï âà áá¨à®¢ª 
call x190F
jr c,x18DA ;⮫쪮 ¡ëáâà ï âà áá¨à®¢ª 
x1874 ld hl,(xE11A) ; ¤à¥á ¯ ¬ïâ¨(8 ¡ ©â) ­ ç «  á®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¤«ï âà áá¨à®¢ª¨
inc hl
ld a,(hl)
or a
bit 0,a
jr nz,x1888 ;íâ® call
and %00111000 ;íâ® call cc
or %11000010
ld (hl),a
call x1773 ;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jp cc/call cc/ret cc
jr nc,x18BD ;ãá«®¢¨¥ ­¥ ¢ë¯®«­¥­®
; ãáâ ­®¢ª  ॣ¨áâ஢ ¨ áâíª  ¤«ï ¢ë§®¢  ª®¬ ­¤ë call
x1888 call nc,x16FB ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
ld de,(xDDAA) ;⥪ã騩  ¤à¥á ª®¬ ­¤ë  áᥬ¡«¥à  ¤«ï ¤¨§ á¬ 
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
jr x18A7
;¤«ï ª®¬ ­¤ jp/jp cc
x1894 bit 3,a
jr z,x18AC
call x1773 ;âà áá¨à®¢ª  ª®¬ ­¤ á ãá«®¢¨¥¬ ¯¥à¥å®¤  jp cc/call cc/ret cc
jr nc,x18BD ;ãá«®¢¨¥ ­¥ ¢ë¯®«­¥­®
call x190F ;¯à®¢¥àª  ¢®§¬®¦­®á⨠¯®è £®¢®© âà áá¨à®¢ª¨ ª®¬ ­¤ call
push af
call c,x1742 ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
pop af
jr c,x18F4 ;⮫쪮 ¡ëáâà ï âà áá¨à®¢ª 
x18A7 ld hl,(xDDD0) ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë ¤¨§ á¬ 
jr x18C0 ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
;¤«ï ¯ãáâëå ª®¬ ­¤???
x18AC bit 4,a
jr z,x18B5
call x16FB ;ª®à४æ¨ï ॣ¨áâà  r ¯®«ì§®¢ â¥«ï
jr x18A7
;­¥¨§¢¥áâ­ ï ª®¬ ­¤ 
x18B5 ld a,#AA
jp x0AE0 ;¯¥ç âì/®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë ¯à¨ âà áá¨à®¢ª¥
x18BA call x171B ;¢ë¯®«­¥­¨¥(âà áá¨à®¢ª ) áä®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
x18BD ld hl,(xDDAA) ;⥪ã騩  ¤à¥á ª®¬ ­¤ë  áᥬ¡«¥à  ¤«ï ¤¨§ á¬ 
;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
;¢å: hl - PC ¯®«ì§®¢ â¥«ï
x18C0 ld (xDD6B),hl ;­®¢ë© PC ¯®«ì§®¢ â¥«ï
push hl
ld hl,xE39A ;¡ãä¥à ¤«ï á®åà ­¥­¨ï ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯à¨ âà áá¨à®¢ª¥ ª®¬ ­¤ë ¤¨§ á¬ 
ld de,(xE11A) ; ¤à¥á ¯ ¬ïâ¨(8 ¡ ©â) ­ ç «  á®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¤«ï âà áá¨à®¢ª¨
ld bc,#0008
ldir
call x16FF ;¨á¯®«­¥­¨¥ § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  st0-st9
pop hl
ret
;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥ á ¡ëáâàë¬ ¢ë¯®«­¥­¨¥¬ ¯®¤¯à®£à ¬¬
; ¢ë§®¢ call
x18D5 call x191B ;¯à®¢¥àª  ¯®¯ ¤ ­¨ï  ¤à¥á  ª®¬ ­¤ë ­   ¤à¥á  #3D00-#3DFF
jr nc,x1874 ;¢ë§®¢ ­¥¢®§¬®¦¥­, íâ® Tr-Dos
x18DA ld hl,(xDDD0)
ld de,#0028
or a
sbc hl,de
jr nz,x18BA ;¢ë¯®«­¥­¨¥ ª®¬ ­¤ë ¯à¨ âà áá¨à®¢ª¥
; íâ® call #28/rst #28
bit 4,(iy-#02)
jp nz,x1874 ;íâ® Basic 48k
call x175A ;¡ëáâà ï âà áá¨à®¢ª  ª®¬ ­¤ë call
jr x18BD ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
;⮫쪮 ¡ëáâà ï âà áá¨à®¢ª 
;¢å: hl - PC ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
x18F1 ld (xDDD0),hl ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë ¤¨§ á¬ 
x18F4 ld hl,(xE11A)
inc hl
ld (hl),#CD ;call #nnnn
inc hl
ld de,(xDDD0)
ld (hl),e
inc hl
ld (hl),d
inc hl
ld (hl),#CF ;rst #08
call x3640 ;pop de á® áâíª  ¯®«ì§®¢ â¥«ï
push de
call x171B ;¢ë¯®«­¥­¨¥(âà áá¨à®¢ª ) áä®à¬¨à®¢ ­­®© ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
pop hl
jr x18C0
;¯à®¢¥àª  ¢®§¬®¦­®á⨠¯®è £®¢®© âà áá¨à®¢ª¨ ª®¬ ­¤ call
;¢ëå: cy=1 ¢®§¬®¦­  ⮫쪮 ¡ëáâà ï âà áá¨à®¢ª 
x190F or a
bit 3,(iy+#05) ;<3B>¥ âà áá¨à®¢ âì (¢ë¯®«­ïâì áà §ã) ¯®¤¯à®£à ¬¬ë, à á¯®«®¦¥­­ë¥ ¢ <20>‡“
ret z
ld a,(xDDD0+#01)
cp #40
ret nc ;íâ® ­¥ <20>‡“
;€„<E282AC>…‘: #191B ¯à®¢¥àª  ¯®¯ ¤ ­¨ï  ¤à¥á  ª®¬ ­¤ë ­   ¤à¥á  #3D00-#3DFF
;¢ëå: cy=0 pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï ¢ ¯ ¬ï⨠#3D00-#3DFF ᥫ«¥ªâ®à ¢ª«î祭¨ï tr-dos
x191B ld hl,(xDDD0) ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë ¤¨§ á¬ 
;€„<E282AC>…‘: #191E ¯à®¢¥àª  ¯®¯ ¤ ­¨ï  ¤à¥á  ­   ¤à¥á  #3D00-#3DFF
;¢å: hl - pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
;¢ëå: cy=0 pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï ¢ ¯ ¬ï⨠#3D00-#3DFF ᥫ«¥ªâ®à ¢ª«î祭¨ï tr-dos
x191E bit 4,(iy-#02) ;4,#7FFD ¯®«ì§®¢ â¥«ï
scf
ret z ;<3B>‡“ Basic128 ¯®«ì§®¢ â¥«ï
ld de,#3D00
or a
sbc hl,de
add hl,de
ret c
ld de,#3E00
sbc hl,de
add hl,de
ccf
ret
;á®®¡é¥­¨¥ ¤¨§ á¬  ¤«ï ­¥®¯®§­ ­­®© ª®¬ ­¤ë
x1934 db #73 ;DB
db #FF ;¯à¨§­ ª ç¨á«  hex 1 ¡ ©â
db #00 ;ç¨á«®
db #EE,"BAD",#F0 ;á®®¡é¥­¨¥
;¢ë室 ¨§ ¯/¯ x197F  ­ «¨§  ª®¬ ­¤ë  áᥬ¡«¥à 
x193C ld (ix+0),#F7 ;¯à¨§­ ª ª®­æ  ª®¬ ­¤ë
pop ix
ret
;ª®¬ ­¤  ex de,hl
x1943 ld (ix+0),#AA ;¯¥à¢ ï ç áâì: ex de
inc ix
ld (ix+0),#07 ;¢â®à ï ç áâì: hl
x194D inc ix
x194F ld (iy+2),#01 ;¤«¨­  ª®¬ ­¤ë ¢ ¡ ©â å
jp x1A78
;ª®¬ ­¤  halt
x1956 ld (ix+0),#32 ;­®¬¥à á®®¡é¥­¨ï ¬­¥¬®­¨ª¨: halt
ld a,(hl)
or a
jr z,x194D ;¥á«¨ ¡ë« ¯à¥ä¨ªá, ª®¬ ­¤  ­¥¨§¢¥áâ­ 
;­¥¨§¢¥áâ­ ï ª®¬ ­¤ 
x195E ld hl,x1934 ;ª®¬ ­¤  ­¥¨§¢¥áâ­ 
ld de,xDDB7
ld bc,#0008
ldir
push de
pop ix
xor a
ld (iy+#01),a ;­¥â ¯à¥ä¨ªá 
ld (iy+#04),a
ld (iy+#03),#40
ld a,(xDDAC) ;ª®¤ ¯¥à¢®£® ¡ ©â  ª®¬ ­¤ë
ld (xDDB7+#02),a ;®â®¡à §¨âáï ¢ á®®¡é¥­¨¨ DB #??
jr x194F
;€„<E282AC>…‘: #197F  ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
; ä®à¬¨à®¢ ­¨¥ á®®¡é¥­¨ï ¤«ï ¯¥ç â¨ ¤¨§ á¬  ª®¬ ­¤ë
;¢ëå: bc - ¤«¨­  ª®¬ ­¤ë  áᥡ«¥à 
x197F push ix
;ãáâ ­®¢ª  ॣ¨áâ஢
ld ix,xDDB7 ;¡ãä¥à á®®¡é¥­¨ï
ld de,(xDDAA) ; ¤à¥á ª®¬ ­¤ë
ld hl,x193C ; ¤à¥á ¢®§¢à â 
push hl
ld (xDDCB),sp
bit 4,(iy+#00)
jr z,x199F
call x1DB3 ;¯®¨áª 祣®-â® cy=1 ­ ©¤¥­®
ld b,#F1
call c,x1D88
;®¡­ã«¥­¨¥ ¤¨§ á¬  ª®¬ ­¤ë  áᥬ¡«¥à 
x199F ld e,#09
ld hl,xE015 ;iy+#01
xor a
ld d,a ;­ ç «ì­ ï ¤«¨­  ª®¬ ­¤ë =0
ld (hl),a
ld (xDDCD),a
ld (xE017),a
ld (xE018),a
;¯à®¢¥àª  ­ «¨ç¨ï ¯à¥ä¨ªá®¢
ld bc,xDDAC ;­ ç «® ª®¬ ­¤ë
ld a,(bc)
cp #EB
jr z,x1943 ;íâ® ex de,hl
cp #DD ;¯à®¢¥àª  ­  ¯à¥ä¨ªá #DD
jr nz,x19C2 ;­¥â ¯à¥ä¨ªá 
ld (hl),#02 ;¯à¥ä¨ªá #DD
inc bc
inc d ;¤«¨­  ª®¬ ­¤ë
jr x19CA
x19C2 cp #FD ;¯à®¢¥àª  ­  ¯à¥ä¨ªá #FD
jr nz,x19CA ;­¥â ¯à¥ä¨ªá 
ld (hl),#03 ;¯à¥ä¨ªá #FD
inc bc
inc d ;¤«¨­  ª®¬ ­¤ë
x19CA ld a,(bc)
cp #76 ;halt
jr z,x1956 ;íâ® ª®¬ ­¤  halt
cp #CB ;¯à®¢¥àª  ­  ¯à¥ä¨ªá #CB
jr nz,x19DB ;­¥â ¯à¥ä¨ªá 
set 3,(hl) ;¯à¥ä¨ªá #CB
ld e,#16
inc bc
inc d ;¤«¨­  ª®¬ ­¤ë
jr x19EA
x19DB cp #ED ;¯à®¢¥àª  ­  ¯à¥ä¨ªá #ED
jr nz,x19EA ;­¥â ¯à¥ä¨ªá 
set 2,(hl) ;¯à¥ä¨ªá #ED
bit 1,(hl)
jp nz,x195E ;¥áâì ¯à¥ä¨ªá #DD/#FD. ­¥¨§¢¥áâ­ ï ª®¬ ­¤ 
inc bc
ld e,#18
inc d ;¤«¨­  ª®¬ ­¤ë
x19EA inc d ;¤«¨­  ª®¬ ­¤ë
ld (iy+#02),d ;¤«¨­  ª®¬ ­¤ë
;ª®¯¨à㥬 ª®¬ ­¤ã ¢ ¡ãä¥à ¡¥§ ¯à¥ä¨ªá 
push de
ld de,xDDB4 ;ª®¯¨à㥬 ¢ ¡ãä¥à ª®¬ ­¤ã ¡¥§ ¯à¥ä¨ªá®¢
ld h,b
ld l,c
ld bc,#0003
ldir
pop de
ld a,(xE015) ;ª®à४â¨à®¢ª  ª®¬ ­¤ë ¡¥§ ãç¥â  ¯à¥ä¨ªá®¢
and %00001010
cp %00001010
jr nz,x1A09
ld a,(xDDB4+#01) ;¤¢  ¯à¥ä¨ªá  #CB ¨ #DD/#FD
ld (xDDB4),a ;ª®¤ ª®¬ ­¤ë
;ä®à¬¨à®¢ ­¨¥ ª®¬ ­¤ë ¤¨§ á¬  ¯® â ¡«¨æ¥
x1A09 xor a
push af
push af
ld a,e ;e=#09/#16/#18
x1A0D add a,a
add a,a
ld b,#00
ld c,a
ld hl,x12D2-#04
add hl,bc
ld c,(hl)
inc hl
ld d,(hl)
inc hl
ld a,(hl)
inc hl
ld h,(hl)
ld l,a ;hl -  ¤à¥á ­ ç «  â ¡«¨æë
ld a,(xDDB4) ;ª®¤ ª®¬ ­¤ë ¡¥§ ãç¥â  ¯à¥ä¨ªá®¢
ld b,#00
and c
x1A24 inc b
srl c
jr nc,x1A24
or a
x1A2A dec b
jr z,x1A30
rrca
jr x1A2A
x1A30 bit 0,d
jr nz,x1A35
add a,a
x1A35 ld b,#00
ld c,a
add hl,bc
x1A39 ld a,(hl)
inc hl
dec d
or a
jr z,x1A62
cp #EA
jp z,x195E ;­¥¨§¢¥áâ­ ï ª®¬ ­¤ 
cp #C5
jr c,x1A94
cp #EA
jr nc,x1A94
sub #C6
cp #17
jr nz,x1A56
set 6,(iy+#04)
x1A56 bit 0,d
jr z,x1A0D
push de
push hl
jr x1A0D
x1A5E ld a,d
or a
jr nz,x1A39
x1A62 pop hl
pop de
ld a,d
or a
jr nz,x1A39
ld hl,xE015
bit 1,(hl)
jr z,x1A78 ;­¥â ¯à¥ä¨ªá  #DD/#FD
bit 4,(hl)
jr nz,x1A78
bit 7,(hl)
jp z,x195E ;;­¥¨§¢¥áâ­ ï ª®¬ ­¤ 
x1A78 ld bc,(xE016) ;¤«¨­  ª®¬ ­¤ë
ld b,#00
ld sp,(xDDCB) ;¢®ááâ ­®¢¨¬ áâíª
ret
x1A83 cp #20
jr nc,x1AA7
ld (ix+#00),a
inc ix
set 5,(iy+#01)
ld a,#22
jr x1AA7
x1A94 push de
push hl
bit 1,(iy+#01)
jr z,x1AA7 ;­¥â ¯à¥ä¨ªá  #DD/#FD
ld hl,xE018
bit 7,(hl)
jr nz,x1A83
bit 6,(hl)
jr nz,x1A83
x1AA7 push af
x1AA8 ld hl,x14B2
ld bc,#0024
cpir
ld b,a
jp nz,x1BD1
ld a,c
cp #1E
jr nc,x1AD5
cp #1C
jr nc,x1B27
cp #0B
jp c,x1C5B
cp #14
ld hl,xE017
jr nc,x1B2D
cp #11
jr c,x1B3A
set 1,(hl)
jp x1BD1
x1AD2 dec b
jr x1B0E
x1AD5 ld hl,xE015
cp #23
jr z,x1AD2
jr c,x1AE9
cp #2C
jr nc,x1B13
set 3,(iy+#04)
jp x1BD1
x1AE9 cp #22
jr z,x1B0E
bit 1,(hl)
jr z,x1B10
bit 3,(hl)
jr nz,x1B10 ;¥áâì ¯à¥ä¨ªá #‘‚
sub #1D
cp #03
jr nc,x1B23
bit 7,(hl)
jr nz,x1B10
bit 5,(iy+#04)
jr nz,x1B10
x1B05 bit 0,(hl)
jr z,x1B0B ;íâ® ¯à¥ä¨ªá #DD
add a,#02
x1B0B ld b,a
set 4,(hl)
x1B0E set 5,(hl)
x1B10 jp x1BD1
x1B13 set 5,(hl)
cp #2D
jr nc,x1B1E
ld a,#66
jp x1AA8
x1B1E ld b,#33
jp x1BD1
x1B23 add a,#7B
jr x1B05
x1B27 set 7,(iy+#03) ;íâ® ex af,af' «¨¡® exx
jr x1B10
x1B2D bit 1,(hl)
jr z,x1B10 ;­¥â ¯à¥ä¨ªá  #DD/#FD
set 5,(hl)
sub #14
ld (xE032),a
jr x1B10
x1B3A ld hl,(xDD73) ;ॣ¨áâà hl
ld (xDDCE),hl
cp #0E
jr nz,x1B60
set 4,(iy+#03) ;íâ® jp (hl)
bit 1,(iy+#01)
jr z,x1B5D ;­¥â ¯à¥ä¨ªá  #DD/#FD
ld hl,(xDD6F) ;ॣ¨áâà ix
bit 0,(iy+#01)
jr z,x1B5A
ld hl,(xDD71) ;ॣ¨áâà iy
x1B5A ld (xDDCE),hl
x1B5D ld (xDDD0),hl
x1B60 ld hl,xE015
ld a,(hl)
bit 1,a
jr z,x1B10 ;­¥â ¯à¥ä¨ªá  #DD/#FD
set 7,(hl)
ld e,c
ld hl,x14CB
bit 0,a
ld b,#00
jr z,x1B78 ;¯à¥ä¨ªá #DD
ld a,c
add a,#06
ld c,a
x1B78 add hl,bc
ld b,(hl)
ld (ix+#00),b
inc ix
ld a,e
cp #0D
jr nc,x1BD6
cp #0C
jr nz,x1BA0
bit 4,(iy+#01)
jr z,x1BA0
ld a,#01
and (ix-#02)
add a,#BA
ld (ix-#02),a
res 4,(iy+#01)
res 5,(iy+#01)
x1BA0 inc (iy+#02)
ld a,(xDDAC+#02)
or a
jp p,x1BAF
inc (ix-#01)
neg
x1BAF ld (ix+#00),#FD
inc ix
ld b,a
ld hl,(xDD6F) ;ॣ¨áâà ix
bit 0,(iy+#01)
jr z,x1BC2 ;¯à¥ä¨ªá #DD
ld hl,(xDD71) ;ॣ¨áâà ix
x1BC2 ld de,(xDDAC+#02)
ld d,#00
bit 7,e
jr z,x1BCD
dec d
x1BCD add hl,de
ld (xDDCE),hl ; ¤à¥á ¯¥à¥å®¤  ¯à¨ ¤¨§ á¬¥
x1BD1 ld (ix+#00),b
inc ix
x1BD6 pop af
push af
ld hl,x14E2
ld bc,#000A
cpir
jr nz,x1C3C
ld a,c
cp #08
jr nc,x1C45
and #03
jr z,x1C00
dec a
jr z,x1BF6
dec a
jr z,x1BFB
ld hl,(xDDD0)
jr x1C03
x1BF6 ld hl,(xDD77) ;ॣ¨áâà bc
jr x1C03
x1BFB ld hl,(xDD75) ;ॣ¨áâà de
jr x1C03
x1C00 ld hl,(xDDCE) ; ¤à¥á ¯¥à¥å®¤  ¯à¨ ¤¨§ á¬¥
x1C03 ld (xDDD2),hl ; ¤à¥á ­  ª®â®àë© ááë« îâáï ª®¬ ­¤ë à ¡®â î騥 á ï祩ª ¬¨ ¯ ¬ïâ¨
ld a,c
cp #04
ld b,#02
jr nc,x1C35
dec b
cp #03
jr nz,x1C1B
ld a,(xDDCD) ;ª®¤ ª®¬ ­¤ë ¤¨§ á¬ 
cp #A1
jr nz,x1C35
jr x1C3C
x1C1B or a
jr nz,x1C35
ld a,(xDDCD) ;ª®¤ ª®¬ ­¤ë ¤¨§ á¬ 
ld hl,x14EC
ld bc,#000A
cpir
jr z,x1C33
bit 7,(iy+#04)
ld b,#01
jr z,x1C35
x1C33 ld b,#03
x1C35 ld a,b
or (iy+#04)
ld (iy+#04),a
x1C3C pop af
ld (xDDCD),a ;ª®¤ ª®¬ ­¤ë ¤¨§ á¬ 
pop hl
pop de
jp x1A5E
x1C45 ld b,#03
ld hl,(xDD73) ;ॣ¨áâà hl
ld (xDDD2),hl ; ¤à¥á ­  ª®â®àë© ááë« îâáï ª®¬ ­¤ë à ¡®â î騥 á ï祩ª ¬¨ ¯ ¬ïâ¨
jr x1C35
x1C4F ld (xDDD0),de
ld b,#EC
call x1D88
jp x1BD6
x1C5B cp #03
jr c,x1C64
ld (ix+#00),b
inc ix
x1C64 ld d,#00
ld hl,xE017
cp #01
jp c,x1D00
jr z,x1C8E
cp #04
jr c,x1CC9
cp #06
jr c,x1C8E
cp #08
jr c,x1CE4
jr z,x1CE8
cp #0A
jp z,x1D58
ld a,(xDDB4) ;ª®¬ ­¤  ¤¨§ áᥬ¡«¥à  ¡¥§ ¯à¥ä¨ªá®¢
and #38
set 0,(hl) ;íâ® ª®¬ ­¤  call/call cc
ld e,a
jp x1D44
x1C8E ld a,(xDDCD) ;ª®¤ ª®¬ ­¤ë ¤¨§ á¬ 
cp #A1
jr z,x1CC9
cp #55
jr z,x1CBB
cp #53
jr z,x1CAC
cp #91
jr nc,x1CB0
cp #82
jr c,x1CBD
set 5,(hl) ;íâ® ª®¬ ­¤  ret cc
sub #82
ld (xE032),a
x1CAC set 3,(hl) ;íâ® ª®¬ ­¤  jp/jp cc
jr x1CBD
x1CB0 cp #99
jr nc,x1CBD
set 5,(hl) ;íâ® ª®¬ ­¤  ret cc
sub #91
ld (xE032),a
x1CBB set 0,(hl) ;íâ® ª®¬ ­¤  call/call cc
x1CBD ld de,(xDDB4+#01)
inc (iy+#02)
inc (iy+#02)
jr x1D2C
x1CC9 inc (iy+#02)
ld b,#FF
ld hl,xE015
bit 1,(hl)
jr z,x1CDE ;­¥â ¯à¥ä¨ªá  #DD/#FD
bit 4,(hl)
jr nz,x1CDE
ld a,(xDDB4+#02)
jr x1CE1
x1CDE ld a,(xDDB4+#01)
x1CE1 ld e,a
jr x1CF7
x1CE4 set 7,(iy+#04)
x1CE8 ld a,(xDDB4)
set 5,(iy+#04)
and #38
rrca
rrca
rrca
ld e,a
x1CF5 ld b,#FD
x1CF7 ld (ix+#00),b
inc ix
ld b,e
jp x1BD1
;¡ ©â®¢®¥ ᬥ饭¨¥ ¢ ª®¬ ­¤¥
x1D00 ld a,(xDDCD)
cp #65
jr nz,x1D0B
set 2,(iy+#04)
x1D0B sub #8D
jr c,x1D14
ld (xE032),a
set 5,(hl)
x1D14 inc (iy+#02)
set 2,(hl)
ld a,(xDDB4+#01) ;¢â®à®© ¡ ©â ª®¬ ­¤ë
ld d,#00
or a
jp p,x1D23
dec d
x1D23 ld e,a
ld hl,(xDDAA) ; ¤à¥á ª®¬ ­¤ë
inc hl
inc hl
add hl,de
ld e,l
ld d,h
x1D2C set 6,(iy+#01) ;¡ ©â®¢®¥ ᬥ饭¨¥ ¢ ª®¬ ­¤¥
bit 4,(iy+#00)
jr z,x1D3C
call x1DB3
jp c,x1C4F
x1D3C ld b,#FC
bit 0,(iy+#05)
jr nz,x1D46 ;ç¨á«® ¢ ¤¥áïâ¨ç­®©
x1D44 ld b,#FE
x1D46 ld (ix+#00),b
inc ix
ld (ix+#00),e
inc ix
ld b,d
ld (xDDD0),de ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë ¤¨§ á¬ 
jp x1BD1
x1D58 ld e,#00
ld b,#FC
ld a,(xDDB4)
cp #46
jr z,x1CF5
inc e
cp #56
jr z,x1CF5
inc e
cp #5E
jr z,x1CF5
set 5,(iy+#01)
ld e,#00
cp #4E
jr z,x1D85
cp #66
jr z,x1D85
cp #6E
jr z,x1D85
inc e
cp #76
jr z,x1D85
inc e
x1D85 jp x1CF5
x1D88 ld (ix+0),b
ld (ix+1),#4C
inc ix
inc ix
ld c,#04
x1D95 ld l,#04
xor a
x1D98 sla e
rl d
rla
dec l
jr nz,x1D98
add a,#90
daa
adc a,#40
daa
ld (ix+0),a
inc ix
dec c
jr nz,x1D95
set 7,(ix-1)
ret
;¢å: de - ¤ ­­ë¥ ¤«ï ¯®¨áª  ( ¤à¥á ª®¬ ­¤ë ¤«ï ¤¨§ á¬ )
x1DB3 or a
bit 4,(iy+#00)
ret z
ld bc,(xDDD4) ;áç¥â稪
ld hl,(xDDD6) ; ¤à¥á 祣®-â®
x1DC0 ld a,b
or c
ret z
ld a,(hl)
inc hl
cp e
jr nz,x1DCC
ld a,(hl)
cp d
scf
ret z
x1DCC inc hl
dec bc
jr x1DC0
;€„<E282AC>…‘: #1DD0 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
x1DD0 dc "$"
dc "FLOAD"
dc "FSAVE"
db #00
x1DDC dw x1FB0: db %00100000 ;$ ( ­ «®£ WORD)
dw x1E45: db %00000100 ;FLOAD
dw x1E4F: db %00000100 ;FSAVE
;€„<E282AC>…‘: #1DE5 ¢ë¯®«­¥­¨¥ á«®¢   ­ «¨§ â®à 
;¢å: de -  ¤à¥á á«®¢   ­ «¨§ â®à 
x1DE5 ld hl,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
x1DE8 inc hl
ld (xE9D9),hl ; ¤à¥á ­ ç «  áâíª   ­ «¨§ â®à 
inc hl
ld (xE9DB),hl ; ¤à¥á ¢¥à設ë áâíª   ­ «¨§ â®à  ( ¤à¥á ¯¥à¢®© ᢮¡®¤­®© ï祩ª¨)
;¨á¯®«­¥­¨¥ ª®¬ ­¤ë  ­ «¨§ â®à 
ld hl,#0000
push hl
push de
ex de,hl
x1DF6 ld a,(hl)
or a
inc hl
jr z,x1E04
x1DFB ld e,(hl)
inc hl
ld d,(hl)
inc hl
push hl
push de
ex de,hl
jr x1DF6
;¨á¯®«­¥­¨¥ á«®¢  ¨§ ª®¬ ­¤ë  ­ «¨§ â®à 
x1E04 ld (xE9DD),sp
call x1E0E ;call (hl)
jp x2261
x1E0E jp (hl)
;€„<E282AC>…‘: #1E0F ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
;¢å: de -  ¤à¥á ¯à®£à ¬¬ë  ­ «¨§ â®à 
; a - ¡ ©â ¯à®£à ¬¬ë
;¢ëå: de -  ¤à¥á ¯à®£à ¬¬ë  ­ «¨§ â®à  +1 (¥á«¨ ãᯥ譮)
x1E0F push hl
or a
ld hl,xF6C0+#FF
sbc hl,de
jr z,x1E1C
ld (de),a
inc de
pop hl
ret
x1E1C ld a,#2D ;®è¨¡ª : insufficient program space
jp x0B06 ;¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
;ãáâ ­®¢ª  ¯ à ¬¥â஢ ¡ãä¥à  fcb
;¢å: a - ᯮᮡ ®âªàëâ¨ï ä ©« 
; hl - ­®¬¥à ᥪâ®à 
; de - ­®¬¥à ¤®à®¦ª¨
;¢ëå: hl=bc ¢å
; bc - ç¥â¢¥àâë© ¯ à ¬¥âà
x1E21 call x306F ;ix=¡ãä¥à fcb
ld (ix+#17),a
ld h,e
ld (xE7A9+#0E),hl ;­®¬¥à ¯¥à¢®£® ᥪâ®à  ¨ ¤®à®¦ª¨ ä ©« 
push bc
ld hl,#0000
ld (xE7A9+#13),hl ;㪠§ â¥«ì ¢ ä ©«¥
dec l
ld (ix+#0D),l ;®¡ê¥¬ ä ©«  ¢ ᥪâ®à å =#FF
ld (ix+#1B),l ;¬ ªá¨¬ «ì­ë© ®¡ê¥¬ ä ©«  ¢ ᥪâ®à å =#FF
ld hl,xE8A9
ld (xE7A9+#15),hl ; ¤à¥á ¡ãä¥à  dma
pop hl
ld bc,(xDD99+#06) ;à §¬¥à § £à㦠¥¬®£® ä ©«  (4© ¯ à ¬¥âà)
ret
;€„<E282AC>…‘: #1E45 Š®¬ ­¤ : FLOAD track, sector, start, length
; ¯àאַ¥ ç⥭¨¥ á ¤¨áª 
;¢å: de - ­®¬¥à ¤®à®¦ª¨
; hl - ­®¬¥à ᥪâ®à 
; bc -  ¤à¥á § £à㧪¨
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x1E45 ld a,#05
call x1E21 ;ãáâ ­®¢ª  ¯ à ¬¥â஢ ¡ãä¥à  fcb
call x30D8 ;ç⥭¨¥ ä ©«  ¢ ¯ ¬ïâì
jr x1E9B ;®¡à ¡®âª  ®è¨¡®ª ¨ ¢ë室 ¢ ®â« ¤ç¨ª
;€„<E282AC>…‘: #1E4F Š®¬ ­¤ : FSAVE track, sector, start, length
; ¯àï¬ ï § ¯¨áì ­  ¤¨áª
;¢å: de - ­®¬¥à ¤®à®¦ª¨
; hl - ­®¬¥à ᥪâ®à 
; bc -  ¤à¥á § £à㧪¨
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x1E4F ld a,#07
call x1E21 ;ãáâ ­®¢ª  ¯ à ¬¥â஢ ¡ãä¥à  fcb
call x3107 ;§ ¯¨áì ®¡« á⨠¯ ¬ï⨠­  ¤¨áª
jr x1E9B ;®¡à ¡®âª  ®è¨¡®ª ¨ ¢ë室 ¢ ®â« ¤ç¨ª
;€„<E282AC>…‘: #1E59 ®âªàë⨥ ä ©«  ¤«ï ç⥭¨ï/§ ¯¨á¨ ¯à®£à ¬¬ë  ­ «¨§ â®à 
;¢å: hl -  ¤à¥á áâப¨ ¨¬¥­¨ ä ©« 
; b - ᯮᮡ ®âªàëâ¨ï
;¢ëå: hl - áâ àâ®¢ë©  ¤à¥á ä ©« 
; bc - ¤«¨­  ä ©«  ¢ ¡ ©â å
x1E59 call x3065 ;ãáâ ­®¢ª  ॣ¨áâ஢ ¤«ï § £à㧪¨/á®åà ­¥­¨ï
;hl -  ¤à¥á áâப¨ ¨¬¥­¨ ä ©« 
;ix -  ¤à¥á ¡ãä¥à  ᮧ¤ ¢ ¥¬®£® fcb
;de -  ¤à¥á ¡ãä¥à  dma =xE8A9
rst #30
dw rom7_x11B0 ;R8DOS #1B(27) à §¡®à ᯥæ¨ä¨ª æ¨¨ ä ©«  ¨ ¯®áâ஥­¨¥ ­  ¥¥ ®á­®¢¥ ¡«®ª  ã¯à ¢«¥­¨ï (fcb)
db #07
jr c,x1E9E ;®è¨¡ª  ç⥭¨ï/§ ¯¨á¨
call x0EBA ;¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
or a
jr z,x1E6C ;¡®«ìè¥ ­¥â ®¯¥à ­¤®¢
ld a,#0B ;®è¨¡ª : too many operands
jr x1EA2 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;®âªà뢠¥¬ ä ©«
x1E6C rst #30
dw rom7_x11DF ;®âªàëâì ä ©« ¤«ï ¯®á«¥¤ãîé¨å ®¯¥à æ¨© á ­¨¬
db #07
jr c,x1E9E ;®è¨¡ª  ç⥭¨ï/§ ¯¨á¨
ld hl,(xE7A9+#09) ;áâ àâ®¢ë©  ¤à¥á ä ©« 
ret
;€„<E282AC>…‘: #1E76 Š®¬ ­¤ : DEFSave filename
x1E76 bit 3,(iy+#14)
ld a,#2E ;®è¨¡ª : program undefined
ret z ;®è¨¡ª : ¯à®£à ¬¬ë ­¥â
ld b,#02 ;®âªà®¥¬ ä ©«­  § ¯¨áì
call x1E59 ;®âªàë⨥ ä ©«  ¤«ï § ¯¨á¨ ¯à®£à ¬¬ë  ­ «¨§ â®à 
ld hl,(xE11C) ;ª®­¥æ ¯à®£à ¬¬ë
ld bc,xF6C0 ;­ ç «® ¯à®£à ¬¬ë
push bc
sbc hl,bc
ld a,#2E ;®è¨¡ª : program undefined
jr z,x1EA2 ;­ã«¥¢ ï ¤«¨­ 
ld b,h
ld c,l
pop hl
call x1ED6 ;§ ¯¨áì ¯à®£à ¬¬ë  ­ «¨§ â®à  ¢ ä ©«
x1E95 jr c,x1E9E ;®è¨¡ª  ç⥭¨ï/§ ¯¨á¨
;§ ªà뢠¥¬ ä ©«. ¯à®¤®«¦¥­¨¥ à ¡®âë ®â« ¤ç¨ª 
x1E97 rst #30
dw rom7_x1307 ;R8DOS #15(21) § ªàëâì ä ©«, ®âªàëâë© ä㭪樥© 20
db #07
x1E9B jp nc,x0AFB
x1E9E rst #30
dw rom6_x066C ;ãáâ ­®¢ª  ª®¤ ¤¨áª®¢®© ®è¨¡ª¨ ¢ ¯¥à¥¬¥­­®© ¤«ï ¯¥ç â¨ ç¨á« 
db #06
x1EA2 jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ®ª­  ®â« ¤ç¨ª 
;€„<E282AC>…‘: #1EA5 Š®¬ ­¤ : DEFLoad filename
x1EA5 ld b,#01 ;¤«ï ç⥭¨ï
call x1E59 ;®âªàë⨥ ä ©«  ¤«ï ç⥭¨ï
ld de,xF6C0 ;à á¯®«®¦¥­¨¥ ¯à®£à ¬¬ë  ­ «¨§ â®à 
push de
sbc hl,de
pop hl
ld a,#2E ;á®®¡é¥­¨¥: program undefined
jr nz,x1EA2 ;®è¨¡ª : ­¥á®¢¯ ¤¥­¨¥  ¤à¥á  § £à㧪¨
dec bc
dec bc ;bc - ¤«¨­  ä ©«  ¢ ¡ ©â å -2
ld a,b
cp #04
ld a,#2D ;á®®¡é¥­¨¥: insufficient program space
jr nc,x1EA2 ;®è¨¡ª : ᫨誮¬ ¤«¨­­ ï ¯à®£à ¬¬ 
push bc
push bc
push hl
call x1F25 ;Š®¬ ­¤ : CLear (®ç¨á⨬ ®¡« áâì ¯à®£à ¬¬ë)
pop hl
pop bc
call x1EFB ;ç⥭¨¥ ¯à®£à ¬¬ë  ­ «¨§ â®à  ¨§ ä ©« 
jr c,x1E95 ;®è¨¡ª  ç⥭¨ï
pop de ;¤«¨­  ¯à®£à ¬¬ë
ld hl,xF6C0
add hl,de
ex de,hl ;de -  ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¢ ¡ãä¥à¥ ¯à®£à ¬¬ë
call x1F28 ;ãáâ ­®¢ª  ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â   ¤à¥á  ­ ç «  ¯à®£à ¬¬ë  ­ «¨§ â®à 
jr x1E97 ;§ ªà뢠¥¬ ä ©«. ¯à®¤®«¦¥­¨¥ à ¡®âë ®â« ¤ç¨ª 
;§ ¯¨áì ¯à®£à ¬¬ë  ­ «¨§ â®à  ¢ ä ©«
;¢å: hl -  ¤à¥á ¡ãä¥à  ¯à®£à ¬¬ë  ­ «¨§ â®à 
; bc - à §¬¥à ¤«ï § ¯¨á¨
;¢ëå: cy=1 ®è¨¡ª  § ¯¨á¨
x1ED6 ld (xE7A9+#09),hl ;áâ àâ®¢ë©  ¤à¥á ä ©« 
ld a,#41 ;¯¥à¢ë© ¡ ©â ᨣ­ âãàë
call x1EF2 ;§ ¯¨áì ®ç¥à¥¤­®£® ¡ ©â  ¢ ä ©«
ret c ;®è¨¡ª  § ¯¨á¨
ld a,(x00F1) ;¢â®à®© ¡ ©â ᨣ­ âãàë
call x1EF2 ;§ ¯¨áì ®ç¥à¥¤­®£® ¡ ©â  ¢ ä ©«
ret c ;®è¨¡ª  § ¯¨á¨
x1EE6 ld a,(hl)
call x1EF2 ;§ ¯¨áì ®ç¥à¥¤­®£® ¡ ©â  ¢ ä ©«
ret c ;®è¨¡ª  § ¯¨á¨
inc hl
dec bc
ld a,b
or c
jr nz,x1EE6
ret
;§ ¯¨áì ®ç¥à¥¤­®£® ¡ ©â  ¢ ä ©«
x1EF2 push hl
push bc
rst #30
dw rom7_x128C ;R8DOS #17(23) § ¯¨áì ¡ ©â  ¢ ä ©«. ” ©« ¤®«¦¥­ ¡ëâì ®âªàëâ ª ª "«®£¨ç¥áª¨©"
db #07
pop bc
pop hl
ret
;ç⥭¨¥ ¯à®£à ¬¬ë  ­ «¨§ â®à  ¨§ ä ©« 
;¢å: hl -  ¤à¥á ¡ãä¥à  ¯à®£à ¬¬ë  ­ «¨§ â®à 
; bc - à §¬¥à ¤«ï § £à㧪¨
;¢ëå: cy=1 ®è¨¡ª  ç⥭¨ï
x1EFB call x1F1C ;ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« 
ret c ;®è¨¡ª  ç⥭¨ï
cp #41
x1F01 ld a,#55 ;®è¨¡ª : illegal fromat file
jr nz,x1EA2 ;®è¨¡ª  ᨣ­ âãàë ä ©« 
call x1F1C ;ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« 
ret c ;®è¨¡ª  ç⥭¨ï
ld e,a
ld a,(x00F1)
cp e
jr nz,x1F01
x1F10 call x1F1C ;ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« 
ret c ;®è¨¡ª  ç⥭¨ï
ld (hl),a
inc hl
dec bc
ld a,b
or c
jr nz,x1F10
ret
;ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« 
x1F1C push hl
push bc
rst #30
dw rom7_x1240 ;R8DOS #16(22) ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« . ä ©« ¤®«¦¥­ ¡ëâì ®âªàëâ ª ª "«®£¨ç¥áª¨©".
db #07
pop bc
pop hl
ret
;€„<E282AC>…‘: #1F25 Š®¬ ­¤ : CLear
x1F25 ld de,xF6C0
x1F28 call x205F ;ãáâ ­®¢ª  ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â   ¤à¥á  ­ ç «  ¯à®£à ¬¬ë  ­ «¨§ â®à 
xor a
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
ld hl,xE9A9
ld b,#28 ;®ç¨á⪠ ¡ãä¥à  ¯à®£à ¬¬ë
x1F37 ld (hl),a
inc hl
djnz x1F37
x1F3B set 3,(iy+#14) ;¥áâì ¯ãáâ ï ¯à®£à ¬¬ 
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #1F42 Š®¬ ­¤ : ANalyser boolean
x1F42 ld hl,xE028
bit 3,(hl)
ld a,#2E ;á®®¡é¥­¨¥: program undefined
ret z ;¯à®£à ¬¬  ­¥ § ¤ ­ 
ld a,e
and #FE
or d
ld a,#0C ;á®®¡é¥­¨¥: out of range
ret nz
ld a,#81 ;á®®¡é¥­¨¥: enter command
res 4,(hl) ;¢ëª«î稬  ­ «¨§ â®à
bit 0,e
ret z
set 4,(hl) ;¢ª«î稬  ­ «¨§ â®à
ret
;€„<E282AC>…‘: #1F5B ¯®¨áª ¢¢¥¤¥­­®£® á«®¢  ¢ á«®¢ à¥/¯à®£à ¬¬¥ ¯®«ì§®¢ â¥«ï
;¢å: hl -  ¤à¥á áâப¨ á ­ ç «®¬ á«®¢ 
;¢ëå: z - á«®¢® ¢ á«®¢ à¥ ­¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
; de - ­¥ ®¯à¥¤¥«¥­
; bc =#0000
; nz - á«®¢® ¢ á«®¢ à¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¯ à ¬¥âà  ¢ ¢¢¥¤¥­­®© áâப¥
; de -  ¤à¥á ª®­æ  á«®¢  ¢ á«®¢ à¥ (㪠§ë¢ ¥â ­  #00)
; bc -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
x1F5B call x0EE6 ;¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
push hl
x1F5F call x1F9B ;¯à®¢¥àª  ï¥âáï «¨ ᨬ¢®« ¡ãª¢®© ¨«¨ æ¨äன
ld a,#2F ;®è¨¡ª : illegal word name
jp c,#0B06 ;¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
inc hl
call x0D3E ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
jr nz,x1F5F ;íâ® ­¥ à §¤¥«¨â¥«ì
pop hl
;€„<E282AC>…‘: #1F6E ¯®¨áª á«®¢  ¯® á«®¢ àî
;¢ëå: z - á«®¢® ¢ á«®¢ à¥ ­¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
; de - ­¥ ®¯à¥¤¥«¥­
; bc =#0000
; nz - á«®¢® ¢ á«®¢ à¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¯ à ¬¥âà  ¢ ¢¢¥¤¥­­®© áâப¥
; de -  ¤à¥á ª®­æ  á«®¢  ¢ á«®¢ à¥ (㪠§ë¢ ¥â ­  #00)
; bc -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
; a - ª®¤ à §¤¥«¨â¥«ï ¢ áâப¥ #3A/#20/#2C/#3B/#00/#0D (: space , ;)
x1F6E ld de,x23A3 ;­ ç «® ¡ §®¢ëå á«®¢  ­ «¨§ â®à 
call x1F78 ;¯®¨áª á«®¢  ¢ á«®¢ à¥
ret nz ;á«®¢® ­ ©¤¥­® ¢ á«®¢ à¥
;¯®¨áª á«®¢  ¢ ¯à®£à ¬¬¥ ¯®«ì§®¢ â¥«ï
ld de,xF6C0 ;¯à®£à ¬¬   ­ «¨§ â®à 
;¯®¨áª á«®¢  ¯® á«®¢ àî
;¢ëå: z - á«®¢® ¢ á«®¢ à¥ ­¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
; de - ­¥ ®¯à¥¤¥«¥­
; bc =#0000
; a=#00
; nz - á«®¢® ¢ á«®¢ à¥ ­ ©¤¥­®
; hl -  ¤à¥á ­ ç «  ¯ à ¬¥âà  ¢ ¢¢¥¤¥­­®© áâப¥
; de -  ¤à¥á ª®­æ  á«®¢  ¢ á«®¢ à¥ (㪠§ë¢ ¥â ­  #00)
; bc -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
; ®¯à¥¤¥«¥­¨¥  ¤à¥á  á«¥¤ãî饣® á«®¢ 
x1F78 ld a,(de)
inc de
ld c,a
ld a,(de)
inc de
ld b,a
or c ;bc -  ¤à¥á á«¥¤ãî饣® á«®¢ 
ret z ;ª®­¥æ ᯨ᪠
; áà ¢­¥­¨¥ ¢¢¥¤¥­­®£® á«®¢  á®á á«®¢®¬ ¨§ á«®¢ àï
push hl ; ¤à¥á ¢¢¥¤¥­­®© áâப¨
x1F81 ld a,(de)
and #7F
cp #20
jr c,x1F92 ;ª®­¥æ ­ §¢ ­¨ï á«®¢  ¢ á«®¢ à¥ (á«®¢® ­ ©¤¥­®)
cp (hl)
inc de
inc hl
jr z,x1F81
x1F8D pop hl
; á«®¢® ­¥ ᮮ⢥âáâ¢ã¥â ¢¢¥¤¥­­®¬ã, ¡ã¤¥¬ ¯à®¢¥àïâì á«¥¤ãî饥 á«®¢® ¢ á«®¢ à¥
ld e,c
ld d,b
jr x1F78
; ¯à®¢¥à塞 ­ «¨ç¨¥ à §¤¥«¨â¥«ï ¯®á«¥ ¢¢¥¤¥­­®£® á«®¢ 
x1F92 call x0D3E ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
jr nz,x1F8D ;íâ® ­¥ à §¤¥«¨â¥«ì, áà ¢­¨¢ ¥¬ á® á«¥¤ãî騬 á«®¢®¬ ¢ á«®¢ à¥
inc hl
pop bc
or a
ret
;¯à®¢¥àª  ï¥âáï «¨ ᨬ¢®« ¡ãª¢®© ¨«¨ æ¨äன
;¢å: a - ª®¤ ᨬ¢®« 
;¢ëå: cy=1 - íâ®­¥ ¡ãª¢ /æ¨äà 
x1F9B cp #30 ;"0"
ret c
cp #3A ;":"
ccf
ret nc
cp #41 ;"A"
ret c
cp #5B ;"Z"+1
ccf
ret nc
cp #61 ;"a"
ret c
cp #7B ;"z"+1
ccf
ret
;€„<E282AC>…‘: #1FB0 Š®¬ ­¤ : WORD word[:] program
;¢å: hl -  ¤à¥á ­ ç «  áâப¨ á ¯ à ¬¥âà ¬¨ ª®¬ ­¤ë
x1FB0 call x1F5B ;¯®¨áª ¢¢¥¤¥­­®£® á«®¢  ¢ á«®¢ à¥/¯à®£à ¬¬¥ ¯®«ì§®¢ â¥«ï
jp nz,x2148 ;á«®¢® ­ ©¤¥­®
;¯à®¢¥àª  ­  ᮢ¯ ¤¥­¨¥ á § à¥§¥à¢¨à®¢ ­­ë¬¨ á«®¢ ¬¨
x1FB6 ld de,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
inc de
inc de
push hl
ld bc,xE9A9 ;¡ãä¥à ¯à®£à ¬¬ë  ­ «¨§ â®à 
ld a,#73 ;"s"
cp (hl)
jr nz,x1FCD
ld a,#74 ;"t"
x1FC7 inc hl
cp (hl)
jr nz,x2001
jr x1FD9 ;íâ® § à¥§¥à¢¨à®¢ ­­®¥ á«®¢®: st?/br?
x1FCD ld bc,xE9BD
ld a,#62 ;"b"
cp (hl)
jr nz,x2001
ld a,#72 ;"r"
jr x1FC7
; ¥áâì «¨ æ¨äà  ¯®á«¥ ¡ãª¢
x1FD9 inc hl
ld a,(hl)
sub #30
jr c,x2001
cp #0A
jr nc,x2001
inc hl
push bc ; ¤à¥á ¡ãä¥à   ¤à¥á®¢ § à¥§¥à¢¨à®¢ ­­ëå á«®¢
ld c,a ;­®¬¥à á«®¢ 
call x0D3E ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
jr nz,x2000 ;â ª¨ ­¥ ¯à¨­ ¤«¥¦¨â § à¥§¥à¢¨à®¢ ­­ë¬ á«®¢ ¬
; § ¤ ¢ ¥¬®¥ á«®¢® - ¨§ § à¥§¥à¢¨à®¢ ­­ëå á«®¢
sla c
ld b,#00
pop hl ; ¤à¥á ¡ãä¥à   ¤à¥á®¢ § à¥§¥à¢¨à®¢ ­­ëå á«®¢
add hl,bc
ex (sp),hl
call x2002 ;§ ¯¨áì ­®¢®£® á«®¢  ¢ ¯à®£à ¬¬ã- ­ «¨§ â®à
pop hl ; ¤à¥á ¡ãä¥à   ¤à¥á®¢ § à¥§¥à¢¨à®¢ ­­ëå á«®¢
ld de,(xE9D1) ; ¤à¥á ­ ç «  ¯ à ¬¥â஢-á«®¢ ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
ld (hl),e
inc hl
ld (hl),d
jp x1F3B
;§ ¯¨áì ­®¢®£® á«®¢  ¢ ¯à®£à ¬¬ã- ­ «¨§ â®à
;¢å: de -  ¤à¥á ­ ç «  ¯à®£à ¬¬ë  ­ «¨§ â®à 
x2000 pop hl
x2001 pop hl
;ãáâ ­®¢ª  ­ §¢ ­¨ï á«®¢ -¯à®£à ¬¬ë  ­ «¨§ â®à 
x2002 ld a,(hl)
or #80 ;¯¥à¢ë© ᨬ¢®« á«®¢ 
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
x2008 inc hl
ld a,(hl) ;®ç¥à¥¤­®© ᨬ¢®« á«®¢ 
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
call x0D3E ;¯à®¢¥àª  ᨬ¢®«  ¢ (hl) #3A/#20/#2C/#3B/#00/#0D (: space , ;)
jr nz,x2008 ;íâ® ¥é¥ ­¥ à §¤¥«¨â¥«ì
cp #0D
x2014 ld a,#30 ;á®®¡é¥­¨¥: no definition
jp z,x0B06 ;ª®­¥æ áâப¨. ¥áâì ¨¬ï, ­® ­¥â ᮤ¥à¦ ­¨ï
x2019 ld a,#01
dec de
ld (de),a ;¯à¨§­ ª ª®­æ  ­ §¢ ­¨ï á«®¢ 
ld (xE9D1),de
inc de
;ãáâ ­®¢ª  á«®¢-¯ à ¬¥â஢ ¯à®£à ¬¬ë
inc hl
call x0EE6 ;¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
jr z,x2014 ;­¥â ¯ à ¬¥â஢ ¢ ¯®£à ¬¬¥. ¢ë室
x2028 push de ; ¤à¥á ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
call x1F6E ;¯®¨áª á«®¢  ¯® á«®¢ àî
ld b,a ;ª®¤ à §¤¥«¨â¥«ï ¢ áâப¥ #3A/#20/#2C/#3B/#00/#0D (: space , ;)
ld a,e
ld c,d ;ca -  ¤à¥á ª®­æ  á«®¢  ¢ á«®¢ à¥ (㪠§ë¢ ¥â ­  #00)
pop de ; ¤à¥á ¯à®£à ¬¬ë  ­ «¨§ â®à 
jr z,x2064 ;á«®¢  ¢ á«®¢ à¥ ­¥â
; ãáâ ­®¢ª   ¤à¥á  ª®­æ  á«®¢  ¢ á«®¢ à¥
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
ld a,c
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
; ¯à®¢¥àª  ª®­æ  áâப¨
ld a,b
cp #0D
jr z,x2043 ;¡®«ìè¥ ­¥â á«®¢ ¢ ¯ à ¬¥âà å
x203E call x0EE6 ;¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
jr nz,x2028 ;á«®¢® ­ ©¤¥­®
; á«®¢ -¯ à ¬¥âàë § ª®­ç¨«¨áì
x2043 ld hl,x225D ;¯/¯ ¯à¥à뢠­¨ï ¢ë¯®«­¥­¨ï á«®¢ 
ld a,l
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
ld a,h
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
xor a
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
dec de
dec de ;㪠§ë¢ ¥â ­  ¬ àª¥à ª®­æ  ®¯à¥¤¥«ï¥¬®£® á«®¢ 
;ãáâ ­®¢ª  ᢮¡®¤­®£®  ¤à¥á  ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à¥
ld hl,(xE11C)
ld (hl),e
inc hl
ld (hl),d
ld a,#81 ;á®®¡é¥­¨¥: enter command
;€„<E282AC>…‘: #205F ãáâ ­®¢ª   ¤à¥á  ­ ç «  ¯à®£à ¬¬ë  ­ «¨§ â®à 
;¢å: de -  ¤à¥á ¯à®£à ¬¬ë  ­ «¨§ â®à 
x205F ld (xE11C),de
ret
;¥á«¨ ç¨á«®, § ¯¨á뢠¥¬ ¯/¯ ®¡à ¡®âª¨ ç¨á« , ¥á«¨ ®âáãâáâ¢ãî饥 á«®¢®, â® ¢ë室
;¢å: de - ¯¥à¢ë© ᢮¡®¤­ë©  ¤à¥á ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
; hl -  ¤à¥á á«®¢ -¯ à ¬¥âà  ¢ ¢¢¥¤¥­­®© áâப¥
; bc =#0000
x2064 push de
call x0DF4 ;¯à¥®¡à §®¢ ­¨¥ áâப¨ ¢ ç¨á«® (!!!¯à¨ base 0 à ¡®â ¥â ­¥¢¥à­®!!!)
ld c,e
ld b,d ;bc - ç¨á«®
pop de
jr z,x2076 ;íâ® ç¨á«®
cp #0D ;!!!Ž˜ˆ<CB9C>Š€!!! A ­¥ ¬®¦¥â ¡ëâì =#0D
jr nz,x2073
ld a,#31 ;á®®¡é¥­¨¥: word not known
x2073 jp x0B06
; ãáâ ­®¢ª  ¢ ¯à®£à ¬¬ã ¯/¯ ®¡à ¡®âª¨ ç¨á« 
x2076 push hl
ld hl,x2340 ;¯/¯ ®¡à ¡®âª¨ ç¨á«  ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
ld a,l
call x1E0F
ld a,h
call x1E0F
ld a,(xE024) ;¤¥«¨â¥«ì ¤«ï ¢ë¤¥«¥­¨ï à §à鸞 ç¨á« 
call x1E0F
ld a,c
call x1E0F
ld a,b
call x1E0F
pop hl
jr x203E
;€„<E282AC>…‘: #2093 Š®¬ ­¤ : EDit
;¢å: hl -  ¤à¥á ­ ç «  áâப¨ á ¯ à ¬¥âà ¬¨ ª®¬ ­¤ë
x2093 call x1F5B ;¯®¨áª ¢¢¥¤¥­­®£® á«®¢  ¢ á«®¢ à¥/¯à®£à ¬¬¥ ¯®«ì§®¢ â¥«ï
ld a,#31 ;®è¨¡ª : word not known
ret z ;á«®¢® ­¥ ­ ©¤¥­®
dec hl ;á«¥¤ãî騩  ¤à¥á ¢ ¢¢¥¤¥­­®© áâப¥ (¯®á«¥ ­ ©¤¥­­®£® á«®¢ )
call x0EE6 ;¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
ld a,#0B ;®è¨¡ª : too many operands
ret nz ;¢ë室
ex de,hl
ld a,(hl)
or a
jr z,x20BD ;á«®¢® ¢ ¡ §®¢®¬ á«®¢ à¥ ¥áâì !!!Ž˜ˆ<CB9C>Š€(ã¡à âì???)!!! ¯à¨¢®¤¨â ª § ¢¨á ­¨î
ld a,#32 ;®è¨¡ª : forbidden type word
ret z ;!!!Ž˜ˆ<CB9C>Š€!!! âãâ ¢ë室  ­¥ ¡ã¤¥â ­¨ª®£¤ 
call x20AE
ld a,#06 ;_Working ...
ret
;¯¥ç âì á«®¢  ¨§ á«®¢ àï ¯®«ì§®¢ â¥«ï
;¢å: hl -  ¤à¥á ª®­æ  ª®¬ ­¤ë/á«®¢   ­ «¨§ â®à 
x20AE ld de,x20FF ; ¤à¥á ¢ë室  ¨§ ¯/¯
push de
ld de,xDE17 ;¡ãä¥à ¤«ï ¯¥ç â¨
ld (xE3BC),de
ld a,#20 ;" "
ld b,#2B ;"+"
;á«®¢® ¥áâì ¢ ¡ §®¢®¬ á«®¢ à¥
x20BD ld (de),a
inc de
djnz x20BD
set 6,(iy+#09) ;ç⥭¨¥ ¤ ­­ëå ¯®á«¥ ã¯à ¢«ïî饣® ª®¤ 
ld a,#24 ;"$"
rst #10 ;¯¥ç âì ᨬ¢®« 
;€„<E282AC>…‘: #20C8 ¯¥ç âì । ªâ¨à㥬®£® á«®¢ 
;¢å: hl -  ¤à¥á ª®­æ  ª®¬ ­¤ë/á«®¢   ­ «¨§ â®à 
;¯¥ç âì ­ §¢ ­¨ï ¯à®£à ¬¬ë(á«®¢ )
x20C8 call x2112 ;¯®¨áª ­ ç «  ¨ ¯¥ç âì á«®¢   ­ «¨§ â®à 
ld a,":"
rst #10
;¯¥ç âì á«®¢ ¯à®£à ¬¬ë
x20CE ld a," "
rst #10
call x2121 ;ç⥭¨¥ ld bc,(hl+1): hl=hl+2
push hl
ld hl,x225D ;¯/¯ §å ¢¥à襭¨ï ¢ë¯®«­¥­¨ï á«®¢ 
or a
sbc hl,bc
jr z,x20ED ;íâ® ª®­¥æ ¯à®£à ¬¬ë
ld hl,x2340 ;¯/¯ ®¡à ¡®âª¨ ç¨á« 
or a
sbc hl,bc
jr z,x20EF ;íâ® ç¨á«®,   ­¥ á«®¢®
ld l,c
ld h,b
call x2112 ;¯®¨áª ­ ç «  ¨ ¯¥ç âì á«®¢   ­ «¨§ â®à 
x20EA pop hl
jr x20CE ;á«¥¤ãî饥 á«®¢® ¯à®£à ¬¬ë
;ª®­¥æ ¯à®£à ¬¬ë
x20ED pop hl
ret
;íâ® ç¨á«®,   ­¥ á«®¢®
x20EF pop hl
inc hl
ld e,(hl) ;á¨á⥬  áç¨á«¥­¨ï
call x2121 ;ç⥭¨¥ ld bc,(hl+1): hl=hl+2
ld a,e
or a
push hl
jr z,x2126 ;¯¥ç âì ®¤­®¡ ©â­®£® ç¨á«  ¢ ª ¢ë窠å
x20FA call x2130 ;¯¥ç âì ç¨á«  ¢ § ¤ ­­®© á¨á⥬¥ áç¨á«¥­¨ï
jr x20EA
;¢ë室 ¨§ ¯/¯
x20FF res 6,(iy+#09)
ret
;€„<E282AC>…‘: #2104 ¯¥ç âì á«®¢   ­ «¨§ â®à 
;¢å: hl -  ¤à¥á á«®¢   ­ «¨§ â®à 
;¢ëå: hl -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢ 
; cy=1 á«®¢® ­ ¯¥ç â ­®
; cy=0 ­¥â ¡®«ìè¥ á«®¢ ¤«ï ¯¥ç â¨
x2104 ld e,(hl)
inc hl
ld d,(hl)
inc hl
ld a,e
or d
ret z
rst #20
db #8D ;¯¥à¥¢®¤ áâப¨
call x2117 ;¯¥ç âì á®®¡é¥­¨ï ¨§ hl. ª®­¥æ á®®¡é¥­¨ï [#00..#1F]
ex de,hl
ret
;€„<E282AC>…‘: #2112 ¯®¨áª ­ ç «  ¨ ¯¥ç âì ª®¬ ­¤ë ®â« ¤ç¨ª /á«®¢   ­ «¨§ â®à 
;¢å: hl -  ¤à¥á ª®­æ  ª®¬ ­¤ë/á«®¢   ­ «¨§ â®à 
;¢å: hl - ­¥ ¨§¬¥­ï¥âáï
x2112 dec hl
bit 7,(hl)
jr z,x2112
;¯¥ç âì á®®¡é¥­¨ï ¨§ hl. ª®­¥æ á®®¡é¥­¨ï [#00..#1F]
x2117 ld a,(hl)
and #7F
cp #20
ret c
rst #10
inc hl
jr x2117
;€„<E282AC>…‘: #2121 ç⥭¨¥ ld bc,(hl+1): hl=hl+2
x2121 inc hl
ld c,(hl)
inc hl
ld b,(hl)
ret
;¯¥ç âì ®¤­®¡ ©â­®£® ç¨á«  ¢ ª ¢ë窠å
x2126 ld a,#22 ;'"'
push af
rst #10
ld a,c
rst #10
pop af
rst #10
jr x20EA
;¯¥ç âì ç¨á«  ¢ § ¤ ­­®© á¨á⥬¥ áç¨á«¥­¨ï
;¢å: bc - ç¨á«®
; a - ®á­®¢ ­¨¥ á¨á⥬ë áç¨á«¥­¨ï
x2130 ld hl,x162C ;¯/¯ ¯¥ç â¨ ç¨á«  ¢ § ¤ ­­®© á¨á⥬¥ áç¨á«¥­¨ï
push hl
ld d,a
ld e,"%"
cp #02
ret z ;¤¢®¨ç­ ï
ld e,"@"
cp #08
ret z ;¢®á쬥à¨ç­ ï
ld e,#2E ;"."
cp #0A
ret z ;¤¥áïâ¨ç­ ï
ld de,#1023
ret ;è¥áâ­ ¤æ â¨à¨ç­ ï
;€„<E282AC>…‘: #2148 Š®¬ ­¤ : WORD word[:] program
; <20>த®«¦¥­¨¥ (¤«ï ¯¥à¥®¯à¥¤¥«¥­¨ï 㦥 ®¯à¥¤¥«¥­­ëå á«®¢)
;‚å: de -  ¤à¥á ª®­æ  á«®¢  ¢ ¯à®£à ¬¬¥ (㪠§ë¢ ¥â ­  #01)
; bc -  ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
x2148 ld (xE9D3),de ; ¤à¥á ª®­æ  ­ §¢ ­¨ï á«®¢  ¢ ¯à®£à ¬¬¥ (㪠§ë¢ ¥â ­  #01)
ld hl,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
push hl
ex de,hl
;¨é¥¬ ­ ç «® á«®¢ 
x2151 bit 7,(hl)
dec hl
jr z,x2151
dec hl
ld (xE9D5),hl ; ¤à¥á ¯¥à¢®© ï祩ª¨ ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
;§ ¯¨á뢠¥¬ ­®¢®¥ á«®¢ ¢ ¯à®£à ¬¬ã
ld h,b
ld l,c ; ¤à¥á ­ ç «  ¢¢¥¤¥­­®© áâப¨
call x1FB6 ;ãáâ ­®¢ª  á«®¢  ¯à £à ¬¬ë
;㤠«¥­¨¥ ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
ld hl,(xE9D5) ; ¤à¥á ¯¥à¢®© ï祩ª¨ ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
ld e,(hl)
inc hl
ld d,(hl)
dec hl
ex de,hl
push de ;de -  ¤à¥á ­ ç «  ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
push hl ;hl -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢ , ¯®á«¥ ¯¥à¥®¯à¥¤¥«ï¥¬®£®
push hl
ld b,h
ld c,l ;bc -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢ , ¯®á«¥ ¯¥à¥®¯à¥¤¥«ï¥¬®£®
ld hl,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
or a
sbc hl,bc
ld b,h
ld c,l ;bc - ¤«¨­  ¯¥à¥¬¥é ¥¬®£® ¡«®ª  ¯à®£à ¬¬ë
inc bc
inc bc
pop hl
ldir
dec de
dec de
ld (xE11C),de
pop de ;de -  ¤à¥á ­ ç «  á«¥¤ãî饣® á«®¢ , ¯®á«¥ ¯¥à¥®¯à¥¤¥«ï¥¬®£®
pop hl ;hl -  ¤à¥á ­ ç «  ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
or a
sbc hl,de
ld b,h
ld c,l
pop hl
add hl,bc
inc hl
x2189 inc hl
ld a,(hl)
cp #20
jr nc,x2189
ld (xE9D7),hl ; ¤à¥á ª®­æ  ­ §¢ ­¨ï ¯¥à¥®¯à¥¤¥«¥­­®£® á«®¢  ¢ ¯à®£à ¬¬¥ (㪠§ë¢ ¥â ­  #01)
;ª®à४æ¨ï  ¤à¥á®¢ á«®¢ ¢ ¯à®£à ¬¬¥
ld hl,xF6C0 ;­ ç «® ¯à®£à ¬¬ë
x2195 ld e,(hl)
inc hl
ld d,(hl)
ld a,d
or e ; ¤à¥á á«¥¤ãî饣® á«®¢ 
jr z,x21D7 ;ª®­¥æ ¯à®£à ¬¬ë
push hl ; ¤à¥á ï祩ª¨ á 㪠§ ­¨¥¬ ­  á«¥¤ãî饥 á«®¢®
ld hl,(xE9D5) ; ¤à¥á ¯¥à¢®© ï祩ª¨ ¯¥à¥®¯à¥¤¥«ï¥¬®£® á«®¢ 
or a
sbc hl,de
jr nc,x21AE
ld h,b
ld l,c ;­  ᪮«ìª® ᮪à â¨« áì ¯à®£à ¬¬ 
add hl,de
ex de,hl
pop hl
push hl
ld (hl),d
dec hl
ld (hl),e
x21AE pop hl
inc hl
; ¨é¥¬ ª®­¥æ á«®¢ 
x21B0 ld a,(hl)
inc hl
cp #20
jr nc,x21B0
x21B6 ld e,(hl)
inc hl
ld d,(hl) ;de -  ¤à¥á á«®¢  ¯à®£à ¬¬ë
inc hl
push hl
ld hl,x2340
or a
sbc hl,de
jr nz,x21C9 ;íâ® ­¥ ç¨á«®
pop hl ;¤«ï ç¨á«  ®áâ ¢«ï¥¬ ª ª ¥áâì
inc hl
inc hl
inc hl
jr x21B6
x21C9 ld hl,x225D ;¯à¥à뢠­¨¥ ¢ë¯®«­¥­¨ï á«®¢ 
or a
sbc hl,de
pop hl
jr z,x2195 ;íâ® ª®­¥æ á«®¢ -¯à®£à ¬¬ë
call x21F3 ;ª®à४æ¨ï  ¤à¥á  ª®­æ  ¯®«ì§®¢ â¥«ì᪮£® á«®¢  ¢ ¯à®£à ¬¬¥
jr x21B6
;§ ¢¥à襭¨¥. ª®à४æ¨ï  ¤à¥á®¢ § à¥§¥à¢¨à®¢ ­­ëå á«®¢ ¢ ¯à®£à ¬¬¥
x21D7 ld hl,xE9A9 ; ¤à¥á  § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  st0-st9
call x21E0
ld hl,xE9BD ; ¤à¥á  § à¥§¥à¢¨à®¢ ­­ëå á«®¢  ­ «¨§ â®à  br0-br9
x21E0 ld a,#0A
x21E2 push af
ld e,(hl)
inc hl
ld d,(hl)
inc hl
ld a,d
or e
call nz,x21F3
pop af
dec a
jr nz,x21E2
ld a,#88 ;á®®¡é¥­¨¥: word redefined
ret
;ª®à४æ¨ï  ¤à¥á  ª®­æ  ¯®«ì§®¢ â¥«ì᪮£® á«®¢  ¢ ¯à®£à ¬¬¥
x21F3 push hl
ld hl,(xE9D3)
or a
sbc hl,de
jr z,x220E
jr nc,x220C
ld a,(de)
or a
jr z,x220C
ld h,b
ld l,c
add hl,de
ex de,hl
x2206 pop hl
push hl
dec hl
ld (hl),d
dec hl
ld (hl),e
x220C pop hl
ret
x220E ld de,(xE9D7)
jr x2206
;€„<E282AC>…‘: #2214 Š®¬ ­¤ : PDEFinition ¢ë¢®¤ ­  ¯à¨­â¥à ”®àâ - ¯à®£à ¬¬ë
x2214 set 4,(iy+#09)
;€„<E282AC>…‘: #2218 Š®¬ ­¤ : LDEFinition ¢ë¢®¤ ­  íªà ­ ”®àâ - ¯à®£à ¬¬ë
x2218 call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld bc,#3300 ;á®®¡é¥­¨¥: analyser definitions:
rst #08
rst #20
db #0D,#8D
;¯¥ç âì à §¬¥à  ᢮¡®¤­®© ®¡« áâ¨
ld hl,xF6C0+#FF ; ¤à¥á ª®­æ  áâíª   ­ «¨§ â®à 
ld de,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  áâíª   ­ «¨§ â®à 
scf
sbc hl,de
ld (xDDA7),hl
ld bc,#3400 ;á®®¡é¥­¨¥: space left for stack _ç¨á«®_
rst #08
ld a," "
rst #10
ld bc,#3500 ;á®®¡é¥­¨¥: bytes
rst #08
rst #20
db #0D,#8D
;¯¥ç âì ᯨ᪠ § ¤ ­­ëå á«®¢
ld hl,xF6C0
x2240 ld c,(hl)
inc hl
ld b,(hl)
ld a,b
or c
jr z,x2256 ;ª®­¥æ ¯à®£à ¬¬ë
push bc ; ¤à¥á á«¥¤ãî饣® á«®¢ 
inc hl
inc hl
call x20C8 ;¯¥ç âì । ªâ¨à㥬®£® á«®¢ 
ld a,#0D
rst #10 ;¯¥à¥¢®¤ áâப¨
call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
pop hl
jr x2240
;§ ¢¥à襭¨¥ ¯¥ç â¨
x2256 res 4,(iy+#09) ;¯¥ç âì ¢ íªà ­
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #225D ¯à¥à뢠­¨¥ ¢ë¯®«­¥­¨ï á«®¢ /§ ¢¥à襭¨¥ à ¡®âë ä®à⠯ணࠬ¬ë
x225D nop
pop hl
pop hl
pop hl
;€„<E282AC>…‘: #2261 ¯¥à¥å®¤ ª ®¡à ¡®âª¥ á«¥¤ãî饣® á«®¢  ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
; ¨«¨ ¢ë室, ¥á«¨ á«®¢ ¡®«ìè¥ ­¥â
x2261 pop de
pop hl
ld a,l
or h
jp nz,x1DFB
;á«®¢ ¢ ¯à®£à ¬¬¥ ¡®«ìè¥ ­¥â
bit 5,(iy+#14)
ret nz ;¢ë§®¢ ¡ë« ¨§ ª®¬ ­¤ë EVal
push hl
push de
ld (xE9DD),sp
ld hl,(xE9DB)
ld de,(xE11C)
inc de
inc de
inc de
inc de
or a
sbc hl,de
ld a,#36 ;á®®¡é¥­¨¥: stack not empty
jp nz,x2307 ;®¡à ¡®âª  ®è¨¡®ª ¯à¨ à ¡®â¥ ¯à®£à ¬¬ë  ­ «¨§ â®à 
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or b
pop hl
pop hl
ret z
pop hl
pop hl
pop af
ld l,a ;ç¨á«® ¤«ï á®®¡é¥­¨ï
ld a,#85 ;á®®¡é¥­¨¥: stop number _ç¨á«®_
jp x01D5
;€„<E282AC>…‘: #2297 Š®¬ ­¤ : EVal word ¢ë¯®«­¨âì á«®¢® word
;¢å: hl -  ¤à¥á áâப¨ á ¯ à ¬¥âà ¬¨
x2297 bit 3,(iy+#14)
ld a,#2E ;á®®¡é¥­¨¥: program undefined
ret z ;¯à®£à ¬¬   ­ «¨§ â®à  ­¥ § ¤ ­ 
; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à  ¯®  ¤à¥áã PC
push hl
ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à  ¯®  ¤à¥áã ¢ hl
pop hl
;ãáâ ­®¢ª  á«®¢ ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
ld de,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
push de
push hl
inc de
inc de ;¯®¯à ¢ª  ­   ¤à¥á
ld hl,x2301
ld b,#07
x22B3 ld a,(hl)
call x1E0F ;ãáâ ­®¢ª  ª®¤  ª®¬ ­¤ë ¢ ¯à®£à ¬¬ã  ­ «¨§ â®à 
inc hl
djnz x22B3
pop hl ;hl -  ¤à¥á áâப¨ á ¯ à ¬¥âà ¬¨ ª®¬ ­¤ë (ᯨ᮪ á«®¢ ­  ¢ë¯®«­¥­¨¥)
dec hl ;de -  ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
push de
call x2019 ;ãáâ ­®¢ª  á«®¢ ¢ ¯à®£à ¬¬ã
pop de
dec de
;¢ë¯®«­¥­¨¥ ¢¢¥¤¥­­ëå á«®¢
ld hl,(xE11C) ; ¤à¥á ¯¥à¢®£® ᢮¡®¤­®£® ¡ ©â  ¯à®£à ¬¬ë  ­ «¨§ â®à 
ex (sp),hl
ld (xE11C),hl
xor a
ld (hl),a
inc hl
ld (hl),a ;­¥â ¡®«ìè¥ á«®¢, ⮫쪮 íâ¨
set 5,(iy+#14) ;à ¡®â ¥â ª®¬ ­¤  EVal word
pop hl
call x1DE8 ;¢ë¯®«­¥­¨¥ á«®¢   ­ «¨§ â®à 
res 5,(iy+#14)
;¯¥ç âì ᮤ¥à¦¨¬®£® áâíª   ­ «¨§ â®à 
call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld bc,#3700 ;á®®¡é¥­¨¥: state of stack
rst #08 ;¯¥ç âì á®®¡é¥­¨ï
ld a,#0D
rst #10 ;¯¥à¥¢®¤ áâப¨
ld de,(xE9D9) ; ¤à¥á ­ ç «  áâíª   ­ «¨§ â®à 
inc de
x22E8 ld hl,(xE9DB) ; ¤à¥á ¢¥à設ë áâíª   ­ «¨§ â®à 
or a
sbc hl,de
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret z ;áâíª ¯ãá⮩
push de
ld a,#0D
rst #10 ;¯¥à¥¢®¤ áâப¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
call x1614 ;¯¥ç âì ç¨á«  ¢ bc (dec/hex) á ¯à¥ä¨ªá®¬
call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
pop de
jr x22E8
x2301 db #80+"*","eval*"
;®¡à ¡®âª  ®è¨¡®ª ¯à¨ à ¡®â¥ ¯à®£à ¬¬ë  ­ «¨§ â®à 
;¢å: a - ­®¬¥à á®®¡é¥­¨ï ®¡ ®è¨¡ª¥
x2307 ld (xDDA7),a
ld sp,(xE9DD)
call x0550 ;á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld bc,#3800 ;á®®¡é¥­¨¥: workspace insufficient
rst #08 ;¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
rst #20
db #0D,#8D ;¤¢  ¯¥à¥¢®¤  áâப¨
x231B pop hl
push hl
ld de,x2340
or a
sbc hl,de
pop hl
jr z,x2332
push hl
rst #20
dc "in "
pop hl
call x2112 ;¯®¨áª ­ ç «  ¨ ¯¥ç âì á«®¢   ­ «¨§ â®à 
ld a,#0D
rst #10 ;¯¥à¥¢®¤ áâப¨
x2332 call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
pop hl
ld a,h
or l
jr nz,x231B
ld a,(xDDA7)
jp x0B06
; ®¡à ¡®âª¨ ç¨á«  ¢ ¯à®£à ¬¬¥  ­ «¨§ â®à 
x2340 nop
pop ix
pop de
pop hl
call x2121 ;ç⥭¨¥ ld bc,(hl+1): hl=hl+2
inc hl
push hl
push de
push ix
;€„<E282AC>…‘: #234D § ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;¢å: bc - §­ ç¥­¨¥ ¤«ï ¯®¬¥é¥­¨ï ­  áâíª  ­ «¨§ â®à 
x234D push hl
push de
ld hl,(xE9DB) ; ¤à¥á ¢¥à設ë áâíª   ­ «¨§ â®à 
push hl
inc hl
inc hl
ld de,xF6C0+#FF ;xF7BF  ¤à¥á ª®­æ  áâíª   ­ «¨§ â®à 
or a
sbc hl,de
ld a,#39 ;á®®¡é¥­¨¥: out of stack space
jr nc,x2307 ;­¥â ¬¥áâ  ­  áâíª¥
pop hl
ld (hl),c ;¯¨è¥¬ §­ ç¥­¨¥ ­  áâíª
inc hl
ld (hl),b
inc hl
;€„<E282AC>…‘: #2364 ãáâ ­®¢ª  ­®¢®£® §­ ç¥­¨ï ¢¥à設ë áâíª   ­ «¨§ â®à 
;¢å: hl -  ¤à¥á ­®¢®© ¢¥à設ë áâíª 
x2364 ld (xE9DB),hl
pop de
pop hl
ret
;€„<E282AC>…‘: #236A § ¯¨áì ­  áâíª  ­ «¨§ â®à  ¡ ©â  ¨§ ï祩ª¨ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;¢å: bc -  ¤à¥á ¯ ¬ïâ¨
x236A push hl
ld l,c
ld h,b ; ¤à¥á ¢ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
pop hl
ld c,a
ld b,#00
jr x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;€„<E282AC>…‘: #2374 § ¯¨áì ­  áâíª  ­ «¨§ â®à  á«®¢  ¨§ ï祥ª ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;¢å: bc -  ¤à¥á ¯ ¬ïâ¨
x2374 push hl
ld l,c
ld h,b
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld c,a
inc hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld b,a
pop hl
jr x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;€„<E282AC>…‘: #237F ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
;¢ëå: bc - áç¨â ­­®¥ §­ ç¥­¨¥
x237F push hl
push de
ld hl,(xE9DB) ; ¤à¥á ¢¥à設ë áâíª   ­ «¨§ â®à 
dec hl
push hl
or a
ld de,(xE9D9) ; ¤à¥á ­ ç «  áâíª   ­ «¨§ â®à 
sbc hl,de
ld a,#3A ;á®®¡é¥­¨¥: stack empty
jp z,x2307 ;¢ë室 ¯® ®è¨¡ª¥
pop hl
ld b,(hl)
dec hl
ld c,(hl) ;bc - ᮤ¥à¦¨¬®¥ ¢¥à設ë áâíª   ­ «¨§ â®à 
jr x2364
;€„<E282AC>…‘: #2398 ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
;¢ëå: hl,de - ¯¥à¢®¥ §­ ç¥­¨¥
; bc - ¢â®à®¥ §­ ç¥­¨¥
x2398 call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
push bc
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
pop de
ld l,e
ld h,d
ret
;€„<E282AC>…‘: #23A3 ¡ §®¢ë¥ á«®¢   ­ «¨§ â®à 
;á«®¢®: NOP ­¥â ®¯¥à æ¨¨
; +0 2  ¤à¥á á«¥¤ãî饣® á«®¢  (=#0000 íâ® ª®­¥æ ᯨ᪠)
; +2 n á«®¢®  ­ «¨§ â®à  (¢ ¯¥à¢®¬ ¡ ©â¥ 7,=1), #00 ¯à¨§­ ª ª®­ç  á«®¢ 
; +2+n ¯à®æ¥¤ãà  ®¡à ¡®âª¨ á«®¢ 
x23A3 dw x23AA
db #80+"N","OP",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ret
;á«®¢®: DUP „ã¡«¨à®¢ âì ᮤ¥à¦¨¬®¥ ¢¥à設ë á⥪ . <20>  á⥪¥ ᮧ¤ ¥âáï ª®¯¨ï
; ¢¥àå­¥£® í«¥¬¥­â 
x23AA dw x23B8
db #80+"D","UP",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x23B0 call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
call x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
jr x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: SWAP ¯¥à¥áâ ­®¢ª  ¤¢ãå í«¥¬¥­â®¢ ­  ¢¥à設¥ á⥪ 
x23B8 dw x23CC
db #80+"S","WAP",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x23BF call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
push bc
ld c,l
ld b,h
call x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
pop bc
x23C9 jp x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: OVER ª®¯¨à®¢ ­¨¥ ¢â®à®£® ®â ¢¥à設ë í«¥¬¥­â  á⥪ . Š®¯¨ï ¯®¬¥é ¥âáï
; ­  ¢¥à設ã á⥪ 
x23CC dw x23E0
db #80+"O","VER",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
push bc
call x23B0 ;á«®¢®: DUP
pop bc
call x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
jr x23BF ;á«®¢®: SWAP
;á«®¢®: ROT 横«¨ç¥áª¨© ᤢ¨£ âà¥å ¢¥àå­¨å í«¥¬¥­â®¢ á⥪ . ’à¥â¨© ®â ¢¥à設ë
; á⥪  í«¥¬¥­â ¯®¬¥é ¥âáï ­  ¢¥à設ã á⥪ .
x23E0 dw x23FE
db #80+"R","OT",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x23E6 call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
push hl
push bc
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
pop hl
push bc
ld c,l
ld b,h
call x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
pop de
pop bc
push de
call x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
pop bc
jr x23C9 ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: DROP 㤠«¥­¨¥ ¢¥àå­¥£® í«¥¬¥­â  á⥪ 
x23FE dw x2408
db #80+"D","ROP",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
jp x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
;á«®¢®: + ¯®«ãç¨âì §­ ç¥­¨¥ áã¬¬ë ¤¢ãå ¢¥àå­¨å í«¥¬¥­â®¢ á⥪ 
x2408 dw x2414
db #80+"+",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
add hl,bc
x2410 ld c,l
ld b,h
jr x23C9 ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: - ¯®«ãç¨âì §­ ç¥­¨¥ à §­®á⨠¤¢ãå ¢¥àå­¨å í«¥¬¥­â®¢ á⥪ 
x2414 dw x2422
db #80+"-",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x2418 call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld h,b
ld l,c
or a
sbc hl,de
jr x2410 ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: / ¯®«ãç¨âì §­ ç¥­¨¥ ç áâ­®£® ®â 楫®ç¨á«¥­­®£® ¤¥«¥­¨ï ¤¢ãå ¢¥àå­¨å
; í«¥¬¥­â®¢ á⥪ 
x2422 dw x2439
db #80+"/",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld l,c
ld h,b
call x0E73 ;¤¥«¥­¨¥ bc=hl/de á ¯à®¢¥àª®© de ­  ­®«ì
bit 2,(iy+#0E) ;=1 ®è¨¡ª . ¤¥«¥­¨¥ ­  ­®«ì
jr z,x2456 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
ld a,#40 ;á®®¡é¥­¨¥: devision by zero
jp x2307
;á«®¢®: * ¯®«ãç¨âì §­ ç¥­¨¥ ¯à®¨§¢¥¤¥­¨ï ¤¢ãå ¢¥àå­¨å í«¥¬¥­â®¢ á⥪ 
x2439 dw x2447
db #80+"*",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld l,c
ld h,b
call x0E85 ;㬭®¦¥­¨¥ ahl=hl*de (0,(iy+#0E)=1 १ã«ìâ â ¡®«¥¥ 16 ¡¨â)
jr x2410 ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: AND ¯®«ãç¨âì §­ ç¥­¨¥ ®¯¥à æ¨¨ ¯®à §à來®£® «®£¨ç¥áª®£® "ˆ" ­ ¤ ¤¢ã¬ï
; ¢¥àå­¨¬¨ í«¥¬¥­â ¬¨ á⥪ 
x2447 dw x2459
db #80+"A","ND",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
and l
ld c,a
ld a,b
and h
ld b,a
x2456 jp x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: OR ¯®«ãç¨âì §­ ç¥­¨¥ ®¯¥à æ¨¨ ¯®à §à來®£® «®£¨ç¥áª®£® "ˆ‹ˆ" ­ ¤ ¤¢ã¬ï
; ¢¥àå­¨¬¨ í«¥¬¥­â ¬¨ á⥪ 
x2459 dw x2469
db #80+"O","R",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or l
ld c,a
ld a,b
or h
ld b,a
jr x2456 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: XOR ¯®«ãç¨âì §­ ç¥­¨¥ ®¯¥à æ¨¨ ¯®à §à來®£® «®£¨ç¥áª®£® "ˆáª«îç î饥
; ˆ‹ˆ" ­ ¤ ¤¢ã¬ï ¢¥àå­¨¬¨ í«¥¬¥­â ¬¨ á⥪ 
x2469 dw x247A
db #80+"X","OR",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
xor l
ld c,a
ld a,b
xor h
ld b,a
jr x2456 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: NOT ¨­¢¥àâ¨à®¢ âì §­ ç¥­¨¥ ­ å®¤ï饥áï ­  ¢¥à設¥ á⥪ 
x247A dw x248B
db #80+"N","OT",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,b
cpl
ld b,a
ld a,c
cpl
ld c,a
jr x2456 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: = ¨á⨭  ¯à¨ à ¢¥­á⢥ ¤¢ãå í«¥¬¥­â®¢, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x248B dw x2494
db #80+"=",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2418 ;á«®¢®: -
jr x24CB ;á«®¢®: 0=
;á«®¢®: 0> ¨á⨭ , ¥á«¨ í«¥¬¥­â ¯®«®¦¨â¥«¥­ (¡®«ìè¥ ­ã«ï), ¢ ¯à®â¨¢­®¬ á«ãç ¥
; ‹®¦ì
x2494 dw x24A7
db #80+"0",">",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x2499 call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or b
x249E ld bc,#0000
jr z,x24A4
x24A3 inc bc
x24A4 jp x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: < ¨á⨭ , ¥á«¨ n1 ¬¥­ìè¥ ç¥¬ n2, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x24A7 dw x24BA
db #80+"<",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x24AB call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld l,c
ld h,b
or a
sbc hl,de
x24B3 ld bc,#0000
jr c,x24A3 ;§ ¯¨áì =1 ­  áâíª  ­ «¨§ â®à 
jr x24A4 ;§ ¯¨áì =0 ­  áâíª  ­ «¨§ â®à 
;á«®¢®: > ¨á⨭ , ¥á«¨ n1 ¡®«ìè¥ ç¥¬ n2, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x24BA dw x24C6
db #80+">",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x24BE call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
or a
sbc hl,bc
jr x24B3
;á«®¢®: 0= ¨á⨭ , ¥á«¨ í«¥¬¥­â à ¢¥­ ­ã«î, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x24C6 dw x24D8
db #80+"0","=",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x24CB call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or b
inc bc
jr z,x24D6
ld bc,#0000
x24D6 jr x24A4 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: <= ¨á⨭ , ¥á«¨ n1 ¬¥­ìè¥ ¨«¨ à ¢­® n2, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x24D8 dw x24E2
db #80+"<","=",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
x24DD call x24BE ;á«®¢®: >
jr x24CB ;á«®¢®: 0=
;á«®¢®: >= ¨á⨭ , ¥á«¨ n1 ¡®«ìè¥ ¨«¨ à ¢­® n2, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦
x24E2 dw x24EC
db #80+">","=",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x24AB ;á«®¢®: <
jr x24CB ;á«®¢®: 0=
;á«®¢®: <> ¨á⨭ , ¥á«¨ n1 ­¥ à ¢­® n2, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ‹®¦ì
x24EC dw x24F6
db #80+"<",">",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2418 ;á«®¢®: -
jr x2499 ;á«®¢®: 0>
;á«®¢®: & ¯®¬¥áâ¨âì ­  ¢¥à設ã á⥪  §­ ç¥­¨¥ ®¯¥à æ¨¨ «®£¨ç¥áª®¥ "ˆ" ­ ¤ ¤¢ã¬ï
; ¢¥àå­¨¬¨ í«¥¬¥­â ¬¨ á⥪ , á ¬¨ í«¥¬¥­âë ¯à¨ í⮬ 㤠«ïîâáï. ‚
; ®â«¨ç¨¥ ®â á«®¢  AND, á«®¢® & à ¡®â ¥â á «®£¨ç¥áª¨¬¨ ¢¥«¨ç¨­ ¬¨
; (ˆá⨭  ¨ ‹®¦ì)
x24F6 dw x2505
db #80+"&",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,b
or c
jr z,x249E
ld a,l
or h
jr x249E
;á«®¢®: C@ à §¬¥áâ¨âì ­  ¢¥à設¥ á⥪  ¡ ©â, áç¨â ­­ë© ¯®  ¤à¥áã n1
x2505 dw x2510
db #80+"C","@",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
jp x236A ;§ ¯¨áì ­  áâíª  ­ «¨§ â®à  ¡ ©â  ¨§ ï祩ª¨ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;á«®¢®: C@ à §¬¥áâ¨âì ­  ¢¥à設¥ á⥪  ¡ ©â, áç¨â ­­ë© ¯®  ¤à¥áã n1
x2510 dw x251A
db #80+"@",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
jp x2374 ;§ ¯¨áì ­  áâíª  ­ «¨§ â®à  á«®¢  ¨§ ï祥ª ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
;á«®¢®: BIT à §¬¥áâ¨âì ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ¡¨â  á ­®¬¥à®¬ n1 ¢ í«¥¬¥­â¥ n2
x251A dw x253D
db #80+"B","IT",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld h,#00
ld a,l
and #0F
ld de,#0001
jr x2531
x252D sla e
rl d
x2531 dec a
jp p,x252D
ld a,e
and c
ld c,a
ld a,d
and b
or c
jr x255E ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: ADDR à §¬¥áâ¨âì ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥  ¤à¥á  ­  ª®â®àë© ááë« îâáï
; ª®¬ ­¤ë à ¡®â î騥 á ï祩ª ¬¨ ¯ ¬ïâ¨, â ª¨¥ ª ª LD ( ),reg ¨«¨
; SET b,(IX+d). „«ï ¤àã£¨å ª®¬ ­¤ ­  á⥪ ¯®¬¥é ¥âáï §­ ç¥­¨¥ 0
x253D dw x2555
db #80+"A","DDR",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,(iy+#04)
ld bc,#0000
and %00000011
jr z,x2552
ld bc,(xDDD2)
x2552 jp x234D ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: RD ¨á⨭ , ¥á«¨ ª®¬ ­¤  áç¨â뢠¥â ¨§ ¯ ¬ïâ¨, ¨ ‹®¦ì, ¥á«¨ áç¨â뢠­¨ï
; ­¥ ¯à®¨á室¨â
x2555 dw x2561
db #80+"R","D",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
bit 0,(iy+#04)
x255E jp x249E ;§ ¯¨áì §­ ç¥­¨ï ­  áâíª  ­ «¨§ â®à 
;á«®¢®: WR ¨á⨭ , ¥á«¨ ª®¬ ­¤  ¯à®¨§¢®¤¨â § ¯¨áì ¢ ¯ ¬ïâì, ¨ ‹®¦ì, ¥á«¨ § ¯¨áì
; ­¥ ¢ë¯®«­ï¥âáï
x2561 dw x256C
db #80+"W","R",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
bit 1,(iy+#04)
jr x255E
;á«®¢®: ACF ¯®¬¥é ¥â ­  ¢¥à設ã á⥪  §­ ç¥­¨¥ ˆá⨭ , ¥á«¨ ª®¬ ­¤  ¨á¯®«ì§ã¥â
; ¤®áâ㯠ª ï祩ª¥ ¯ ¬ïâ¨, ¤«ï ¤àã£¨å ª®¬ ­¤ - ¯®¬¥é ¥âáï §­ ç¥­¨¥ ‹®¦ì
x256C dw x2579
db #80+"A","CF",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,(xE018)
and %00000011
jr x255E
;á«®¢®: CF §­ ç¥­¨¥ ä« £  ¯¥à¥­®á 
x2579 dw x2586
db #80+"C","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#01
x2580 ld hl,xDD7F
and (hl)
jr x255E
;á«®¢®: NF §­ ç¥­¨¥ ä« £  ª®¬ ­¤ë ¢ëç¨â ­¨ï
x2586 dw x258F
db #80+"N","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#02
jr x2580
;á«®¢®: PVF §­ ç¥­¨¥ ä« £  ç¥â­®áâ¨/¯¥à¥¯®«­¥­¨ï
x258F dw x2599
db #80+"P","VF",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#04
jr x2580
;á«®¢®: HF §­ ç¥­¨ï ä« £  ¤¢®¨ç­® - ¤¥áïâ¨ç­®£® ¯¥à¥­®á 
x2599 dw x25A2
db #80+"H","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#10
jr x2580
;á«®¢®: ZF §­ ç¥­¨¥ ä« £  ­ã«¥¢®£® १ã«ìâ â 
x25A2 dw x25AB
db #80+"Z","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#40
jr x2580
;á«®¢®: SF §­ ç¥­¨¥ ä« £  ®âà¨æ â¥«ì­®£® १ã«ìâ â 
x25AB dw x25B4
db #80+"S","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,#80
jr x2580
;á«®¢®: REG à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâ஢®© ¯ àë, ᮮ⢥âáâ¢ãî饩 ª®¤ã n1
x25B4 dw x25CC
db #80+"R","EG",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
;§ ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
;¢å: c - ª®¤ ॣ¨áâ஢®© ¯ àë/ï祩ª¨ MEM
x25BD ld hl,xDD69 ; ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¬®­¨â®à¥
ld b,#00
add hl,bc
ld c,(hl)
inc hl
ld b,(hl) ;bc - §­ ç¥­¨¥ ॣ¨áâ஢®© ¯ àë/ï祩ª¨ MEM
jr x2552 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
x25C8 pop hl
ld c,(hl)
jr x25BD ;§ ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
;á«®¢®: CREG à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà , ¢ë¡¨à ¥¬®£® ª®¤®¬ n1
x25CC dw x25E6
db #80+"C","REG",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
x25D6 ld hl,xDD69
ld b,#00
add hl,bc
ld c,(hl)
ld b,#00
jp x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
x25E2 pop hl
ld c,(hl)
jr x25D6
;á«®¢®: SP à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  SP
x25E6 dw x25EF
db #80+"S","P",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #04
;á«®¢®: PC à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  PC
x25EF dw x25F8
db #80+"P","C",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #02
;á«®¢®: IX à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  IX
x25F8 dw x2601
db #80+"I","X",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #06
;á«®¢®: IY à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  IY
x2601 dw x260A
db #80+"I","Y",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #08
;á«®¢®: BC à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  BC
x260A dw x2613
db #80+"B","C",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #0E
;á«®¢®: DE à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  DE
x2613 dw x261C
db #80+"D","E",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #0C
;á«®¢®: HL à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  HL
x261C dw x2625
db #80+"H","L",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #0A
;á«®¢®: AF à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  AF
x2625 dw x262E
db #80+"A","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ॣ¨áâ஢®© ¯ àë ­  áâíª  ­ «¨§ â®à 
db #16
;á«®¢®: C à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  C
x262E dw x2636
db #80+"C",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0E
;á«®¢®: B à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  B
x2636 dw x263E
db #80+"B",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0F
;á«®¢®: E à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  E
x263E dw x2646
db #80+"E",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0C
;á«®¢®: D à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  D
x2646 dw x264E
db #80+"D",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0D
;á«®¢®: L à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  L
x264E dw x2656
db #80+"L",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0A
;á«®¢®: H à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  H
x2656 dw x265E
db #80+"H",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #0B
;á«®¢®: F à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  F
x265E dw x2666
db #80+"F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #16
;á«®¢®: A à §¬¥é ¥â ­  ¢¥à設¥ á⥪  §­ ç¥­¨¥ ॣ¨áâà  A
x2666 dw x266E
db #80+"A",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25E2
db #17
;á«®¢®: MEM ¯®¬¥áâ¨âì ­  ¢¥à設ã á⥪  §­ ç¥­¨¥ ⥪ã饩 ï祩ª¨ ¬®­¨â®à 
x266E dw x2678
db #80+"M","EM",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x25C8 ;ç⥭¨¥ ª®¤  ¨ § ¯¨áì ­®¬¥à  ï祩ª¨ ­  áâíª  ­ «¨§ â®à 
db #00 ;ª®¤ ï祩ª¨ MEM
;á«®¢®: CALL ¢ë¯®«­¨âì ¯®¤¯à®£à ¬¬ã, à á¯®«®¦¥­­ãî ¯®  ¤à¥áã n1
x2678 dw x269A
db #80+"C","ALL",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
push iy
push ix
call x268B
pop ix
pop iy
ret
x268B call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
push bc
ld ix,xDD69
ld de,x234D ;¯/¯ § ¯¨á¨ í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
ld hl,x237F ;¯/¯ ç⥭¨ï í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ret
;á«®¢®: ! á«®¢® (¤¢  ᬥ¦­ëå ¡ ©â ) n1 ¯®¬¥áâ¨âì ¢ ¯ ¬ïâì ¯®  ¤à¥áã n2
x269A dw x26A7
db #80+"!",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
inc hl
ld a,b
x26A5 rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
ret
;á«®¢®: C! ¡ ©â n1 ¯®¬¥áâ¨âì ¢ ï祩ªã ¯ ¬ïâ¨,  ¤à¥á㥬ãî n2
x26A7 dw x26B2
db #80+"C","!",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
jr x26A5
;á«®¢®: IF ¥á«¨ ¢¥àå­¨© í«¥¬¥­â á⥪  ¨¬¥¥â §­ ç¥­¨¥ ‹®¦ì (à ¢¥­ ­ã«î), â®
; ¢ë¯®«­¥­¨¥ á«®¢ , ᮤ¥à¦ é¥£® IF, ¯à¥ªà é ¥âáï. “¯à ¢«¥­¨¥ ¯¥à¥¤ ¥âáï
; ¢ë§¢ ¢è¥¬ã á«®¢ã («¨¡® ¯à®¨á室¨â ®ª®­ç ­¨¥ ¢ë¯®«­¥­¨ï
; ”®àâ - ¯à®£à ¬¬ë, ¥á«¨ á«®¢® ï¥âáï ¯¥à¢ë¬). ‚ ¯à®â¨¢­®¬ á«ãç ¥
; (¢¥àå­¨© í«¥¬¥­â - ˆá⨭ ) ¯à®¤®«¦ ¥âáï ¢ë¯®«­¥­¨¥ ⥪ã饣® á«®¢ 
x26B2 dw x26C0
db #80+"I","F",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,b
or c
ret nz ;¯à®¤®«¦ ¥¬ ¢ë¯®«­ïâì
jp x225D ;¯à¥à뢠­¨¥ ¢ë¯®«­¥­¨ï á«®¢ 
;á«®¢®: MEM! ãáâ ­®¢¨âì  ¤à¥á ⥪ã饩 ï祩ª®© ¬®­¨â®à  n1
x26C0 dw x26CF
db #80+"M","EM!",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld (xDD69),bc
ret
;á«®¢®: ?PAUSE ®¦¨¤ ­¨¥ ­ ¦ â¨ï ­  «î¡ãî ª« ¢¨èã, ¥á«¨ ¢¥àå­¨© í«¥¬¥­â á⥪ 
; ¨¬¥¥â §­ ç¥­¨¥ ˆá⨭  (­¥ à ¢¥­ ­ã«î). <20>®á«¥ ­ ¦ â¨ï ­  ª« ¢¨èã
; ¢ë¯®«­¥­¨¥ ¯à®£à ¬¬ë ¯à®¤®«¦ ¥âáï. …᫨ ¢®¢à¥¬ï ®¦¨¤ ­¨ï ¢¢¥áâ¨
; ª®¬¡¨­ æ¨î EDIT/C, â® ¢ë¯®«­¥­¨¥ ”®àâ - ¯à®£à ¬¬ë ¡ã¤¥â ¯à¥à¢ ­®,
;   ã¯à ¢«¥­¨¥ ¯¥à¥¤ ­® ¬®­¨â®àã
x26CF dw x26EA
db #80+"?","PAUSE",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or b
ret z
rst #30
dw rom6_x074A ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
db #06
cp #03 ;cs+1+c
ret nz
ld a,#9A ;á®®¡é¥­¨¥: command abandoned
jp x2307
;á«®¢®: KEY ®¦¨¤ ­¨¥ ­ ¦ â¨ï ­  ª ªãî-«¨¡® ª« ¢¨èã, ª®¤ ª« ¢¨è ¡ã¤¥â ¯®¬¥é¥­ ­ 
; ¢¥à設ã á⥪ 
x26EA dw x26FA
db #80+"K","EY",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
rst #30
dw rom6_x074A ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
db #06
x26F4 ld c,a
ld b,#00
x26F7 jp x234D ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: ?MEM ®¡­®¢¨âì (¯¥à¥¢ë¢¥áâ¨) ¢ë¢¥á⨠¤ ¬¯ ¯ ¬ï⨠­  íªà ­ (¨á¯®«ì§ã¥âáï
; íªà ­ ¤ ¬¯  ¯ ¬ï⨠⥭¥¢®£® ¬®­¨â®à ), ¥á«¨ n1 ¨á⨭ 
; (­¥ à ¢­® ­ã«î)
x26FA dw x270C
db #80+"?","MEM",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2736
and #CF ;®¡­®¢«ïâì ¤ ¬¯ ¯ ¬ïâ¨, ®¡­®¢«ïâì ¤¨§ áᥬ¡«¥à ¯ ¬ï⨠¯® ᮤ¥à¦¨¬®¬ã ï祩ª¨ ¯ ¬ïâ¨
x2706 ld (xE01E),a
jp x2CA8 ;¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
;á«®¢®: ?REG ®¡­®¢¨âì (¯¥à¥¢ë¢¥áâ¨) ¨­ä®à¬ æ¨î ® ᮤ¥à¦¨¬®¬ ॣ¨áâ஢ ­  íªà ­¥
; ¬®­¨â®à , ¥á«¨ n1 ¨á⨭  (­¥ à ¢­® ­ã«î)
x270C dw x271A
db #80+"?","REG",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2736
and #F5
jr x2706
;á«®¢®: ?DIS ¢ë¢¥á⨠ॠáᥬ¡«¥à âà áá¨à㥬ëå ª®¬ ­¤ (¢ ¯à ¢ë© ¢¥àå­¨© 㣮«
; íªà ­ ). <20>¥ áᥬ¡«¥à ¢ë¢®¤¨âáï ¯® ᮤ¥à¦¨¬®¬ã ॣ¨áâà  PC, ¥á«¨
; n1 ¨á⨭  (­¥ à ¢­® ­ã«î)
x271A dw x2728
db #80+"?","DIS",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2736
and #BF
jr x2706
;á«®¢®: ?SCR ¯®«­®áâìî ¯¥à¥¢ë¢¥á⨠íªà ­ ⥭¥¢®£® ¬®­¨â®à , ¥á«¨ n1 ¨á⨭ 
; (­¥ à ¢­® ­ã«î)
x2728 dw x2742
db #80+"?","SCR",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2736
and #80
jr x2706
;ç⥭¨¥ ¯¥à¥¬¥­­®© (xE01E)
x2736 call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,c
or b
pop hl
ret z
push hl
ld a,(xE01E)
ret
;á«®¢®: SYS1 ­  ¢¥à設ã á⥪  ¯®¬¥é ¥âáï §­ ç¥­¨¥ á¨á⥬­®£® ॣ¨áâà  #7FFD
x2742 dw x2750
db #80+"S","YS1",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld c,(iy-#02)
x274C ld b,#00
jr x26F7 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: SYS2 ­  ¢¥à設ã á⥪  ¯®¬¥é ¥âáï §­ ç¥­¨¥ á¨á⥬­®£® ॣ¨áâà  #1FFD
x2750 dw x275C
db #80+"S","YS2",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld c,(iy-#01)
jr x274C
;á«®¢®: !SYS1 §­ ç¥­¨¥ ¢¥àå­¥£® í«¥¬¥­â  á⥪  ãáâ ­ ¢«¨¢ ¥âáï ¢ á¨á⥬­®¬
; ॣ¨áâॠ#7FFD
x275C dw x276B
db #80+"!","SYS1",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld (iy-#02),c
ret
;á«®¢®: !SYS2 §­ ç¥­¨¥ ¢¥àå­¥£® í«¥¬¥­â  á⥪  ãáâ ­ ¢«¨¢ ¥âáï ¢ á¨á⥬­®¬
; ॣ¨áâॠ#1FFD
x276B dw x277A
db #80+"!","SYS2",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld (iy-#01),c
ret
;á«®¢®: IFF ­  ¢¥à設ã á⥪  ¯®¬¥é ¥âáï á®áâ®ï­¨¥ ä« £  à §à¥è¥­¨ï ¯à¥à뢠­¨©
; ¢ ®â« ¦¨¢ ¥¬®© ¯à®£à ¬¬¥
x277A dw x278A
db #80+"I","FF",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
ld a,(xDD83)
and #04
rrca
rrca
jp x26F4 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: RAM ¯®¬¥áâ¨âì ­  ¢¥à設ã á⥪  ­®¬¥à ãáâ ­®¢«¥­­®£® ¡ ­ª 
x278A dw x2796
db #80+"R","AM",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x36F9 ;¯®«ã祭¨¥ ­®¬¥à  «®£¨ç¥áª®© áâà ­¨æë ¯®«ì§®¢ â¥«ï a=[#0..#F]
jp x26F4 ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: !RAM ¨§¬¥­¨âì ­®¬¥à ãáâ ­®¢«¥­­®£® ¡ ­ª  ­  ¡ ­ª, 㪠§ë¢ ¥¬ë© ¢¥àå­¨¬
; í«¥¬¥­â®¬ á⥪ 
x2796 dw x27A4
db #80+"!","RAM",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld l,c
jp x3732 ;ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ L
;á«®¢®: IN ¯®¬¥áâ¨âì ­  ¢¥à設ã á⥪  ¤ ­­ë¥, áç¨â ­­ë¥ ¨§ ¯®àâ  ¢¢®¤ ,
;  ¤à¥á㥬®£® §­ ç¥­¨¥¬ ¢¥àå­¥£® í«¥¬¥­â  á⥪ 
x27A4 dw x27B0
db #80+"I","N",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
in c,(c)
jr x274C
;á«®¢®: OUT ¢ë¢¥á⨠¢ ¯®à⠢뢮¤  á  ¤à¥á®¬ n2 ¤ ­­ë¥ n1
x27B0 dw x27BC
db #80+"O","UT",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
out (c),l
ret
;á«®¢®: DIN ¯®¬¥áâ¨âì ­  ¢¥à設ã á⥪  ¤ ­­ë¥, áç¨â ­­ë¥ ¨§ ¯®àâ  ¢¢®¤  Tr-Dos,
;  ¤à¥á㥬®£® §­ ç¥­¨¥¬ ¢¥àå­¥£® í«¥¬¥­â  á⥪ 
x27BC dw x27CB
db #80+"D","IN",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x237F ;ç⥭¨¥ í«¥¬¥­â  á ¢¥à設ë áâíª   ­ «¨§ â®à 
rst #18 ;¢ë§®¢ ¯/¯ Tr-Dos
dw rom3_x3FF3 ;ç⥭¨¥ ¯®àâ 
ld c,a
jr x274C ;§ ¯¨áì í«¥¬¥­â  ­  áâíª  ­ «¨§ â®à 
;á«®¢®: DOUT ¢ë¢¥á⨠¢ ¯®à⠢뢮¤  Tr-Dos á  ¤à¥á®¬ n2 ¤ ­­ë¥ n1
x27CB dw x27DA
db #80+"D","OUT",#00
; ¯à®æ¥¤ãà  ®¡à ¡®âª¨
call x2398 ;ç⥭¨¥ ¤¢ãå í«¥¬¥­â®¢ á ¢¥à設ë áâíª   ­ «¨§ â®à 
ld a,l
rst #18 ;¢ë§®¢ ¯/¯ Tr-Dos
dw rom3_x3FF0 ;§ ¯¨áì ¢ ¯®àâ
ret
;ª®­¥æ ᯨ᪠ á«®¢
x27DA dw #0000
;ᯨ᮪ ã¯à ¢«ïîé¨å ª®¤®¢
x27DC db #01 ;ãáâ ­®¢ª   âਡã⮢ ¤«ï ¯®á«¥¤ãîé¨å ᨬ¢®«®¢
db #02 ;¢®ááâ ­®¢«¥­¨¥ § ¯®¬­¥­­ëå  âਡã⮢
db #04 ;¢ë¢®¤ á ¢ëà ¢­¨¢ ­¨¥¬
db #05 ;¢ë¢®¤ áâப¨ ¯® 業âàã ®ª­ 
db #06 ;¢ë¢®¤ áâப¨ ¢ë஢­¥­­®© ¯® ¯à ¢®¬ã ªà î ®ª­ 
db #07 ;§¢®­®ª
db #0A ;¯¥à¥¢®¤ áâப¨
db #0C ;®ç¨á⪠ ®ª­ 
db #0D ;¯¥à¥¢®¤ ª à¥âª¨
db #1B ;¯®§¨æ¨®­¨à®¢ ­¨¥ ªãàá®à  ¢­ãâਠ®ª­ 
x27E6 db #1E ;"®¡à â­ë© ᢨ⮪"
;â ¡«¨æ  á  ¤à¥á ¬¨ ®¡à ¡®âª¨ ã¯à ¢«ïîé¨å ª®¤®¢
x27E7 dw x2BF8 ;#01
dw x2C18 ;#02
dw x2AAD ;#04
dw x2ACA ;#05
dw x2AED ;#06
dw x2BA8 ;#07
dw x2B7D ;#0A
dw x2A5E ;#0C
dw x2B6E ;#0D
dw x2BCA ;#1B
dw x2A1B ;#1E
;€„<E282AC>…‘: #27FD 㤠«¥­¨¥ ªãàá®à  ¨ ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; a - ª®¤ ᨬ¢®« 
;¢ëå: nz - á«¥¤ãî騥 ª®®à¤¨­ âë ¯¥ç â¨ ­¥ ãáâ ­®¢«¥­ë
;
x27FD call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
;€„<E282AC>…‘: #2800 ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; a - ª®¤ ᨬ¢®« 
;¢ëå: nz - á«¥¤ãî騥 ª®®à¤¨­ âë ¯¥ç â¨ ­¥ ãáâ ­®¢«¥­ë
;
x2800 ld l,a
ld c,a ;!!! «¨è­ïï ª®¬ ­¤ 
ld h,#00
add hl,hl
add hl,hl
add hl,hl
ld de,(xE9E5)
add hl,de ; ¤à¥á ¤ ­­ëå ᨬ¢®« 
ld a,(ix+#0A)
cp #08
jr nz,x2847 ;ᨬ¢®« 6 ¯¨ªá¥«¥©
push hl
call x297C ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à 
pop de
ld b,#08 ;¯¥ç âì ᨬ¢®«  8pix
x281A ld a,(de)
ld (hl),a
inc de
inc h
djnz x281A
x2820 bit 1,(ix+7) ;¯¥ç âì  âਡã⮢, ¥á«¨ ­ã¦­®
jr z,x2834 ; âਡãâë ­¥ ¯¥ç â ¥¬
dec h
ld a,h
rrca
rrca
rrca
and #03
xor #58
ld h,a ; ¤à¥á ¢ ®¡« á⨠ âਡã⮢
ld a,(ix+6)
ld (hl),a
x2834 bit 1,(iy+9) ;ãáâ ­®¢¨¬ á«¥¤ãî騥 ª®®à¤¨­ âë ¯¥ç â¨
ret nz
inc (ix+1) ;crd X+1
ld a,(ix+#0B) ;è¨à¨­  ®ª­  ¢ ᨬ¢®« å
cp (ix+1)
ret nc ;¥é¥ ­¥ ¢ë諨 §  ¯à¥¤¥«ë ®ª­ 
dec (ix+1)
ret
;¯¥ç âì ᨬ¢®«  è¨à¨­®© 6 ¯¨ªá¥«¥©
x2847 push hl ; ¤à¥á ¤ ­­ëå ᨬ¢®« 
call x292F ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à 
pop de
ld a,b ;¯¥ç âì ᨬ¢®« 
ld b,#08
or a
jr z,x28A8 ;­¥â ᤢ¨£  ᨬ¢®« 
cp #04
jr c,x2896 ;ᤢ¨£ 2 ¯¨ªá¥«ï
jr z,x2876 ;ᤢ¨£ 4 ¯¨ªá¥«ï
; ª®®à¤¨­ â  ¢ §­ ª®¬¥á⥠6
x2858 ld a,(de)
rlca
rlca
push af ;«¥¢ ï ç áâì
and %00000011
ld c,a
ld a,(hl)
and %11111100
or c
ld (hl),a
inc hl
pop af
and %11110000 ;¯à ¢ ï ç áâì
ld c,a
ld a,(hl)
and %00001111
or c
ld (hl),a
dec hl
inc h
inc de
djnz x2858
jp x2820 ;¯¥ç âì  âਡã⮢ ¨ ¢ë室
; ª®®à¤¨­ â  ¢ §­ ª®¬¥á⥠4
x2876 ld a,(de)
rlca
rlca
rlca
rlca
push af ;«¥¢ ï ç áâì
and %00001111
ld c,a
ld a,(hl)
and %11110000
or c
ld (hl),a
inc hl
pop af ;¯à ¢ ï ç áâì
and %11000000
ld c,a
ld a,(hl)
and %00111111
or c
ld (hl),a
dec hl
inc h
inc de
djnz x2876
jp x2820 ;¯¥ç âì  âਡã⮢ ¨ ¢ë室
; ª®®à¤¨­ â  ¢ §­ ª®¬¥á⥠2
x2896 ld a,(hl)
and %11000000
ld c,a
ld a,(de)
rrca
rrca
and %00111111
or c
ld (hl),a
inc h
inc de
djnz x2896
jp x2820 ;¯¥ç âì  âਡã⮢ ¨ ¢ë室
; ª®®à¤¨­ â  ¢ §­ ª®¬¥á⥠0
x28A8 ld a,(hl)
and %00000011
ld c,a
ld a,(de)
and %11111100
or c
ld (hl),a
inc h
inc de
djnz x28A8
jp x2820 ;¯¥ç âì  âਡã⮢ ¨ ¢ë室
;€„<E282AC>…‘: #28B8 ¢®ááâ ­®¢«¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬, ¥á«¨ ­ã¦­® (6 ¯¨ªá¥«¥© ᨬ¢®«)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x28B8 set 2,(iy+9)
bit 0,(iy+9)
ret z
res 0,(iy+9)
;€„<E282AC>…‘: #28C5 á®åà ­¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬ (6 ¯¨ªá¥«¥© ᨬ¢®«)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x28C5 push af
call x292F ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 6 ¯¨ªá¥«¥©
ld de,xE3A4 ;­ ç «® ¡ãä¥à 
ld b,#08
x28CE ld c,#02
x28D0 bit 0,(iy+9)
jr z,x28DA
ld a,(hl)
ld (de),a
jr x28DC
x28DA ld a,(de)
ld (hl),a
x28DC inc l
inc de
dec c
jr nz,x28D0
dec l
dec l
inc h
djnz x28CE
pop af
ret
;€„<E282AC>…‘: #28E8 ¯¥ç âì/㤠«¥­¨¥ ªãàá®à  ¢ ®ª­¥
;
x28E8 ld a,#01
res 2,(iy+9)
bit 0,(iy+9)
ret nz
ld (xE3B6),a
;€„<E282AC>…‘: #28F6 ¬¨£ ­¨¥ ⥪á⮢®£® ªãàá®à  ¢ áâப¥ ¢¢®¤ 
;
x28F6 ld ix,(xE3B7)
bit 0,(ix+7)
ret nz ;ᨬ¢®« ªãàá®à  ­¥ ¢ë¢®¤¨¬
ld hl,xE01D
bit 2,(hl)
res 2,(hl)
ld hl,xE3B6
jr nz,x292C ;çâ®-â® ¯¥ç â ¥âáï
dec (hl)
ret nz ;áç¥â稪
ld (hl),#0C
ld hl,xE01D
bit 0,(hl)
res 0,(hl)
jr nz,x28C5 ;¢®ááâ ­®¢«¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬ (6 ¯¨ªá¥«¥© ᨬ¢®«)
;¯¥ç âì ªãàá®à 
set 0,(hl)
push hl
call x28C5 ;á®åà ­¥­¨¥ íªà ­  ¯®¤ ªãàá®à®¬ (6 ¯¨ªá¥«¥© ᨬ¢®«)
pop hl
ld a,(ix+#0C) ;ª®¤ ªãàá®à 
set 1,(hl) ;§ ¯à¥â ¨§¬¥­¥­¨ï ª®®à¤¨­ â ¯¥ç â¨
push hl
call x2800 ;¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
pop hl
res 1,(hl)
ret
x292C ld (hl),#0A
ret
;€„<E282AC>…‘: #292F <20> áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 6 ¯¨ªá¥«¥©
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;¢ëå: b - ᬥ饭¨¥ ¢ §­ ª®¬¥áâ¥
; hl -  ¤à¥á ­  íªà ­¥
;
x292F ld a,(ix+2) ;ª®®à¤¨­ â  Y
add a,(ix+0)
ld h,a
rrca
rrca
rrca
and #E0
ld l,a
ld c,(ix+1) ;ª®®à¤¨­ â  X
ld a,c
add a,c
add a,c
add a,a
ld c,a ;c=X*6
and #07
ld b,a ;ᬥ饭¨¥ ¢ §­ ª®¬¥áâ¥
ld a,c
rrca
rrca
rrca
add a,(ix+3)
and #1F
or l
ld l,a
ld a,h
and #18
or #40
ld h,a
ret
;€„<E282AC>…‘: #2959 <20> áç¥â ª®®à¤¨­ â ªãàá®à  ­  íªà ­¥ ¤«ï ᨬ¢®«®¢ è¨à¨­®© 8 ¯¨ªá¥«¥©
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;¢ëå: bc - ª®®à¤¨­ âë ªãàá®à 
;
x2959 ld l,(ix+0)
ld h,(ix+1)
ld c,(ix+2)
ld b,(ix+3)
add hl,bc
ld c,l
ld b,h
ret
;€„<E282AC>…‘: #2969 <20> áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;¢ëå: hl -  ¤à¥á ¢ ®¡« á⨠ âਡã⮢
;
x2969 call x2959 ;ª®®à¤¨­ âë ªãàá®à  ­  íªà ­¥
ld a,c
rrca
rrca
rrca
ld c,a
and #E0
xor b
ld l,a
ld a,c
and #03
xor #58
ld h,a
ret
;€„<E282AC>…‘: #297C <20> áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;¢ëå: bc - ª®®à¤¨­ âë ªãàá®à  ­  íªà ­¥
; hl -  ¤à¥á ­  íªà ­¥
;
x297C call x2959 ;ª®®à¤¨­ âë ªãàá®à  ­  íªà ­¥
ld a,c
rrca
rrca
rrca
and #E0
xor b
ld l,a
ld a,c
and #18
xor #40
ld h,a
ret
;€„<E282AC>…‘: #298E áªà®««¨­£ ®ª­  ¢¢¥àå
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x298E ld c,(ix+0)
ld b,(ix+1)
push bc ;á®åà ­¨¬ ª®®à¤¨­ âë ªãàá®à 
ld (ix+0),#01 ;crdY=1
ld (ix+1),#00 ;crdX=0
ld b,(ix+4) ;¢ëá®â  ®ª­ 
x29A0 dec b
jr z,x29BE
;áªà®««¨­£ ¢¢¥àå
push bc
call x297C ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
or a
call x29D0 ;áªà®««¨­£ áâப¨ ¤ ­­ëå ®ª­  ¢¢¥àå
bit 1,(ix+7)
jr z,x29B8 ; âਡãâë ­¥ ¬¥­ïîâáï
call x2969 ;à áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
or a
call x29FB ;áªà®««¨­£ áâப¨  âਡã⮢ ®ª­  ¢¢¥àå
x29B8 inc (ix+0)
pop bc
jr x29A0
;®ç¨á⪠ ­¨¦­¥© §­ ª®¬¥áâ­®© áâப¨
x29BE ld a,(ix+4) ;¢ëá®â  ®ª­ 
dec a
ld (ix+0),a ;ª®®à¤¨­ â  Y ¢ á ¬®¬ ­¨§ã
call x2A81 ;®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
pop bc
ld (ix+0),c ;¢®ááâ ­®¢«¥­¨¥ ª®®à¤¨­ â
ld (ix+1),b
ret
;€„<E282AC>…‘: #29D0 áªà®««¨­£ áâப¨ ¤ ­­ëå ®ª­ 
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; hl - íªà ­­ë©  ¤à¥á ­ ç «  áâப¨
; cy=1 áªà®««¨­£ ¢­¨§
; =0 áªà®««¨­£ ¢¢¥àå
;
x29D0 push hl
ld a,(ix+0) ;ª®®à¤¨­ â  Y ªãàá®à 
push af
jr c,x29DA
dec a
jr x29DB
x29DA inc a
x29DB ld (ix+0),a
call x297C ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
pop af
ld (ix+0),a
ld e,l
ld d,h
pop hl
ld a,#08 ;ª®¯¨à®¢ ­¨¥ áâப¨
x29EA ld b,#00
ld c,(ix+5) ;è¨à¨­  ®ª­  ¢ §­ ª®¬¥áâ å
push hl
push de
ldir
pop de
pop hl
inc h
inc d
dec a
jr nz,x29EA
ret
;€„<E282AC>…‘: #29FB áªà®««¨­£ áâப¨  âਡã⮢ ®ª­ 
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; hl -  ¤à¥á  âਡã⮢ ­ ç «  áâப¨
; cy=1 áªà®««¨­£ ¢­¨§
; =0 áªà®««¨­£ ¢¢¥àå
;
x29FB push hl
ld a,(ix+0)
push af
jr c,x2A05
dec a
jr x2A06
x2A05 inc a
x2A06 ld (ix+0),a
call x2969 ;à áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
pop af
ld (ix+0),a
ld e,l ;ª®¯¨à®¢ ­¨¥ áâப¨  âਡã⮢
ld d,h
pop hl
ld b,#00
ld c,(ix+5)
ldir
ret
;€„<E282AC>…‘: #2A1B ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #1E (áªà®««¨­£ ®ª­  ¢¢­¨§)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2A1B ld c,(ix+0)
ld b,(ix+1)
push bc ;á®åà ­¨¬ ª®®à¤¨­ âë ªãàá®à 
ld (ix+1),#00 ;ª®®à¤¨­ â  X=0
ld b,(ix+4) ;¢ëá®â  ®ª­ 
dec b
jr z,x2A4C ;¢ëá®â  =1 ¯à®áâ® ®ç¨é ¥¬ áâபã
dec b
ld (ix+0),b
inc b
;áªà®««¨¬ ®ª­® ¢­¨§
x2A31 push bc
call x297C ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
scf
call x29D0
bit 1,(ix+7)
jr z,x2A46 ; âਡãâë ­¥ áªà®««¨¬
call x2969 ;à áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
scf
call x29FB ;áªà®««¨­£ áâப¨  âਡã⮢ ®ª­ 
x2A46 dec (ix+0)
pop bc
djnz x2A31
;®ç¨é ¥¬ ¢¥àå­îî áâபã
x2A4C ld (ix+0),#00 ;crdY=0
call x2A81 ;®ç¨á⪠ áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
pop bc ;¢®ááâ ­®¢¨¬ ª®®à¤¨­ âë
ld (ix+0),c
ld (ix+1),b
ret
;€„<E282AC>…‘: #2A5B ®ç¨á⪠ ®ª­  ¯®«ì§®¢ â¥«ï (rst 8: db #83)
;
x2A5B call x300F ;ç¨â ¥¬ ix
;€„<E282AC>…‘: #2A5E ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0C (®ç¨á⪠ ⥪ã饣® ®ª­ )
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2A5E xor a ;ª®®à¤¨­ âë ªãàá®à  =0
ld (ix+0),a
ld (ix+1),a
ld b,(ix+4) ;¢ëá®â  ®ª­ 
x2A68 push bc ;®ç¨á⪠ ®ª­ 
call x2A85 ;®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
pop bc
inc (ix+0)
djnz x2A68
ld (ix+0),#00 ;crd X =0
call x28E8 ;¯¥ç âì ªãàá®à 
ret
;®ç¨á⪠ ¢¥àå­¥© §­ ª®¬¥áâ­®© áâப¨ ®ª­ 
x2A7A call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
ld (ix+1),0 ;crd Y =0
;®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
x2A81 res 3,(iy+9)
;€„<E282AC>…‘: #2A85 ®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨ ¯® ª®®à¤¨­ â ¬ ªãàá®à 
x2A85 call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
call x297C ;à áç¥â íªà ­­®£®  ¤à¥á  ªãàá®à  ¢ ®ª­¥ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
ld a,(ix+5) ;è¨à¨­  ®ª­ 
sub (ix+1)
ld c,#08 ;®ç¨á⪠ §­ ª®¬¥áâ­®© áâப¨
ld d,a ;è¨à¨­  ®ç¨é ¥¬®© ç á⨠®ª­ 
ld e,l
x2A95 ld b,d
ld l,e
x2A97 ld (hl),#00 ;®ç¨á⪠ ¯¨ªá¥«ì­®© áâப¨
inc l
djnz x2A97
inc h
dec c
jr nz,x2A95
push de
call x2969 ;à áç¥â  ¤à¥á  ªãàá®à  ¢ ®¡« á⨠ âਡã⮢ ¤«ï ᨬ¢®«®¢ 8 ¯¨ªá¥«¥©
pop bc
ld d,(ix+6) ; âਡãâë
x2AA8 ld (hl),d ;®ç¨á⪠  âਡãâ­®© áâப¨
inc hl
djnz x2AA8
ret
;€„<E282AC>…‘: #2AAD ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #04 (¢ë¢®¤ á ¢ëà ¢­¨¢ ­¨¥¬)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2AAD ld hl,xE01D
set 6,(hl)
set 7,(hl)
ld hl,xE1A6
ld (xE3BC),hl
ret
;€„<E282AC>…‘: #2ABB à áç¥â ¤«ï ¢ëà ¢­¨¢ ­¨ï áâப¨
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2ABB ld de,xE1A6 ;­ ç «® ¡ãä¥à 
ld hl,(xE3BC) ;ª®­¥æ ¡ãä¥à 
or a
sbc hl,de
ld b,l ;¤«¨­  áâப¨
ld a,(ix+#0B) ;à §¬¥à ®ª­  ¢ ᨬ¢®« å
sub l
ret
;€„<E282AC>…‘: #2ACA ¯¥ç âì áâப¨ ¨§ ¡ãä¥à  á ¢ëà ¢­¨¢ ¥¬ ¯® 業âàã ®ª­  #05
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2ACA call x2ABB
srl a ;ª®®à¤¨­ â  X ¯¥ç â¨ ¢ ®ª­¥
;¯¥ç âì á ¢ëà ¢­¨¢ ­¨¥¬
x2ACF ld (ix+1),a ;a=crdX, b=¤«¨­  áâப¨
push bc
call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
pop bc
ld hl,xE1A6 ;¯¥ç âì áâப¨
x2ADA ld a,(hl)
push hl
push bc
call x2800 ;¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
pop bc
pop hl
inc hl
djnz x2ADA
ld hl,xE01D ;§ ¢¥à襭¨¥ ã¯à ¢«ïî饣® ª®¤  #05 ¨ #04
res 6,(hl)
res 7,(hl)
ret
;€„<E282AC>…‘: #2AED ¯¥ç âì áâப¨ ¨§ ¡ãä¥à  á ¢ëà ¢­¨¢ ¥¬ ¯® ¯à ¢®¬ã ªà îã ®ª­  #06
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2AED call x2ABB
jr x2ACF
;€„<E282AC>…‘: #2AF2 ®¡à ¡®âª  ¡ ©â  ¯®á«¥ ã¯à ¢«ïî饣® ª®¤  #04
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2AF2 bit 5,(hl)
jr nz,x2B57 ;®¡à ¡®âª  §­ ç¥­¨ï ¡ ©â  ã¯à ¢«ïî饣® ª®¤ 
bit 7,(hl)
jr z,x2AFE
cp #20 ;¡ ©â ¯®á«¥ ª®¤  #04
jr c,x2B42 ;ã¯à ¢«ïî騩 ª®¤
x2AFE ld hl,(xE3BC) ;¯¥ç â­ë© ᨬ¢®« ¢ ¡ãä¥à
ld (hl),a
inc hl
ld (xE3BC),hl
ret
;€„<E282AC>…‘: #2B07 ¢®§¢à â ¨§ ¯/¯ ¯¥ç â¨ ᨬ¢®« 
x2B07 pop bc
pop de
pop hl
ret
;€„<E282AC>…‘: #2B0B ¯¥ç âì ᨬ¢®«  á® á¡à®á®¬ 7£® ¡¨â  (rst #10)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
;
x2B0B push af
and #7F
jr x2B13
;€„<E282AC>…‘: #2B10 ¯¥ç âì ¯à®¡¥«  (rst #10)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2B10 ld a,#20
;€„<E282AC>…‘: #2B12 ¯¥ç âì ᨬ¢®«  (rst #10)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
; a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
;
x2B12 push af
x2B13 call x2B18
pop af
ret
;¯¥ç âì ᨬ¢®«  ¢ ®ª­¥. ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ , a - ª®¤ ᨬ¢®« /ã¯à ¢«ïî騩 ª®¤
x2B18 push hl
push de
push bc
ld hl,x2B07 ; ¤à¥á ¢®§¢à â 
push hl
ld hl,xE01D
bit 6,(hl)
jr nz,x2AF2 ;¡ ©â(ë) ¯®á«¥ ã¯à ¢«ïî饣® ª®¤ 
bit 5,(ix+7)
ret nz ;§ ¯à¥â ¢ë¢®¤  ¢ ®ª­®
bit 4,(hl)
jp nz,x0950 ;¢ë¢®¤ ­  ¯à¨­â¥à
cp #20
jr c,x2B42 ;íâ® ã¯à ¢«ïî騩 ª®¤
call x27FD ;㤠«¥­¨¥ ªãàá®à  ¨ ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
ret nz ;á«¥¤ãî騥 ª®®à¤¨­ âë ¯¥ç â¨ ­¥ ãáâ ­®¢«¥­ë
bit 4,(ix+7)
ret z
call x2B75 ;¢®§à â ª à¥âª¨
jr x2B84 ;¯¥à¥¢®¤ áâப¨ á® áªà®««¨­£®¬ ¢¢¥àå
;¯¥à¥å®¤ ­  ¯/¯ ®¡à ¡®âª¨ ã¯à ¢«ïî饣® ª®¤ 
x2B42 ld hl,x27DC+#0A
ld bc,#000B
ld e,l
ld d,h
cpdr
ret nz ;ª®¤ ­¥ ­ ©¤¥­
inc de
ex de,hl
sla c
add hl,bc
ld e,(hl)
inc hl
ld d,(hl)
ex de,hl
jp (hl)
;®¡à ¡®âª  §­ ç¥­¨ï ¡ ©â  ã¯à ¢«ïî饣® ª®¤ 
x2B57 bit 7,(hl)
jr nz,x2B5D ;¥á«¨ ¢ à ¬ª å ª®¤  #04
res 6,(hl) ;á¡à®á ¯à¨§­ ª  ã¯à ¢«ïî饣® ª®¤ 
x2B5D res 5,(hl)
ld hl,(xE3B9) ;®¡à ¡®âª  §­ ç¥­¨ï ¡ ©â  ã¯à ¢«ïî饣® ª®¤ 
jp (hl)
;€„<E282AC>…‘: #2B63 ãáâ ­®¢ª   ¤à¥á  ¯/¯ ®¡à ¡®âª¨ ã¯à ¢«ïî饣® ª®¤ 
;
x2B63 ld (xE3B9),hl
ld hl,xE01D
set 5,(hl)
set 6,(hl)
ret
;€„<E282AC>…‘: #2B6E ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0D (¢®§¢à â ª à¥âª¨)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2B6E bit 2,(ix+7)
call nz,x2B84 ;¯¥à¥¢®¤ áâப¨ á® áªà®««¨­£®¬ ¢¢¥àå
;¢®§à â ª à¥âª¨
x2B75 call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
xor a
ld (ix+1),a ;crdX =0
ret
;€„<E282AC>…‘: #2B7D ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0A (¯¥à¥¢®¤ áâப¨)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2B7D bit 3,(ix+7)
call nz,x2B75 ;¢®§à â ª à¥âª¨
;¯¥à¥¢®¤ áâப¨ á® áªà®««¨­£®¬ ¢¢¥àå
x2B84 call x2B8E ;¯¥à¥¢®¤ áâப¨
ret nz ;¯¥à¥¢®¤ áâப¨ ¢ë¯®«­¥­
call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
jp x298E ;áªà®««¨­£ ®ª­  ¢¢¥àå
;¯¥à¥¢®¤ áâப¨
x2B8E ld a,(ix+4) ;¢ëá®â  ®ª­ 
dec a
cp (ix+0)
ret z ;¢ ¯®á«¥¤­¥© áâப¥ ­¥â ¯¥à¥¢®¤  áâப¨
call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
inc (ix+0) ;ª®®à¤¨­ â  Y+1
ret
;€„<E282AC>…‘: #2B9D ãáâ ­®¢ª  ­ ç «ì­ëå ª®®à¤¨­ â
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2B9D call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
xor a
ld (ix+1),a
ld (ix+0),a
ret
;€„<E282AC>…‘: #2BA8 ª®à®âª¨© §¢ãª®¢®© ᨣ­ « c ãáâ ­®¢ª®© ¡®à¤îà 
;
x2BA8 push de
ld de,#7060
push bc
push af
ld a,(xE053)
push af
x2BB2 out (#FE),a
xor #10
push af
ld a,r
and #01
add a,e
ld b,a
djnz $
pop af
dec d
jr nz,x2BB2
pop af
out (#FE),a
pop af
pop bc
pop de
ret
;€„<E282AC>…‘: #2BCA ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #1B (¯®§¨æ¨®­¨à®¢ ­¨¥ ªãàá®à  ¢­ãâਠ®ª­ )
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2BCA ld hl,x2BD0
jp x2B63
;ãáâ ­®¢ª  ª®®à¤¨­ âë Y ªãàá®à 
x2BD0 ld c,(ix+0)
cp (ix+4)
jr nc,x2BD9 ;§  ¯à¥¤¥« ¬¨ ®­ 
ld c,a
x2BD9 ld a,c
ld (xE3BB),a
ld hl,x2BE3
jp x2B63
;ãáâ ­®¢ª  ª®®à¤¨­ âë X ªãàá®à 
x2BE3 call x28B8 ;¯à¨§­ ª ¯¥ç â¨ ¨ ¢®ááâ ­®¢«¥­¨¥ íªà ­ 
ld c,(ix+#0B) ;è¨à¨­  ®ª­  ¢ ᨬ¢®« å
dec c
cp c
jr nc,x2BEE ;§  ¯à¥¤¥« ¬¨ ®­ 
ld c,a
x2BEE ld (ix+1),c
ld a,(xE3BB)
ld (ix+0),a
ret
;€„<E282AC>…‘: #2BF8 ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #01 (ãáâ ­®¢ª   âਡã⮢)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2BF8 ld a,(ix+6) ;á®åà ­¨¬ ⥪ã騥  âਡãâë
ld (xE3B4),a
ld hl,x2C04
jp x2B63
x2C04 or (ix+6) ;¬ áª  ãáâ ­ ¢«¨¢ ¥¬ëå  âਡã⮢
ld (ix+6),a
ld hl,x2C10
jp x2B63
x2C10 cpl ;¬ áª  á¡à á뢠¥¬ëå  âਡã⮢
and (ix+6)
ld (ix+6),a
ret
;€„<E282AC>…‘: #2C18 ®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #02 (¢®ááâ ­®¢«¥­¨¥  âਡã⮢)
;¢å: ix -  ¤à¥á ¤¥áªà¨¯â®à  ®ª­ 
;
x2C18 ld a,(xE3B4)
ld (ix+6),a
ret
;€„<E282AC>…‘: #2C1F ®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬ 
;¢ëå: nz - âãà¡® ¢ª«î祭
; z - ¢ëª«î祭
;
x2C1F xor a
ld h,a
ld e,#0E
inc a
x2C24 or a
jr z,x2C2E
dec h
jr nz,x2C24
dec e
jr nz,x2C24
inc e
x2C2E di
ret
;€„<E282AC>…‘: #2C30 ®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬  ¢ª«/¢ëª«
;
x2C30 bit 7,(iy+#19)
ret z ;âãà¡®-०¨¬ ­¥¤®áâ㯥­
call x3B75 ;®¯à¥¤¥«¥­¨¥ ⨯  ¯à¥à뢠­¨© im 1/2
push af
im 1
ei
call x2C1F ;®¯à¥¤¥«¥­¨¥ âãà¡®-०¨¬ 
ld hl,xE02D
res 6,(hl)
jr z,x2C48 ;âãà¡® ¢ëª«î祭®
set 6,(hl)
x2C48 pop af
ret nz
im 2
ret
;€„<E282AC>…‘: #2C4D ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
;¢å: a - ­®¬¥à ¤¨áª®¢®¤ 
;
x2C4D and #03
ld (xFFCA),a ;­®¬¥à ⥪ã饣® ¤¨áª®¢®¤ 
push hl
ld l,a
rlca
rlca
ld h,a
rlca
rlca
add a,h
add a,l ;a=a*#15
ld hl,(xE9F3) ; ¤à¥á ¡«®ª  ®¯¨á â¥«¥© ¤¨áª®¢®¤ 
add a,l
ld l,a
jr nc,x2C63
inc h ;hl  ¤à¥á ¡«®ª  ®¯¨á â¥«ï ⥪ã饣® ¤¨áª®¢®¤ 
x2C63 ld a,(hl)
or a
jr z,x2C75 ;­¥â ¯à¨¬®­â¨à®¢ ­­®£® ®¡à § 
push de ;ª®¯¨à㥬 ¤¥áªà¨¯â®à ¤¨áª®¢®¤  ¢ à ¡®ç¨© ¡ãä¥à
ld de,xE590
push bc
ld bc,#0015
ldir
pop bc
pop de
pop hl
ret
x2C75 ld (xE590),a
pop hl
ret
;€„<E282AC>…‘: #2C7A ç⥭¨¥ ¡ ©â  ¯®  ¤à¥áã #00FB
x2C7A ld a,(x00FB)
ret
;€„<E282AC>…‘: #2C7E ¯®¨áª ¨ ¢ë§®¢ ¯à®æ¥¤ãàë ®¡à ¡®âª¨ ¡¥§ ¢®§¢à â (¥á«¨ ­¥ ­ ©¤¥­®
; ¢®§¢à â)
x2C7E pop hl
jr x2C83
x2C81 inc hl
inc hl
x2C83 ld e,(hl)
inc e
jr z,x2C90 ;ª®­¥æ ᯨ᪠. ¢ë室
cp (hl)
inc hl
jr nz,x2C81 ;­¥ á®â¢¥âáâ¢ã¥â ª®¤ã ª« ¢¨è¨
ld e,(hl)
inc hl
ld d,(hl)
dec de
ex de,hl
x2C90 inc hl
jp (hl)
;€„<E282AC>…‘: #2C92 ¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë  áᥬ¡«¥à  á ª®­â஫¥¬ «®¢ã襪
x2C92 call x17F0 ;¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë ¯®  ¤à¥áã ¢ PC
call x328B ;¯à®¢¥àª  áà ¡ â뢠­¨ï «®¢ã誨
ld e,#FF
jp nc,x019D ;«®¢ã誠 áà ¡®â « 
x2C9D ld a,(xE02A)
and #7F
bit 2,a
ret nz ;­¥ ®¡­®¢«ïâì íªà ­ ¬®­¨â®à 
ld (xE01E),a
;€„<E282AC>…‘: #2CA8 ¯¥ç âì/®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
x2CA8 call x0550 ;á®åà ­¥­¨¥ íªà ­  ¨§ áâà ­¨æë 5
;®¡­®¢«¥­¨¥ ®ª­  ॣ¨áâ஢
call x3000
bit 0,(iy+#0A)
jr nz,x2CE9 ;Ž˜ˆ<CB9C>Š€!!! ¤®«¦­® ¡ëâì x2CEC
call x2A5E ;®ç¨á⪠ ⥪ã饣® ®ª­ 
rst #20
db "IR"
db #1B,#08,#0A ;crd Y,X
db "SZ-H-PNC"
db #0D,#0D
db "INT RAM ROM SCR"
db #1B,#00,#0B ;crd Y,X
dc "ZX "
bit 5,(iy-#02)
jr z,x2CE6 ;128K
rst #20 ;only 48k
dc "4"
jr x2CE9
x2CE6 rst #20
dc "12"
x2CE9 rst #20
dc "8k"
x2CEC ld (ix+0),#00 ;crd Y =0
ld (ix+1),#04 ;crd X =4
ld hl,(xDD83+#01) ;ॣ¨áâàë i,r ¯®«ì§®¢ â¥«ï
call x16DE ;¯¥ç âì ç¨á« 
inc (ix+0) ;crd Y +1
ld (ix+1),#00 ;crd X =0
call x2D70 ;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà , ¥£® §­ ç¥­¨ï ¨ ®¡« á⨠¯ ¬ï⨠ ¤à¥á㥬®© í⨬ ॣ¨áâ஬
ld (ix+0),#09 ;crd Y =9
call x2DF6 ;;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà  af, ¥£® §­ ç¥­¨ï ä« £®¢ ¢ ¤¢®¨ç­®¬ ¢¨¤¥
ld hl,xE01E ;iy+#0A
set 1,(hl) ;­¥ ®¡­®¢«ïâì ᮤ¥à¦¨¬®¥ ॣ¨áâ஢
set 2,(hl) ;­¥ ®¡­®¢«ïâì íªà ­ ¬®­¨â®à 
ld (ix+0),#0B ;¯¥ç âì ०¨¬  ¯à¥à뢠­¨© à §à¥è¥­ë/§ ¯à¥é¥­ë
ld hl,x0FA0 ;on
ld a,(xDD83)
and #04
jr nz,x2D23
x2D20 ld hl,x0FA2 ;off
x2D23 call x15C7 ;¯¥ç âì á®®¡é¥­¨ï ¨§ hl
x2D26 call x2B10 ;¯¥ç âì ¯à®¡¥« 
ld (ix+1),#05 ;¯¥ç âì ­®¬¥à  áâà ­¨æë Ž‡“
ld a,(xE012)
and #07
ld c,a
ld a,(xE012+1)
rrca
and #08
or c
call x16EC ;¯¥ç âì ç¨á«  a=[#0..#F]
ld (ix+1),#09 ;¯¥ç âì ­®¬¥à  áâà ­¨æë <20>‡“
ld a,(xE012)
rrca
rrca
rrca
rrca
and #01
call x16EC ;¯¥ç âì ç¨á«  a=[#0..#F]
ld (ix+1),#0D ;¯¥ç âì ­®¬¥à  íªà ­ 
ld c,#35
ld a,(xE012)
and #08
jr z,x2D5C
ld c,#37
x2D5C ld a,c
rst #10
ld (iy+6),4
call x2E38 ;®¡­®¢«¥­¨¥ ®ª­  ¤ ¬¯  ¯ ¬ïâ¨
call x2F30 ;®¡­®¢«¥­¨¥ ®ª­  ¤¨§ áᥬ¡«¥à 
ld hl,xE01E ;iy+#0A
ld a,(hl) ;ãáâ ­®¢ª  ä« £®¢
or %01010001
ld (hl),a
ret
;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà , ¥£® §­ ç¥­¨ï ¨ ®¡« á⨠¯ ¬ï⨠ ¤à¥á㥬®© í⨬ ॣ¨áâ஬
x2D70 bit 1,(iy+#0A)
ret nz
ld hl,x0F91
ld c,(iy+#0C)
ld b,#07
ld de,xDD6B
jr x2D85
x2D82 inc (ix+0)
x2D85 ld a,#03
cp b
jr nz,x2D93
bit 0,(iy+#0B)
jr z,x2D93
ld de,xDD79 ;®â®¡à ¦ îâáï ॣ¨áâàë  «ìâ¥à­ â¨¢­®£® ­ ¡®à 
x2D93 sla c
jr nc,x2D9B
inc hl ;íâ®â ॣ¨áâà ­¥ ¢ë¢®¤¨¬
inc hl
jr x2DDF
x2D9B bit 2,(iy+#0A)
jr nz,x2DAE ;­ §¢ ­¨¥ ॣ¨áâà  ­¥ ¯¥ç â âì
call x15C7 ;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà 
ld a,#03
cp b
jr c,x2DB0
call x2DE8 ;¯¥ç âì ¯à¨§­ ª   «ìâ¥à­ â¨¢­®£® ­ ¡®à  ॣ¨áâ஢
jr x2DB0
x2DAE inc hl
inc hl
x2DB0 ld (ix+1),4 ;crd X =4
push hl
push de
;¯¥ç âì §­ ç¥­¨ï ॣ¨áâà 
ex de,hl
ld a,(hl)
inc hl
ld h,(hl)
ld l,a ;hl-§­ ç¥­¨¥ ॣ¨áâà 
call x16DE ;¯¥ç âì ç¨á« 
;¯¥ç âì ᮤ¥à¦¨¬®£® ¯ ¬ï⨠ ¤à¥á㥬®© ⥪ã騬 ॣ¨áâ஬
bit 3,(iy+#0A)
jr nz,x2DDD ;ᮤ¥à¦¨¬®¥ ¯ ¬ï⨠ ¤à¥á㥬®© ⥪ã騬 ॣ¨áâ஬ ­¥ ¯¥ç â âì
push bc
ld bc,#0004
ld de,xDDAC
push de
call x0753 ;á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
pop hl
ld b,#04
x2DD2 inc (ix+1)
ld a,(hl)
call x16E3 ;¯¥ç âì ç¨á«  a=[#00..#FF]
inc hl
djnz x2DD2
pop bc
x2DDD pop de
pop hl
;á«¥¤ãî騩 ॣ¨áâà
x2DDF inc de
inc de
ld (ix+1),#00
djnz x2D82
ret
;¯¥ç âì ¯à¨§­ ª   «ìâ¥à­ â¨¢­®£® ­ ¡®à  ॣ¨áâ஢
x2DE8 bit 0,(iy+#0B)
x2DEC ld a," "
jp z,x2B12 ;¯¥ç âì ᨬ¢®« 
ld a,#27 ;'
jp x2B12 ;¯¥ç âì ᨬ¢®« 
;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà  af, ¥£® §­ ç¥­¨ï ä« £®¢ ¢ ¤¢®¨ç­®¬ ¢¨¤¥
x2DF6 ld b,(iy+#0A)
bit 1,b
ret nz ;¢á¥ ॣ¨áâàë ¢ ¬®­¨â®à¥ ­¥ ¢ë¢®¤ïâáï
bit 0,(iy+#0C)
ret nz ;ॣ¨áâà af ­¥ ¢ë¢®¤¨âáï
bit 2,b
ld b,(iy+#0B)
jr nz,x2E10 ;­ §¢ ­¨¥ ॣ¨áâà  ­¥ ¯¥ç â âì
rst #20 ;¯¥ç âì ­ §¢ ­¨ï ॣ¨áâà 
dc "AF"
bit 1,b
call x2DEC
x2E10 ld (ix+1),#04 ;crd X =4
bit 1,b ;;¯¥ç âì §­ ç¥­¨ï af/af'
ld hl,(xDD7F)
jr z,x2E1E
ld hl,(xDD81)
x2E1E call x16DE ;¯¥ç âì ç¨á«  hl=[#0000..#FFFF]
ld (ix+1),#0A ;crd X =10
;€„<E282AC>…‘: #2E25 ¯¥ç âì ¡ ©â  ¢ ¤¢®¨ç­®¬ ¢¨¤¥
;¢å: l - ¡ ©â
;
x2E25 ld b,#08 ;¯¥ç âì §­ ç¥­¨ï f/f' ¢ ¤¢®¨ç­®¬ ¢¨¤¥
x2E27 ld a,#30
sla l
jr nc,x2E2E
inc a
x2E2E call x2B12 ;¯¥ç âì ᨬ¢®« 
djnz x2E27
ld (ix+1),#00 ;crd X =0
ret
;€„<E282AC>…‘: #2E38 ¯¥ç âì ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
;
x2E38 bit 4,(iy+#0A)
ret nz
;€„<E282AC>…‘: #2E3D ¯¥ç âì ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
;
x2E3D call x3019 ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¤ ¬¯ ¯ ¬ïâ¨
call x2E9D ;;®¯à¥¤¥«¥­¨¥ ­®¢®£®  ¤à¥á  ­ ç «  ¤ ¬¯  ®â ᬥ饭¨ï ªãàá®à 
bit 5,(iy+#0A)
call z,x2F74 ;®¡­®¢¨¬ ¤¨§ á¬ ¯®¤ ªãàá®à®¬ ¢ ¤ ¬¯¥
call x3019 ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¤ ¬¯ ¯ ¬ïâ¨
call x2B9D ;ãáâ ­®¢ª  ­ ç «ì­ëå ª®®à¤¨­ â Y=0,X=0
;¯¥ç âì ¤ ¬¯  ¯ ¬ïâ¨
ld hl,(xDD87)
ld b,#08
x2E55 push bc
call x2EBA ;¯¥ç âì ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠¢ ®ª­¥
inc (ix+0)
pop bc
djnz x2E55
;¯¥ç âì ªãàá®à  ­  ⥪ã饩 ï祩ª¥ ¤ ¬¯ 
ld bc,#3E3C ;>< (ª®¤ë ¤¢ãå ᨬ¢®«®¢ ªãàá®à )
ld hl,(xDD69)
x2E65 call x2E7E ;à áç¥â ª®®à¤¨­ â ¯¥ç â¨ ªãàá®à  ¢ ®ª­¥ ¤ ¬¯  ¯ ¬ïâ¨
ld a,b ;¯¥ç âì ªãàá®à 
call x2B12 ;¯¥ç âì ᨬ¢®« 
inc (ix+1)
inc (ix+1)
ld a,c
jp x2B12 ;¯¥ç âì ᨬ¢®« 
;€„<E282AC>…‘: #2E76 㤠«¥­¨¥ ªãàá®à  ­  ¯à¥¤ë¤ã饩 ï祩ª¥ ¤ ¬¯ 
x2E76 ld bc,#2020
ld hl,(xDD89)
jr x2E65
;à áç¥â ª®®à¤¨­ â ¯¥ç â¨ ªãàá®à  ¢ ®ª­¥ ¤ ¬¯  ¯ ¬ïâ¨
;¢å: hl  ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
x2E7E ld (xDD89),hl
ld de,(xDD87)
or a
sbc hl,de ;ᬥ饭¨¥ ¢ ¤ ¬¯¥ ®â ­ ç «  ®â®¡à ¦¥­¨ï
ld a,l
and #07
ld h,a
add a,a
add a,h
add a,#07
ld (ix+1),a ;crd X
ld a,l
and #38
rra
rra
rra
ld (ix+0),a ;crd Y
ret
;®¯à¥¤¥«¥­¨¥ ­®¢®£®  ¤à¥á  ­ ç «  ¤ ¬¯  ®â ᬥ饭¨ï ªãàá®à 
x2E9D call x2E76 ;㤠«¥­¨¥ ªãàá®à  ­  ¯à¥¤ë¤ã饩 ï祩ª¥ ¤ ¬¯ 
ld hl,(xDD87) ; ¤à¥á ­ ç «  ¤ ¬¯  ¯ ¬ïâ¨
ld de,(xDD69) ; ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
ld bc,#003F
or a
sbc hl,de
ret z ;¯®§¨æ¨ï ªãàá®à  ¢ ¤ ¬¯¥ ­¥ ¨§¬¥­¨« áì
jr nc,x2EB2 ;­ã¦¥­ áªà®««¨­£
add hl,bc
ret c ;áªà®««¨­£ ­¥ ­ã¦¥­
x2EB2 ld hl,#FFE8
add hl,de
ld (xDD87),hl ;­®¢ë©  ¤à¥á ­ ç «  ¤ ¬¯ 
ret
;€„<E282AC>…‘: #2EBA ¯¥ç âì ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠(8 ¡ ©â)
;¢å: hl -  ¤à¥á ¯ ¬ï⨠(­ ç «  ¤ ¬¯ )
;¢ëå: hl - á«¥¤ãî騩  ¤à¥á ¯ ¬ï⨠(­ ç «  ¤ ¬¯ )
;
x2EBA ld (ix+1),#02 ;crd X =2
;€„<E282AC>…‘: #2EBE ¯¥ç âì ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠(8 ¡ ©â)
;¢å: hl -  ¤à¥á ¯ ¬ï⨠(­ ç «  ¤ ¬¯ )
;¢ëå: hl - á«¥¤ãî騩  ¤à¥á ¯ ¬ï⨠(­ ç «  ¤ ¬¯ )
;
x2EBE call x16DE ;¯¥ç âì  ¤à¥á  ­ ç «  ¤ ¬¯  ¯ ¬ï⨠hl=[#0000..#FFFF]
call x2F22 ;¥á«¨ ¢ë¢®¤ ­  ¯à¨­â¥à, ¯¥ç â ¥¬ ¯à®¡¥«
call x2F22 ;¥á«¨ ¢ë¢®¤ ­  ¯à¨­â¥à, ¯¥ç â ¥¬ ¯à®¡¥«
ld de,xDDAC
ld bc,#0008
push de
call x0753 ;á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
pop de
push de ;¯¥ç âì áâப¨ ¤ ¬¯ 
ld b,#08
call x2EE6
pop de
call x2F22 ;¥á«¨ ¢ë¢®¤ ­  ¯à¨­â¥à, ¯¥ç â ¥¬ ¯à®¡¥«
ld b,#08
call x2EF1 ;¯¥ç âì áâப¨ ᨬ¢®«®¢ ¤ ¬¯  ¯ ¬ïâ¨
ld (ix+1),#00
ret
;¯¥ç âì áâப¨ ¤ ¬¯ 
x2EE6 ld a,(de)
inc de
call x16E3 ;¯¥ç âì ç¨á«  a=[#00..#FF]
call x2F22 ;¥á«¨ ¢ë¢®¤ ­  ¯à¨­â¥à, ¯¥ç â ¥¬ ¯à®¡¥«
djnz x2EE6
ret
;¯¥ç âì áâப¨ ᨬ¢®«®¢ ¤ ¬¯  ¯ ¬ïâ¨
x2EF1 ld c,(iy+#05)
x2EF4 ld a,(de)
inc de
bit 7,c
jr nz,x2F02
and #7F
cp #20
jr nc,x2F02
ld a,#2E ;.
x2F02 bit 4,(iy+#09)
jr nz,x2F14 ;¢ë¢®¤ ­  ¯à¨­â¥à
push bc
push de
push hl
call x27FD ;㤠«¥­¨¥ ªãàá®à  ¨ ¯¥ç âì ᨬ¢®«  ¢ ®ª­¥
pop hl
pop de
pop bc
djnz x2EF4
ret
x2F14 and #7F ;¢ë¢®¤ ­  ¯à¨­â¥à
cp #20
jr nc,x2F1C
ld a,#2E ;.
x2F1C call x2B12 ;¯¥ç âì ᨬ¢®« 
djnz x2EF4
ret
;¥á«¨ ¢ë¢®¤ ­  ¯à¨­â¥à, ¯¥ç â ¥¬ ¯à®¡¥«
x2F22 inc (ix+1)
bit 4,(iy+#09)
ret z
dec (ix+1)
jp x2B10 ;¯¥ç âì ¯à®¡¥« 
;®¡­®¢«¥­¨¥ ®ª­  ¤¨§ áᥬ¡«¥à 
x2F30 ld b,(iy+#0A)
bit 6,b
ret nz ;­¥ ­ ¤® ®¡­®¢«ïâì
bit 0,b
jr nz,x2F47
ld hl,#5830 ;¯®¤á¢¥âª  ⥪ã饩 áâப¨ ¤¨§ áᥬ¡«¥à 
ld (hl),%00110000
ld bc,#000F
ld de,#5831
ldir
x2F47 ld hl,xE091
call x301C ;ix = ¤¥áªà¨¯â®à ®ª­  ¬®­¨â®à : ¤¨§ áᥬ¡¥à
bit 0,(iy+#0A)
call nz,x298E ;áªà®««¨­£ ®ª­  ¢¢¥àå
ld (ix+0),#01 ;crd Y =1
ld (ix+1),#00 ;crd X =0
; ¯¥ç âì ¤¨§ áᥬ¡«¨à®¢ ­­ëå ª®¬ ­¤
ld hl,(xDD6B) ;§­ ç¥­¨¥ pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
ld b,#05
bit 2,(iy+#05)
jr z,x2F69
ld b,#01
x2F69 push bc
call x2F80 ;¯¥ç âì ®¤­®© áâப¨ ¤¨§ á¬ 
inc (ix+0)
pop bc
djnz x2F69
ret
;€„<E282AC>…‘: #2F74 ¢ë¢®¤ ¤¨á á¬  ¯ ¬ï⨠¯®  ¤à¥áã ¢ de
;¢å: de -  ¤à¥á ¯ ¬ïâ¨
x2F74 call x3000 ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ॣ¨áâàë
ld (ix+0),#0B
ld (ix+1),#15
ex de,hl
;¯¥ç âì ®¤­®© áâப¨ ¤¨§ á¬ 
;¢å: hl -  ¤à¥á ¯ ¬ïâ¨
x2F80 call x16DE ;¯¥ç âì  ¤à¥á  ¯ ¬ï⨠hl=[#0000..#FFFF]
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à  ¯®  ¤à¥áã ¢ hl
push hl
ld hl,xDDB7 ;⥪á⮢ ï áâப  á ª®¬ ­¤®© ¤¨§ á¬ 
call x1512 ;¯¥ç âì ª®¬ ­¤ë  áᥬ¡«¥à 
call x2FED ;¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª­ 
pop hl
ld (ix+1),#00
ret
;€„<E282AC>…‘: #2F96  ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
;¢å: hl -  ¤à¥á ª®¬ ­¤ë  áᥬ¡«¥à  ¤«ï ¤¨§ á¬ 
x2F96 ld (xDDAA),hl
push hl
ld de,xDDAC
ld bc,#0004
call x0753 ;á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
call x197F ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
pop hl
add hl,bc
ld (xDDAA),hl ; ¤à¥á á«¥¤ãî饩 ª®¬ ­¤ë
ret
;€„<E282AC>…‘: #2FAC ¯¥ç âì áâப¨ ¤¨§ á¬ 
;¢å: a -
x2FAC bit 0,(iy+#05)
;¯¥ç âì  ¤à¥á  ª®¬ ­¤ë
push af
call z,x16DE ;¯¥ç âì ç¨á«  hl=[#0000..#FFFF]
pop af
ld c,l
ld b,h
ld (iy+#08),#20
call nz,x1669 ;¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨
;¯¥ç âì ª®¬ ­¤ë  áᥬ¡«¥à 
call x2F96 ; ­ «¨§ ª®¬ ­¤ë ¨ ¯à¥®¡à §®¢ ­¨¥ ¢ áâப㠤«ï ¯¥ç â¨
push hl
push bc
ld hl,xDDB7
call x1512 ;¯¥ç âì ª®¬ ­¤ë  áᥬ¡«¥à 
pop bc
;¢ë¢®¤ ¤®¯®«­¨â¥«ì­®© ¨­ä®à¬ æ¨¨
bit 1,(iy+#05)
jr z,x2FEB
ld a,#17
call x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ­­®© ª®®à¤¨­ âë X
ld a,";"
rst #10
ld b,c
push bc
ld de,xDDAC
push de
call x2EE6 ;¯¥ç âì áâப¨ ¤ ¬¯ 
ld a,#25
call x2FF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ­­®© ª®®à¤¨­ âë X
pop de
pop bc
call x2EF1 ;¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ­­®© ª®®à¤¨­ âë X
x2FEB pop hl
ret
;€„<E282AC>…‘: #2FED ¯¥ç âì ¯à®¡¥«®¢ ¤® ¯à ¢®£® ªà ï ®ª­ 
;¢å: a - crd X
x2FED ld a,(ix+#0B)
dec a
;€„<E282AC>…‘: #2FF1 ¯¥ç âì ¯à®¡¥«®¢ ¤® § ¤ ­­®© ª®®à¤¨­ âë X
;¢å: a - crd X
x2FF1 ld b,(ix+1) ;crd X
sub b
ret z
ret c
ld b,a
jp x15F3 ;¯¥ç âì ­¥áª®«ìª¨å ¯à®¢¥«®¢ (¢ B)
;€„<E282AC>…‘: #2FFB ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¤¥áªà¨¯â®à ®ª­ : ¢¢®¤ ç¨á« 
x2FFB ld hl,xE0E5
jr x301C
;€„<E282AC>…‘: #3000 ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ॣ¨áâàë
x3000 ld hl,xE075
jr x301C
;€„<E282AC>…‘: #3005 ãáâ ­®¢ª  ⥪ã騬 ®ª­ : main menu
x3005 ld hl,xE0C9
jr x301C
;€„<E282AC>…‘: #300A ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢ë¢®¤ ­  ¯à¨­â¥à
x300A ld hl,xE067
jr x301C
;€„<E282AC>…‘: #300F ç⥭¨¥ ᮤ¥à¦¨¬®£® ॣ¨áâà  ix ®á­®¢­®© ¯à®£à ¬¬ë
x300F ld hl,(xDD6F)
jr x301C
;€„<E282AC>…‘: #3014 ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢¢®¤ áâப¨ ­¨§ã íªà ­ 
x3014 ld hl,xE083
jr x301C
;€„<E282AC>…‘: #3019 ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¤ ¬¯ ¯ ¬ïâ¨
x3019 ld hl,xE09F
;€„<E282AC>…‘: #301C ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à  ¨§ hl
x301C ld (xE3B7),hl
push hl
pop ix
ret
;€„<E282AC>…‘: #3023 ®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
x3023 push hl
push de
push bc
rst #30
dw rom6_x074A ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
db #06
pop bc
pop de
pop hl
ret
;€„<E282AC>…‘: #302E ®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢) ¡¥§ ¢ë¢®¤  ªãàá®à  ¢ ®ª­¥
x302E ld e,(ix+7)
set 0,(ix+7) ;­¥ ¢ë¢®¤¨âì ᨬ¢®« ªãàá®à 
call x3023
ld (ix+7),e
ret
;€„<E282AC>…‘: #303C ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë, ­  ª®â®àãî 㪠§ë¢ ¥â PC (cs+3)
x303C xor a
jr x3041
;€„<E282AC>…‘: #303F ¢ë¯®«­¥­¨¥ ª®¬ ­¤ë, ­  ª®â®àãî 㪠§ë¢ ¥â PC á ¡ëáâàë¬ ¢ë¯®«­¥­¨¥¬
; ¯®¤¯à®£à ¬¬ (cs+4)
x303F ld a,#80
x3041 bit 1,(iy+#12)
jr z,x3049 ;íªà ­ ­¥ á®åà ­¥­ ¢ ram 8
or #01
x3049 ld (xE02A),a
call x2C92 ;¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë  áᥬ¡«¥à  á ª®­â஫¥¬ «®¢ã襪
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #3052 § £«ã誠 ¢å®¤  ¢ ¬®­¨â®à ¯à¨ ­¥á®¢¯ ¤¥­¨¨ ª®­â஫쭮© á㬬ë
x3052 di
call x305B
ld hl,x0040
push hl
ret
;€„<E282AC>…‘: #305B ¡«®ª¨à®¢ª  à ¡®âë ¯à¨ ®è¨¡ª¥ ª®­â஫쭮© á㬬ë
x305B ld hl,x3052
ld (xC064),hl ;¡«®ª¨à㥬 ¢ë§®¢ NMI
pop de ; ¤à¥á ®âªã¤  ¯à¨è«¨
ld sp,hl ;áâíª ¢ <20>‡“ ????
ex de,hl
jp (hl) ;¢¥à­¥¬áï
;€„<E282AC>…‘: #3065 ãáâ ­®¢ª  ॣ¨áâ஢ ¤«ï § £à㧪¨/á®åà ­¥­¨ï
;¢å: hl -  ¤à¥á áâப¨
;¢ëå: de - ¡ãä¥à ¤«ï ¤¨áª®¢ëå ®¯¥à æ¨©
; ix - ¡ãä¥à fcb
x3065 call x0EE6 ;¯®¨áª ¢ áâப¥ ¯¥à¢®£® ¯¥ç â­®£® ᨬ¢®« 
ld (iy+#0A),#00 ;®¡­®¢¨âì ­  íªà ­¥ ¢¥áì ®â« ¤ç¨ª
ld de,xE8A9 ;¡ãä¥à ¤«ï ¤¨áª®¢ëå ®¯¥à æ¨©
x306F ld ix,xE7A9 ;¡ãä¥à fcb
ret
;€„<E282AC>…‘: #3074 Š®¬ ­¤ : ERAse filespec
; 㤠«¥­¨¥ § ¤ ­­®£® ä ©«  á ¤¨áª 
x3074 call x3065 ;ãáâ ­®¢ª  ॣ¨áâ஢ ¤«ï à ¡®âë á ¤¨áª®¬
rst #30
dw rom7_x14C0 ;R8DOS #18(24) 㤠«¥­¨¥ ä ©« ,  ¤à¥á ᯥæ¨ä¨ª æ¨¨ ª®â®à®£® § ¤ ­ ¢ ॣ¨áâà å hl
db #07
x307B jp nc,x0AFB ;®è¨¡®ª ­¥â. ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
x307E rst #30
dw rom6_x066C ;ãáâ ­®¢ª  ª®¤ ¤¨áª®¢®© ®è¨¡ª¨ ¢ ¯¥à¥¬¥­­®© ¤«ï ¯¥ç â¨ ç¨á« 
db #06
x3082 jp x0B06 ;®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3085 Š®¬ ­¤ : SAVE filespec start,length
; § ¯¨áì ­  ¤¨áª § ¤ ­­®© ¯®á«¥¤®¢ â¥«ì­®á⨠¡ ©â
x3085 ld b,#02
call x309F ;®¯à¥¤¥«¥­¨¥  ¤à¥á  § £à㧪¨/á®åà ­¥­¨ï ¨ à §¬¥à  ¤ ­­ëå
call x3107 ;§ ¯¨áì ®¡« á⨠¯ ¬ï⨠¢ ä ©«
x308D jr c,x307E ;®è¨¡ª  ¤¨áª . ¢ë室
rst #30
dw rom7_x1307 ;R8DOS #15(21) § ªàëâì ä ©«, ®âªàëâë© ä㭪樥© 20
db #07
jr x307B ;¢ë室 ¢ ®â« ¤ç¨ª
;€„<E282AC>…‘: #3095 Š®¬ ­¤ : LOAD filespec [start[,length]]
; § £à㧪  á ¤¨áª  § ¤ ­­®© ¯®á«¥¤®¢ â¥«ì­®á⨠¡ ©â
x3095 ld b,#01
call x309F ;®¯à¥¤¥«¥­¨¥  ¤à¥á  § £à㧪¨/á®åà ­¥­¨ï ¨ à §¬¥à  ¤ ­­ëå
call x30D8 ;ç⥭¨¥ ä ©«  ¢ ¯ ¬ïâì
jr x308D ;¢ë室 ¢ ®â« ¤ç¨ª
;®¯à¥¤¥«¥­¨¥  ¤à¥á  § £à㧪¨/á®åà ­¥­¨ï ¨ à §¬¥à  ¤ ­­ëå
;¢å: b - ᯮᮡ ®âªàëâ¨ï ä ©« 
;¢ëå: hl -  ¤à¥á § £à㧪¨
; bc - à §¬¥à § £à㦠¥¬®£® ä ©« 
x309F call x3065 ;ãáâ ­®¢ª  ॣ¨áâ஢ ¤«ï à ¡®âë á ¤¨áª®¬
rst #30
dw rom7_x11B0 ;R8DOS #1B(27) à §¡®à ᯥæ¨ä¨ª æ¨¨ ä ©«  ¨ ¯®áâ஥­¨¥ ­  ¥¥ ®á­®¢¥ ¡«®ª  ã¯à ¢«¥­¨ï (fcb)
db #07
jr c,x307E ;®è¨¡ª  ¤¨áª 
call x0EBA ;¢ë¤¥«¥­¨¥ ¨§ áâப¨ ç¨á«®¢ëå ®¯¥à ­¤®¢ (­¥ ¡®«¥¥ 6)
cp #02
jr z,x30BB ;¤¢  ¯ à ¬¥âà 
jr nc,x30D4 ;᫨¨èª®¬ ¬­®£® ¯ à ¬¥â஢. ¢ë室
bit 0,(ix+#17)
jr nz,x30BB ;ä ©« ¤«ï ç⥭¨ï
ld a,#0A ;á®®¡é¥­¨¥: too few operands
jr x3082 ;¢ë室. ¬ «® ¯ à ¬¥â஢ ¤«ï § ¯¨á¨
x30BB push hl
push de
push af
rst #30
dw rom7_x11DF ;®âªàëâì ä ©« ¤«ï ¯®á«¥¤ãîé¨å ®¯¥à æ¨© á ­¨¬
db #07
jr c,x307E ;®è¨¡ª  ¤¨áª 
ld e,c
ld d,b ;¤«¨­  ä ©«  ¢ ¡ ©â å
pop af
pop hl
pop bc
cp #01
jr z,x30D1 ;⮫쪮 ®¤¨­ ¯ à ¬¥âà:  ¤à¥á § £à㧪¨
ret nc ;¤¢  ¯ à ¬¥âà . § ¯¨áì ä ©« 
ld hl,(xE7A9+#09) ; ¤à¥á § £à㧪¨ ¨§ § £®«®¢ª  ä ©« 
x30D1 ld b,d
ld c,e ;¤«¨­  ä ©«  ¢ ¡ ©â å
ret
x30D4 ld a,#0B ;á®®¡é¥­¨¥: too many operands
jr x3082
;€„<E282AC>…‘: #30D8 ç⥭¨¥ ä ©«  ¢ ¯ ¬ïâì
;¢å: ix -  ¤à¥á ¡ãä¥à  fcb
; hl -  ¤à¥á § £à㧪¨
; bc - à §¬¥à § £à㦠¥¬®£® ä ©« 
;¢ëå: cy=1 ®è¨¡ª¨ § ¯¨á¨
; a - ª®¤ ®è¨¡ª¨
x30D8 ld a,b
or a
jr z,x30F4 ;¬¥­¥¥ ᥪâ®à 
;ç⥭¨¥ 楫ëå ᥪâ®à®¢
x30DC push bc
push hl
rst #30
dw rom7_x1365 ;R8DOS #1C(28) ¯®á«¥¤®¢ â¥«ì­®¥ ç⥭¨¥ ®ç¥à¥¤­®£® ᥪâ®à  ¨§ ä ©« 
db #07
pop hl
pop bc
ret c ;®è¨¡ª  ¤¨áª 
push bc
ld de,xE8A9 ;¡ãä¥à ¤«ï § £à㧪¨
ex de,hl
ld bc,#0100
call x0749 ;ª®¯¨à®¢ ­¨¥ ᥪâ®à  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
ex de,hl
pop bc
djnz x30DC
x30F4 ld a,c
or a
ret z ;§ ª®­ç¨« áì § £à㧪 
;ç⥭¨¥ ­¥¯®«­®£® ᥪâ®à 
x30F7 push hl
push bc
rst #30
dw rom7_x1240 ;R8DOS #16(22) ç⥭¨¥ ®ç¥à¥¤­®£® ¡ ©â  ¨§ ä ©« . ä ©« ¤®«¦¥­ ¡ëâì ®âªàëâ ª ª "«®£¨ç¥áª¨©".
db #07
pop bc
pop hl
ret c ;®è¨¡ª  ¤¨áª 
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
inc hl
dec c
jr nz,x30F7
or a
ret
;€„<E282AC>…‘: #3107 § ¯¨áì ®¡« á⨠¯ ¬ï⨠¢ ä ©«
;¢å: ix -  ¤à¥á ¡ãä¥à  fcb
; hl -  ¤à¥á ­ ç «  ®¡« á⨠¯ ¬ïâ¨
; bc - ¤«¨­  ®¡« á⨠¯ ¬ïâ¨
;¢ëå: cy=1 ®è¨¡ª¨ § ¯¨á¨
; a - ª®¤ ®è¨¡ª¨
x3107 ld (xE7B2),hl ;áâ àâ®¢ë©  ¤à¥á
ld a,b
or a
jr z,x3122 ;1 ᥪâ®à
; § ¯¨áì 楫ëå ᥪâ®à®¢ ®¡« á⨠¯ ¬ïâ¨
x310E push bc
ld de,xE8A9 ;¡ãä¥à ¤«ï á®åà ­¥­¨ï
ld bc,#0100
call x0753 ;á®åà ­¥­¨¥ ®¡« á⨠¯ ¬ï⨠¢ ram 8
push hl
rst #30
dw rom7_x1395 ;R8DOS #1D(29) ¯®á«¥¤®¢ â¥«ì­ ï § ¯¨áì ®¤­®£® ᥪâ®à  ¨§ ¯ ¬ïâ¨
db #07
pop hl
pop bc
ret c ;®è¨¡ª  § ¯¨á¨
djnz x310E
x3122 ld a,c
or a
ret z ;®¡« áâì ¯ ¬ï⨠ªà â­  à §¬¥àã ᥪâ®à 
x3125 push hl
push bc
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
rst #30
dw rom7_x128C ;R8DOS #17(23) § ¯¨áì ¡ ©â  ¢ ä ©«. ” ©« ¤®«¦¥­ ¡ëâì ®âªàëâ ª ª "«®£¨ç¥áª¨©"
db #07
pop bc
pop hl
ret c ;®è¨¡ª  § ¯¨á¨
inc hl
dec c
jr nz,x3125
or a
ret
;€„<E282AC>…‘: #3135 ¯®¤áç¥â ª®­â஫쭮© á㬬ë áâà ­¨æë
;¢ëå: hl=#00F6
x3135 xor a
ld l,a
ld h,a ;hl=#0000
ld bc,#00F6
push bc
call x315A
inc hl ;hl=#00F7, a=#6D
ld bc,#000D
call x315A ;hl=#0104, a=#A5
ld de,#000C
add hl,de ;hl=#0110
ld bc,#3EF0
call x315A ;a=#80
pop hl ;hl=#00F6
cp (hl)
jp z,x04D9 ;ª®­â஫쭠ï á㬬  ᮢ¯ « .¢ëª«î稬 âãà¡®¨ ¢®§¢à â
call x305B ;¡«®ª¨à®¢ª  à ¡®âë ¯à¨ ®è¨¡ª¥ ª®­â஫쭮© á㬬ë
jr x3135 ;¢¥ç­ë© 横«
x315A add a,(hl)
cpi
jp pe,x315A ;¯®ª  bc<>0
ret
;€„<E282AC>…‘: #3161 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
x3161 dc "Help"
dc "?"
dc "III"
dc "OOO"
dc "CMOS"
dc "RESNVRAM"
db #00
x3179 dw x3AD0: db %00000000 ;Help
dw x3389: db %00000001 ;?
dw x318C: db %00000000 ;III
dw x3194: db %00000000 ;OOO
dw x319C: db %00000000 ;CMOS
dw x31A4: db %00000000 ;RESNVRAM
db #00
;€„<E282AC>…‘: #318C Š®¬ ­¤  III (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
x318C rst #30
dw rom7_x16B9 ;à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©
db #07
ret c ;®è¨¡ª 
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #3194 Š®¬ ­¤  OOO (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
x3194 rst #30
dw rom7_x0DC7 ;§ ¯¨áì ¢á¥© ¯ ¬ï⨠NVRAM ¨§ ¯ ¬ï⨠#7530
db #07
ret c ;®è¨¡ª 
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #319C Š®¬ ­¤  CMOS (à ¡®â  á ª®­â஫«¥à®¬ ¯à¥à뢠­¨©)
x319C rst #30
dw rom7_x0DAD ;ç⥭¨¥ ¢á¥© ¯ ¬ï⨠NVRAM ¢ ¯ ¬ïâì #7530
db #07
ret c ;®è¨¡ª 
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #31A4 Š®¬ ­¤  RESNVRAM (çâ®-â® ¯¨è¥â ¢ NVRAM)
x31A4 rst #30
dw rom7_x0E72 ;çâ®-â® ¯¨è¥â ¢ NVRAM
db #07
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #31AB Š®¬ ­¤ : SLOW type  ¢â®¬ â¨ç¥áª ï âà áá¨à®¢ª 
;¢å: de - ¯ à ¬¥âàë ª®¬ ­¤ë
x31AB ld a,d
or a
ld a,#2C ;á®®¡é¥­¨¥: bad operand
ret nz
ld (iy+#16),e
ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
call x18C0 ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¨ ¨á¯®«­¥­¨¥ á«®¢  ­ «¨§ â®à  st0-st9
x31B9 call x2C92 ;¢ë¯®«­¥­¨¥ ®¤­®© ª®¬ ­¤ë  áᥬ¡«¥à  á ª®­â஫¥¬ «®¢ã襪
call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
jr x31B9
;€„<E282AC>…‘: #31C1 Š®¬ ­¤ : LISTBreak/LBreak
; ¢ë¢®¤ ­  íªà ­ ¨­ä®à¬ æ¨¨ ® «®¢ã誠å
x31C1 ld hl,xE52D
ld de,#2827
ld bc,x31FC
ld a,#09
push bc
push af
push hl
push de
call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld b,e
ld c,#00 ;á®®¡é¥­¨¥: curent breackpoint selections:
rst #08
rst #20
db #0D,#8D
pop bc
ld c,#00 ;á®®¡é¥­¨¥: no address bank type state init count word
rst #08
rst #20
db #0D,#8D
pop hl
pop de
ld e,#01
pop bc
;hl -  ¤à¥á «®¢ã誨
;d - ª®«¨ç¥á⢮ «®¢ã襪+1
;e =#01 ­®¬¥à ⥪饩 «®¢ã誨
;bc  ¤à¥á ¯/¯
x31E6 push de
push bc
call x3A93 ;¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ bc - call (bc)
jr c,x31F9 ;§ ª®­ç¥­  ¯¥ç âì
call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
rst #20
db #8D
pop bc
pop de
inc e
ld a,d
cp e
jr nz,x31E6
x31F9 ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;¯¥ç âì ¨­ä®à¬ æ¨¨ ®¡ ®¤­®© «®¢ã誥
x31FC rst #30
dw rom6_x0156 ;¯¥ç âì ¨­ä®à¬ æ¨¨ ® «®¢ã誥
db #06
ret
;€„<E282AC>…‘ #3201 ¯¥ç âì ON/OFF ®â ä« £  nz-ON/z-OFF
x3201 push hl
jr nz,x320A
rst #20
dc "OFF"
pop hl
ret
x320A rst #20
dc "ON "
pop hl
ret
;€„<E282AC>…‘: #3210 ®¯à¥¤¥«¥­¨¥  ¤à¥á  «®¢ã誨
;¢å: a - ­®¬¥à «®¢ã誨
;¢ëå: de -  ¤à¥á «®¢ã誨
; hl -  ¤à¥á ï祩ª¨ á  ¤à¥á®¬ «®¢ã誨
; z - ­¥â «®¢ã誨
x3210 ld de,xE9BD
ld l,a
ld h,#00
add hl,hl ;a*2
add hl,de ;hl=xE9BD + a*2
ld e,(hl)
push hl
inc hl
ld d,(hl)
ld l,a
ld a,d
or e
ld a,l
pop hl
ret
;€„<E282AC>…‘: #3222 ¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨
x3222 res 7,(iy+#0B)
jr x322C
;€„<E282AC>…‘: #3228 á®åà ­¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ ¢á¥¬¨ «®¢ã誠¬¨ ¨ ãáâ ­®¢ª  «®¢ã襪
x3228 set 7,(iy+#0B)
x322C call x3281 ;ãáâ ­®¢ª  ­ ç «  ᯨ᪠ breackpoint`®¢
x322F call x326C ;¯à®¢¥àª  ­ «¨ç¨ï ⥪ã饩 «®¢ã誨
jr nc,x3267 ;­¥â «®¢ã誨 á í⨬ ­®¬¥à®¬
call x35E0 ;á®åà ­¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
exx
ld a,h
exx
and #C0
jr z,x3250 ; ¤à¥á «®¢ã誨 [#0000..#3FFF]
bit 5,(iy-#02)
jr z,x324B ;zx128k
call x3707 ;zx48k áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®©
exx
jr nz,x3264
exx
x324B push bc
call x3732 ;ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ L
pop bc
x3250 exx
bit 7,(iy+#0B)
jr z,x3260
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld (ix+4),a ;á®åà ­¨¬ ¡ ©â ¢ ®¯¨á ­¨¨ «®¢ã誨
ld a,#CF ;rst 8
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
jr x3264 ;ãáâ ­®¢ª  ¡ ©â  «®¢ã誨
x3260 ld a,(ix+4) ;¢®ááâ ­®¢«¥­¨¥ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï ¯®¤ «®¢ã誮©
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
x3264 call x3A4E ;¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
x3267 add ix,de ;á«¥¤ãîé ï «®¢ã誠
djnz x322F
ret
;¯à®¢¥àª  ­ «¨ç¨ï ⥪ã饩 «®¢ã誨
;¢ëå: cy=0 ­¥â «®¢ã誨
; =1 ¥áâì «®¢ã誠
; hl' -  ¤à¥á «®¢ã誨
; l - «®£¨ç¥áª¨© ­®¬¥à áâà ­¨æë á «®¢ã誮©
;
x326C ld a,(ix+0)
rlca
ret nc
ccf
bit 1,a
ret nz
ld l,(ix+2)
ld h,(ix+3)
exx
ld l,(ix+1)
ccf
ret
;€„<E282AC>…‘: #3281 ãáâ ­®¢ª  ­ ç «  ᯨ᪠ «®¢ã襪
x3281 ld ix,xE52D
ld b,#08 ;ª®«¨ç¥á⢮ ¡«®ª®¢
ld de,#000B ;¤«¨­  ®¤­®£® ¡«®ª 
ret
;€„<E282AC>…‘: #328B ¯à®¢¥àª  áà ¡ â뢠­¨ï «®¢ã誨
;¢å: hl -  ¤à¥á PC ¯®«ì§®¢ â¥«ï
;¢ëå: cy=1 ­¥â áà ¡®â ¢è¨å «®¢ã襪
; =0 «®¢ã誠 áà ¡®â «  -> ix  ¤à¥á «®¢ã誨
; de=#000B
; b - ®¡à â­ë© ­®¬¥à «®¢ã誨
x328B call x3281 ;ãáâ ­®¢ª  ­ ç «  ᯨ᪠ «®¢ã襪
x328E ld a,(ix+#00)
rlca
jr nc,x32A9 ;«®¢ã誨 ­¥â
exx
ld l,(ix+#01)
call x3707 ;áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®© ¢ l
exx
jr nz,x32A9 ;­¥ â  áâà ­¨æ 
ld a,(ix+#02)
cp l
jr nz,x32A9 ;­¥ â®â  ¤à¥á
ld a,(ix+#03)
cp h
ret z ;«®¢ã誠 áà ¡®â « 
x32A9 add ix,de
djnz x328E
scf
ret
;€„<E282AC>…‘: #32AF Š®¬ ­¤ : DELBreak number
; 㤠«¥­¨¥ ¨­ä®à¬ æ¨¨ ® «®¢ã誥 á ­®¬¥à®¬ number
x32AF call x32C2 ;¯à®¢¥àª  ­®¬¥à  ¨ ®¯à¥¤¥«¥­¨¥  ¤à¥á  ®¯¨á ­¨ï «®¢ã誨
ld (ix+#00),#00
ld a,(xDD99) ;­®¬¥à «®¢ã誨
call x3210
xor a
ld (hl),a
inc hl
ld (hl),a
jr x32FB ;¢®§¢à â ¢ ®â« ¤ç¨ª
;¯à®¢¥àª  ­®¬¥à  ¨ ®¯à¥¤¥«¥­¨¥  ¤à¥á  ®¯¨á ­¨ï «®¢ã誨
;¢å: de - ­®¬¥à «®¢ã誨 [1..8]
;¢ëå: ix -  ¤à¥á «®¢ã誨
; z - «®¢ã誠 ­¥ § ¤ ­ 
x32C2 push af
dec e
ld a,e
and #F8
or d
ld a,#22 ;á®®¡é¥­¨¥: invalid number breackpoint
jr nz,x3300 ;¢ë室 ¢ ®â« ¤ç¨ª
push hl
ld l,e
ld h,d
add hl,hl
add hl,hl
add hl,de
add hl,hl
add hl,de ;hl=hl*11
ld de,xE52D
add hl,de ; ¤à¥á «®¢ã誨
push hl
pop ix
pop hl
pop af
bit 6,(ix+#00)
ret
;€„<E282AC>…‘: #32E2 Š®¬ ­¤ : BRK number, [on|off]
; ¢ª«î祭¨¥ (on)/¢ëª«î祭¨¥ (off) «®¢ã誨
x32E2 call x32C2 ;¯à®¢¥àª  ­®¬¥à  ¨ ®¯à¥¤¥«¥­¨¥  ¤à¥á  ®¯¨á ­¨ï «®¢ã誨
ld a,#26 ;á®®¡é¥­¨¥: breackpoint undefined
jr z,x3300 ;«®¢ã誠 ­¥ ®¯à¥¤¥«¥­ . ¢ë室 ¢ ®â« ¤ç¨ª
ld a,l
and #FE
or h
ld a,#23 ;á®®¡é¥­¨¥: invalid state breackpoint
jr nz,x3300 ;­¥¢¥à­ë© ¯ à ¬¥âà. ¢ë室 ¢ ®â« ¤ç¨ª
x32F1 sla (ix+#00)
srl l
rr (ix+#00)
x32FB ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;®è¨¡ª  ¬ «® ¯ à ¬¥â஢. ¢ë室 ¢ ®â« ¤ç¨ª
x32FE ld a,#0A ;á®®¡é¥­¨¥: too few operands
x3300 jp x0B06 ;®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3303 Š®¬ ­¤ : BREak number, type, addr, int_count[,bank]
; ãáâ ­®¢ª  «®¢ã誨 ­   ¤à¥á addr
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; bc - âà¥â¨© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3303 call x32C2 ;¯à®¢¥àª  ­®¬¥à  ¨ ®¯à¥¤¥«¥­¨¥  ¤à¥á  ®¯¨á ­¨ï «®¢ã誨
rst #30
dw rom6_x01E4 ;ãáâ ­®¢ª  ­®¢®© «®¢ã誨 ¢ ®â« ¤ç¨ª¥
db #06
ret
;€„<E282AC>…‘: #330B ãáâ ­®¢ª  «®¢ã誨 #8, ¯® ⥪ãé¥¬ã  ¤à¥áã «¨á⨭£  ¤¨§ á¬ 
x330B ld de,#0008 ;­®¬¥à «®¢ã誨
ld bc,(xDD8B) ; ¤à¥á ¯ ¬ïâ¨
ld a,b
and #C0
ld hl,#0001 ;⨯ «®¢ã誨
ld (xDD99+#06),hl ;4© ¯ à ¬¥âà, áç¥â稪
jr z,x331E ; ¤à¥á ¢ <20>‡“
dec hl
x331E ld a,#04 ;ª®«-¢® ¯ à ¬¥â஢
call x3303 ;Š®¬ ­¤ : BREak number, type, addr, int_count[,bank]
x3323 jp x3960
;€„<E282AC>…‘: #3326 㤠«¥­¨¥ «®¢ã誨 #8
x3326 ld de,#0008
call x32C2 ;¯à®¢¥àª  ­®¬¥à  ¨ ®¯à¥¤¥«¥­¨¥  ¤à¥á  ®¯¨á ­¨ï «®¢ã誨
ld l,#00
call x32F1 ;㤠«¥­¨¥ «®¢ã誨
jr x3323
;€„<E282AC>…‘: #3333 Š®¬ ­¤ : OPTion bit on|off
; § ¤ ­¨¥ ­¥ª®â®àëå ०¨¬®¢ ¬®­¨â®à  (¯¥à¥¬¥­­ ï xE019)
x3333 ld a,e
and #F8
or d
ld a,#0D ;á®®¡é¥­¨¥: known number
ret nz ;­¥¢¥à­ë© ­®¬¥à ¡¨â . ¢ë室 ¢ ®â« ¤ç¨ª
ld a,l
and #FE
or h
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret nz ;­¥¢¥à­®¥ §­ ç¥­¨¥ ¡¨â . ¢ë室 ¢ ®â« ¤ç¨ª
;®¯à¥¤¥«¥­¨¥ ¬ áª¨ ¯® ­®¬¥àã ¡¨â 
inc h
ld a,e
x3343 or a
jr z,x334B
dec a
sla h
jr x3343
;ãáâ ­®¢ª /á¡à®á ¡¨â 
x334B ld a,h
bit 0,l
jr nz,x335B
xor #FF
and (iy+#05)
x3355 ld (iy+#05),a
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
x335B or (iy+#05)
jr x3355
;€„<E282AC>…‘: #3360 Š®¬ ­¤ : OUT addr, data
; § ¯¨áì ¡ ©â  ¤ ­­ëå data ¢ ¯®àâ ¢¢®¤ /¢ë¢®¤ 
x3360 ld a,h
or a
ld a,#11 ;á®®¡é¥­¨¥: number too big
ret nz ;¢ ¯®àâ ¬®¦­® ¢ë¢¥á⨠⮫쪮 ¡ ©â
ld c,e
ld b,d
out (c),l
x3369 ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #336C Š®¬ ­¤ : OUTD addr, data
; § ¯¨áì ¡ ©â  ¤ ­­ëå data ¢ ¯®àâ ¢¢®¤ /¢ë¢®¤  ¢  ¤à¥á­®¬ ¯à®áâà ­á⢥ trdos
x336C ld a,h
or a
ld a,#11 ;á®®¡é¥­¨¥: number too big
ret nz ;¢ ¯®àâ ¬®¦­® ¢ë¢¥á⨠⮫쪮 ¡ ©â
ld c,e
ld b,d
ld a,l
rst #30
dw rom3_x3FF0 ;¢ë¢®¤ ¢ ¯®àâ
db #03
jr x3369
;€„<E282AC>…‘: #337A Š®¬ ­¤ : IND addr
; ç⥭¨¥ ¡ ©â  ¨§ ¯®àâ  ¢¢®¤ /¢ë¢®¤  ¢  ¤à¥á­®¬ ¯à®áâà ­á⢥ trdos
x337A ld c,e
ld b,d
rst #30
dw rom3_x3FF3 ;ç⥭¨¥ ¯®àâ 
db #03
ld e,a
jr x3387
;€„<E282AC>…‘: #3383 Š®¬ ­¤ : IN addr
; ç⥭¨¥ ¡ ©â  ¨§ ¯®àâ  ¢¢®¤ /¢ë¢®¤ 
x3383 ld c,e
ld b,d
in e,(c)
x3387 ld d,#00
;€„<E282AC>…‘: #3389 Š®¬ ­¤ : ?data
; ¢ë¢®¤ ¯ à ¬¥âà  data ¢ à §«¨ç­ëå á¨á⥬ å áç¨á«¥­¨ï
;¢å: de - ¯ à ¬¥âà data
x3389 call x33BB ;ãáâ ­®¢ª  ¨ ®ç¨á⪠ ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
ld c,e
ld b,d
;¢ë¢®¤ ¯¥ç â­®£® ᨬ¢®«  § ¤ ­­®£® §­ ç¥­¨ï, ¥á«¨ ¢®§¬®¦­®
ld a,b
or a
jr nz,x33A3 ;16 ¡¨â
ld a,c
rlca
jr c,x33A3
rrca
cp #20
jr c,x33A3
push af
rst #20
db #0D
db #80+'"'
pop af
rst #10
rst #20
db #80+'"'
;¢ë¢®¤ §­ ç¥­¨ï ¢ à §­ëå á¨á⥬ å áç¨á«¥­¨ï
x33A3 ld hl,x33B6
x33A6 ld a,(hl)
cp #81
ret z ;¢ë室
push bc
push af
rst #20
db #8D
pop af
call x1629 ;¯¥ç âì ç¨á«  ¢ bc (bin/oct/dec/hex) á ¯à¥ä¨ªá®¬
pop bc
inc hl
jr x33A6
x33B6 db #00,#02,#04,#06,#81
;€„<E282AC>…‘: #33BB ãáâ ­®¢ª  ¨ ®ç¨á⪠ ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
x33BB push de
push bc
push hl
ld hl,xE0AD
call x301C ;ix = ¤¥áªà¨¯â®à ®ª­ 
call x2A5E ;®ç¨á⪠ ®ª­ 
rst #20
db #8D ;¯¥à¥¢®¤ áâப¨ ¢ ®ª­¥
pop hl
pop bc
pop de
ret
;€„<E282AC>…‘: #33CD ¯¥ç âì ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
x33CD bit 5,(iy+5)
ret nz ;§ ¯à¥â  ¢â®¬ â¨ç¥áª®£® ¢ë¯®«­¥­¨ï ª®¬ ­¤ë SHOW
;€„<E282AC>…‘: #33D2 Š®¬ ­¤ : SHow
; ¢ë¢®¤ ¨­ä®à¬ æ¨¨ ® á®áâ®ï­¨¨ ¬®­¨â®à 
x33D2 call x33BB ;ãáâ ­®¢ª  ¨ ®ç¨á⪠ ®ª­ 
rst #20 ;¯¥ç âì á®®¡é¥­¨ï
dc "Analyser "
bit 4,(iy+#14)
call x3201 ;¯¥ç âì ON/OFF ®â ä« £  nz-ON/z-OFF
;¯¥ç âì ⥪ã饩 á¨á⥬ë áç¨á«¥­¨ï
rst #20
db #0D
dc "base "
ld de,#000A
ld c,(iy+#17)
ld b,d
call x1677 ;¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc
rst #20
db #8D ;¯¥à¥¢®¤ áâப¨
;¯¥ç âì workspace nnnnn
ld bc,#3C00 ;á®®¡é¥­¨¥: workspace
rst #08 ;¯¥ç âì á®®¡é¥­¨ï ¯® ­®¬¥àã ¢ BC
ld bc,(xE11A)
call x1661 ;¯¥ç âì ¤¥áïâ¨ç­®£® ç¨á«  bc [0..65535] á ¢¥¤ã騬¨ ¯à®¡¥« ¬¨, á ¯à¥¤¢ à¨â¥«ì­ë¬ ¯à®¡¥«®¬
;¯¥ç âì á®áâ®ï­¨ï ­ áâ஥ª ®â« ¤ç¨ª 
rst #20
db #0D
dc "option "
ld l,(iy+5)
call x2E25 ;¯¥ç âì ¡ ©â  ¨§ L ¢ ¤¢®¨ç­®¬ ¢¨¤¥
;¯¥ç âì ०¨¬  ¯à¥à뢠­¨©
rst #20
db #0D
dc "Int mode "
call x3B75 ;®¯à¥¤¥«¥­¨¥ ⨯  ¯à¥à뢠­¨© im 1/2
ld a,"2"
sub d
rst #10
bit 6,(iy+#19)
jr z,x3447 ;âãà¡® ०¨¬ ¢ëª«î祭/®âáãâá¢ã¥â
rst #20
dc "(t)"
jr x3447
;€„<E282AC>…‘: #3432 Š®¬ ­¤ : BASE 0|2|8|10|16 (ãáâ ­®¢ª  ®á­®¢ ­¨ï á¨á⥬ë áç¨á«¥­¨ï)
x3432 ld a,d
or a
jr nz,x3441 ;®è¨¡ª 
ld a,e
ld bc,#0005
ld hl,x344A
cpir
jr z,x3444 ;á¨á⥬  áç¨á«¥­¨ï ­ ©¤¥­  ¢ ᯨ᪥
x3441 ld a,#0D ;á®®¡é¥­¨¥: known number
ret
x3444 ld (iy+#17),e ;ãáâ ­®¢ª  á¨á⥬ë áç¨á«¥­¨ï
x3447 ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
x344A db #00,#02,#08,#0A,#10
;€„<E282AC>…‘: #344F Š®¬ ­¤ : WORKspace addr (§ ¤ ­¨¥  ¤à¥á  ­ ç «  ᢮¡®¤­®£® ¡ãä¥à 
; ¤«ï ª®¬ ­¤ âà áá¨à®¢ª¨. ®¡ê¥¬ ¡ãä¥à  8 ¡ ©â)
x344F ld a,d
cp #5B
ld a,#3B ;á®®¡é¥­¨¥: workspace insufficient
ret c
ld a,d
cp #C0
ld a,#3B ;á®®¡é¥­¨¥: workspace insufficient
ret nc
ld (xE11A),de ;ãáâ ­®¢ª   ¤à¥á 
jr x3447 ;¢ë室
;€„<E282AC>…‘: #3461 Š®¬ ­¤ : SEarch addr_st, addr_end, bank, data
; ¯®¨áª ᯨ᪠ ¡ ©â®¢ëå §­ ç¥­¨© data ¢ ¯ ¬ïâ¨
;¢å: b - ª®«¨ç¥á⢮ ¯ à ¬¥â஢ ¢ áâப¥
x3461 ld de,#0318
set 0,(iy+#13)
jr x3471
;€„<E282AC>…‘: #346A Š®¬ ­¤ : FINd addr_st, addr_end, data
; ¯®¨áª ᯨ᪠ ¡ ©â®¢ëå §­ ç¥­¨© data ¢ ¯ ¬ïâ¨
;¢å: b - ª®«¨ç¥á⢮ ¯ à ¬¥â஢ ¢ áâப¥
x346A ld de,#0217
res 0,(iy+#13)
x3471 ld a,b
cp d
ld a,#0A ;á®®¡é¥­¨¥: too few operands
ret c ;­¥å¢ â ¥â ¯ à ¬¥â஢ ¢ ª®¬ ­¤¥
ret z ;­¥å¢ â ¥â ¯ à ¬¥â஢ ¢ ª®¬ ­¤¥
ld a,b
cp e
ld a,#1F ;á®®¡é¥­¨¥: string too long
ret nc ;᫨誮¬ ¤«¨­­ ï áâப 
ld a,b
sub d ;a - ¤«¨­  ¨áª®¬®© áâப¨
push af
xor a
ld (xDDE0),a ;­ ç «ì­ ï ¤«¨­  ¨áª®¬®© áâப¨
;¯à®¢¥àª  ­ ç «ì­®£® ¨ ª®­¥ç­®£®  ¤à¥á  ¯®¨áª 
call x0C98 ;ç⥭¨¥ ¢ de  ¤à¥á  ­ ç «  ¯®¨áª 
push de
call x0C98 ;ç⥭¨¥ ¢ de  ¤à¥á  ª®­æ  ¯®¨áª 
ex (sp),hl
ex de,hl
call x375C ;áà ¢­¥­¨¥ hl>=de, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ®â¬¥­  ª®¬ ­¤ë
ld (xDDDC),de ; ¤à¥á ­ ç «  ¯®¨áª 
ld (xDDDE),hl ; ¤à¥á ª®­æ  ¯®¨áª 
ld hl,(xE012) ;á®åà ­¨¬ ¯®àâë ¯®«ì§®¢ â¥«ï
ld (xDDE1),hl
ld (xE010),hl
pop hl
bit 0,(iy+#13)
jr z,x34B7 ;¨é¥¬ ⮫쪮 ¢ ⥪ã饩 áâà ­¨æ¥
;ãáâ ­®¢ª  áâà ­¨æë ¤«ï ¯®¨áª 
call x0C98 ;ç⥭¨¥ ­®¬¥à  áâà ­¨æë ¯®¨áª 
ex de,hl
call x37EB ;ãáâ ­®¢ª  áâà ­¨æë ¤«ï ¯®¨áª 
call x35EC ;ãáâ ­®¢ª  áâà ­¨æë ¤«ï ª®¬ ­¤ ¯®¨áª  ¢ ®â« ¤ç¨ª¥
ld hl,(xE012)
ld (xDDE1),hl
ex de,hl
;ç⥭¨¥ ¢ ¡ãä¥à ¨áª®¬®© áâப¨
x34B7 ld bc,xDDE3
pop af
ld (xDDE0),a ;¤«¨­  ¨áª®¬®© áâப¨
x34BE push bc
call x0D55 ;ç⥭¨¥ ¨§ áâப¨ ª®¬ ­¤ë 稫®¢®£®/¡ ©â  áâப®¢®£® §­ ç¥­¨ï
pop bc
jr c,x34CA ;ª®­¥æ ¨áª®¬®© áâப¨
ld a,e
ld (bc),a
inc bc
jr x34BE
;áà ¢­¥­¨¥ áâப¨ á ¯ ¬ïâìî
x34CA ld hl,(xDDDC) ; ¤à¥á ¢ ¯ ¬ïâ¨
x34CD ld bc,(xDDE0-#01) ;b - ¤«¨­  ¨áª®¬®© áâப¨
push hl
ld de,xDDE3 ; ¤à¥á áâப¨ ¤«ï ¯®¨áª 
x34D5 rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld c,a
ld a,(de)
cp c
jr nz,x3502 ;­¥â ᮢ¯ ¤¥­¨ï
inc hl
inc de
djnz x34D5
ld (xDDDC),hl
pop hl
bit 0,(iy+#13)
jr nz,x34EC ;¡¥§ ãáâ ­®¢ª¨ 㪠§ â¥«ï MEM
ld (xDD69),hl ;ãáâ ­®¢¨¬ 㪠§ â¥«ì
x34EC ld (xDDA7),hl
ld a,#84 ;á®®¡é¥­¨¥: found at _ç¨á«®_
; ®¡­®¢«¥­¨¥ íªà ­  ®â« ¤ç¨ª 
x34F1 push af
call x3A4E ;¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
ld a,(iy+#0A)
and #CF
ld (iy+#0A),a ;®¡­®¢¨âì ¤ ¬¯ ¨ ¤¨§ áᥬ¡«¥à
call x2CA8 ;®¡­®¢«¥­¨¥ ¬®­¨â®à -®â« ¤ç¨ª 
pop af
ret
; á«¥¤ãî騩  ¤à¥á ¤«ï ¯®¨áª 
x3502 pop hl
push hl
or a
ld de,(xDDDE) ; ¤à¥á ¯®á«¥¤­¥© ï祩ª¨ ¤«ï ¯®¨áª 
sbc hl,de
pop hl
inc hl
jr c,x34CD ;¥é¥ ­¥ ª®­¥æ ®¡« á⨠¯ ¬ïâ¨
xor a
ld (xDDE0),a
ld a,#A0 ;á®®¡é¥­¨¥: string not found
jr x34F1
;€„<E282AC>…‘: #3517 ¯à®¤®«¦¥­¨¥ ¯®¨áª  ¢ ®â« ¤ç¨ª¥ (¤«ï ª®¬ ­¤ FIND/SEARCH)
x3517 ld a,(xDDE0) ;¤«¨­  ¨áª®¬®© áâப¨
or a
ld a,#A1 ;á®®¡é¥­¨¥: no search string
ret z
ld a,#0C ; âਡãâë
rst #30
dw rom5_x1C84 ;¨­¨æ¨ «¨§ æ¨ï ®ª­  ¢¢®¤ 
db #05
call x35E0 ;á®åà ­¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
ld hl,(xDDE1)
ld (xE012),hl
jr x34CA
;€„<E282AC>…‘: #352F Š®¬ ­¤ : MOVe addr_st1, addr_fin1, addr_st2 [,bank]
; ª®¯¨à®¢ ­¨¥ ®¡« á⨠¯ ¬ïâ¨
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; bc - âà¥â¨© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x352F call x3766 ;ãáâ ­®¢ª  § ¤ ­­®© áâà ­¨æë ¨ áà ¢­¥­¨¥ hl>=de, á ®â¬¥­®© ª®¬ ­¤ë
inc hl
or a
sbc hl,de ;¤«¨­  ¯¥à¥­®á¨¬®£® ¡«®ª 
push bc
push hl
pop bc
pop hl
ex de,hl ;de -  ¤à¥á, ªã¤  ª®¯¨à㥬; hl - ®âªã¤ 
ld a,c
or b
ld a,#42 ;á®®¡é¥­¨¥: too few blocks
ret z ;­ã«¥¢ ï ¤«¨­ 
push hl
sbc hl,de
pop hl
jr c,x3551
;ª®¯¨à®¢ ­¨¥ ®¡« á⨠¯ ¬ïâ¨ á ¨­ªà¥¬¥­â®¬
x3546 call x3563 ;ª®¯¨à®¢ ­¨¥ ®¤­®£® ¡ ©â  á ¯¥à¥ª«î祭¨¥¬ áâà ­¨æë
inc hl
inc de
ld a,c
or b
jr nz,x3546
jr x3560
;ª®¯¨à®¢ ­¨¥ ®¡« á⨠¯ ¬ïâ¨ á ¤¥ªà¥¬¥­â®¬
x3551 dec bc
add hl,bc
ex de,hl
add hl,bc
ex de,hl
inc bc
x3557 call x3563 ;ª®¯¨à®¢ ­¨¥ ®¤­®£® ¡ ©â  á ¯¥à¥ª«î祭¨¥¬ áâà ­¨æë
dec hl
dec de
ld a,b
or c
jr nz,x3557
x3560 jp x3679 ;¢®ááâ ­®¢«¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï ¨ ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;ª®¯¨à®¢ ­¨¥ ®¤­®£® ¡ ©â  á ¯¥à¥ª«î祭¨¥¬ áâà ­¨æë
x3563 call x3A4E ;¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
call x35EC ;ãáâ ­®¢ª  áâà ­¨æë ¤«ï ª®¬ ­¤ë ¢ ®â« ¤ç¨ª¥
ex de,hl
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
ex de,hl
dec bc
ret
;€„<E282AC>…‘: #356F Š®¬ ­¤ : CHeck addr_st1, addr_fin1, addr_st2 [,bank]
; áà ¢­¥­¨¥ ¤¢ãå ®¡« á⥩ ¯ ¬ïâ¨
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; bc - âà¥â¨© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x356F call x3766 ;ãáâ ­®¢ª  § ¤ ­­®© áâà ­¨æë ¨ áà ¢­¥­¨¥ hl>=de, á ®â¬¥­®© ª®¬ ­¤ë
push bc
push hl
pop bc ;addr_fin1
pop hl ;
ex de,hl ;de=addr_st2; hl=addr_st1
x3577 ex de,hl
call x35EC ;ãáâ ­®¢ª  áâà ­¨æë
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ex de,hl
call x3A4E ;¢®ááâ ­®¢«¥­¨¥ áâà ­¨æë
push bc
ld c,a
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
cp c
jr nz,x3598 ;­¥ à ¢­ë
;á«¥¤ãî騥  ¤à¥á 
x3586 pop bc
push hl
or a
sbc hl,bc
pop hl
inc de
inc hl
jr nz,x3577
;¨áª®¬ ï áâப  ­ ©¤¥­ 
call x35D3 ;áà ¢­¥­¨¥ ix=xE075
ld a,#82 ;á®®¡é¥­¨¥: block identical
ret nz
dec a ;á®®¡é¥­¨¥: enter command
ret
;¢ë¢®¤ á®®¡é¥­¨¥ ® ­¥á®¢¯ ¤¥­¨¨
x3598 ld b,a
push hl
push de
push bc
call x35D3 ;áà ¢­¥­¨¥ ix=xE075
call nz,x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld bc,#4100 ;á®®¡é¥­¨¥: failed at _ç¨á«®_
rst #08
pop bc
pop de
pop hl
push hl
push de
push bc
call x1612 ;¯¥ç âì ç¨á«  ¢ hl (dec/hex) á ¯à¥ä¨ªá®¬
rst #20
dc " #"
pop af
push af
call x16E3 ;¯¥ç âì ç¨á«  a=[#00..#FF]
rst #20
dc " : "
pop bc
pop hl
push hl
push bc
call x1612 ;¯¥ç âì ç¨á«  ¢ hl (dec/hex) á ¯à¥ä¨ªá®¬
rst #20
dc " #"
pop hl
ld a,l
call x16E3 ;¯¥ç âì ç¨á«  a=[#00..#FF]
rst #20
db #8D
call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
pop de
pop hl
jr x3586
;€„<E282AC>…‘: #35D3 áà ¢­¥­¨¥ ix=xE075
;¢ëå: z - ix=xE075
x35D3 push de
push ix
ex (sp),hl
ld de,xE075
or a
sbc hl,de
pop hl
pop de
ret
;€„<E282AC>…‘: #35E0 á®åà ­¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
x35E0 push hl
ld hl,(xE012)
ld (xE010),hl
ld (xE00E),hl
pop hl
ret
;ãáâ ­®¢ª  áâà ­¨æë ¤«ï ª®¬ ­¤ ¯®¨áª  ¢ ®â« ¤ç¨ª¥
x35EC push hl
ld hl,(xE00E)
ld (xE012),hl
pop hl
ret
;€„<E282AC>…‘: #35F5 Š®¬ ­¤ : FILl addr_st, addr_end, byte [,bank]
; § ¯®«­¥­¨¥ ®¡« á⨠¯ ¬ïâ¨
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; bc - âà¥â¨© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x35F5 call x3766 ;ãáâ ­®¢ª  § ¤ ­­®© áâà ­¨æë ¨ áà ¢­¥­¨¥ hl>=de, á ®â¬¥­®© ª®¬ ­¤ë
ld a,b
or a
ld a,#0C ;á®®¡é¥­¨¥: out of range
ret nz ;᫨誮¬ ¡®«ì讥 §­ ç¥­¨¥ ¤«ï § ¯®«­¥­¨ï
call x35EC ;;ãáâ ­®¢ª  áâà ­¨æë
ex de,hl
;§ ¯®«­¥­¨¥ ®¡« á⨠¯ ¬ïâ¨
x3601 ld a,c
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
push hl
or a
sbc hl,de
pop hl
inc hl
jr nz,x3601
jr x3679 ;¢®ááâ ­®¢«¥­¨¥ áâà ­¨æë ¨ ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #360D Š®¬ ­¤ : DATA addr, data
; § ¯¨áì ᯨ᪠ data, ­ ç¨­ ï á  ¤à¥á  addr
x360D call x0C98 ;ç⥭¨¥  ¤à¥á  ­ ç «  ®¡« áâ¨
ld c,e
ld b,d
jr x3618
;€„<E282AC>…‘: #3614 Š®¬ ­¤ : .PC data
; § ¯¨áì ᯨ᪠ data, ­ ç¨­ ï á  ¤à¥á  ¢ ॣ¨áâॠPC
x3614 ld bc,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
x3618 set 1,(iy+#13)
jr x3626
;€„<E282AC>…‘: #361E Š®¬ ­¤ : .data
; § ¯¨áì ᯨ᪠ data, ­ ç¨­ ï ­ ç¨­ ï á ⥪ã饩 ï祩ª¨ ¯ ¬ï⨠MEM
x361E ld bc,(xDD69) ; ¤à¥á ⥪ã饩 ï祩ª¨ MEM
res 1,(iy+#13)
;§ ¯¨áì áâப¨ ¤ ­­ëå ¯® § ¤ ­­®¬ã  ¤à¥áã
x3626 push bc ; ¤à¥á ªã¤  ¯¨è¥¬
call x0D55 ;®ç¥à¥¤­®£® ¡ ©â  data
pop bc
jr c,x367C ;­¥â ¡®«ìè¥ ¡ ©â®¢ ¤«ï ç⥭¨ï. ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
push hl
ld l,c
ld h,b
ld a,e
rst #00 ;§ ¯¨áì ¡ ©â  ¢ ¯ ¬ïâì ¯®«ì§®¢ â¥«ï
inc bc
bit 1,(iy+#13)
jr nz,x363D
ld (xDD69),bc ;­®¢ë©  ¤à¥á MEM
x363D pop hl ;á«¥¤ãî騩 ¡ ©â
jr x3626
;€„<E282AC>…‘: #3640 pop de á® áâíª  ¯®«ì§®¢ â¥«ï
x3640 ld hl,(xDD6D) ;㪠§ â¥«ì ¢¥à設ë áâíª  ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld e,a
inc hl
rst #28 ;ç⥭¨¥ ¡ ©â  ¨§ ¯ ¬ï⨠¯®«ì§®¢ â¥«ï
ld d,a
inc hl
ld (xDD6D),hl ;­®¢ë© 㪠§ â¥«ì ¢¥à設ë áâíª  ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
ret
;€„<E282AC>…‘: #364D Š®¬ ­¤ : POP
; ¨§¢«¥ç¥­¨¥ §­ ç¥­¨ï ¨§ á⥪  ¯®«ì§®¢ â¥«ï
x364D call x3640 ;pop de á® áâíª  ¯®«ì§®¢ â¥«ï
call x3389 ;¢ë¢®¤ ç¨á«  ¢ de ¢ à §«¨ç­ëå á¨á⥬ å áç¨á«¥­¨ï
jr x366E ;®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3655 ¯¥à¥å®¤ ­   ¤à¥á, ᮤ¥à¦ é¨©áï ¢ ª®¬ ­¤¥, à á¯®«®¦¥­­ë© ¢ ⥪ã饩
; ï祩ª¥ ¯ ¬ïâ¨
x3655 ld hl,(xDD69) ; ¤à¥á ⥪ã饩 ï祩ª¨ ¢ ¤ ¬¯¥ ¯ ¬ïâ¨
call x3884 ;¯®«ãç¨âì  ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
ex de,hl
;€„<E282AC>…‘: #365C Š®¬ ­¤ : MEMory addr
; ãáâ ­®¢ª   ¤à¥á  ⥪ã饩 ï祩ª¨ ¯ ¬ï⨠mem
x365C ld (xDD69),de
jr x367C ;¢ë室 ¨ ®¡­®¢«¥­¥¨ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3662 Š®¬ ­¤ : EXX
; ᬥ­  ¨­¤¨ª æ¨¨ ॣ¨áâ஢ ‚‘, DE ¨ HL ­   «ìâ¥à­ â¨¢­ë¥
x3662 ld a,#01
jr x3668 ;¢ë室 ¨ ®¡­®¢«¥­¥¨ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3666 Š®¬ ­¤ : EX AF
; ᬥ­  ¨­¤¨ª æ¨¨ ॣ¨áâ஢ AF ­   «ìâ¥à­ â¨¢­ë¥. Š®¬ ­¤ë
x3666 ld a,#02
x3668 xor (iy+#0B)
ld (iy+#0B),a
x366E ld a,(iy+#0A)
x3671 and #F1
ld (iy+#0A),a
x3676 jp x0AFB
x3679 call x3A4E ;¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
x367C ld a,(iy+#0A)
and #8F
jr x3671
;€„<E282AC>…‘: #3683 Š®¬ ­¤ : INTerrupt on|off
; ã¯à ¢«¥­¨¥ ¯à¥à뢠­¨ï¬¨
x3683 ld a,e
and #FE
or d
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret nz ;­¥¤®¯ãáâ¨¬ë© ¯ à ¬¥âà
ld hl,xDD83
ld a,e
or e
jr z,x3695
set 2,(hl) ;¯à¥à뢠­¨ï à §à¥è¥­ë
jr x3676 ;¢ë室 ¨ ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
x3695 res 2,(hl) ;¯à¥à뢠­¨ï § ¯à¥é¥­ë
jr x3676 ;¢ë室 ¨ ®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
;€„<E282AC>…‘: #3699 Š®¬ ­¤ : CALl [[addr],bank]
; ¢ë§®¢ ¯®¤¯à®£à ¬¬ë
x3699 call x3713 ;ãáâ ­®¢ª  áâà ­¨æë, ¥á«¨ § ¤ ­  ¢ ª®¬ ­¤¥
set 4,(iy+#12)
push af
push de
ld de,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
inc de
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
ld de,#0008 ;¢®§¢à â ¯®  ¤à¥áã #08
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
pop de
pop af
jr x36B7
;€„<E282AC>…‘: #36B4 Š®¬ ­¤ : Jump [[addr],bank]
; ¯¥à¥¤ ç  ã¯à ¢«¥­¨ï ¯à®£à ¬¬¥
x36B4 call x3713 ;ãáâ ­®¢ª  áâà ­¨æë, ¥á«¨ § ¤ ­  ¢ ª®¬ ­¤¥
x36B7 jr c,x36BD ;­¥â ¯ à ¬¥â஢, ¢ë§®¢ ¯®  ¤à¥áã PC
ld (xDD6B),de
x36BD call x382E ;®¦¨¤ ­¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
jp x013D ;¢ë室 ¨§ ¬®­¨â®à 
;€„<E282AC>…‘: #36C3 § ¯¨áì áâ ­¤ àâ­®£® Magic-ä ©« 
x36C3 ei
halt
di
ld de,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
ld de,rom3_x0FF3 ;¯/¯ Tr-Dos ‡ ¯¨áì ¯ ¬ï⨠­  ¤¨áª
call x3A14 ;§ ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
ld hl,rom3_x3D30 ;¢ë§®¢ áâà ­¨æë tr-dos
ld (xDD6B),hl ;­®¢ë© PC
jr x36BD ;¢ë室 ¨§ ¬®­¨â®à 
;€„<E282AC>…‘: #36DB Š®¬ ­¤ : ROM bank
; ¨§¬¥­¥­¨¥ ⥪ã饣® ¡ ­ª  <20>‡“
x36DB ld a,e
and #FE
or d
ld a,#19 ;á®®¡é¥­¨¥: invalid bank ROM
ret nz ;­¥¤®¯ãáâ¨¬ë© ­®¬¥à ROM
ld a,#1B ;á®®¡é¥­¨¥: forbidden bank ROM
bit 5,(iy-#02)
ret nz ;only 48k
ld hl,x367C ;á ¢¥à­¥¬áï
ex (sp),hl
res 4,(iy-#02) ;rom 0
bit 0,e
ret z
set 4,(iy-#02)
ret
;€„<E282AC>…‘: #36F9 ¯®«ã祭¨¥ ­®¬¥à  «®£¨ç¥áª®© áâà ­¨æë ¯®«ì§®¢ â¥«ï a=[#0..#F]
x36F9 push hl
ld hl,(xE012) ;áâà ­¨æ  ¯®«ì§®¢ â¥«ï
ld a,%00000111
and l
bit 4,h
pop hl
ret z ;¢ª«î祭  ¡ë«  áâà ­¨æ  [0..7]
or %00001000
ret
;€„<E282AC>…‘: #3707 áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®©
;¢ëå: a - «®£¨ç¥áª ï áâà ­¨æ  ¯®«ì§®¢ â¥«ï
; z áâà ­¨æ  ᮢ¯ ¤ ¥â
; nz ­¥ ᮢ¯ ¤ ¥â
;
x3707 call x36F9 ;a - «®£¨ç¥áª ï áâà ­¨æ  ¯®«ì§®¢ â¥«ï
cp l
ret
;€„<E282AC>…‘: #370C Š®¬ ­¤ : RAM
x370C ld bc,x367C ;®¡­®¢«¥­¨¥ ®â« ¤ç¨ª 
push bc ;á ¢¥à­¥¬áï
ex de,hl
jr x371D ;ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
;€„<E282AC>…‘: #3713 ¥á«¨ ¯ à ¬¥âà § ¤ ­, ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
;¢å: a - ª®«¨ç¥á⢮ ¯ à ¬¥â஢
x3713 cp #01
ret c ;­¥â ¯ à ¬¥â஢
ret z ;1 ¯ à ¬¥âà
cp #02
x3719 ld a,#0B ;á®®¡é¥­¨¥: too many operands
jr nz,x3763 ;᫨誮¬ ¬­®£® ¯ à ¬¥â஢
;€„<E282AC>…‘: #371D ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
x371D ld a,l
and #F0
or h
ld a,#18
jr nz,x3763 ;á®®¡é¥­¨¥: invalid bank RAM
ld a,l
and #07
jr z,x3732
ld a,#1C ;á®®¡é¥­¨¥: forbidden bank RAM
bit 5,(iy-#02)
jr nz,x3763 ;only 48k
;€„<E282AC>…‘: #3732 ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ L
x3732 ld bc,(xE012)
res 4,b
bit 3,l
jr z,x373E ;RAM 0-7
set 4,b
x373E res 3,l
ld a,c
and %11111000
or l
ld c,a
ld (xE012),bc
xor a
ret
;¯à®¢¥àª  ¤®¯ãá⨬®á⨠§ ¤ ­­ëå  ¤à¥á®¢
;¢å: de -  ¤à¥á ­ ç «  ¡«®ª  ¯ ¬ïâ¨
; hl -  ¤à¥á ª®­æ  ¡«®ª  ¯ ¬ïâ¨
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x374B cp #02
jr z,x375C ;¥á«¨ ¤¢  ¯ à ¬¥âà 
jr nc,x3719 ;¡®«ìèª ¤¢ãå ¯ à ¬¥â஢. ¢ë室 ¢ ®â« ¤ç¨ª
ld hl,#FFFF
cp #01
jr z,x375C
ld de,(xDD69) ;㪠§ â¥«ì MEM
;áà ¢­¥­¨¥ hl>=de, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ®â¬¥­  ª®¬ ­¤ë
x375C or a
sbc hl,de
add hl,de
ret nc
ld a,#1D ;á®®¡é¥­¨¥: start > _ç¨á«®_
x3763 jp x0B06 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ¬®­¨â®à 
;ãáâ ­®¢ª  § ¤ ­­®© áâà ­¨æë ¨ áà ¢­¥­¨¥ hl>=de, á ®â¬¥­®© ª®¬ ­¤ë
;a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3766 call x35E0 ;á®åà ­¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
cp #04
call z,x37F0 ;ãáâ ­®¢ª  áâà ­¨æë ¯® ¯à®ç⥭­®¬ã ç¥â¢¥à⮬㠮¯¥à ­¤ã
jr z,x375C ;áà ¢­¥­¨¥ hl>=de, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ®â¬¥­  ª®¬ ­¤ë
cp #03
jr z,x375C ;áà ¢­¥­¨¥ hl>=de, ¢ ¯à®â¨¢­®¬ á«ãç ¥ ®â¬¥­  ª®¬ ­¤ë
ld a,#0A ;á®®¡é¥­¨¥: too few operands
x3776 jr x3763 ;¯®«­®¥ ®¡­®¢«¥­¨¥ ¬®­¨â®à 
;€„<E282AC>…‘: #3778 Š®¬ ­¤ : SCReen [on|off|5|7]
; ãáâ ­®¢ª /®â®¡à ¦¥­¨¥ íªà ­  ¯®«ì§®¢ â¥«ï
x3778 cp #01
jr z,x3787 ;¥áâì ¯ à ¬¥âà
jr nc,x3719 ;¬­®£® ¯ à ¬¥â஢. ¢ë室 ¢ ®â« ¤ç¨ª
call x3A21 ;ª®¯¨à®¢ ­¨¥  ªâ¨¢­®£® íªà ­  ¯®«ì§®¢ â¥«ï ¢ #4000
call x302E ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢) ¡¥§ ¢ë¢®¤  ªãàá®à  ¢ ®ª­¥
jp x0AF2 ;¢®§¢à â ¢ ¬®­¨â®à á ®¡­®¢«¥­¨¥¬ íªà ­ 
x3787 ld a,e
and #FE
or d
jr nz,x379A
ld a,#81 ;á®®¡é¥­¨¥: enter command
ld hl,xE026
set 1,(hl)
bit 0,e
ret z
res 1,(hl)
ret
x379A ld a,d
or a
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret nz ;®è¨¡ª . ¢ë室 ¢ ®â« ¤ç¨ª
ld hl,xE012
ld a,e
cp #05
jr z,x37AE ;ãáâ ­®¢ª  íªà ­  ¨§ áâà ­¨æë 5
cp #07
jr z,x37B5 ;ãáâ ­®¢ª  íªà ­  ¨§ áâà ­¨æë 7
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret
x37AE res 3,(hl)
x37B0 ld a,#81 ;á®®¡é¥­¨¥: enter command
jp x0AFB
x37B5 set 3,(hl)
jr x37B0
;€„<E282AC>…‘: #37B9 ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
x37B9 push hl
ld hl,xE02D
bit 3,(hl)
res 3,(hl)
push af
call nz,x381C ;¯à®¢¥àª  ­ ¦ â¨ï ª« ¢¨è space ¨ s
pop af
call z,x3813
pop hl
ld a,#FE
in a,(#FE)
rrca
ret c ;cs ­¥ ­ ¦ â 
ld a,#F7
in a,(#FE)
rrca
ret c ;1 ­¥ ­ ¦ â 
res 3,(iy+#19) ;­ ¦ â  cs+1
call x382E ;®¦¨¤ ­¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
x37DD call x093C ;¢ë¢®¤ ­  íªà ­
ld a,#9A
bit 0,(iy+#12)
jr nz,x3776 ;¢¢®¤ ¨ ®¡à ¡®âª  ª®¬ ­¤ë ®â« ¤ç¨ª 
jp x0AD7 ;¯¥ç âì ¬¥­î
;ãáâ ­®¢ª  áâà ­¨æë ¯® ­®¬¥àã hl
x37EB push af
push hl
push bc
jr x37F6
;ãáâ ­®¢ª  áâà ­¨æë ¯® ¯à®ç⥭­®¬ã ç¥â¢¥à⮬㠮¯¥à ­¤ã
x37F0 push af
push hl
push bc
ld hl,(xDD99+#06) ;âà¥â¨© ®¯¥à ­¤ ¢ ª®¬ ­¤¥ (bank)
x37F6 call x371D ;ãáâ ­®¢ª  áâà ­¨æë ¯®«ì§®¢ â¥«ï à ¢­®© ­®¬¥àã áâà ­¨æë ¢ HL
ld hl,(xE012)
ld (xE00E),hl
call x3A4E ;¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
pop bc
pop hl
pop af
scf
ret
;€„<E282AC>…‘: #3807 ¯ ã§  40416t
x3807 ld a,#C0
x3809 push bc
ld b,#00
djnz $
pop bc
dec a
jr nz,x3809
ret
;¯à®¢¥àª  ­ ¦ â¨ï ª« ¢¨è space ¨ s
x3813 ld a,#7F
in a,(#FE)
rrca
ret c ;Space ­¥ ­ ¦ â
call x382E ;®¦¨¤ ­¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
;¯à®¢¥àª  ­ ¦ â¨ï ª« ¢¨è space ¨ s
x381C call x3807 ;¯ ã§  40416t
call x3023 ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
cp #20
jr z,x382B ;­ ¦ â ¯à®¡¥«
and #5F
cp "S"
ret nz
x382B set 3,(hl)
ret
;€„<E282AC>…‘: #382E ®¦¨¤ ­¨¥ ®â¦ â¨ï ¢á¥å ª« ¢¨è
x382E xor a
in a,(#FE)
cpl
and #1F
ret z
jr x382E
;€„<E282AC>…‘: #3837 ª®¯¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ï⨠¢ ram 8 á à áª®¤¨à®¢ ­¨¥¬
;¢å: hl -  ¤à¥á § ª®¤¨à®¢ ­­®© ¯à®æ¥¤ãàë/¤ ­­ëå
; de -  ¤à¥á í⮩ ¯à®æ¥¤ãàë/¤ ­­ëå ¤«ï à §¬¥é¥­¨ï ¢ ram 8
; db ?,?,n,? - ¤«¨­ 
; db ?,?,?,n -  ¤à¥á ¡ ©â  ¤«ï à áª®¤¨à®¢ ­¨ï
x3837 ex (sp),hl
inc hl
inc hl
ld b,(hl)
inc hl
push de
ld e,(hl)
inc hl
ld d,#00
ld a,(de) ;¡ ©â ¯® § ¤ ­­®¬ã  ¤à¥áã
pop de
ex (sp),hl
ld c,a ;¡ ©â ¯® § ¤ ­­®¬ã  ¤à¥áã
ld a,(x00FE)
xor c
ld c,a
ld a,(x00FD)
xor c
ld c,a
ld a,(x00FC)
xor c
ld c,a
x3854 ld a,c
xor b
xor (hl)
ld (de),a
inc hl
inc de
djnz x3854
ret
;€„<E282AC>…‘: #385D ­¥ ¨á¯®«ì§ã¥âáï
x385D scf
jr x3861
;€„<E282AC>…‘: #3860 ­¥ ¨á¯®«ì§ã¥âáï
x3860 or a
x3861 pop hl
ld e,(hl)
inc hl
ld d,(hl)
inc hl
push hl
ex de,hl
jr c,x3880
ld a,(hl)
or a
jr nz,x3883
ld a,#3D ;á®®¡é¥­¨¥: Professional program not found
;€„<E282AC>…‘: #3870 ¯¥ç âì á®®¡é¥­¨ï ¨ ¯à®¤®«¦¥­¨¥ à ¡®âë ⥪ã饣® ¬¥­î ¬®­¨â®à 
;¢å: a - ­®¬¥à á®®¡é¥­¨ï ¨§ ¡«®ª  0
x3870 sla a
call x3014 ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¬®­¨â®à : ¢¢®¤ áâப¨ ¢­¨§ã íªà ­ 
scf ;cy=1 á ®ç¨á⪮© ¡ãä¥à  ¢¢®¤ 
rst #30
dw rom5_x1C84 ;¨­¨æ¨ «¨§ æ¨ï ®ª­  ¢¢®¤ 
db #05
call x302E ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢) ¡¥§ ¢ë¢®¤  ªãàá®à  ¢ ®ª­¥
jp x0129 ;¯¥ç âì ⥪ã饣® ¬¥­î ¬®­¨â®à 
x3880 ld a,(hl)
or a
ret z
x3883 jp (hl)
;€„<E282AC>…‘: #3884 ¯®«ãç¨âì  ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
;¢å: hl -  ¤à¥á ª®¬ ­¤ë  áᥬ¡«¥à 
;¢å: z - ª®¬ ­¤  ­¥ ááë« ¥âáï ­  ¯ ¬ïâì
; nz -> hl -  ¤à¥á ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤ 
x3884 push hl
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
pop hl
bit 6,(iy+#01)
ret z ;¢ ª®¬ ­¤¥ ­¥â áá뫪¨ ­   ¤à¥á ¯ ¬ïâ¨
ld hl,(xDDD0)
ret
;¯¥à¥å®¤ ­   ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
x3892 xor a
call x38C6 ;§ ¯¨áì ¢ â ¡«¨æã ⥪ã饣®  ¤à¥á  ¤¨§ á¬ 
ex de,hl
call x3884 ;¯®«ãç¨âì  ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
jr x38C3 ;¯¥à¥å®¤ ­  ­®¢ë©  ¤à¥á
;à áç¥â  ¤à¥á  ¢ â ¡«¨æ¥ á § ¯¨áﬨ  ¤à¥á®¢ ¤¨§ á¬ 
;¢å: a - ­®¬¥à ï祩ª¨ ¢ â ¡«¨æ¥
;¢ëå: hl -  ¤à¥á ¢ â ¡«¨æ¥
x389C ld l,a
ld h,#00
ld de,xDD8D
add hl,hl
add hl,de
ret
;¢¢®¤ ­®¢®£®  ¤à¥á  «¨á⨭£ 
x38A5 ld a,#C3
x38A7 rst #30
dw rom6_x06AD ;¢¢®¤ ⥪á⮢®© áâப¨ ¢­¨§ã íªà ­ 
db #06
jr c,x38D1 ;­ ¦ â  Break. ‚ë室 ¨§ ०¨¬ 
bit 4,(iy+#05)
push af
call z,x0D55 ;¢¢®¤¨âì  ¤à¥á ¢ëà ¦¥­¨¥¬
pop af
call nz,x0DF4 ;¢¢®¤¨âì  ¤à¥á ç¨á«®¬
jr nz,x38A7 ;­¥ ¢¥à­ë©  ¤à¥á
push de
ld a,#0C ;á®®¡é¥­¨¥: _Working ...
rst #30
dw rom5_x1C84 ;¨­¨æ¨ «¨§ æ¨ï ®ª­  ¢¢®¤ 
db #05
pop hl
x38C3 jp x394F
;§ ¯¨áì ¢ â ¡«¨æã ⥪ã饣®  ¤à¥á  ¤¨§ á¬ 
;¢å: a - ­®¬¥à ï祩ª¨ ¢ â ¡«¨æ¥
x38C6 call x389C ;à áç¥â  ¤à¥á  ¢ â ¡«¨æ¥
ld de,(xDD8B)
ld (hl),e
inc hl
ld (hl),d
ret
;¢ë室 ¨§ ०¨¬  ¤¨§ á¬ 
x38D1 res 1,(ix+#07)
jp x37DD
;€„<E282AC>…‘: #38D8 ¡ëáâàë© ¢å®¤ ¢ ª®¬ ­¤ã DASM (ss+D)
x38D8 xor a
ld hl,(xDD6B) ;pc ¯à®£à ¬¬ë ¯®«ì§®¢ â¥«ï
bit 6,(iy+#05)
jr nz,x38E5 ; ¤à¥á ª®¬ ­¤ë SS/D, ¡¥à¥âáï ¨§ ॣ¨áâà  PC
;€„<E282AC>…‘: #38E2 Š®¬ ­¤ : DASm [addr] ¢ë¢®¤ «¨á⨭£  ¤¨§ á¬ 
x38E2 ld hl,(xDD69) ; ¤à¥á ª®¬ ­¤ë SS/D. ¡¥à¥âáï ¨§ ï祩ª¨ (mem)
x38E5 or a
jr z,x38EE ;­¥â ¯ à ¬¥â஢, á ⥪ã饣®  ¤à¥á 
cp #02
ld a,#0B ;á®®¡é¥­¨¥: too many operands
ret nc ;¬­®£® ¯ à ¬¥â஢
ex de,hl
x38EE ld (xDD8B),hl ; ¤à¥á ­ ç «  ¤«ï ª®¬ ­¤ë DASM
ld a,#0C ;á®®¡é¥­¨¥: _Working ...
rst #30
dw rom5_x1C84 ;¨­¨æ¨ «¨§ æ¨ï ®ª­  ¢¢®¤ 
db #05
x38F7 call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
ld (ix+#00),#00 ;crd Y
set 1,(ix+#07) ;ˆ§¬¥­ïâì  âਡãâë ¯à¨ ¢ë¢®¤¥ ª ¦¤®£® ᨬ¢®« 
ld hl,(xDD8B) ; ¤à¥á ­ ç «  ¤«ï ª®¬ ­¤ë DASM
ld b,#16 ;ª®«-¢® áâப ¤«ï ¢ë¢®¤ 
jr x390C
;¯¥ç âì «¨á⨭£  ¤¨§ á¬ 
x3909 inc (ix+#00)
x390C push bc
call x39A8 ;¯¥ç âì ®¤­®© áâப¨ «¨á⨭£  ¤¨§ á¬ 
pop bc
djnz x3909
;®¯à®á ª« ¢¨ âãàë ¨ ॠªæ¨ï ­  ª« ¢¨è¨
x3913 ld hl,x3913 ;á ¢¥à­¥¬áï
push hl
rst #30
dw rom6_x074A ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
db #06
call x2C7E ;¯®¨áª ¨ ¢ë§®¢ ¯à®æ¥¤ãàë ®¡à ¡®âª¨ ¡¥§ ¢®§¢à â (¥á«¨ ­¥ ­ ©¤¥­® ¢®§¢à â)
db #8E ;ss+D
dw x38D1 ;¢ë室 ¨§ ०¨¬  ¤¨§ á¬ 
db #03 ;Break
dw x38D1 ;¢ë室 ¨§ ०¨¬  ¤¨§ á¬ 
db #85 ;cs+5
dw x3951 ;¯¥à¥å®¤ ­  ®¤¨­ ¡ ©â ­ § ¤
db #83 ;cs+8
dw x3956 ;¯¥à¥å®¤ ­  ®¤¨­ ¡ ©â ¢¯¥à¥¤
db #86 ;cs+6
dw x398F ;¯¥à¥å®¤ ­  ®¤­ã ª®¬ ­¤ã ¢¯¥à¥¤
db #84 ;cs+7
dw x3963 ;¯¥à¥å®¤ ­  ®¤­ã ª®¬ ­¤ã ­ § ¤
db #0D ;Enter
dw x38A5 ;¢¢®¤ ­®¢®£®  ¤à¥á 
db #8D ;ss+G
dw x3892 ;¯¥à¥å®¤ ­   ¤à¥á, ­  ª®â®àë© ááë« ¥âáï ª®¬ ­¤   áᥬ¡«¥à 
db #62 ;b
dw x330B ;ãáâ ­®¢ª  «®¢ã誨 #8, ¯® ⥪ãé¥¬ã  ¤à¥áã «¨á⨭£  ¤¨§ á¬ 
db #6E ;n
dw x3326 ;㤠«¥­¨¥ «®¢ã誨 #8
db #FF
sub #30
ret c
ld c,#05
cp c
jr c,x38C6 ;­ ¦ â® 0..4 - § ¯¨áì ⥪ã饣®  ¤à¥á  ¤¨§ á¬ 
sub c
cp c
ret nc ;­¥ æ¨äà 
call x389C ;­ ¦ â® 5..9 - ¢®ááâ ­®¢«¥­¨¥  ¤à¥á  ¤¨§ á¬ 
ld e,(hl)
inc hl
ld d,(hl)
ex de,hl
x394F jr x395D
;¯¥à¥å®¤ ­  ®¤¨­ ¡ ©â ­ § ¤
x3951 ld bc,#FFFF
jr x3959
;¯¥à¥å®¤ ­  ®¤¨­ ¡ ©â ¢¯¥à¥¤
x3956 ld bc,#0001
x3959 ld hl,(xDD8B)
add hl,bc
x395D ld (xDD8B),hl ; ¤à¥á ­ ç «  «¨á⨭£ 
x3960 pop hl
jr x38F7 ;®¡­®¢«¥­¨¥ ®ª­  á «¨á⨭£®¬
;¯¥à¥å®¤ ­  ®¤­ã ª®¬ ­¤ã ­ § ¤
x3963 call x2A1B ;áªà®««¨­£ ®ª­  ¢­¨§
ld (ix+#00),#00 ;crd Y
ld bc,#FFFB ;-5
x396D inc bc
ld hl,(xDD8B)
add hl,bc
push bc
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
pop bc
ld de,(xDD8B)
or a
sbc hl,de
jr z,x3982 ;ª®¬ ­¤  ­ ©¤¥­ 
jr nc,x398B
x3982 add hl,de
jr nz,x396D
;ª®¬ ­¤  ­ ©¤¥­ 
add hl,bc
ld (xDD8B),hl ; ¤à¥á ­ ç «  «¨á⨭£ 
jr x39A8
;¨é¥¬ ¤ «ìè¥
x398B add hl,de
add hl,bc
jr x395D
;¯¥à¥å®¤ ­  ®¤­ã ª®¬ ­¤ã ¢¯¥à¥¤
x398F call x298E ;áªà®««¨­£ ®ª­  ¢¢¥àå
ld (ix+#00),#15 ;crd Y
ld hl,(xDD8B)
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
ld (xDD8B),hl ; ¤à¥á ­ ç «  «¨á⨭£ 
;¨é¥¬ ª®¬ ­¤ã ¤«ï ¯¥ç â¨ ¢ ­¨¦­¥© áâப¥
ld b,#15
x39A1 push bc
call x2F96 ; ­ «¨§ ª®¬ ­¤ë  áᥬ¡«¥à 
pop bc
djnz x39A1
;€„<E282AC>…‘: #39A8 <20>¥ç âì ®¤­®© áâப¨ «¨á⨭£  ¤¨§ á¬ 
x39A8 ld a,(ix+#06) ;æ¨äà®¢ë¥  âਡãâë ®ª­ 
push af
ld (ix+#01),#00 ;crd X =#00
push ix
call x3281 ;ãáâ ­®¢ª  ­ ç «  ᯨ᪠ «®¢ã襪
;®¡à ¡®âª  «®¢ã襪, ¤«ï ¯®¤á¢¥âª¨ áâப¨
x39B5 bit 7,(ix+#00)
jr z,x39DD ;«®¢ã誠 ­¥  ªâ¨¢­ 
; «®¢ã誠  ªâ¨¢­ 
push hl
ld l,(ix+#01) ;­®¬¥à áâà ­¨æë ¢ ª®â®à®© ãáâ ­®¢«¥­  «®¢ã誠
call x3707 ;áà ¢­¥­¨¥ áâà ­¨æë ¯®«ì§®¢ â¥«ï á § ¤ ­­®©
pop hl
jr nz,x39DD ;¢ ¤à㣮© áâà ­¨æ¥
push de
ld e,(ix+#02)
ld d,(ix+#03) ; ¤à¥á «®¢ã誨
or a
sbc hl,de
add hl,de
pop de
jr nz,x39DD ;­¥ ¯® ⥪ãé¥¬ã  ¤à¥áã
ld a,(xE114) ; âਡãâë ¤«ï ¯®¤á¢¥âª¨ «®¢ã誨 ¯à¨ ¢ë¢®¤¥ ¤¨§ á¬ 
ex (sp),ix
ld (ix+#06),a
ex (sp),ix
x39DD add ix,de
djnz x39B5
pop ix
call x2FAC ;¯¥ç âì áâப¨ ¤¨§ á¬ 
pop af
ld (ix+#06),a
ret
;€„<E282AC>…‘: #39EB Š®¬ ­¤ : LCATalogue [num_drive]
; ¢ë¢®¤ ª â «®£  ¤¨áª¥âë ­  ¯à¨­â¥à
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x39EB set 4,(iy+#09) ;¢ë¢®¤ ­  ¯à¨­â¥à
;€„<E282AC>…‘: #39EF Š®¬ ­¤ : CATalogue [num_drive]
; ¢ë¢®¤ ª â «®£  ¤¨áª¥âë
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x39EF or a
jr z,x3A04 ;¨á¯®«ì§ã¥¬ ⥪ã騩 ¤¨áª®¢®¤
cp #04 ;!!!Ž˜ˆ<CB9C>Š€ ¯ à ¬¥âà ¢á¥£® ®¤¨­
ld a,#0B ;á®®¡é¥­¨¥: too many operands
jr nc,x3A08 ;¬­®£® ¯ à ¬¥â஢. ¢ë室 ¢ ®â« ¤ç¨ª
ld a,e
and #FC
or d
ld a,#3E ;á®®¡é¥­¨¥: known disk
jr nz,x3A08 ;­¥¢à­ë© ­®¬¥à ¤¨áª®¢®¤ . ¢ë室 ¢ ®â« ¤ç¨ª
ld a,e
call x2C4D ;ª®¯¨à®¢ ­¨¥ ¤¥áªà¨¯â®à  ¤¨áª®¢®¤  ¢ ¡ãä¥à xE590, ¥á«¨ ª ­¥¬ã ¯à¨¬®­â¨à®¢ ­ ®¡à §
x3A04 rst #30
dw rom6_x0249 ;¢ë¢®¤ ª â «®£  ⥪ã饣® ¤¨áª®¢®¤  (­  íªà ­/¯à¨­â¥à)
db #06
x3A08 call x093C ;¢ë¢®¤ ­  íªà ­
ld a,#81 ;á®®¡é¥­¨¥: enter command
jp x0AE0 ;¢ë室 ¢ ®â« ¤ç¨ª
;€„<E282AC>…‘: #3A10 Š®¬ ­¤ : PUSH data
; § ­¥á¥­¨¥ ¢ á⥪ ¯à®£à ¬¬ë §­ ç¥­¨ï data
x3A10 ld hl,x367C ;á ¢¥à­¥¬áï
ex (sp),hl
;€„<E282AC>…‘: #3A14 § ¯¨áì de ­  áâíª ¯®«ì§®¢ â¥«ï
;¢å: de - ç¨á«®
;
x3A14 ld hl,(xDD6D) ; ¤à¥á ¢¥à設ë áâíª  ¯®«ì§®¢ â¥«ï
dec hl
ld a,d
rst #00
dec hl
ld a,e
rst #00
ld (xDD6D),hl
ret
;€„<E282AC>…‘: #3A21 ª®¯¨à®¢ ­¨¥  ªâ¨¢­®£® íªà ­  ¯®«ì§®¢ â¥«ï ¢ #4000
;
x3A21 bit 3,(iy-2)
jp z,x0581 ;¡ë« scr 5 ¯à¨ ¢å®¤¥
ld bc,#1FFD ;¡ë« scr 7 ¯à¨ ¢å®¤¥
ld a,#02
out (c),a
ld b,#7F
ld a,#17
out (c),a ;rom 2, ram 7
ld hl,#C000
ld de,#4000
ld bc,#1B00
ldir ;ª®¯¨à㥬 íªà ­ ¨§ ram 7
ld bc,#7FFD
ld a,#10
out (c),a
ld b,#1F
ld a,#12
out (c),a ;rom 2, ram 8
ret
;€„<E282AC>…‘: #3A4E ¢®ááâ ­®¢«¥­¨¥ ¯¥à¥¬¥­­®© á á®áâ®ï­¨¥¬ ¯®à⮢ #1FFD/#7FFD ¯®«ì§®¢ â¥«ï
x3A4E push hl
ld hl,(xE010)
ld (xE012),hl
pop hl
ret
;€„<E282AC>…‘: #3A57 Š®¬ ­¤ : LDISs [addr_st[,addr_end]] ॠáᥬ¡«¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ïâ¨
; ­  ¯à¨­â¥à.
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3A57 call x374B ;;¯à®¢¥àª  ¤®¯ãá⨬®á⨠§ ¤ ­­ëå  ¤à¥á®¢
set 4,(iy+#09) ;¢ë¢®¤ ­  ¯à¨­â¥à
jr x3A63
;€„<E282AC>…‘: #3A60 Š®¬ ­¤ : DISs [addr_st [,addr_end]]
; ॠáᥬ¡«¨à®¢ ­¨¥ ¡«®ª  ¯ ¬ïâ¨ á  ¤à¥á  addr_st ¯® addr_end
; ¢ª«îç¨â¥«ì­®
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3A60 call x374B ;¯à®¢¥àª  ¤®¯ãá⨬®á⨠§ ¤ ­­ëå  ¤à¥á®¢
x3A63 ld bc,x2FAC ;¯/¯ ¯¥ç âì áâப¨ ¤¨§ á¬ 
jr x3A77
;€„<E282AC>…‘: #3A68 Š®¬ ­¤ : LDUmp [addr_st[,addr_end]]
; ¢ë¤ ç  ¤ ¬¯  ¯ ¬ï⨠­  ¯à¨­â¥à á  ¤à¥á  addr_st ¯® addr_end ¢ª«îç¨â¥«ì­®
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3A68 call x374B ;¯à®¢¥àª  ¤®¯ãá⨬®á⨠§ ¤ ­­ëå  ¤à¥á®¢
set 4,(iy+#09) ;¢ë¢®¤ ­  ¯à¨­â¥à
jr x3A74
;€„<E282AC>…‘: #3A71 Š®¬ ­¤ : DUmp [addr_st[,addr_end]]
; ¢ë¤ ç  ¤ ¬¯  ¯ ¬ïâ¨ á  ¤à¥á  addr_st ¯® addr_end ¢ª«îç¨â¥«ì­®
;¢å: de - ¯¥à¢ë© ®¯¥à ­¤
; hl - ¢â®à®© ®¯¥à ­¤
; a - ª®«¨ç¥á⢮ ®¯¥à ­¤®¢ [0..5]
x3A71 call x374B ;¯à®¢¥àª  ¤®¯ãá⨬®á⨠§ ¤ ­­ëå  ¤à¥á®¢
x3A74 ld bc,x2EBE ;¯/¯ ¯¥ç â¨ ®¤­®© áâப¨ ¤ ¬¯  ¯ ¬ï⨠(8 ¡ ©â)
x3A77 ex de,hl
call x3A95 ;¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
x3A7B call x37B9 ;ã¯à ¢«¥­¨¥ ¢ë¢®¤¨¬ë¬ «¨á⨭£®¬ (®¯à®á ª« ¢¨è space, s, cs+1)
rst #20
db #8D
push de
push bc
call x3A93 ;¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ bc - call (bc)
pop bc
pop de
or a
sbc hl,de
add hl,de
jr c,x3A7B ;¥é¥ ­¥ ª®­¥æ
call x093C ;¢ë¢®¤ ­  íªà ­
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret
;€„<E282AC>…‘: #3A93 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ bc - call (bc)
x3A93 push bc
ret
;€„<E282AC>…‘: #3A95 ¯®¤£®â®¢ª  ¯¥à¥¬¥­­ëå ª ¢ë¢®¤ã ­  íªà ­/¯à¨­â¥à
x3A95 push hl
push de
push bc
bit 4,(iy+#09)
ld hl,xE075
jr z,x3AA4 ;¢ë¢®¤ ­  íªà ­
ld hl,xE067 ;¢ë¢®¤ ­  ¯à¨­â¥à
x3AA4 call x301C ;ix =  ¤à¥á ¤¥áªà¨¯â®à  ®ª­  ¨§ hl
push af
call z,x2A5E ;®¡à ¡®âª  ã¯à ¢«ïî饣® ª®¤  #0C (®ç¨á⪠ ⥪ã饣® ®ª­ )
ld (iy+#0A),#00
pop af
jr nz,x3AB6 ;¢ë¢®¤ ­  ¯à¨­â¥à
ld (ix+#00),#15 ;crd Y
x3AB6 ld hl,x3AC0
ld (xDE12),hl
pop bc
pop de
pop hl
ret
x3AC0 call x093C
ld a,#9E
jp x0B06
;€„<E282AC>…‘: #3AC8 Š®¬ ­¤ : VList
x3AC8 ld hl,x23A3
ld de,x2104 ;¯/¯ ¯¥ç â¨ á«®¢   ­ «¨§ â®à 
jr x3AD8
;€„<E282AC>…‘: #3AD0 Š®¬ ­¤ : Help
x3AD0 ld hl,x3D01
ld c,#00
ld de,x3AFB
;¯¥ç âì ª®¬ ­¤ ®â« ¤ç¨ª /á«®¢  ­ «¨§ â®à 
x3AD8 call x33BB ;ãáâ ­®¢ª  ¨ ®ç¨á⪠ ¨­ä®à¬ æ¨®­­®£® ®ª­  ®â« ¤ç¨ª 
x3ADB ld b,(ix+#04) ;¢ëá®â  ®ª­  ¢ §­ ª®¬¥áâ å
x3ADE push de
call x3AF9 ;¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ de - call (de)
pop de
ld a,#81 ;á®®¡é¥­¨¥: enter command
ret nc ;§ ¢¥à訫¨ ¯¥ç âì
djnz x3ADE
; ®¦¨¤ ­¨¥ ­ ¦ â¨ï ª« ¢¨è¨
push hl
push bc
push de
rst #30
dw rom6_x074A ;®¦¨¤ ­¨¥ ¤¥©á⢨© ¯®«ì§®¢ â¥«ï (®¯à®á ã¯à ¢«¥­¨ï, ¢ë¢®¤ ç á®¢)
db #06
pop de
pop bc
pop hl
cp #03
jr nz,x3ADB ;¥á«¨ ­¥ Break ¯¥ç â ¥¬ á«¥¤ãîéãî áâà ­¨æã
ld a,#9A ;á®®¡é¥­¨¥: command abandoned
ret
;€„<E282AC>…‘: #3AF9 ¢ë§®¢ ¯/¯ ¯®  ¤à¥áã ¢ de - call (de)
x3AF9 push de
ret
;€„<E282AC>…‘: #3AFB ¯¥ç âì ª®¬ ­¤ë ®â« ¤ç¨ª 
;¢å: hl -  ¤à¥á ª®¬ ­¤ë ®â« ¤ç¨ª 
; c - ­®¬¥à ª®¬ ­¤ë ¢ ᯨ᪥
;¢ëå: hl -  ¤à¥á ­ ç «  á«¥¤ãî饩 ª®¬ ­¤ë
; c - ­®¬¥à á«¥¤ãî饩 ª®¬ ­¤ë ¢ ᯨ᪥
; cy=1 á«®¢® ­ ¯¥ç â ­®
; cy=0 ­¥â ¡®«ìè¥ á«®¢ ¤«ï ¯¥ç â¨
x3AFB ld a,(hl)
or a
ret z ;¢ë室 ¥á«¨ ª®­¥æ ᯨ᪠
cp #20
jr nc,x3B12 ;¯¥ç âì ª®¬ ­¤ë
;¯¥ç âì ­ §¢ ­¨ï £àã¯¯ë ª®¬ ­¤
push bc
ld c,a
dec c ;­®¬¥à ¡«®ª  á®®®¡é¥­¨©
rst #20
db #0D
dc "- "
inc hl
ld b,(hl) ;­®¬¥à á®®¡é¥­¨ï
inc hl
push hl
rst #08
pop hl
pop bc
jr x3B53 ;¢ë室
;¯¥ç âì ª®¬ ­¤ë
x3B12 push bc
rst #20
db #8D
ld b,#0A
call x15DD ;¯¥ç âì á®®¡é¥­¨ï ¨§ hl ­¥ ¬¥­¥¥ § ¤ ­­®© ¤«¨­ë
pop bc
push bc
push hl
ld hl,x3E2C
ld a,c
add a,a
add a,c
ld c,a
inc c
inc c
ld b,#00
add hl,bc
ld a,(hl) ;ä« £ ®¯¨á â¥«ï ª®¬ ­¤ë
bit 7,a
jr z,x3B30 ;¢ ¯ à ¬¥âà å ­¥â áâப¨
jr x3B34 ;¢ ¯ à ¬¥âà å ª®¬ ­¤ë ¥áâì áâப 
x3B30 bit 5,a
jr z,x3B3C
; ¢ ¯ à ¬¥âà å ª®¬ ­¤ë ¥áâì áâப : ¯¥ç âì comp.
x3B34 rst #20
dc "comp."
jr x3B50
; ¯¥ç âì ª®«¨ç¥á⢠ ¯ à ¬¥â஢ ª®¬ ­¤ë
x3B3C bit 6,a
push af
jr nz,x3B46 ;¢ ª®¬ ­¤¥ ¥áâì ­¥®¡ï§ â¥«ì­ë¥ ¯ à ¬¥âàë
rst #20
dc " "
jr x3B49
x3B46 rst #20
dc "<="
x3B49 pop af
and #1F
rst #30
dw rom6_x03A1 ;¯¥ç âì ç¨á«  ¢ ¤¥áïâ¨ç­®© á¨á⥬¥ áç¨á«¥­¨ï
db #06
x3B50 pop hl
pop bc
inc c
;¢ë室
x3B53 scf
ret
;€„<E282AC>…‘: #3B55 Š®¬ ­¤ : IM
x3B55 ld a,e
and #FC
or d
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret nz
ld a,#81 ;á®®¡é¥­¨¥: enter command
ld hl,#0000
add hl,de
add hl,de
add hl,de
ld de,x3B69
add hl,de
jp (hl)
;¯à®æ¥¤ãàë ¤«ï ãáâ ­®¢ª¨ ०¨¬  ¯à¥à뢠­¨©
x3B69 im 0
ret
im 1
ret
im 2
ret
ld a,#17 ;á®®¡é¥­¨¥: illegal value operand
ret
;€„<E282AC>…‘: #3B75 ®¯à¥¤¥«¥­¨¥ ⨯  ¯à¥à뢠­¨© im 1/2
;¢ëå: z ०¨¬ im 2
; nz ०¨¬ im 1
; a=0 - im 2
; a=1 - im 1
x3B75 xor a
ld d,a
ld b,#01
ei
halt ;¥á«¨ im 2, â® d=0
di ;¥á«¨ im 1, â® d=1
ld a,d
or a
ret
;€„<E282AC>…‘: #3B7F ãáâ ­®¢ª  ¯¥à¥¬¥­­ëå ¯® ª®­ªà¥â­ë¬  ¤à¥á ¬
x3B7F ld hl,x3EDA
ld b,#03
x3B84 ld e,(hl)
inc hl
ld d,(hl)
inc hl
ld a,(hl)
ld (de),a
inc hl
inc de
ld a,(hl)
ld (de),a
inc hl
djnz x3B84
ret
;€„<E282AC>…‘: #3B92 § ª®¤¨à®¢ ­­ë¥ ¯à®æ¥¤ãàë ¯¥à¥ª«î祭¨ï áâà ­¨æ -> ram 8 xE3BE
x3B92 db #CE,#38,#3B,#3A,#F4,#75,#DB,#73
db #D5,#F5,#D7,#29,#D1,#AD,#D3,#BF
db #ED,#8B,#EF,#8E,#E9,#E9,#25,#0F
db #00,#E3,#E6,#23,#03,#04,#F2,#3F
db #CC,#DD,#45,#39,#4B,#F7,#51,#3D
db #57,#33,#6D,#DF,#6D,#F0,#34,#FD
db #1B,#43,#18,#87,#2E,#64,#8B,#A3
db #CB,#84,#42,#A1,#86,#A9,#DF,#82
db #5B,#7E,#9F,#BB,#AC,#8D,#9E,#B3
db #71,#70,#73,#72,#96,#81,#B2,#0B
db #84,#E2,#AF,#6B,#86,#AF,#82,#F6
db #A5,#81,#B2,#A1,#8C,#A7,#92,#18
db #7A,#0E,#78,#B7,#0E,#61,#BB,#8F
db #B2,#B5,#79,#6F,#B1,#B7,#A2
;€„<E282AC>…‘: #3C01 ­¥ª®¤¨à®¢ ­­ë¥ ¯à®æ¥¤ãàë ¯¥à¥ª«î祭¨ï áâà ­¨æ -> ram 8 xE42D
x3C01 db #3E,#10,#32,#69,#E4,#F1,#E3,#22
db #3D,#E4,#21,#78,#E4,#E3,#E5,#21
db #01,#32,#E3,#ED,#43,#3D,#E4,#01
db #30,#3D,#18,#1A,#F5,#AF,#18,#03
db #F5,#3E,#10,#32,#69,#E4,#F1,#ED
db #43,#3D,#E4,#E3,#4E,#23,#46,#23
db #E3,#E5,#21,#78,#E4,#E3,#C5,#F5
db #01,#FD,#7F,#3E,#00,#ED,#79,#3E
db #10,#06,#1F,#ED,#79,#F1,#ED,#4B
db #3D,#E4,#C9,#C5,#F5,#01,#FD,#1F
db #3E,#12,#ED,#79,#F1,#C1,#C9,#E5
db #21,#30,#3D,#E3,#C5,#F5,#01,#FD
db #1F,#3E,#10,#ED,#79,#06,#7F,#ED
db #79,#F1,#C1,#C9,#C5,#F5,#01,#FD
db #1F,#3E,#10,#ED,#79,#AF,#06,#7F
db #ED,#79,#F1,#C1,#C9,#4F,#21,#10
db #01,#0F,#0F,#E6,#03,#85,#6F,#6E
db #6E,#79,#C9,#E6,#03,#17,#85,#6F
db #30,#01,#24,#7E,#23,#66,#6F,#C9
db #E3,#23,#23,#E3,#E5,#2A,#08,#E4
db #E3,#C9,#7B,#E6,#10,#ED,#79,#06
db #1F,#7A,#E6,#03,#F6,#10,#ED,#79
db #08,#38,#01,#7E,#77,#08,#3E,#12
db #ED,#79,#06,#7F,#3E,#10,#ED,#79
db #C3,#A1,#05,#7B,#E6,#10,#ED,#79
db #06,#1F,#7A,#E6,#03,#F6,#10,#ED
db #79,#D9,#08,#30,#01,#EB,#ED,#B0
db #30,#01,#EB,#08,#D9,#3E,#12,#ED
db #79,#06,#7F,#3E,#10,#ED,#79,#D9
db #C9,#00,#33,#33,#FB,#3C,#32,#0D
db #E0,#3E,#C9,#32,#18,#E5,#3E,#FB
db #32,#17,#E5,#ED,#56,#C3,#5E,#02
;€„<E282AC>…‘: #3D01 ᯨ᮪ ª®¬ ­¤ ®â« ¤ç¨ª 
x3D01 db #01,"L" ;­®¬¥à ¡«®ª  á®®¡é¥­¨©+1, ­®¬¥à á®®¡é¥­¨ï ¢ ¡«®ª¥
dc "ANalyser"
dc "CLear"
dc "DEFLoad"
dc "DEFSave"
dc "EDit"
dc "EVal"
dc "LDEFinition"
dc "PDEFinition"
dc "VList"
dc "WORD"
db #01,"M"
dc "BREak"
dc "BRK"
dc "DELBreak"
dc "LBreak"
dc "LISTBreak"
db #01,"N"
dc "Jump"
dc "CALl"
dc "SLOW"
dc "WORKspace"
db #01,"O"
dc "BASE"
dc "EXX"
dc "EX AF"
dc "EXit"
dc "OPTion"
dc "SHow"
db #01,"Q"
dc ".PC"
dc "."
dc "CHeck"
dc "DASm"
dc "DATA"
dc "DISs"
dc "DUmp"
dc "FILl"
dc "FINd"
dc "LDISs"
dc "LDUmp"
dc "MEMory"
dc "MOVe"
dc "PUSH"
dc "POP"
dc "RAM"
dc "ROM"
dc "SEarch"
db #01,"R"
dc "CATalogue"
dc "ERAse"
dc "LCATalogue"
dc "LOAD"
dc "SAVE"
db #01,"S"
dc "IM"
dc "INTerrupt"
dc "IND"
dc "OUTD"
dc "IN"
dc "OUT"
dc "SCReen"
db #00
;€„<E282AC>…‘: #3E25 ç⥭¨¥ ¯®à⮢ #1FFD/#7FFD
;¢ëå: cy=1
x3E25 ld b,#0E
call x03B6 ;ç⥭¨¥ ॣ¨áâà  AY
rlca
ret
;€„<E282AC>…‘: #3E2C  ¤à¥á  ®¡à ¡®âª¨ ª®¬ ­¤ ®â« ¤ç¨ª 
; 7,=1 ¢ ¯ à ¬¥âà å ¥áâì áâப  -> 0-2,=nnn ª®«¨ç¥á⢮ ç¨á«®¢ëå ¯ à ¬¥â஢ ¯¥à¥¤ áâப®©
; 6,=1 ®¯¥à ­¤ë ¯¥à¥¤ îâáï ¢ ॣ¨áâà å de,hl,bc. ª®«-¢® ®¯¥à ­¤«®¢ ¢ A
; 5,=1 ®¡à ¡ â뢠âì ª®¬ ­¤ã ¡¥§ ¯à®¢¥àª¨ ᨭ⠪á¨á 
; 7-5,=000 -> 0-4,=nnnnn ª®«¨ç¥á⢮ ®¯¥à ­¤®¢
x3E2C dw x1F42: db %00000001 ;ANalyser
dw x1F25: db %00000000 ;CLear
dw x1EA5: db %00100000 ;DEFLoad
dw x1E76: db %00100000 ;DEFSave
dw x2093: db %00100000 ;EDit
dw x2297: db %00100000 ;EVal
dw x2218: db %00000000 ;LDEFinition
dw x2214: db %00000000 ;PDEFinition
dw x3AC8: db %00000000 ;VList
dw x1FB0: db %00100000 ;WORD
dw x3303: db %01000101 ;BREak
dw x32E2: db %00000010 ;BRK
dw x32AF: db %00000001 ;DELBreak
dw x31C1: db %00000000 ;LBreak
dw x31C1: db %00000000 ;LISTBreak
dw x36B4: db %01000010 ;Jump
dw x3699: db %01000010 ;CALl
dw x31AB: db %00000001 ;SLOW
dw x344F: db %00000001 ;WORKspace
dw x3432: db %00000001 ;BASE
dw x3662: db %00000000 ;EXX
dw x3666: db %00000000 ;EX AF
dw x0AD7: db %00000000 ;EXit
dw x3333: db %00000010 ;OPTion
dw x33D2: db %00000000 ;SHow
dw x3614: db %10000000 ;.PC
dw x361E: db %10000000 ;.
dw x356F: db %01000100 ;CHeck
dw x38E2: db %01000001 ;DASm
dw x360D: db %10000001 ;DATA
dw x3A60: db %01000010 ;DISs
dw x3A71: db %01000010 ;DUmp
dw x35F5: db %01000100 ;FILl
dw x346A: db %10000010 ;FINd
dw x3A57: db %01000010 ;LDISs
dw x3A68: db %01000010 ;LDUmp
dw x365C: db %00000001 ;MEMory
dw x352F: db %01000100 ;MOVe
dw x3A10: db %00000001 ;PUSH
dw x364D: db %00000000 ;POP
dw x370C: db %00000001 ;RAM
dw x36DB: db %00000001 ;ROM
dw x3461: db %10000011 ;SEarch
dw x39EF: db %01000001 ;CATalogue
dw x3074: db %00100000 ;ERAse
dw x39EB: db %01000001 ;LCATalogue
dw x3095: db %00100000 ;LOAD
dw x3085: db %00100000 ;SAVE
dw x3B55: db %00000001 ;IM
dw x3683: db %00000001 ;INTerrupt
dw x337A: db %00000001 ;IND
dw x336C: db %00000010 ;OUTD
dw x3383: db %00000001 ;IN
dw x3360: db %00000010 ;OUT
dw x3778: db %01000001 ;SCReen
db #00
;€„<E282AC>…‘: #3ED2 § ª®¤¨à®¢ ­­ë© ¡«®ª  âਡã⮢ ¬¥­î ¬®­¨â®à  -> ram 8 xEAED
x3ED2 db #A1,#AF,#AD,#AF,#A9,#AF,#AD,#AF
;€„<E282AC>…‘: #3EDA ¤ ­­ë¥ ¤«ï ãáâ ­®¢ª¨ ¯¥à¥¬¥­­ëå ¯® ª®­ªà¥â­ë¬  ¤à¥á ¬
x3EDA dw xC063 ; ¤à¥á
dw #0000 ;¢ª«î祭¨¥ ®â« ¤ç¨ª 
dw xC064 ; ¤à¥á
dw #0000 ;®âª«î祭¨¥ ¬¥à¥å¢ â  NMI
dw xE9E5 ; ¤à¥á
dw xF7C0 ;ãáâ ­®¢ª   ¤à¥á  èà¨äâ 
;€„<E282AC>…‘: #3FE6 ­ §¢ ­¨ï ¬¥áï楢
x3EE6 dc "Jan"
dc "Feb"
dc "Mar"
dc "Apr"
dc "May"
dc "Jun"
dc "Jul"
dc "Aug"
dc "Sep"
dc "Oct"
dc "Nov"
dc "Dec"
;€„<E282AC>…‘: #3F0A ­ §¢ ­¨ï ¤­¥© ­¥¤¥«¨
x3F0A dc "Sun"
dc "Mon"
dc "Tue"
dc "Wed"
dc "Thu"
dc "Fri"
dc "Sat"
x3F1F DISPLAY "Free space at ",$,": ",/D,#4000-$," byte(s)"
ds #4000-$,#00
SAVEBIN "../Build/scorp/NewROM2.bin",#0000,#4000
Reference in New Issue View Git Blame Copy Permalink