Home » Archimedes archive » Acorn Computing » 1994 08 subscription disc.adf » 9408s » Shareware/Speccy/!MZX/!RunImage

Shareware/Speccy/!MZX/!RunImage

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn Computing » 1994 08 subscription disc.adf » 9408s
Filename: Shareware/Speccy/!MZX/!RunImage
Read OK: ✔
File size: 195C bytes
Load address: 0000
Exec address: 0000
File contents
   10REM>EM
   20
   30
   40REM Real Time Z80 Emulation
   50REM Pre-release Version 0.82a
   60REM Copyright 1994 by Graham Willmott
   70
   80
   90REM This program is dedicated to Heppie, who gave me the strength
  100REM to go on, then deprived me of the time.
  110
  120
  130ON ERROR ON ERROR OFF:VDU4:VDU6:PRINT REPORT$;" ";ERL:END
  140
  150*RMLOAD Z80:ZXAud
  160*RMLOAD Z80:Mode60
  170
  180code%=&38584
  190z80regs%=&77EF8
  200spr%=&60594
  210pal%=&66D7C
  220fontblk%=&66DD0
  230z80mem%=&66EE4
  240
  250PROCasm
  260PROCemulate
  270END
  280
  290DEF PROCemulate
  300OSCLI("LOAD <Z80$Dir>.zxrom "+STR$~z80mem%)
  310SYS "OS_GetEnv" TO env$
  320X%=INSTR(env$," -with ")
  330IF X% THEN
  340env$=MID$(env$,X%+7)
  350SYS "OS_File",5,env$ TO ,,ftype%
  360IF (ftype% AND &FFFFFF00)=&FFFCEF00 THEN
  370REM load a .SNA format image
  380C%=OPENIN(env$)
  390X%=BGET#C%
  400z80regs%?int_reg=X%
  410X%=BGET#C%
  420z80regs%!auxhlstore=X%
  430X%=BGET#C%
  440z80regs%?(auxhlstore+1)=X%
  450X%=BGET#C%
  460z80regs%!auxdestore=X%
  470X%=BGET#C%
  480z80regs%?(auxdestore+1)=X%
  490X%=BGET#C%
  500z80regs%!auxbcstore=X%
  510X%=BGET#C%
  520z80regs%?(auxbcstore+1)=X%
  530X%=BGET#C%
  540z80regs%!auxfstore=X%
  550X%=BGET#C%
  560z80regs%!auxastore=X%
  570X%=BGET#C%
  580z80regs%?L=X%
  590X%=BGET#C%
  600z80regs%?H=X%
  610X%=BGET#C%
  620z80regs%?E=X%
  630X%=BGET#C%
  640z80regs%?D=X%
  650X%=BGET#C%
  660z80regs%?C=X%
  670X%=BGET#C%
  680z80regs%?B=X%
  690X%=BGET#C%
  700z80regs%?IYL=X%
  710X%=BGET#C%
  720z80regs%?IYH=X%
  730X%=BGET#C%
  740z80regs%?IXL=X%
  750X%=BGET#C%
  760z80regs%?IXH=X%
  770X%=BGET#C%
  780z80regs%!int_en_flg=(X% AND %100)
  790X%=BGET#C% : REM ignore R value
  800X%=BGET#C%
  810!initial_flags=X%
  820X%=BGET#C%
  830z80regs%?A=X%
  840X%=BGET#C%
  850z80regs%!SPWD=X%
  860X%=BGET#C%
  870z80regs%?(SPWD+1)=X%
  880X%=BGET#C%
  890IF X%=1 THEN X%=0
  900IF X%=2 THEN X%=1
  910z80regs%!int_mode=X%
  920X%=BGET#C% : REM ignore border for now
  930SYS "OS_GBPB",4,C%,z80mem%+&4000,&C000,0
  940!initial_pc=&A0 : REM a ROM RET
  950IF debug THEN !debugbpt=&A0+z80mem% : REM for debug mode startup
  960CLOSE#C%
  970ELSE
  980PROCload_z80(env$)
  990ENDIF
 1000REM make IM2 with I=&39 possible
 1010FOR X%=0 TO &100 STEP 4
 1020!(z80mem%+&10000+X%)=!(z80mem%+X%)
 1030NEXT
 1040ELSE
 1050!initial_pc=0
 1060FOR X=0 TO &7F
 1070z80regs%?X=0
 1080NEXT
 1090ENDIF
 1100
 1110CALL startup
 1120
 1130ENDPROC
 1140
 1150DEF PROCsetupsprite
 1160!spr%=25000
 1170spr%!8=16
 1180SYS "OS_SpriteOp",&109,spr%
 1190SYS "OS_SpriteOp",&10F,spr%,"screen",1,256,192,9
 1200FOR A%=0 TO 15
 1210pal%!(A%*4)=&DD000000*(A% AND 1)+&00DD0000*((A% AND 4)/4)+&DD00*((A% AND 2)/2)+&22000000*((A% AND 8)/8)*(A% AND 1)+&220000*((A% AND 8)/8)*((A% AND 4)/4)+&2200*((A% AND 8)/8)*((A% AND 2)/2)
 1220NEXT
 1230SYS "ColourTrans_WritePalette",spr%,"screen",pal%,0,0
 1240ENDPROC
 1250
 1260DEF PROCload_z80(F$)
 1270LOCAL B%,C%,A%,X%,Y%,cpr%
 1280C%=OPENIN F$
 1290FOR X%=0 TO 6
 1300Y%=BGET#C%
 1310NEXT
 1320Y%=Y%+(BGET#C%)<<8
 1330PTR#C%=0
 1340IF Y%<>0 THEN
 1350REM old version .z80 file
 1360X%=BGET#C%
 1370z80regs%?A=X%
 1380X%=BGET#C%
 1390!initial_flags=X%
 1400X%=BGET#C%
 1410z80regs%?C=X%
 1420X%=BGET#C%
 1430z80regs%?B=X%
 1440X%=BGET#C%
 1450z80regs%?L=X%
 1460X%=BGET#C%
 1470z80regs%?H=X%
 1480X%=BGET#C%
 1490!initial_pc=X%
 1500X%=BGET#C%
 1510initial_pc?1=X%
 1520X%=BGET#C%
 1530z80regs%!SPWD=X%
 1540X%=BGET#C%
 1550z80regs%?(SPWD+1)=X%
 1560X%=BGET#C%
 1570z80regs%?int_reg=X%
 1580X%=BGET#C%
 1590REM Ignore R
 1600X%=BGET#C%
 1610IF (X% AND &20) THEN cpr%=TRUE ELSE cpr%=FALSE
 1620X%=BGET#C%
 1630z80regs%?E=X%
 1640X%=BGET#C%
 1650z80regs%?D=X%
 1660X%=BGET#C%
 1670z80regs%!auxbcstore=X%
 1680X%=BGET#C%
 1690z80regs%?(auxbcstore+1)=X%
 1700X%=BGET#C%
 1710z80regs%!auxdestore=X%
 1720X%=BGET#C%
 1730z80regs%?(auxdestore+1)=X%
 1740X%=BGET#C%
 1750z80regs%!auxhlstore=X%
 1760X%=BGET#C%
 1770z80regs%?(auxhlstore+1)=X%
 1780X%=BGET#C%
 1790z80regs%!auxastore=X%
 1800X%=BGET#C%
 1810z80regs%!auxfstore=X%
 1820X%=BGET#C%
 1830z80regs%?IYL=X%
 1840X%=BGET#C%
 1850z80regs%?IYH=X%
 1860X%=BGET#C%
 1870z80regs%?IXL=X%
 1880X%=BGET#C%
 1890z80regs%?IXH=X%
 1900X%=BGET#C%
 1910z80regs%!int_en_flg=X%
 1920X%=BGET#C%
 1930REM IFF2
 1940X%=(BGET#C%) AND %11
 1950IF X%=2 THEN z80regs%!int_mode=1 ELSE z80regs%!int_mode=0
 1960IF NOT cpr% THEN
 1970SYS "OS_GBPB",4,C%,z80mem%+&4000,&C000,0
 1980ELSE
 1990A%=&4000
 2000REPEAT
 2010X%=BGET#C%
 2020IF X%=&ED THEN
 2030X%=BGET#C%
 2040IF X%=&ED THEN
 2050X%=BGET#C%
 2060B%=BGET#C%
 2070FOR Y%=1 TO X%
 2080z80mem%?A%=B%
 2090A%+=1
 2100NEXT
 2110ELSE
 2120z80mem%?A%=&ED
 2130A%+=1
 2140z80mem%?A%=X%
 2150A%+=1
 2160ENDIF
 2170ELSE
 2180z80mem%?A%=X%
 2190A%+=1
 2200ENDIF
 2210UNTIL A%>&FFFF
 2220X%=BGET#C%
 2230X%+=(BGET#C%)<<8
 2240X%+=(BGET#C%)<<16
 2250X%+=(BGET#C%)<<24
 2260IF X%<>&00EDED00 ERROR 1,"Unable to decompress snapshot"
 2270ENDIF
 2280
 2290ELSE
 2300REM new version .z80 file
 2310X%=BGET#C%
 2320z80regs%?A=X%
 2330X%=BGET#C%
 2340!initial_flags=X%
 2350X%=BGET#C%
 2360z80regs%?C=X%
 2370X%=BGET#C%
 2380z80regs%?B=X%
 2390X%=BGET#C%
 2400z80regs%?L=X%
 2410X%=BGET#C%
 2420z80regs%?H=X%
 2430X%=BGET#C%
 2440X%=X%+(BGET#C%)<<8
 2450!initial_pc=X%
 2460X%=BGET#C%
 2470z80regs%!SPWD=X%
 2480X%=BGET#C%
 2490z80regs%?(SPWD+1)=X%
 2500X%=BGET#C%
 2510z80regs%?int_reg=X%
 2520X%=BGET#C%
 2530REM Ignore R
 2540X%=BGET#C%
 2550REM Ign. flag word
 2560X%=BGET#C%
 2570z80regs%?E=X%
 2580X%=BGET#C%
 2590z80regs%?D=X%
 2600X%=BGET#C%
 2610z80regs%!auxbcstore=X%
 2620X%=BGET#C%
 2630z80regs%?(auxbcstore+1)=X%
 2640X%=BGET#C%
 2650z80regs%!auxdestore=X%
 2660X%=BGET#C%
 2670z80regs%?(auxdestore+1)=X%
 2680X%=BGET#C%
 2690z80regs%!auxhlstore=X%
 2700X%=BGET#C%
 2710z80regs%?(auxhlstore+1)=X%
 2720X%=BGET#C%
 2730z80regs%!auxastore=X%
 2740X%=BGET#C%
 2750z80regs%!auxfstore=X%
 2760X%=BGET#C%
 2770z80regs%?IYL=X%
 2780X%=BGET#C%
 2790z80regs%?IYH=X%
 2800X%=BGET#C%
 2810z80regs%?IXL=X%
 2820X%=BGET#C%
 2830z80regs%?IXH=X%
 2840X%=BGET#C%
 2850z80regs%!int_en_flg=X%
 2860X%=BGET#C%
 2870REM IFF2
 2880X%=(BGET#C%) AND %11
 2890IF X%=2 THEN z80regs%!int_mode=1 ELSE z80regs%!int_mode=0
 2900X%=BGET#C%
 2910X%+=(BGET#C%)<<8
 2920IF X%<>23 THEN ERROR 1,"Z80 snapshot not understood"
 2930X%=BGET#C%
 2940X%+=(BGET#C%)<<8
 2950!initial_pc=X%
 2960X%=BGET#C%
 2970IF X%>1 THEN ERROR 1,"128K configuration not supported"
 2980IF X%=1 PRINT "Warning - Interface I not supported"
 2990X%=BGET#C%
 3000X%=BGET#C%
 3010IF X%=&FF THEN ERROR 1,"Interface I not supported"
 3020X%=BGET#C%
 3030X%=BGET#C%
 3040FOR Y%=1 TO 16:X%=BGET#C%:NEXT
 3050REM we are now at the memory
 3060X%=BGET#C%:X%=BGET#C%:X%=BGET#C% :REM skip header
 3070
 3080A%=&8000
 3090REPEAT
 3100X%=BGET#C%
 3110IF X%=&ED THEN
 3120X%=BGET#C%
 3130IF X%=&ED THEN
 3140X%=BGET#C%
 3150B%=BGET#C%
 3160FOR Y%=1 TO X%
 3170z80mem%?A%=B%
 3180A%+=1
 3190NEXT
 3200ELSE
 3210z80mem%?A%=&ED
 3220A%+=1
 3230z80mem%?A%=X%
 3240A%+=1
 3250ENDIF
 3260ELSE
 3270z80mem%?A%=X%
 3280A%+=1
 3290ENDIF
 3300UNTIL A%>&BFFF
 3310
 3320X%=BGET#C%:X%=BGET#C%:X%=BGET#C% :REM skip header
 3330
 3340A%=&C000
 3350REPEAT
 3360X%=BGET#C%
 3370IF X%=&ED THEN
 3380X%=BGET#C%
 3390IF X%=&ED THEN
 3400X%=BGET#C%
 3410B%=BGET#C%
 3420FOR Y%=1 TO X%
 3430z80mem%?A%=B%
 3440A%+=1
 3450NEXT
 3460ELSE
 3470z80mem%?A%=&ED
 3480A%+=1
 3490z80mem%?A%=X%
 3500A%+=1
 3510ENDIF
 3520ELSE
 3530z80mem%?A%=X%
 3540A%+=1
 3550ENDIF
 3560UNTIL A%>&FFFF
 3570
 3580X%=BGET#C%:X%=BGET#C%:X%=BGET#C% :REM skip header
 3590
 3600A%=&4000
 3610REPEAT
 3620X%=BGET#C%
 3630IF X%=&ED THEN
 3640X%=BGET#C%
 3650IF X%=&ED THEN
 3660X%=BGET#C%
 3670B%=BGET#C%
 3680FOR Y%=1 TO X%
 3690z80mem%?A%=B%
 3700A%+=1
 3710NEXT
 3720ELSE
 3730z80mem%?A%=&ED
 3740A%+=1
 3750z80mem%?A%=X%
 3760A%+=1
 3770ENDIF
 3780ELSE
 3790z80mem%?A%=X%
 3800A%+=1
 3810ENDIF
 3820UNTIL A%>&7FFF
 3830
 3840ENDIF
 3850CLOSE#C%
 3860ENDPROC
 3870
 3880
 3890DEF PROCasm
 3900FOR X%=0 TO 255:fontblk%?X%=0:NEXT
 3910PROCsetupsprite
 3920OSCLI("LOAD Z80:MCode "+STR$~code%)
 3930startup=code%+8
 3940initial_pc=code%
 3950initial_flags=code%+4
 3960
 3970ENDPROC
 3980


�>EM


(� Real Time Z80 Emulation
2� Pre-release Version 0.82a
<'� Copyright 1994 by Graham Willmott
F
P
ZC� This program is dedicated to Heppie, who gave me the strength
d-� to go on, then deprived me of the time.
n
x
� � � � � �:�4:�6:� �$;" ";�:�
�
�*RMLOAD Z80:ZXAud
�*RMLOAD Z80:Mode60
�
�code%=&38584
�z80regs%=&77EF8
�spr%=&60594
�pal%=&66D7C
�fontblk%=&66DD0
�z80mem%=&66EE4
�
��asm
�emulate
�

"� �emulate
,(�("LOAD <Z80$Dir>.zxrom "+�~z80mem%)
6ș "OS_GetEnv" � env$
@X%=�env$," -with ")
J
� X% �
Tenv$=�env$,X%+7)
^"ș "OS_File",5,env$ � ,,ftype%
h&� (ftype% � &FFFFFF00)=&FFFCEF00 �
r� load a .SNA format image
|C%=�(env$)
�X%=�#C%
�z80regs%?int_reg=X%
�X%=�#C%
�z80regs%!auxhlstore=X%
�X%=�#C%
�z80regs%?(auxhlstore+1)=X%
�X%=�#C%
�z80regs%!auxdestore=X%
�X%=�#C%
�z80regs%?(auxdestore+1)=X%
�X%=�#C%
�z80regs%!auxbcstore=X%
�X%=�#C%
z80regs%?(auxbcstore+1)=X%
X%=�#C%
z80regs%!auxfstore=X%
&X%=�#C%
0z80regs%!auxastore=X%
:X%=�#C%
Dz80regs%?L=X%
NX%=�#C%
Xz80regs%?H=X%
bX%=�#C%
lz80regs%?E=X%
vX%=�#C%
�z80regs%?D=X%
�X%=�#C%
�z80regs%?C=X%
�X%=�#C%
�z80regs%?B=X%
�X%=�#C%
�z80regs%?IYL=X%
�X%=�#C%
�z80regs%?IYH=X%
�X%=�#C%
�z80regs%?IXL=X%
�X%=�#C%
�z80regs%?IXH=X%
X%=�#C%
#z80regs%!int_en_flg=(X% � %100)
X%=�#C% : � ignore R value
 X%=�#C%
*!initial_flags=X%
4X%=�#C%
>z80regs%?A=X%
HX%=�#C%
Rz80regs%!SPWD=X%
\X%=�#C%
fz80regs%?(SPWD+1)=X%
pX%=�#C%
z� X%=1 � X%=0
�� X%=2 � X%=1
�z80regs%!int_mode=X%
�%X%=�#C% : � ignore border for now
�+ș "OS_GBPB",4,C%,z80mem%+&4000,&C000,0
�!!initial_pc=&A0 : � a ROM RET
�>� debug � !debugbpt=&A0+z80mem% : � for debug mode startup
��#C%
��
��load_z80(env$)
��
�"� make IM2 with I=&39 possible
�� X%=0 � &100 � 4
�&!(z80mem%+&10000+X%)=!(z80mem%+X%)
�
�
!initial_pc=0
$� X=0 � &7F
.z80regs%?X=0
8�
B�
L
V
� startup
`
j�
t
~� �setupsprite
�!spr%=25000
�
spr%!8=16
�ș "OS_SpriteOp",&109,spr%
�3ș "OS_SpriteOp",&10F,spr%,"screen",1,256,192,9
�� A%=0 � 15
��pal%!(A%*4)=&DD000000*(A% � 1)+&00DD0000*((A% � 4)/4)+&DD00*((A% � 2)/2)+&22000000*((A% � 8)/8)*(A% � 1)+&220000*((A% � 8)/8)*((A% � 4)/4)+&2200*((A% � 8)/8)*((A% � 2)/2)
��
�8ș "ColourTrans_WritePalette",spr%,"screen",pal%,0,0
��
�
�� �load_z80(F$)
�� B%,C%,A%,X%,Y%,cpr%
C%=� F$

� X%=0 � 6
Y%=�#C%
�
(Y%=Y%+(�#C%)<<8
2
�#C%=0
<
� Y%<>0 �
F� old version .z80 file
PX%=�#C%
Zz80regs%?A=X%
dX%=�#C%
n!initial_flags=X%
xX%=�#C%
�z80regs%?C=X%
�X%=�#C%
�z80regs%?B=X%
�X%=�#C%
�z80regs%?L=X%
�X%=�#C%
�z80regs%?H=X%
�X%=�#C%
�!initial_pc=X%
�X%=�#C%
�initial_pc?1=X%
�X%=�#C%
�z80regs%!SPWD=X%
X%=�#C%
z80regs%?(SPWD+1)=X%
X%=�#C%
"z80regs%?int_reg=X%
,X%=�#C%
6� Ignore R
@X%=�#C%
J"� (X% � &20) � cpr%=� � cpr%=�
TX%=�#C%
^z80regs%?E=X%
hX%=�#C%
rz80regs%?D=X%
|X%=�#C%
�z80regs%!auxbcstore=X%
�X%=�#C%
�z80regs%?(auxbcstore+1)=X%
�X%=�#C%
�z80regs%!auxdestore=X%
�X%=�#C%
�z80regs%?(auxdestore+1)=X%
�X%=�#C%
�z80regs%!auxhlstore=X%
�X%=�#C%
�z80regs%?(auxhlstore+1)=X%
�X%=�#C%
�z80regs%!auxastore=X%
X%=�#C%
z80regs%!auxfstore=X%
X%=�#C%
&z80regs%?IYL=X%
0X%=�#C%
:z80regs%?IYH=X%
DX%=�#C%
Nz80regs%?IXL=X%
XX%=�#C%
bz80regs%?IXH=X%
lX%=�#C%
vz80regs%!int_en_flg=X%
�X%=�#C%
�
� IFF2
�X%=(�#C%) � %11
�6� X%=2 � z80regs%!int_mode=1 � z80regs%!int_mode=0
�� � cpr% �
�+ș "OS_GBPB",4,C%,z80mem%+&4000,&C000,0
��
�A%=&4000
��
�X%=�#C%
�� X%=&ED �
�X%=�#C%
�� X%=&ED �
X%=�#C%
B%=�#C%
� Y%=1 � X%
 z80mem%?A%=B%
*	A%+=1
4�
>�
Hz80mem%?A%=&ED
R	A%+=1
\z80mem%?A%=X%
f	A%+=1
p�
z�
�z80mem%?A%=X%
�	A%+=1
��
�� A%>&FFFF
�X%=�#C%
�X%+=(�#C%)<<8
�X%+=(�#C%)<<16
�X%+=(�#C%)<<24
�7� X%<>&00EDED00 � 1,"Unable to decompress snapshot"
��
�
��
�� new version .z80 file
	X%=�#C%
	z80regs%?A=X%
	X%=�#C%
	$!initial_flags=X%
	.X%=�#C%
	8z80regs%?C=X%
	BX%=�#C%
	Lz80regs%?B=X%
	VX%=�#C%
	`z80regs%?L=X%
	jX%=�#C%
	tz80regs%?H=X%
	~X%=�#C%
	�X%=X%+(�#C%)<<8
	�!initial_pc=X%
	�X%=�#C%
	�z80regs%!SPWD=X%
	�X%=�#C%
	�z80regs%?(SPWD+1)=X%
	�X%=�#C%
	�z80regs%?int_reg=X%
	�X%=�#C%
	�� Ignore R
	�X%=�#C%
	�� Ign. flag word
X%=�#C%

z80regs%?E=X%
X%=�#C%
z80regs%?D=X%
(X%=�#C%
2z80regs%!auxbcstore=X%
<X%=�#C%
Fz80regs%?(auxbcstore+1)=X%
PX%=�#C%
Zz80regs%!auxdestore=X%
dX%=�#C%
nz80regs%?(auxdestore+1)=X%
xX%=�#C%
�z80regs%!auxhlstore=X%
�X%=�#C%
�z80regs%?(auxhlstore+1)=X%
�X%=�#C%
�z80regs%!auxastore=X%
�X%=�#C%
�z80regs%!auxfstore=X%
�X%=�#C%
�z80regs%?IYL=X%
�X%=�#C%
�z80regs%?IYH=X%
�X%=�#C%
�z80regs%?IXL=X%
X%=�#C%
z80regs%?IXH=X%
X%=�#C%
"z80regs%!int_en_flg=X%
,X%=�#C%
6
� IFF2
@X%=(�#C%) � %11
J6� X%=2 � z80regs%!int_mode=1 � z80regs%!int_mode=0
TX%=�#C%
^X%+=(�#C%)<<8
h0� X%<>23 � � 1,"Z80 snapshot not understood"
rX%=�#C%
|X%+=(�#C%)<<8
�!initial_pc=X%
�X%=�#C%
�3� X%>1 � � 1,"128K configuration not supported"
�2� X%=1 � "Warning - Interface I not supported"
�X%=�#C%
�X%=�#C%
�.� X%=&FF � � 1,"Interface I not supported"
�X%=�#C%
�X%=�#C%
�� Y%=1 � 16:X%=�#C%:�
�� we are now at the memory
�*X%=�#C%:X%=�#C%:X%=�#C% :� skip header
�
A%=&8000
�
X%=�#C%
&� X%=&ED �
0X%=�#C%
:� X%=&ED �
DX%=�#C%
NB%=�#C%
X� Y%=1 � X%
bz80mem%?A%=B%
l	A%+=1
v�
��
�z80mem%?A%=&ED
�	A%+=1
�z80mem%?A%=X%
�	A%+=1
��
��
�z80mem%?A%=X%
�	A%+=1
��
�� A%>&BFFF
�
�*X%=�#C%:X%=�#C%:X%=�#C% :� skip header



A%=&C000

�

 X%=�#C%

*� X%=&ED �

4X%=�#C%

>� X%=&ED �

HX%=�#C%

RB%=�#C%

\� Y%=1 � X%

fz80mem%?A%=B%

p	A%+=1

z�

��

�z80mem%?A%=&ED

�	A%+=1

�z80mem%?A%=X%

�	A%+=1

��

��

�z80mem%?A%=X%

�	A%+=1

��

�� A%>&FFFF

�

�*X%=�#C%:X%=�#C%:X%=�#C% :� skip header

A%=&4000
�
$X%=�#C%
.� X%=&ED �
8X%=�#C%
B� X%=&ED �
LX%=�#C%
VB%=�#C%
`� Y%=1 � X%
jz80mem%?A%=B%
t	A%+=1
~�
��
�z80mem%?A%=&ED
�	A%+=1
�z80mem%?A%=X%
�	A%+=1
��
��
�z80mem%?A%=X%
�	A%+=1
��
�� A%>&7FFF
�
�

�#C%
�

(
2
� �asm
< � X%=0 � 255:fontblk%?X%=0:�
F�setupsprite
P �("LOAD Z80:MCode "+�~code%)
Zstartup=code%+8
dinitial_pc=code%
ninitial_flags=code%+4
x
��
�
�
00000000  0d 00 0a 08 f4 3e 45 4d  0d 00 14 04 0d 00 1e 04  |.....>EM........|
00000010  0d 00 28 1d f4 20 52 65  61 6c 20 54 69 6d 65 20  |..(.. Real Time |
00000020  5a 38 30 20 45 6d 75 6c  61 74 69 6f 6e 0d 00 32  |Z80 Emulation..2|
00000030  1f f4 20 50 72 65 2d 72  65 6c 65 61 73 65 20 56  |.. Pre-release V|
00000040  65 72 73 69 6f 6e 20 30  2e 38 32 61 0d 00 3c 27  |ersion 0.82a..<'|
00000050  f4 20 43 6f 70 79 72 69  67 68 74 20 31 39 39 34  |. Copyright 1994|
00000060  20 62 79 20 47 72 61 68  61 6d 20 57 69 6c 6c 6d  | by Graham Willm|
00000070  6f 74 74 0d 00 46 04 0d  00 50 04 0d 00 5a 43 f4  |ott..F...P...ZC.|
00000080  20 54 68 69 73 20 70 72  6f 67 72 61 6d 20 69 73  | This program is|
00000090  20 64 65 64 69 63 61 74  65 64 20 74 6f 20 48 65  | dedicated to He|
000000a0  70 70 69 65 2c 20 77 68  6f 20 67 61 76 65 20 6d  |ppie, who gave m|
000000b0  65 20 74 68 65 20 73 74  72 65 6e 67 74 68 0d 00  |e the strength..|
000000c0  64 2d f4 20 74 6f 20 67  6f 20 6f 6e 2c 20 74 68  |d-. to go on, th|
000000d0  65 6e 20 64 65 70 72 69  76 65 64 20 6d 65 20 6f  |en deprived me o|
000000e0  66 20 74 68 65 20 74 69  6d 65 2e 0d 00 6e 04 0d  |f the time...n..|
000000f0  00 78 04 0d 00 82 20 ee  20 85 20 ee 20 85 20 87  |.x.... . . . . .|
00000100  3a ef 34 3a ef 36 3a f1  20 f6 24 3b 22 20 22 3b  |:.4:.6:. .$;" ";|
00000110  9e 3a e0 0d 00 8c 04 0d  00 96 15 2a 52 4d 4c 4f  |.:.........*RMLO|
00000120  41 44 20 5a 38 30 3a 5a  58 41 75 64 0d 00 a0 16  |AD Z80:ZXAud....|
00000130  2a 52 4d 4c 4f 41 44 20  5a 38 30 3a 4d 6f 64 65  |*RMLOAD Z80:Mode|
00000140  36 30 0d 00 aa 04 0d 00  b4 10 63 6f 64 65 25 3d  |60........code%=|
00000150  26 33 38 35 38 34 0d 00  be 13 7a 38 30 72 65 67  |&38584....z80reg|
00000160  73 25 3d 26 37 37 45 46  38 0d 00 c8 0f 73 70 72  |s%=&77EF8....spr|
00000170  25 3d 26 36 30 35 39 34  0d 00 d2 0f 70 61 6c 25  |%=&60594....pal%|
00000180  3d 26 36 36 44 37 43 0d  00 dc 13 66 6f 6e 74 62  |=&66D7C....fontb|
00000190  6c 6b 25 3d 26 36 36 44  44 30 0d 00 e6 12 7a 38  |lk%=&66DD0....z8|
000001a0  30 6d 65 6d 25 3d 26 36  36 45 45 34 0d 00 f0 04  |0mem%=&66EE4....|
000001b0  0d 00 fa 08 f2 61 73 6d  0d 01 04 0c f2 65 6d 75  |.....asm.....emu|
000001c0  6c 61 74 65 0d 01 0e 05  e0 0d 01 18 04 0d 01 22  |late..........."|
000001d0  0e dd 20 f2 65 6d 75 6c  61 74 65 0d 01 2c 28 ff  |.. .emulate..,(.|
000001e0  28 22 4c 4f 41 44 20 3c  5a 38 30 24 44 69 72 3e  |("LOAD <Z80$Dir>|
000001f0  2e 7a 78 72 6f 6d 20 22  2b c3 7e 7a 38 30 6d 65  |.zxrom "+.~z80me|
00000200  6d 25 29 0d 01 36 19 c8  99 20 22 4f 53 5f 47 65  |m%)..6... "OS_Ge|
00000210  74 45 6e 76 22 20 b8 20  65 6e 76 24 0d 01 40 17  |tEnv" . env$..@.|
00000220  58 25 3d a7 65 6e 76 24  2c 22 20 2d 77 69 74 68  |X%=.env$," -with|
00000230  20 22 29 0d 01 4a 0a e7  20 58 25 20 8c 0d 01 54  | ")..J.. X% ...T|
00000240  14 65 6e 76 24 3d c1 65  6e 76 24 2c 58 25 2b 37  |.env$=.env$,X%+7|
00000250  29 0d 01 5e 22 c8 99 20  22 4f 53 5f 46 69 6c 65  |)..^".. "OS_File|
00000260  22 2c 35 2c 65 6e 76 24  20 b8 20 2c 2c 66 74 79  |",5,env$ . ,,fty|
00000270  70 65 25 0d 01 68 26 e7  20 28 66 74 79 70 65 25  |pe%..h&. (ftype%|
00000280  20 80 20 26 46 46 46 46  46 46 30 30 29 3d 26 46  | . &FFFFFF00)=&F|
00000290  46 46 43 45 46 30 30 20  8c 0d 01 72 1e f4 20 6c  |FFCEF00 ...r.. l|
000002a0  6f 61 64 20 61 20 2e 53  4e 41 20 66 6f 72 6d 61  |oad a .SNA forma|
000002b0  74 20 69 6d 61 67 65 0d  01 7c 0e 43 25 3d 8e 28  |t image..|.C%=.(|
000002c0  65 6e 76 24 29 0d 01 86  0b 58 25 3d 9a 23 43 25  |env$)....X%=.#C%|
000002d0  0d 01 90 17 7a 38 30 72  65 67 73 25 3f 69 6e 74  |....z80regs%?int|
000002e0  5f 72 65 67 3d 58 25 0d  01 9a 0b 58 25 3d 9a 23  |_reg=X%....X%=.#|
000002f0  43 25 0d 01 a4 1a 7a 38  30 72 65 67 73 25 21 61  |C%....z80regs%!a|
00000300  75 78 68 6c 73 74 6f 72  65 3d 58 25 0d 01 ae 0b  |uxhlstore=X%....|
00000310  58 25 3d 9a 23 43 25 0d  01 b8 1e 7a 38 30 72 65  |X%=.#C%....z80re|
00000320  67 73 25 3f 28 61 75 78  68 6c 73 74 6f 72 65 2b  |gs%?(auxhlstore+|
00000330  31 29 3d 58 25 0d 01 c2  0b 58 25 3d 9a 23 43 25  |1)=X%....X%=.#C%|
00000340  0d 01 cc 1a 7a 38 30 72  65 67 73 25 21 61 75 78  |....z80regs%!aux|
00000350  64 65 73 74 6f 72 65 3d  58 25 0d 01 d6 0b 58 25  |destore=X%....X%|
00000360  3d 9a 23 43 25 0d 01 e0  1e 7a 38 30 72 65 67 73  |=.#C%....z80regs|
00000370  25 3f 28 61 75 78 64 65  73 74 6f 72 65 2b 31 29  |%?(auxdestore+1)|
00000380  3d 58 25 0d 01 ea 0b 58  25 3d 9a 23 43 25 0d 01  |=X%....X%=.#C%..|
00000390  f4 1a 7a 38 30 72 65 67  73 25 21 61 75 78 62 63  |..z80regs%!auxbc|
000003a0  73 74 6f 72 65 3d 58 25  0d 01 fe 0b 58 25 3d 9a  |store=X%....X%=.|
000003b0  23 43 25 0d 02 08 1e 7a  38 30 72 65 67 73 25 3f  |#C%....z80regs%?|
000003c0  28 61 75 78 62 63 73 74  6f 72 65 2b 31 29 3d 58  |(auxbcstore+1)=X|
000003d0  25 0d 02 12 0b 58 25 3d  9a 23 43 25 0d 02 1c 19  |%....X%=.#C%....|
000003e0  7a 38 30 72 65 67 73 25  21 61 75 78 66 73 74 6f  |z80regs%!auxfsto|
000003f0  72 65 3d 58 25 0d 02 26  0b 58 25 3d 9a 23 43 25  |re=X%..&.X%=.#C%|
00000400  0d 02 30 19 7a 38 30 72  65 67 73 25 21 61 75 78  |..0.z80regs%!aux|
00000410  61 73 74 6f 72 65 3d 58  25 0d 02 3a 0b 58 25 3d  |astore=X%..:.X%=|
00000420  9a 23 43 25 0d 02 44 11  7a 38 30 72 65 67 73 25  |.#C%..D.z80regs%|
00000430  3f 4c 3d 58 25 0d 02 4e  0b 58 25 3d 9a 23 43 25  |?L=X%..N.X%=.#C%|
00000440  0d 02 58 11 7a 38 30 72  65 67 73 25 3f 48 3d 58  |..X.z80regs%?H=X|
00000450  25 0d 02 62 0b 58 25 3d  9a 23 43 25 0d 02 6c 11  |%..b.X%=.#C%..l.|
00000460  7a 38 30 72 65 67 73 25  3f 45 3d 58 25 0d 02 76  |z80regs%?E=X%..v|
00000470  0b 58 25 3d 9a 23 43 25  0d 02 80 11 7a 38 30 72  |.X%=.#C%....z80r|
00000480  65 67 73 25 3f 44 3d 58  25 0d 02 8a 0b 58 25 3d  |egs%?D=X%....X%=|
00000490  9a 23 43 25 0d 02 94 11  7a 38 30 72 65 67 73 25  |.#C%....z80regs%|
000004a0  3f 43 3d 58 25 0d 02 9e  0b 58 25 3d 9a 23 43 25  |?C=X%....X%=.#C%|
000004b0  0d 02 a8 11 7a 38 30 72  65 67 73 25 3f 42 3d 58  |....z80regs%?B=X|
000004c0  25 0d 02 b2 0b 58 25 3d  9a 23 43 25 0d 02 bc 13  |%....X%=.#C%....|
000004d0  7a 38 30 72 65 67 73 25  3f 49 59 4c 3d 58 25 0d  |z80regs%?IYL=X%.|
000004e0  02 c6 0b 58 25 3d 9a 23  43 25 0d 02 d0 13 7a 38  |...X%=.#C%....z8|
000004f0  30 72 65 67 73 25 3f 49  59 48 3d 58 25 0d 02 da  |0regs%?IYH=X%...|
00000500  0b 58 25 3d 9a 23 43 25  0d 02 e4 13 7a 38 30 72  |.X%=.#C%....z80r|
00000510  65 67 73 25 3f 49 58 4c  3d 58 25 0d 02 ee 0b 58  |egs%?IXL=X%....X|
00000520  25 3d 9a 23 43 25 0d 02  f8 13 7a 38 30 72 65 67  |%=.#C%....z80reg|
00000530  73 25 3f 49 58 48 3d 58  25 0d 03 02 0b 58 25 3d  |s%?IXH=X%....X%=|
00000540  9a 23 43 25 0d 03 0c 23  7a 38 30 72 65 67 73 25  |.#C%...#z80regs%|
00000550  21 69 6e 74 5f 65 6e 5f  66 6c 67 3d 28 58 25 20  |!int_en_flg=(X% |
00000560  80 20 25 31 30 30 29 0d  03 16 1e 58 25 3d 9a 23  |. %100)....X%=.#|
00000570  43 25 20 3a 20 f4 20 69  67 6e 6f 72 65 20 52 20  |C% : . ignore R |
00000580  76 61 6c 75 65 0d 03 20  0b 58 25 3d 9a 23 43 25  |value.. .X%=.#C%|
00000590  0d 03 2a 15 21 69 6e 69  74 69 61 6c 5f 66 6c 61  |..*.!initial_fla|
000005a0  67 73 3d 58 25 0d 03 34  0b 58 25 3d 9a 23 43 25  |gs=X%..4.X%=.#C%|
000005b0  0d 03 3e 11 7a 38 30 72  65 67 73 25 3f 41 3d 58  |..>.z80regs%?A=X|
000005c0  25 0d 03 48 0b 58 25 3d  9a 23 43 25 0d 03 52 14  |%..H.X%=.#C%..R.|
000005d0  7a 38 30 72 65 67 73 25  21 53 50 57 44 3d 58 25  |z80regs%!SPWD=X%|
000005e0  0d 03 5c 0b 58 25 3d 9a  23 43 25 0d 03 66 18 7a  |..\.X%=.#C%..f.z|
000005f0  38 30 72 65 67 73 25 3f  28 53 50 57 44 2b 31 29  |80regs%?(SPWD+1)|
00000600  3d 58 25 0d 03 70 0b 58  25 3d 9a 23 43 25 0d 03  |=X%..p.X%=.#C%..|
00000610  7a 11 e7 20 58 25 3d 31  20 8c 20 58 25 3d 30 0d  |z.. X%=1 . X%=0.|
00000620  03 84 11 e7 20 58 25 3d  32 20 8c 20 58 25 3d 31  |.... X%=2 . X%=1|
00000630  0d 03 8e 18 7a 38 30 72  65 67 73 25 21 69 6e 74  |....z80regs%!int|
00000640  5f 6d 6f 64 65 3d 58 25  0d 03 98 25 58 25 3d 9a  |_mode=X%...%X%=.|
00000650  23 43 25 20 3a 20 f4 20  69 67 6e 6f 72 65 20 62  |#C% : . ignore b|
00000660  6f 72 64 65 72 20 66 6f  72 20 6e 6f 77 0d 03 a2  |order for now...|
00000670  2b c8 99 20 22 4f 53 5f  47 42 50 42 22 2c 34 2c  |+.. "OS_GBPB",4,|
00000680  43 25 2c 7a 38 30 6d 65  6d 25 2b 26 34 30 30 30  |C%,z80mem%+&4000|
00000690  2c 26 43 30 30 30 2c 30  0d 03 ac 21 21 69 6e 69  |,&C000,0...!!ini|
000006a0  74 69 61 6c 5f 70 63 3d  26 41 30 20 3a 20 f4 20  |tial_pc=&A0 : . |
000006b0  61 20 52 4f 4d 20 52 45  54 0d 03 b6 3e e7 20 64  |a ROM RET...>. d|
000006c0  65 62 75 67 20 8c 20 21  64 65 62 75 67 62 70 74  |ebug . !debugbpt|
000006d0  3d 26 41 30 2b 7a 38 30  6d 65 6d 25 20 3a 20 f4  |=&A0+z80mem% : .|
000006e0  20 66 6f 72 20 64 65 62  75 67 20 6d 6f 64 65 20  | for debug mode |
000006f0  73 74 61 72 74 75 70 0d  03 c0 08 d9 23 43 25 0d  |startup.....#C%.|
00000700  03 ca 05 cc 0d 03 d4 13  f2 6c 6f 61 64 5f 7a 38  |.........load_z8|
00000710  30 28 65 6e 76 24 29 0d  03 de 05 cd 0d 03 e8 22  |0(env$)........"|
00000720  f4 20 6d 61 6b 65 20 49  4d 32 20 77 69 74 68 20  |. make IM2 with |
00000730  49 3d 26 33 39 20 70 6f  73 73 69 62 6c 65 0d 03  |I=&39 possible..|
00000740  f2 15 e3 20 58 25 3d 30  20 b8 20 26 31 30 30 20  |... X%=0 . &100 |
00000750  88 20 34 0d 03 fc 26 21  28 7a 38 30 6d 65 6d 25  |. 4...&!(z80mem%|
00000760  2b 26 31 30 30 30 30 2b  58 25 29 3d 21 28 7a 38  |+&10000+X%)=!(z8|
00000770  30 6d 65 6d 25 2b 58 25  29 0d 04 06 05 ed 0d 04  |0mem%+X%).......|
00000780  10 05 cc 0d 04 1a 11 21  69 6e 69 74 69 61 6c 5f  |.......!initial_|
00000790  70 63 3d 30 0d 04 24 0f  e3 20 58 3d 30 20 b8 20  |pc=0..$.. X=0 . |
000007a0  26 37 46 0d 04 2e 10 7a  38 30 72 65 67 73 25 3f  |&7F....z80regs%?|
000007b0  58 3d 30 0d 04 38 05 ed  0d 04 42 05 cd 0d 04 4c  |X=0..8....B....L|
000007c0  04 0d 04 56 0d d6 20 73  74 61 72 74 75 70 0d 04  |...V.. startup..|
000007d0  60 04 0d 04 6a 05 e1 0d  04 74 04 0d 04 7e 12 dd  |`...j....t...~..|
000007e0  20 f2 73 65 74 75 70 73  70 72 69 74 65 0d 04 88  | .setupsprite...|
000007f0  0f 21 73 70 72 25 3d 32  35 30 30 30 0d 04 92 0d  |.!spr%=25000....|
00000800  73 70 72 25 21 38 3d 31  36 0d 04 9c 1e c8 99 20  |spr%!8=16...... |
00000810  22 4f 53 5f 53 70 72 69  74 65 4f 70 22 2c 26 31  |"OS_SpriteOp",&1|
00000820  30 39 2c 73 70 72 25 0d  04 a6 33 c8 99 20 22 4f  |09,spr%...3.. "O|
00000830  53 5f 53 70 72 69 74 65  4f 70 22 2c 26 31 30 46  |S_SpriteOp",&10F|
00000840  2c 73 70 72 25 2c 22 73  63 72 65 65 6e 22 2c 31  |,spr%,"screen",1|
00000850  2c 32 35 36 2c 31 39 32  2c 39 0d 04 b0 0f e3 20  |,256,192,9..... |
00000860  41 25 3d 30 20 b8 20 31  35 0d 04 ba ae 70 61 6c  |A%=0 . 15....pal|
00000870  25 21 28 41 25 2a 34 29  3d 26 44 44 30 30 30 30  |%!(A%*4)=&DD0000|
00000880  30 30 2a 28 41 25 20 80  20 31 29 2b 26 30 30 44  |00*(A% . 1)+&00D|
00000890  44 30 30 30 30 2a 28 28  41 25 20 80 20 34 29 2f  |D0000*((A% . 4)/|
000008a0  34 29 2b 26 44 44 30 30  2a 28 28 41 25 20 80 20  |4)+&DD00*((A% . |
000008b0  32 29 2f 32 29 2b 26 32  32 30 30 30 30 30 30 2a  |2)/2)+&22000000*|
000008c0  28 28 41 25 20 80 20 38  29 2f 38 29 2a 28 41 25  |((A% . 8)/8)*(A%|
000008d0  20 80 20 31 29 2b 26 32  32 30 30 30 30 2a 28 28  | . 1)+&220000*((|
000008e0  41 25 20 80 20 38 29 2f  38 29 2a 28 28 41 25 20  |A% . 8)/8)*((A% |
000008f0  80 20 34 29 2f 34 29 2b  26 32 32 30 30 2a 28 28  |. 4)/4)+&2200*((|
00000900  41 25 20 80 20 38 29 2f  38 29 2a 28 28 41 25 20  |A% . 8)/8)*((A% |
00000910  80 20 32 29 2f 32 29 0d  04 c4 05 ed 0d 04 ce 38  |. 2)/2)........8|
00000920  c8 99 20 22 43 6f 6c 6f  75 72 54 72 61 6e 73 5f  |.. "ColourTrans_|
00000930  57 72 69 74 65 50 61 6c  65 74 74 65 22 2c 73 70  |WritePalette",sp|
00000940  72 25 2c 22 73 63 72 65  65 6e 22 2c 70 61 6c 25  |r%,"screen",pal%|
00000950  2c 30 2c 30 0d 04 d8 05  e1 0d 04 e2 04 0d 04 ec  |,0,0............|
00000960  13 dd 20 f2 6c 6f 61 64  5f 7a 38 30 28 46 24 29  |.. .load_z80(F$)|
00000970  0d 04 f6 19 ea 20 42 25  2c 43 25 2c 41 25 2c 58  |..... B%,C%,A%,X|
00000980  25 2c 59 25 2c 63 70 72  25 0d 05 00 0b 43 25 3d  |%,Y%,cpr%....C%=|
00000990  8e 20 46 24 0d 05 0a 0e  e3 20 58 25 3d 30 20 b8  |. F$..... X%=0 .|
000009a0  20 36 0d 05 14 0b 59 25  3d 9a 23 43 25 0d 05 1e  | 6....Y%=.#C%...|
000009b0  05 ed 0d 05 28 13 59 25  3d 59 25 2b 28 9a 23 43  |....(.Y%=Y%+(.#C|
000009c0  25 29 3c 3c 38 0d 05 32  0a cf 23 43 25 3d 30 0d  |%)<<8..2..#C%=0.|
000009d0  05 3c 0d e7 20 59 25 3c  3e 30 20 8c 0d 05 46 1b  |.<.. Y%<>0 ...F.|
000009e0  f4 20 6f 6c 64 20 76 65  72 73 69 6f 6e 20 2e 7a  |. old version .z|
000009f0  38 30 20 66 69 6c 65 0d  05 50 0b 58 25 3d 9a 23  |80 file..P.X%=.#|
00000a00  43 25 0d 05 5a 11 7a 38  30 72 65 67 73 25 3f 41  |C%..Z.z80regs%?A|
00000a10  3d 58 25 0d 05 64 0b 58  25 3d 9a 23 43 25 0d 05  |=X%..d.X%=.#C%..|
00000a20  6e 15 21 69 6e 69 74 69  61 6c 5f 66 6c 61 67 73  |n.!initial_flags|
00000a30  3d 58 25 0d 05 78 0b 58  25 3d 9a 23 43 25 0d 05  |=X%..x.X%=.#C%..|
00000a40  82 11 7a 38 30 72 65 67  73 25 3f 43 3d 58 25 0d  |..z80regs%?C=X%.|
00000a50  05 8c 0b 58 25 3d 9a 23  43 25 0d 05 96 11 7a 38  |...X%=.#C%....z8|
00000a60  30 72 65 67 73 25 3f 42  3d 58 25 0d 05 a0 0b 58  |0regs%?B=X%....X|
00000a70  25 3d 9a 23 43 25 0d 05  aa 11 7a 38 30 72 65 67  |%=.#C%....z80reg|
00000a80  73 25 3f 4c 3d 58 25 0d  05 b4 0b 58 25 3d 9a 23  |s%?L=X%....X%=.#|
00000a90  43 25 0d 05 be 11 7a 38  30 72 65 67 73 25 3f 48  |C%....z80regs%?H|
00000aa0  3d 58 25 0d 05 c8 0b 58  25 3d 9a 23 43 25 0d 05  |=X%....X%=.#C%..|
00000ab0  d2 12 21 69 6e 69 74 69  61 6c 5f 70 63 3d 58 25  |..!initial_pc=X%|
00000ac0  0d 05 dc 0b 58 25 3d 9a  23 43 25 0d 05 e6 13 69  |....X%=.#C%....i|
00000ad0  6e 69 74 69 61 6c 5f 70  63 3f 31 3d 58 25 0d 05  |nitial_pc?1=X%..|
00000ae0  f0 0b 58 25 3d 9a 23 43  25 0d 05 fa 14 7a 38 30  |..X%=.#C%....z80|
00000af0  72 65 67 73 25 21 53 50  57 44 3d 58 25 0d 06 04  |regs%!SPWD=X%...|
00000b00  0b 58 25 3d 9a 23 43 25  0d 06 0e 18 7a 38 30 72  |.X%=.#C%....z80r|
00000b10  65 67 73 25 3f 28 53 50  57 44 2b 31 29 3d 58 25  |egs%?(SPWD+1)=X%|
00000b20  0d 06 18 0b 58 25 3d 9a  23 43 25 0d 06 22 17 7a  |....X%=.#C%..".z|
00000b30  38 30 72 65 67 73 25 3f  69 6e 74 5f 72 65 67 3d  |80regs%?int_reg=|
00000b40  58 25 0d 06 2c 0b 58 25  3d 9a 23 43 25 0d 06 36  |X%..,.X%=.#C%..6|
00000b50  0e f4 20 49 67 6e 6f 72  65 20 52 0d 06 40 0b 58  |.. Ignore R..@.X|
00000b60  25 3d 9a 23 43 25 0d 06  4a 22 e7 20 28 58 25 20  |%=.#C%..J". (X% |
00000b70  80 20 26 32 30 29 20 8c  20 63 70 72 25 3d b9 20  |. &20) . cpr%=. |
00000b80  8b 20 63 70 72 25 3d a3  0d 06 54 0b 58 25 3d 9a  |. cpr%=...T.X%=.|
00000b90  23 43 25 0d 06 5e 11 7a  38 30 72 65 67 73 25 3f  |#C%..^.z80regs%?|
00000ba0  45 3d 58 25 0d 06 68 0b  58 25 3d 9a 23 43 25 0d  |E=X%..h.X%=.#C%.|
00000bb0  06 72 11 7a 38 30 72 65  67 73 25 3f 44 3d 58 25  |.r.z80regs%?D=X%|
00000bc0  0d 06 7c 0b 58 25 3d 9a  23 43 25 0d 06 86 1a 7a  |..|.X%=.#C%....z|
00000bd0  38 30 72 65 67 73 25 21  61 75 78 62 63 73 74 6f  |80regs%!auxbcsto|
00000be0  72 65 3d 58 25 0d 06 90  0b 58 25 3d 9a 23 43 25  |re=X%....X%=.#C%|
00000bf0  0d 06 9a 1e 7a 38 30 72  65 67 73 25 3f 28 61 75  |....z80regs%?(au|
00000c00  78 62 63 73 74 6f 72 65  2b 31 29 3d 58 25 0d 06  |xbcstore+1)=X%..|
00000c10  a4 0b 58 25 3d 9a 23 43  25 0d 06 ae 1a 7a 38 30  |..X%=.#C%....z80|
00000c20  72 65 67 73 25 21 61 75  78 64 65 73 74 6f 72 65  |regs%!auxdestore|
00000c30  3d 58 25 0d 06 b8 0b 58  25 3d 9a 23 43 25 0d 06  |=X%....X%=.#C%..|
00000c40  c2 1e 7a 38 30 72 65 67  73 25 3f 28 61 75 78 64  |..z80regs%?(auxd|
00000c50  65 73 74 6f 72 65 2b 31  29 3d 58 25 0d 06 cc 0b  |estore+1)=X%....|
00000c60  58 25 3d 9a 23 43 25 0d  06 d6 1a 7a 38 30 72 65  |X%=.#C%....z80re|
00000c70  67 73 25 21 61 75 78 68  6c 73 74 6f 72 65 3d 58  |gs%!auxhlstore=X|
00000c80  25 0d 06 e0 0b 58 25 3d  9a 23 43 25 0d 06 ea 1e  |%....X%=.#C%....|
00000c90  7a 38 30 72 65 67 73 25  3f 28 61 75 78 68 6c 73  |z80regs%?(auxhls|
00000ca0  74 6f 72 65 2b 31 29 3d  58 25 0d 06 f4 0b 58 25  |tore+1)=X%....X%|
00000cb0  3d 9a 23 43 25 0d 06 fe  19 7a 38 30 72 65 67 73  |=.#C%....z80regs|
00000cc0  25 21 61 75 78 61 73 74  6f 72 65 3d 58 25 0d 07  |%!auxastore=X%..|
00000cd0  08 0b 58 25 3d 9a 23 43  25 0d 07 12 19 7a 38 30  |..X%=.#C%....z80|
00000ce0  72 65 67 73 25 21 61 75  78 66 73 74 6f 72 65 3d  |regs%!auxfstore=|
00000cf0  58 25 0d 07 1c 0b 58 25  3d 9a 23 43 25 0d 07 26  |X%....X%=.#C%..&|
00000d00  13 7a 38 30 72 65 67 73  25 3f 49 59 4c 3d 58 25  |.z80regs%?IYL=X%|
00000d10  0d 07 30 0b 58 25 3d 9a  23 43 25 0d 07 3a 13 7a  |..0.X%=.#C%..:.z|
00000d20  38 30 72 65 67 73 25 3f  49 59 48 3d 58 25 0d 07  |80regs%?IYH=X%..|
00000d30  44 0b 58 25 3d 9a 23 43  25 0d 07 4e 13 7a 38 30  |D.X%=.#C%..N.z80|
00000d40  72 65 67 73 25 3f 49 58  4c 3d 58 25 0d 07 58 0b  |regs%?IXL=X%..X.|
00000d50  58 25 3d 9a 23 43 25 0d  07 62 13 7a 38 30 72 65  |X%=.#C%..b.z80re|
00000d60  67 73 25 3f 49 58 48 3d  58 25 0d 07 6c 0b 58 25  |gs%?IXH=X%..l.X%|
00000d70  3d 9a 23 43 25 0d 07 76  1a 7a 38 30 72 65 67 73  |=.#C%..v.z80regs|
00000d80  25 21 69 6e 74 5f 65 6e  5f 66 6c 67 3d 58 25 0d  |%!int_en_flg=X%.|
00000d90  07 80 0b 58 25 3d 9a 23  43 25 0d 07 8a 0a f4 20  |...X%=.#C%..... |
00000da0  49 46 46 32 0d 07 94 13  58 25 3d 28 9a 23 43 25  |IFF2....X%=(.#C%|
00000db0  29 20 80 20 25 31 31 0d  07 9e 36 e7 20 58 25 3d  |) . %11...6. X%=|
00000dc0  32 20 8c 20 7a 38 30 72  65 67 73 25 21 69 6e 74  |2 . z80regs%!int|
00000dd0  5f 6d 6f 64 65 3d 31 20  8b 20 7a 38 30 72 65 67  |_mode=1 . z80reg|
00000de0  73 25 21 69 6e 74 5f 6d  6f 64 65 3d 30 0d 07 a8  |s%!int_mode=0...|
00000df0  0e e7 20 ac 20 63 70 72  25 20 8c 0d 07 b2 2b c8  |.. . cpr% ....+.|
00000e00  99 20 22 4f 53 5f 47 42  50 42 22 2c 34 2c 43 25  |. "OS_GBPB",4,C%|
00000e10  2c 7a 38 30 6d 65 6d 25  2b 26 34 30 30 30 2c 26  |,z80mem%+&4000,&|
00000e20  43 30 30 30 2c 30 0d 07  bc 05 cc 0d 07 c6 0c 41  |C000,0.........A|
00000e30  25 3d 26 34 30 30 30 0d  07 d0 05 f5 0d 07 da 0b  |%=&4000.........|
00000e40  58 25 3d 9a 23 43 25 0d  07 e4 0e e7 20 58 25 3d  |X%=.#C%..... X%=|
00000e50  26 45 44 20 8c 0d 07 ee  0b 58 25 3d 9a 23 43 25  |&ED .....X%=.#C%|
00000e60  0d 07 f8 0e e7 20 58 25  3d 26 45 44 20 8c 0d 08  |..... X%=&ED ...|
00000e70  02 0b 58 25 3d 9a 23 43  25 0d 08 0c 0b 42 25 3d  |..X%=.#C%....B%=|
00000e80  9a 23 43 25 0d 08 16 0f  e3 20 59 25 3d 31 20 b8  |.#C%..... Y%=1 .|
00000e90  20 58 25 0d 08 20 11 7a  38 30 6d 65 6d 25 3f 41  | X%.. .z80mem%?A|
00000ea0  25 3d 42 25 0d 08 2a 09  41 25 2b 3d 31 0d 08 34  |%=B%..*.A%+=1..4|
00000eb0  05 ed 0d 08 3e 05 cc 0d  08 48 12 7a 38 30 6d 65  |....>....H.z80me|
00000ec0  6d 25 3f 41 25 3d 26 45  44 0d 08 52 09 41 25 2b  |m%?A%=&ED..R.A%+|
00000ed0  3d 31 0d 08 5c 11 7a 38  30 6d 65 6d 25 3f 41 25  |=1..\.z80mem%?A%|
00000ee0  3d 58 25 0d 08 66 09 41  25 2b 3d 31 0d 08 70 05  |=X%..f.A%+=1..p.|
00000ef0  cd 0d 08 7a 05 cc 0d 08  84 11 7a 38 30 6d 65 6d  |...z......z80mem|
00000f00  25 3f 41 25 3d 58 25 0d  08 8e 09 41 25 2b 3d 31  |%?A%=X%....A%+=1|
00000f10  0d 08 98 05 cd 0d 08 a2  0e fd 20 41 25 3e 26 46  |.......... A%>&F|
00000f20  46 46 46 0d 08 ac 0b 58  25 3d 9a 23 43 25 0d 08  |FFF....X%=.#C%..|
00000f30  b6 11 58 25 2b 3d 28 9a  23 43 25 29 3c 3c 38 0d  |..X%+=(.#C%)<<8.|
00000f40  08 c0 12 58 25 2b 3d 28  9a 23 43 25 29 3c 3c 31  |...X%+=(.#C%)<<1|
00000f50  36 0d 08 ca 12 58 25 2b  3d 28 9a 23 43 25 29 3c  |6....X%+=(.#C%)<|
00000f60  3c 32 34 0d 08 d4 37 e7  20 58 25 3c 3e 26 30 30  |<24...7. X%<>&00|
00000f70  45 44 45 44 30 30 20 85  20 31 2c 22 55 6e 61 62  |EDED00 . 1,"Unab|
00000f80  6c 65 20 74 6f 20 64 65  63 6f 6d 70 72 65 73 73  |le to decompress|
00000f90  20 73 6e 61 70 73 68 6f  74 22 0d 08 de 05 cd 0d  | snapshot"......|
00000fa0  08 e8 04 0d 08 f2 05 cc  0d 08 fc 1b f4 20 6e 65  |............. ne|
00000fb0  77 20 76 65 72 73 69 6f  6e 20 2e 7a 38 30 20 66  |w version .z80 f|
00000fc0  69 6c 65 0d 09 06 0b 58  25 3d 9a 23 43 25 0d 09  |ile....X%=.#C%..|
00000fd0  10 11 7a 38 30 72 65 67  73 25 3f 41 3d 58 25 0d  |..z80regs%?A=X%.|
00000fe0  09 1a 0b 58 25 3d 9a 23  43 25 0d 09 24 15 21 69  |...X%=.#C%..$.!i|
00000ff0  6e 69 74 69 61 6c 5f 66  6c 61 67 73 3d 58 25 0d  |nitial_flags=X%.|
00001000  09 2e 0b 58 25 3d 9a 23  43 25 0d 09 38 11 7a 38  |...X%=.#C%..8.z8|
00001010  30 72 65 67 73 25 3f 43  3d 58 25 0d 09 42 0b 58  |0regs%?C=X%..B.X|
00001020  25 3d 9a 23 43 25 0d 09  4c 11 7a 38 30 72 65 67  |%=.#C%..L.z80reg|
00001030  73 25 3f 42 3d 58 25 0d  09 56 0b 58 25 3d 9a 23  |s%?B=X%..V.X%=.#|
00001040  43 25 0d 09 60 11 7a 38  30 72 65 67 73 25 3f 4c  |C%..`.z80regs%?L|
00001050  3d 58 25 0d 09 6a 0b 58  25 3d 9a 23 43 25 0d 09  |=X%..j.X%=.#C%..|
00001060  74 11 7a 38 30 72 65 67  73 25 3f 48 3d 58 25 0d  |t.z80regs%?H=X%.|
00001070  09 7e 0b 58 25 3d 9a 23  43 25 0d 09 88 13 58 25  |.~.X%=.#C%....X%|
00001080  3d 58 25 2b 28 9a 23 43  25 29 3c 3c 38 0d 09 92  |=X%+(.#C%)<<8...|
00001090  12 21 69 6e 69 74 69 61  6c 5f 70 63 3d 58 25 0d  |.!initial_pc=X%.|
000010a0  09 9c 0b 58 25 3d 9a 23  43 25 0d 09 a6 14 7a 38  |...X%=.#C%....z8|
000010b0  30 72 65 67 73 25 21 53  50 57 44 3d 58 25 0d 09  |0regs%!SPWD=X%..|
000010c0  b0 0b 58 25 3d 9a 23 43  25 0d 09 ba 18 7a 38 30  |..X%=.#C%....z80|
000010d0  72 65 67 73 25 3f 28 53  50 57 44 2b 31 29 3d 58  |regs%?(SPWD+1)=X|
000010e0  25 0d 09 c4 0b 58 25 3d  9a 23 43 25 0d 09 ce 17  |%....X%=.#C%....|
000010f0  7a 38 30 72 65 67 73 25  3f 69 6e 74 5f 72 65 67  |z80regs%?int_reg|
00001100  3d 58 25 0d 09 d8 0b 58  25 3d 9a 23 43 25 0d 09  |=X%....X%=.#C%..|
00001110  e2 0e f4 20 49 67 6e 6f  72 65 20 52 0d 09 ec 0b  |... Ignore R....|
00001120  58 25 3d 9a 23 43 25 0d  09 f6 14 f4 20 49 67 6e  |X%=.#C%..... Ign|
00001130  2e 20 66 6c 61 67 20 77  6f 72 64 0d 0a 00 0b 58  |. flag word....X|
00001140  25 3d 9a 23 43 25 0d 0a  0a 11 7a 38 30 72 65 67  |%=.#C%....z80reg|
00001150  73 25 3f 45 3d 58 25 0d  0a 14 0b 58 25 3d 9a 23  |s%?E=X%....X%=.#|
00001160  43 25 0d 0a 1e 11 7a 38  30 72 65 67 73 25 3f 44  |C%....z80regs%?D|
00001170  3d 58 25 0d 0a 28 0b 58  25 3d 9a 23 43 25 0d 0a  |=X%..(.X%=.#C%..|
00001180  32 1a 7a 38 30 72 65 67  73 25 21 61 75 78 62 63  |2.z80regs%!auxbc|
00001190  73 74 6f 72 65 3d 58 25  0d 0a 3c 0b 58 25 3d 9a  |store=X%..<.X%=.|
000011a0  23 43 25 0d 0a 46 1e 7a  38 30 72 65 67 73 25 3f  |#C%..F.z80regs%?|
000011b0  28 61 75 78 62 63 73 74  6f 72 65 2b 31 29 3d 58  |(auxbcstore+1)=X|
000011c0  25 0d 0a 50 0b 58 25 3d  9a 23 43 25 0d 0a 5a 1a  |%..P.X%=.#C%..Z.|
000011d0  7a 38 30 72 65 67 73 25  21 61 75 78 64 65 73 74  |z80regs%!auxdest|
000011e0  6f 72 65 3d 58 25 0d 0a  64 0b 58 25 3d 9a 23 43  |ore=X%..d.X%=.#C|
000011f0  25 0d 0a 6e 1e 7a 38 30  72 65 67 73 25 3f 28 61  |%..n.z80regs%?(a|
00001200  75 78 64 65 73 74 6f 72  65 2b 31 29 3d 58 25 0d  |uxdestore+1)=X%.|
00001210  0a 78 0b 58 25 3d 9a 23  43 25 0d 0a 82 1a 7a 38  |.x.X%=.#C%....z8|
00001220  30 72 65 67 73 25 21 61  75 78 68 6c 73 74 6f 72  |0regs%!auxhlstor|
00001230  65 3d 58 25 0d 0a 8c 0b  58 25 3d 9a 23 43 25 0d  |e=X%....X%=.#C%.|
00001240  0a 96 1e 7a 38 30 72 65  67 73 25 3f 28 61 75 78  |...z80regs%?(aux|
00001250  68 6c 73 74 6f 72 65 2b  31 29 3d 58 25 0d 0a a0  |hlstore+1)=X%...|
00001260  0b 58 25 3d 9a 23 43 25  0d 0a aa 19 7a 38 30 72  |.X%=.#C%....z80r|
00001270  65 67 73 25 21 61 75 78  61 73 74 6f 72 65 3d 58  |egs%!auxastore=X|
00001280  25 0d 0a b4 0b 58 25 3d  9a 23 43 25 0d 0a be 19  |%....X%=.#C%....|
00001290  7a 38 30 72 65 67 73 25  21 61 75 78 66 73 74 6f  |z80regs%!auxfsto|
000012a0  72 65 3d 58 25 0d 0a c8  0b 58 25 3d 9a 23 43 25  |re=X%....X%=.#C%|
000012b0  0d 0a d2 13 7a 38 30 72  65 67 73 25 3f 49 59 4c  |....z80regs%?IYL|
000012c0  3d 58 25 0d 0a dc 0b 58  25 3d 9a 23 43 25 0d 0a  |=X%....X%=.#C%..|
000012d0  e6 13 7a 38 30 72 65 67  73 25 3f 49 59 48 3d 58  |..z80regs%?IYH=X|
000012e0  25 0d 0a f0 0b 58 25 3d  9a 23 43 25 0d 0a fa 13  |%....X%=.#C%....|
000012f0  7a 38 30 72 65 67 73 25  3f 49 58 4c 3d 58 25 0d  |z80regs%?IXL=X%.|
00001300  0b 04 0b 58 25 3d 9a 23  43 25 0d 0b 0e 13 7a 38  |...X%=.#C%....z8|
00001310  30 72 65 67 73 25 3f 49  58 48 3d 58 25 0d 0b 18  |0regs%?IXH=X%...|
00001320  0b 58 25 3d 9a 23 43 25  0d 0b 22 1a 7a 38 30 72  |.X%=.#C%..".z80r|
00001330  65 67 73 25 21 69 6e 74  5f 65 6e 5f 66 6c 67 3d  |egs%!int_en_flg=|
00001340  58 25 0d 0b 2c 0b 58 25  3d 9a 23 43 25 0d 0b 36  |X%..,.X%=.#C%..6|
00001350  0a f4 20 49 46 46 32 0d  0b 40 13 58 25 3d 28 9a  |.. IFF2..@.X%=(.|
00001360  23 43 25 29 20 80 20 25  31 31 0d 0b 4a 36 e7 20  |#C%) . %11..J6. |
00001370  58 25 3d 32 20 8c 20 7a  38 30 72 65 67 73 25 21  |X%=2 . z80regs%!|
00001380  69 6e 74 5f 6d 6f 64 65  3d 31 20 8b 20 7a 38 30  |int_mode=1 . z80|
00001390  72 65 67 73 25 21 69 6e  74 5f 6d 6f 64 65 3d 30  |regs%!int_mode=0|
000013a0  0d 0b 54 0b 58 25 3d 9a  23 43 25 0d 0b 5e 11 58  |..T.X%=.#C%..^.X|
000013b0  25 2b 3d 28 9a 23 43 25  29 3c 3c 38 0d 0b 68 30  |%+=(.#C%)<<8..h0|
000013c0  e7 20 58 25 3c 3e 32 33  20 8c 20 85 20 31 2c 22  |. X%<>23 . . 1,"|
000013d0  5a 38 30 20 73 6e 61 70  73 68 6f 74 20 6e 6f 74  |Z80 snapshot not|
000013e0  20 75 6e 64 65 72 73 74  6f 6f 64 22 0d 0b 72 0b  | understood"..r.|
000013f0  58 25 3d 9a 23 43 25 0d  0b 7c 11 58 25 2b 3d 28  |X%=.#C%..|.X%+=(|
00001400  9a 23 43 25 29 3c 3c 38  0d 0b 86 12 21 69 6e 69  |.#C%)<<8....!ini|
00001410  74 69 61 6c 5f 70 63 3d  58 25 0d 0b 90 0b 58 25  |tial_pc=X%....X%|
00001420  3d 9a 23 43 25 0d 0b 9a  33 e7 20 58 25 3e 31 20  |=.#C%...3. X%>1 |
00001430  8c 20 85 20 31 2c 22 31  32 38 4b 20 63 6f 6e 66  |. . 1,"128K conf|
00001440  69 67 75 72 61 74 69 6f  6e 20 6e 6f 74 20 73 75  |iguration not su|
00001450  70 70 6f 72 74 65 64 22  0d 0b a4 32 e7 20 58 25  |pported"...2. X%|
00001460  3d 31 20 f1 20 22 57 61  72 6e 69 6e 67 20 2d 20  |=1 . "Warning - |
00001470  49 6e 74 65 72 66 61 63  65 20 49 20 6e 6f 74 20  |Interface I not |
00001480  73 75 70 70 6f 72 74 65  64 22 0d 0b ae 0b 58 25  |supported"....X%|
00001490  3d 9a 23 43 25 0d 0b b8  0b 58 25 3d 9a 23 43 25  |=.#C%....X%=.#C%|
000014a0  0d 0b c2 2e e7 20 58 25  3d 26 46 46 20 8c 20 85  |..... X%=&FF . .|
000014b0  20 31 2c 22 49 6e 74 65  72 66 61 63 65 20 49 20  | 1,"Interface I |
000014c0  6e 6f 74 20 73 75 70 70  6f 72 74 65 64 22 0d 0b  |not supported"..|
000014d0  cc 0b 58 25 3d 9a 23 43  25 0d 0b d6 0b 58 25 3d  |..X%=.#C%....X%=|
000014e0  9a 23 43 25 0d 0b e0 19  e3 20 59 25 3d 31 20 b8  |.#C%..... Y%=1 .|
000014f0  20 31 36 3a 58 25 3d 9a  23 43 25 3a ed 0d 0b ea  | 16:X%=.#C%:....|
00001500  1e f4 20 77 65 20 61 72  65 20 6e 6f 77 20 61 74  |.. we are now at|
00001510  20 74 68 65 20 6d 65 6d  6f 72 79 0d 0b f4 2a 58  | the memory...*X|
00001520  25 3d 9a 23 43 25 3a 58  25 3d 9a 23 43 25 3a 58  |%=.#C%:X%=.#C%:X|
00001530  25 3d 9a 23 43 25 20 3a  f4 20 73 6b 69 70 20 68  |%=.#C% :. skip h|
00001540  65 61 64 65 72 0d 0b fe  04 0d 0c 08 0c 41 25 3d  |eader........A%=|
00001550  26 38 30 30 30 0d 0c 12  05 f5 0d 0c 1c 0b 58 25  |&8000.........X%|
00001560  3d 9a 23 43 25 0d 0c 26  0e e7 20 58 25 3d 26 45  |=.#C%..&.. X%=&E|
00001570  44 20 8c 0d 0c 30 0b 58  25 3d 9a 23 43 25 0d 0c  |D ...0.X%=.#C%..|
00001580  3a 0e e7 20 58 25 3d 26  45 44 20 8c 0d 0c 44 0b  |:.. X%=&ED ...D.|
00001590  58 25 3d 9a 23 43 25 0d  0c 4e 0b 42 25 3d 9a 23  |X%=.#C%..N.B%=.#|
000015a0  43 25 0d 0c 58 0f e3 20  59 25 3d 31 20 b8 20 58  |C%..X.. Y%=1 . X|
000015b0  25 0d 0c 62 11 7a 38 30  6d 65 6d 25 3f 41 25 3d  |%..b.z80mem%?A%=|
000015c0  42 25 0d 0c 6c 09 41 25  2b 3d 31 0d 0c 76 05 ed  |B%..l.A%+=1..v..|
000015d0  0d 0c 80 05 cc 0d 0c 8a  12 7a 38 30 6d 65 6d 25  |.........z80mem%|
000015e0  3f 41 25 3d 26 45 44 0d  0c 94 09 41 25 2b 3d 31  |?A%=&ED....A%+=1|
000015f0  0d 0c 9e 11 7a 38 30 6d  65 6d 25 3f 41 25 3d 58  |....z80mem%?A%=X|
00001600  25 0d 0c a8 09 41 25 2b  3d 31 0d 0c b2 05 cd 0d  |%....A%+=1......|
00001610  0c bc 05 cc 0d 0c c6 11  7a 38 30 6d 65 6d 25 3f  |........z80mem%?|
00001620  41 25 3d 58 25 0d 0c d0  09 41 25 2b 3d 31 0d 0c  |A%=X%....A%+=1..|
00001630  da 05 cd 0d 0c e4 0e fd  20 41 25 3e 26 42 46 46  |........ A%>&BFF|
00001640  46 0d 0c ee 04 0d 0c f8  2a 58 25 3d 9a 23 43 25  |F.......*X%=.#C%|
00001650  3a 58 25 3d 9a 23 43 25  3a 58 25 3d 9a 23 43 25  |:X%=.#C%:X%=.#C%|
00001660  20 3a f4 20 73 6b 69 70  20 68 65 61 64 65 72 0d  | :. skip header.|
00001670  0d 02 04 0d 0d 0c 0c 41  25 3d 26 43 30 30 30 0d  |.......A%=&C000.|
00001680  0d 16 05 f5 0d 0d 20 0b  58 25 3d 9a 23 43 25 0d  |...... .X%=.#C%.|
00001690  0d 2a 0e e7 20 58 25 3d  26 45 44 20 8c 0d 0d 34  |.*.. X%=&ED ...4|
000016a0  0b 58 25 3d 9a 23 43 25  0d 0d 3e 0e e7 20 58 25  |.X%=.#C%..>.. X%|
000016b0  3d 26 45 44 20 8c 0d 0d  48 0b 58 25 3d 9a 23 43  |=&ED ...H.X%=.#C|
000016c0  25 0d 0d 52 0b 42 25 3d  9a 23 43 25 0d 0d 5c 0f  |%..R.B%=.#C%..\.|
000016d0  e3 20 59 25 3d 31 20 b8  20 58 25 0d 0d 66 11 7a  |. Y%=1 . X%..f.z|
000016e0  38 30 6d 65 6d 25 3f 41  25 3d 42 25 0d 0d 70 09  |80mem%?A%=B%..p.|
000016f0  41 25 2b 3d 31 0d 0d 7a  05 ed 0d 0d 84 05 cc 0d  |A%+=1..z........|
00001700  0d 8e 12 7a 38 30 6d 65  6d 25 3f 41 25 3d 26 45  |...z80mem%?A%=&E|
00001710  44 0d 0d 98 09 41 25 2b  3d 31 0d 0d a2 11 7a 38  |D....A%+=1....z8|
00001720  30 6d 65 6d 25 3f 41 25  3d 58 25 0d 0d ac 09 41  |0mem%?A%=X%....A|
00001730  25 2b 3d 31 0d 0d b6 05  cd 0d 0d c0 05 cc 0d 0d  |%+=1............|
00001740  ca 11 7a 38 30 6d 65 6d  25 3f 41 25 3d 58 25 0d  |..z80mem%?A%=X%.|
00001750  0d d4 09 41 25 2b 3d 31  0d 0d de 05 cd 0d 0d e8  |...A%+=1........|
00001760  0e fd 20 41 25 3e 26 46  46 46 46 0d 0d f2 04 0d  |.. A%>&FFFF.....|
00001770  0d fc 2a 58 25 3d 9a 23  43 25 3a 58 25 3d 9a 23  |..*X%=.#C%:X%=.#|
00001780  43 25 3a 58 25 3d 9a 23  43 25 20 3a f4 20 73 6b  |C%:X%=.#C% :. sk|
00001790  69 70 20 68 65 61 64 65  72 0d 0e 06 04 0d 0e 10  |ip header.......|
000017a0  0c 41 25 3d 26 34 30 30  30 0d 0e 1a 05 f5 0d 0e  |.A%=&4000.......|
000017b0  24 0b 58 25 3d 9a 23 43  25 0d 0e 2e 0e e7 20 58  |$.X%=.#C%..... X|
000017c0  25 3d 26 45 44 20 8c 0d  0e 38 0b 58 25 3d 9a 23  |%=&ED ...8.X%=.#|
000017d0  43 25 0d 0e 42 0e e7 20  58 25 3d 26 45 44 20 8c  |C%..B.. X%=&ED .|
000017e0  0d 0e 4c 0b 58 25 3d 9a  23 43 25 0d 0e 56 0b 42  |..L.X%=.#C%..V.B|
000017f0  25 3d 9a 23 43 25 0d 0e  60 0f e3 20 59 25 3d 31  |%=.#C%..`.. Y%=1|
00001800  20 b8 20 58 25 0d 0e 6a  11 7a 38 30 6d 65 6d 25  | . X%..j.z80mem%|
00001810  3f 41 25 3d 42 25 0d 0e  74 09 41 25 2b 3d 31 0d  |?A%=B%..t.A%+=1.|
00001820  0e 7e 05 ed 0d 0e 88 05  cc 0d 0e 92 12 7a 38 30  |.~...........z80|
00001830  6d 65 6d 25 3f 41 25 3d  26 45 44 0d 0e 9c 09 41  |mem%?A%=&ED....A|
00001840  25 2b 3d 31 0d 0e a6 11  7a 38 30 6d 65 6d 25 3f  |%+=1....z80mem%?|
00001850  41 25 3d 58 25 0d 0e b0  09 41 25 2b 3d 31 0d 0e  |A%=X%....A%+=1..|
00001860  ba 05 cd 0d 0e c4 05 cc  0d 0e ce 11 7a 38 30 6d  |............z80m|
00001870  65 6d 25 3f 41 25 3d 58  25 0d 0e d8 09 41 25 2b  |em%?A%=X%....A%+|
00001880  3d 31 0d 0e e2 05 cd 0d  0e ec 0e fd 20 41 25 3e  |=1.......... A%>|
00001890  26 37 46 46 46 0d 0e f6  04 0d 0f 00 05 cd 0d 0f  |&7FFF...........|
000018a0  0a 08 d9 23 43 25 0d 0f  14 05 e1 0d 0f 1e 04 0d  |...#C%..........|
000018b0  0f 28 04 0d 0f 32 0a dd  20 f2 61 73 6d 0d 0f 3c  |.(...2.. .asm..<|
000018c0  20 e3 20 58 25 3d 30 20  b8 20 32 35 35 3a 66 6f  | . X%=0 . 255:fo|
000018d0  6e 74 62 6c 6b 25 3f 58  25 3d 30 3a ed 0d 0f 46  |ntblk%?X%=0:...F|
000018e0  10 f2 73 65 74 75 70 73  70 72 69 74 65 0d 0f 50  |..setupsprite..P|
000018f0  20 ff 28 22 4c 4f 41 44  20 5a 38 30 3a 4d 43 6f  | .("LOAD Z80:MCo|
00001900  64 65 20 22 2b c3 7e 63  6f 64 65 25 29 0d 0f 5a  |de "+.~code%)..Z|
00001910  13 73 74 61 72 74 75 70  3d 63 6f 64 65 25 2b 38  |.startup=code%+8|
00001920  0d 0f 64 14 69 6e 69 74  69 61 6c 5f 70 63 3d 63  |..d.initial_pc=c|
00001930  6f 64 65 25 0d 0f 6e 19  69 6e 69 74 69 61 6c 5f  |ode%..n.initial_|
00001940  66 6c 61 67 73 3d 63 6f  64 65 25 2b 34 0d 0f 78  |flags=code%+4..x|
00001950  04 0d 0f 82 05 e1 0d 0f  8c 04 0d ff              |............|
0000195c

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 01 May 2025, 21:49 UTC
Website designed by .