CRTC Source Code Collection Volume 1 (UK) (Face B) (1997) [EDUCATIF].dsk
Size : 512 (Real : 512)
000000: 00 42 41 4E 4B 53 20 20 20 20 20 20 00 00 00 05 .BANKS ....
000010: 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 43 52 43 20 20 20 20 20 20 20 20 00 00 00 03 .CRC ....
000030: 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 44 49 56 49 44 45 20 20 20 20 20 00 00 00 04 .DIVIDE ....
000050: 04 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 48 45 58 49 4E 50 31 20 20 20 20 00 00 00 03 .HEXINP1 ....
000070: 05 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 48 45 58 49 4E 50 32 20 20 20 20 00 00 00 0C .HEXINP2 ....
000090: 06 07 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 49 4E 4C 49 4E 45 20 20 20 20 20 00 00 00 03 .INLINE ....
0000B0: 08 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 49 4E 50 55 54 46 20 20 20 20 20 00 00 00 05 .INPUTF ....
0000D0: 09 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 49 4E 56 45 52 54 20 20 20 20 20 00 00 00 03 .INVERT ....
0000F0: 0A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 4D 4B 24 50 41 52 41 4D 20 20 20 00 00 00 04 .MK$PARAM ....
000110: 0B 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 4D 4F 44 45 31 54 4F 32 20 20 20 00 00 00 03 .MODE1TO2 ....
000130: 0C 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 4D 55 4C 54 49 20 20 20 20 20 20 00 00 00 01 .MULTI ....
000150: 0D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 50 44 45 43 41 20 20 20 20 20 20 00 00 00 02 .PDECA ....
000170: 0E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 00 50 44 45 43 41 20 20 20 53 50 43 00 00 00 03 .PDECA SPC....
000190: 0F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 50 44 45 43 48 4C 20 20 20 20 20 00 00 00 03 .PDECHL ....
0001B0: 10 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 50 48 45 58 20 20 20 20 20 20 20 00 00 00 04 .PHEX ....
0001D0: 11 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 50 53 54 52 49 4E 47 20 20 20 20 00 00 00 01 .PSTRING ....
0001F0: 12 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
Size : 512 (Real : 512)
000000: 0A 09 70 6F 70 20 68 6C 3A 20 70 6F 70 20 62 63 ..pop hl: pop bc
000010: 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6C 64 68 6C 61 ...ret.....ldhla
000020: 69 09 63 61 6C 6C 20 6C 64 68 6C 61 0D 0A 09 69 i.call ldhla...i
000030: 6E 63 20 68 6C 3A 20 72 65 74 0D 0A 1A 20 26 38 nc hl: ret... &8
000040: 30 30 30 0D 0A 09 77 72 69 74 65 20 22 65 64 69 000...write "edi
000050: 74 2E 62 69 6E 22 0D 0A 09 6E 6F 6C 69 73 74 0D t.bin"...nolist.
000060: 0A 0D 0A 66 76 65 72 73 09 65 71 75 20 32 0D 0A ...fvers.equ 2..
000070: 0D 0A 09 3B 2A 2A 2A 20 52 4F 55 54 09 49 6E 69 ...;*** ROUT.Ini
000080: 64 20 61 2C 68 3A 20 61 6E 64 20 26 33 46 3A 20 d a,h: and &3F:
000090: 6F 72 20 26 34 30 3A 20 6C 64 20 68 2C 61 0D 0A or &40: ld h,a..
0000A0: 09 20 6C 64 20 61 2C 62 3A 20 6C 64 20 62 2C 26 . ld a,b: ld b,&
0000B0: 37 46 0D 0A 09 20 6F 75 74 20 28 63 29 2C 63 3A 7F... out (c),c:
0000C0: 20 6C 64 20 61 2C 28 68 6C 29 0D 0A 09 20 6C 64 ld a,(hl)... ld
0000D0: 20 63 2C 26 43 30 3A 20 6F 75 74 20 28 63 29 2C c,&C0: out (c),
0000E0: 63 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 6F 70 20 c...pop hl: pop
0000F0: 62 63 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6C 64 61 bc...ret.....lda
000100: 68 6C 69 09 63 61 6C 6C 20 6C 64 61 68 6C 0D 0A hli.call ldahl..
000110: 09 69 6E 63 20 68 6C 3A 20 72 65 74 0D 0A 0D 0A .inc hl: ret....
000120: 09 3B 2A 2A 2A 20 53 55 42 52 09 4C 44 20 28 48 .;*** SUBR.LD (H
000130: 4C 29 2C 41 20 2D 20 65 78 74 72 61 20 62 61 6E L),A - extra ban
000140: 6B 73 0D 0A 0D 0A 2E 6C 64 68 6C 61 09 70 75 73 ks.....ldhla.pus
000150: 68 20 62 63 3A 20 70 75 73 68 20 68 6C 0D 0A 09 h bc: push hl...
000160: 20 6C 64 20 62 2C 61 3A 20 6C 64 20 61 2C 68 3A ld b,a: ld a,h:
000170: 20 61 6E 64 20 26 43 30 0D 0A 09 20 72 6C 63 61 and &C0... rlca
000180: 3A 20 72 6C 63 61 3A 20 61 64 64 20 26 43 34 0D : rlca: add &C4.
000190: 0A 09 20 6C 64 20 63 2C 61 0D 0A 09 20 6C 64 20 .. ld c,a... ld
0001A0: 61 2C 68 3A 20 61 6E 64 20 26 33 46 3A 20 6F 72 a,h: and &3F: or
0001B0: 20 26 34 30 3A 20 6C 64 20 68 2C 61 0D 0A 09 20 &40: ld h,a...
0001C0: 6C 64 20 61 2C 62 3A 20 6C 64 20 62 2C 26 37 46 ld a,b: ld b,&7F
0001D0: 0D 0A 09 20 6F 75 74 20 28 63 29 2C 63 3A 20 6C ... out (c),c: l
0001E0: 64 20 28 68 6C 29 2C 61 0D 0A 09 20 6C 64 20 63 d (hl),a... ld c
0001F0: 2C 26 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D ,&C0: out (c),c.
Size : 512 (Real : 512)
000000: 00 53 50 45 43 43 4F 4E 56 20 20 20 00 00 00 06 .SPECCONV ....
000010: 13 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000020: 00 55 43 41 53 45 20 20 20 20 20 20 00 00 00 01 .UCASE ....
000030: 14 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000040: 00 57 49 4E 4C 4F 41 44 20 20 20 20 00 00 00 05 .WINLOAD ....
000050: 15 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 43 52 54 43 20 20 20 20 20 20 20 00 00 00 01 .CRTC ....
000070: 16 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 46 41 44 45 4C 32 48 20 20 20 20 00 00 00 03 .FADEL2H ....
000090: 17 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 46 41 44 45 53 43 52 20 20 20 20 00 00 00 02 .FADESCR ....
0000B0: 18 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 4B 45 59 53 43 41 4E 20 20 20 20 00 00 00 09 .KEYSCAN ....
0000D0: 19 1A 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 2D 52 45 41 44 20 20 20 4D 45 20 00 00 00 0C .-READ ME ....
0000F0: 1B 20 00 00 00 00 00 00 00 00 00 00 00 00 00 00 . ..............
000100: 00 4E 4C 49 4E 45 20 20 20 20 20 20 00 00 00 01 .NLINE ....
000110: 1C 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 50 53 47 20 20 20 20 20 20 20 20 00 00 00 03 .PSG ....
000130: 1D 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: 00 52 45 41 44 52 45 47 20 20 20 20 00 00 00 05 .READREG ....
000150: 1E 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000160: 00 53 50 43 53 43 41 4E 20 20 20 20 00 00 00 04 .SPCSCAN ....
000170: 1F 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000180: 01 45 44 49 54 20 20 20 20 53 52 43 00 00 00 47 .EDIT SRC...G
000190: 21 22 23 24 25 26 27 28 29 00 00 00 00 00 00 00 !"#$%&'().......
0001A0: 01 47 52 41 50 48 49 43 53 53 52 43 00 00 00 41 .GRAPHICSSRC...A
0001B0: 2A 2B 2C 2D 2E 2F 30 31 32 00 00 00 00 00 00 00 *+,-./012.......
0001C0: 01 50 52 4F 2D 45 58 54 20 53 52 43 00 00 00 7B .PRO-EXT SRC...{
0001D0: 33 34 35 36 37 38 39 3A 3B 3C 3D 3E 3F 40 41 42 3456789:;<=>?@AB
0001E0: 01 42 42 53 20 20 20 20 20 4D 4F 44 00 00 00 41 .BBS MOD...A
0001F0: 43 44 45 46 47 48 49 4A 4B 00 00 00 00 00 00 00 CDEFGHIJK.......
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 55 70 64 ...;*** SUBR.Upd
000010: 61 74 65 20 31 36 2D 62 69 74 20 43 52 43 20 69 ate 16-bit CRC i
000020: 6E 20 48 4C 0D 0A 09 3B 09 09 4F 6E 20 65 6E 74 n HL...;..On ent
000030: 72 79 2C 20 63 75 72 72 65 6E 74 20 62 79 74 65 ry, current byte
000040: 20 69 6E 20 45 0D 0A 0D 0A 2E 63 72 63 09 6C 64 in E.....crc.ld
000050: 20 62 2C 38 09 09 09 09 3B 73 68 69 66 74 20 38 b,8....;shift 8
000060: 20 74 69 6D 65 73 0D 0A 2E 75 70 64 6C 70 09 72 times...updlp.r
000070: 6C 63 20 65 09 09 09 09 3B 73 68 69 66 74 20 69 lc e....;shift i
000080: 6E 70 75 74 0D 0A 09 61 64 63 20 68 6C 2C 68 6C nput...adc hl,hl
000090: 09 09 09 3B 73 68 69 66 74 20 63 72 63 0D 0A 09 ...;shift crc...
0000A0: 6A 72 20 6E 63 2C 73 6B 69 70 69 74 09 09 09 3B jr nc,skipit...;
0000B0: 6A 75 6D 70 20 69 66 20 6E 6F 20 63 61 72 72 79 jump if no carry
0000C0: 0D 0A 09 6C 64 20 61 2C 68 3A 20 78 6F 72 20 26 ...ld a,h: xor &
0000D0: 31 30 3A 20 6C 64 20 68 2C 61 09 09 3B 78 6F 72 10: ld h,a..;xor
0000E0: 20 77 69 74 68 20 26 31 30 32 31 0D 0A 09 6C 64 with &1021...ld
0000F0: 20 61 2C 6C 3A 20 78 6F 72 20 26 32 31 3A 20 6C a,l: xor &21: l
000100: 64 20 6C 2C 61 0D 0A 2E 73 6B 69 70 69 74 09 64 d l,a...skipit.d
000110: 6A 6E 7A 20 75 70 64 6C 70 09 09 09 3B 64 6F 6E jnz updlp...;don
000120: 65 3F 0D 0A 09 72 65 74 0D 0A 1A 0A 2E 63 72 63 e?...ret.....crc
000130: 20 20 20 20 6C 64 20 62 2C 38 09 09 09 09 3B 73 ld b,8....;s
000140: 68 69 66 74 20 38 20 74 69 6D 65 73 0D 0A 2E 75 hift 8 times...u
000150: 70 64 6C 70 20 20 72 6C 63 20 65 09 09 09 09 3B pdlp rlc e....;
000160: 73 68 69 66 74 20 69 6E 70 75 74 0D 0A 09 61 64 shift input...ad
000170: 63 20 68 6C 2C 68 6C 09 09 09 3B 73 68 69 66 74 c hl,hl...;shift
000180: 3A 20 72 6C 63 61 3A 20 61 64 64 20 26 43 34 0D : rlca: add &C4.
000190: 0A 09 20 6C 64 20 63 2C 61 0D 0A 09 20 6C 64 20 .. ld c,a... ld
0001A0: 61 2C 68 3A 20 61 6E 64 20 26 33 46 3A 20 6F 72 a,h: and &3F: or
0001B0: 20 26 34 30 3A 20 6C 64 20 68 2C 61 0D 0A 09 20 &40: ld h,a...
0001C0: 6C 64 20 61 2C 62 3A 20 6C 64 20 62 2C 26 37 46 ld a,b: ld b,&7F
0001D0: 0D 0A 09 20 6F 75 74 20 28 63 29 2C 63 3A 20 6C ... out (c),c: l
0001E0: 64 20 28 68 6C 29 2C 61 0D 0A 09 20 6C 64 20 63 d (hl),a... ld c
0001F0: 2C 26 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D ,&C0: out (c),c.
Size : 512 (Real : 512)
000000: 01 43 4F 4D 4D 53 20 20 20 53 52 43 00 00 00 36 .COMMS SRC...6
000010: 4C 4D 4E 4F 50 51 52 00 00 00 00 00 00 00 00 00 LMNOPQR.........
000020: 01 43 4F 4E 54 52 4F 4C 20 4D 4F 44 00 00 00 20 .CONTROL MOD...
000030: 53 54 55 56 00 00 00 00 00 00 00 00 00 00 00 00 STUV............
000040: 01 46 49 4C 45 20 20 20 20 4D 4F 44 00 00 00 80 .FILE MOD....
000050: 57 58 59 5A 5B 5C 5D 5E 5F 60 61 62 63 64 65 66 WXYZ[\]^_`abcdef
000060: 01 46 49 4C 45 20 20 20 20 4D 4F 44 01 00 00 18 .FILE MOD....
000070: 67 68 69 00 00 00 00 00 00 00 00 00 00 00 00 00 ghi.............
000080: 01 4C 49 42 52 41 52 59 20 4D 4F 44 00 00 00 14 .LIBRARY MOD....
000090: 6A 6B 6C 00 00 00 00 00 00 00 00 00 00 00 00 00 jkl.............
0000A0: 01 53 49 4F 20 20 20 20 20 4D 4F 44 00 00 00 4F .SIO MOD...O
0000B0: 6D 6E 6F 70 71 72 73 74 75 76 00 00 00 00 00 00 mnopqrstuv......
0000C0: 01 53 55 42 52 4F 55 54 20 4D 4F 44 00 00 00 40 .SUBROUT MOD...@
0000D0: 77 78 79 7A 7B 7C 7D 7E 00 00 00 00 00 00 00 00 wxyz{|}~........
0000E0: 01 54 45 52 4D 49 4E 41 4C 4D 4F 44 00 00 00 80 .TERMINALMOD....
0000F0: 7F 80 81 82 83 84 85 86 87 88 89 8A 8B 8C 8D 8E ................
000100: 01 54 45 52 4D 49 4E 41 4C 4D 4F 44 01 00 00 0E .TERMINALMOD....
000110: 8F 90 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 44 69 76 ...;*** SUBR.Div
000010: 69 64 65 20 48 4C 20 62 79 20 42 43 0D 0A 09 3B ide HL by BC...;
000020: 09 09 72 65 74 75 72 6E 20 72 6F 75 6E 64 65 64 ..return rounded
000030: 20 72 65 73 75 6C 74 20 69 6E 20 44 45 0D 0A 0D result in DE...
000040: 0A 2E 64 69 76 69 64 65 09 6C 64 20 64 65 2C 30 ..divide.ld de,0
000050: 0D 0A 2E 64 69 76 5F 6C 70 09 6F 72 20 61 3A 20 ...div_lp.or a:
000060: 73 62 63 20 68 6C 2C 62 63 3A 20 6A 72 20 63 2C sbc hl,bc: jr c,
000070: 64 69 76 5F 61 64 09 09 3B 41 64 6A 75 73 74 6D div_ad..;Adjustm
000080: 65 6E 74 20 69 66 20 63 61 72 72 79 0D 0A 09 69 ent if carry...i
000090: 6E 63 20 64 65 3A 20 72 65 74 20 7A 09 09 09 09 nc de: ret z....
0000A0: 3B 52 65 74 75 72 6E 20 69 66 20 65 78 61 63 74 ;Return if exact
0000B0: 6C 79 20 72 69 67 68 74 0D 0A 09 6A 72 20 64 69 ly right...jr di
0000C0: 76 5F 6C 70 09 09 09 09 3B 45 6C 73 65 20 6C 6F v_lp....;Else lo
0000D0: 6F 70 0D 0A 0D 0A 2E 64 69 76 5F 61 64 09 61 64 op.....div_ad.ad
0000E0: 64 20 68 6C 2C 62 63 09 09 09 09 3B 52 65 73 74 d hl,bc....;Rest
0000F0: 6F 72 65 20 74 6F 20 70 72 65 76 69 6F 75 73 20 ore to previous
000100: 76 61 6C 75 65 0D 0A 09 6F 72 20 61 3A 20 72 72 value...or a: rr
000110: 20 62 3A 20 72 72 20 63 09 09 09 3B 48 61 6C 76 b: rr c...;Halv
000120: 65 20 42 43 0D 0A 09 6F 72 20 61 3A 20 73 62 63 e BC...or a: sbc
000130: 20 68 6C 2C 62 63 09 09 09 09 3B 41 6E 64 20 63 hl,bc....;And c
000140: 6F 6D 70 61 72 65 20 77 69 74 68 20 48 4C 0D 0A ompare with HL..
000150: 09 72 65 74 20 63 3A 20 69 6E 63 20 64 65 3A 20 .ret c: inc de:
000160: 72 65 74 09 09 09 3B 49 6E 63 72 65 61 73 65 20 ret...;Increase
000170: 44 45 20 69 66 20 48 4C 20 30 20 6F 72 20 6D 6F DE if HL 0 or mo
000180: 72 65 0D 0A 1A 49 44 45 20 20 24 24 24 FF 00 FF re...IDE $$$...
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 06 00 40 00 01 00 1A 29 2C 61 ........@....),a
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 4C 44 20 ...;*** SUBR.LD
000010: 41 2C 28 48 4C 29 20 2D 20 65 78 74 72 61 20 62 A,(HL) - extra b
000020: 61 6E 6B 73 0D 0A 0D 0A 2E 6C 64 61 68 6C 09 70 anks.....ldahl.p
000030: 75 73 68 20 62 63 3A 20 70 75 73 68 20 68 6C 0D ush bc: push hl.
000040: 0A 09 20 6C 64 20 62 2C 61 3A 20 6C 64 20 61 2C .. ld b,a: ld a,
000050: 68 3A 20 61 6E 64 20 26 43 30 0D 0A 09 20 72 6C h: and &C0... rl
000060: 63 61 3A 20 72 6C 63 61 3A 20 61 64 64 20 26 43 ca: rlca: add &C
000070: 34 0D 0A 09 20 6C 64 20 63 2C 61 0D 0A 09 20 6C 4... ld c,a... l
000080: 64 20 61 2C 68 3A 20 61 6E 64 20 26 33 46 3A 20 d a,h: and &3F:
000090: 6F 72 20 26 34 30 3A 20 6C 64 20 68 2C 61 0D 0A or &40: ld h,a..
0000A0: 09 20 6C 64 20 61 2C 62 3A 20 6C 64 20 62 2C 26 . ld a,b: ld b,&
0000B0: 37 46 0D 0A 09 20 6F 75 74 20 28 63 29 2C 63 3A 7F... out (c),c:
0000C0: 20 6C 64 20 61 2C 28 68 6C 29 0D 0A 09 20 6C 64 ld a,(hl)... ld
0000D0: 20 63 2C 26 43 30 3A 20 6F 75 74 20 28 63 29 2C c,&C0: out (c),
0000E0: 63 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 6F 70 20 c...pop hl: pop
0000F0: 62 63 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6C 64 61 bc...ret.....lda
000100: 68 6C 69 09 63 61 6C 6C 20 6C 64 61 68 6C 0D 0A hli.call ldahl..
000110: 09 69 6E 63 20 68 6C 3A 20 72 65 74 0D 0A 0D 0A .inc hl: ret....
000120: 09 3B 2A 2A 2A 20 53 55 42 52 09 4C 44 20 28 48 .;*** SUBR.LD (H
000130: 4C 29 2C 41 20 2D 20 65 78 74 72 61 20 62 61 6E L),A - extra ban
000140: 6B 73 0D 0A 0D 0A 2E 6C 64 68 6C 61 09 70 75 73 ks.....ldhla.pus
000150: 68 20 62 63 3A 20 70 75 73 68 20 68 6C 0D 0A 09 h bc: push hl...
000160: 20 6C 64 20 62 2C 61 3A 20 6C 64 20 61 2C 68 3A ld b,a: ld a,h:
000170: 20 61 6E 64 20 26 43 30 0D 0A 09 20 72 6C 63 61 and &C0... rlca
000180: 3A 20 72 6C 63 61 3A 20 61 64 64 20 26 43 34 0D : rlca: add &C4.
000190: 0A 09 20 6C 64 20 63 2C 61 0D 0A 09 20 6C 64 20 .. ld c,a... ld
0001A0: 61 2C 68 3A 20 61 6E 64 20 26 33 46 3A 20 6F 72 a,h: and &3F: or
0001B0: 20 26 34 30 3A 20 6C 64 20 68 2C 61 0D 0A 09 20 &40: ld h,a...
0001C0: 6C 64 20 61 2C 62 3A 20 6C 64 20 62 2C 26 37 46 ld a,b: ld b,&7F
0001D0: 0D 0A 09 20 6F 75 74 20 28 63 29 2C 63 3A 20 6C ... out (c),c: l
0001E0: 64 20 28 68 6C 29 2C 61 0D 0A 09 20 6C 64 20 63 d (hl),a... ld c
0001F0: 2C 26 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D ,&C0: out (c),c.
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 32 2D 62 ...;*** SUBR.2-b
000010: 79 74 65 20 68 65 78 20 69 6E 70 75 74 20 73 75 yte hex input su
000020: 62 72 6F 75 74 69 6E 65 0D 0A 0D 0A 2E 68 65 78 broutine.....hex
000030: 69 6E 70 09 6C 64 20 68 6C 2C 26 41 46 34 30 09 inp.ld hl,&AF40.
000040: 09 09 3B 69 6E 70 75 74 20 62 75 66 66 65 72 0D ..;input buffer.
000050: 0A 09 6C 64 20 62 2C 30 09 09 09 09 3B 63 68 61 ..ld b,0....;cha
000060: 72 61 63 74 65 72 73 20 74 79 70 65 64 20 69 6E racters typed in
000070: 0D 0A 09 63 61 6C 6C 20 26 42 42 38 31 09 09 09 ...call &BB81...
000080: 3B 63 75 72 73 6F 72 20 6F 6E 0D 0A 0D 0A 2E 77 ;cursor on.....w
000090: 61 69 74 63 68 09 63 61 6C 6C 20 26 42 42 30 36 aitch.call &BB06
0000A0: 09 09 09 3B 77 61 69 74 20 66 6F 72 20 63 68 61 ...;wait for cha
0000B0: 72 61 63 74 65 72 0D 0A 09 63 70 20 26 46 43 3A racter...cp &FC:
0000C0: 20 6A 70 20 7A 2C 26 42 42 38 34 09 09 3B 45 53 jp z,&BB84..;ES
0000D0: 43 41 50 45 3F 20 73 65 74 20 7A 65 72 6F 2C 20 CAPE? set zero,
0000E0: 69 6E 64 69 63 61 74 65 73 20 45 53 43 20 70 72 indicates ESC pr
0000F0: 65 73 73 65 64 0D 0A 09 63 70 20 31 33 3A 20 20 essed...cp 13:
000100: 6A 72 20 7A 2C 65 78 68 69 6E 70 09 09 3B 52 45 jr z,exhinp..;RE
000110: 54 55 52 4E 3F 0D 0A 09 63 70 20 26 37 46 3A 20 TURN?...cp &7F:
000120: 6A 72 20 6E 7A 2C 6E 6F 74 64 65 6C 09 09 3B 44 jr nz,notdel..;D
000130: 45 4C 3F 0D 0A 0D 0A 09 6C 64 20 61 2C 62 3A 20 EL?.....ld a,b:
000140: 6F 72 20 61 0D 0A 09 6A 72 20 7A 2C 77 61 69 74 or a...jr z,wait
000150: 63 68 09 09 09 3B 64 6F 6E 27 74 20 64 65 6C 65 ch...;don't dele
000160: 74 65 20 69 66 20 6E 6F 20 69 6E 70 75 74 20 79 te if no input y
000170: 65 74 21 0D 0A 0D 0A 09 64 65 63 20 68 6C 3A 20 et!.....dec hl:
000180: 64 65 63 20 62 09 09 09 3B 64 65 63 72 65 6D 65 dec b...;decreme
000190: 6E 74 20 63 68 61 72 20 63 6F 75 6E 74 20 61 6E nt char count an
0001A0: 64 20 6C 6F 63 61 74 69 6F 6E 0D 0A 09 6C 64 20 d location...ld
0001B0: 61 2C 38 3A 20 63 61 6C 6C 20 26 42 42 35 41 09 a,8: call &BB5A.
0001C0: 09 3B 62 61 63 6B 73 70 61 63 65 2E 2E 2E 0D 0A .;backspace.....
0001D0: 09 6C 64 20 61 2C 33 32 3A 20 63 61 6C 6C 20 26 .ld a,32: call &
0001E0: 42 42 35 41 09 09 3B 53 50 41 43 45 20 6F 76 65 BB5A..;SPACE ove
0001F0: 72 20 74 68 65 20 63 68 61 72 61 63 74 65 72 2E r the character.
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 2E 2E 0D 0A 09 6C 64 20 61 2C 38 3A 20 63 61 6C .....ld a,8: cal
000010: 6C 20 26 42 42 35 41 09 09 3B 61 6E 64 20 62 61 l &BB5A..;and ba
000020: 63 6B 73 70 61 63 65 20 61 67 61 69 6E 0D 0A 09 ckspace again...
000030: 6A 72 20 77 61 69 74 63 68 0D 0A 0D 0A 2E 6E 6F jr waitch.....no
000040: 74 64 65 6C 09 63 61 6C 6C 20 75 63 61 73 65 0D tdel.call ucase.
000050: 0A 09 63 70 20 22 46 22 2B 31 3A 20 6A 72 20 6E ..cp "F"+1: jr n
000060: 63 2C 77 61 69 74 63 68 09 09 3B 67 65 74 20 61 c,waitch..;get a
000070: 6E 6F 74 68 65 72 20 63 68 61 72 61 63 74 65 72 nother character
000080: 20 69 66 20 6F 76 65 72 20 22 46 22 0D 0A 09 63 if over "F"...c
000090: 70 20 22 30 22 3A 20 20 20 6A 72 20 63 2C 77 61 p "0": jr c,wa
0000A0: 69 74 63 68 09 09 3B 67 65 74 20 61 6E 6F 74 68 itch..;get anoth
0000B0: 65 72 20 63 68 61 72 61 63 74 65 72 20 69 66 20 er character if
0000C0: 62 65 6C 6F 77 20 22 30 22 0D 0A 09 63 70 20 22 below "0"...cp "
0000D0: 41 22 3A 20 20 20 6A 72 20 6E 63 2C 6F 6B 63 68 A": jr nc,okch
0000E0: 09 09 3B 6F 6B 20 69 66 20 22 41 22 20 6F 72 20 ..;ok if "A" or
0000F0: 61 62 6F 76 65 0D 0A 09 63 70 20 22 39 22 2B 31 above...cp "9"+1
000100: 3A 20 6A 72 20 6E 63 2C 77 61 69 74 63 68 09 09 : jr nc,waitch..
000110: 3B 67 65 74 20 61 6E 6F 74 68 65 72 20 63 68 61 ;get another cha
000120: 72 61 63 74 65 72 20 69 66 20 61 62 6F 76 65 20 racter if above
000130: 22 39 22 0D 0A 2E 6F 6B 63 68 09 6C 64 20 28 68 "9"...okch.ld (h
000140: 6C 29 2C 61 3A 20 69 6E 63 20 68 6C 3A 20 69 6E l),a: inc hl: in
000150: 63 20 62 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 c b...call &BB5A
000160: 0D 0A 09 62 69 74 20 32 2C 62 3A 20 6A 72 20 7A ...bit 2,b: jr z
000170: 2C 77 61 69 74 63 68 09 09 3B 34 20 63 68 61 72 ,waitch..;4 char
000180: 61 63 74 65 72 73 20 79 65 74 3F 0D 0A 0D 0A 2E acters yet?.....
000190: 65 78 68 69 6E 70 09 63 61 6C 6C 20 26 42 42 38 exhinp.call &BB8
0001A0: 34 09 09 09 3B 63 75 72 73 6F 72 20 6F 66 66 0D 4...;cursor off.
0001B0: 0A 09 6C 64 20 61 2C 62 3A 20 6F 72 20 61 3A 20 ..ld a,b: or a:
0001C0: 6A 72 20 7A 2C 6E 6F 68 69 6E 70 09 3B 6E 6F 74 jr z,nohinp.;not
0001D0: 68 69 6E 67 20 69 6E 70 75 74 21 0D 0A 09 6C 64 hing input!...ld
0001E0: 20 64 65 2C 30 0D 0A 09 6C 64 20 68 6C 2C 26 41 de,0...ld hl,&A
0001F0: 46 34 30 0D 0A 0D 0A 2E 68 63 6C 6F 6F 70 09 65 F40.....hcloop.e
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 78 20 64 65 2C 68 6C 0D 0A 09 20 61 64 64 20 68 x de,hl... add h
000010: 6C 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 0D l,hl: add hl,hl.
000020: 0A 09 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 .. add hl,hl: ad
000030: 64 20 68 6C 2C 68 6C 0D 0A 09 65 78 20 64 65 2C d hl,hl...ex de,
000040: 68 6C 0D 0A 09 6C 64 20 61 2C 28 68 6C 29 0D 0A hl...ld a,(hl)..
000050: 09 63 70 20 22 41 22 3A 20 6A 72 20 6E 63 2C 6C .cp "A": jr nc,l
000060: 65 74 74 65 72 0D 0A 09 73 75 62 20 34 38 3A 20 etter...sub 48:
000070: 6A 72 20 61 64 64 32 64 65 0D 0A 2E 6C 65 74 74 jr add2de...lett
000080: 65 72 09 73 75 62 20 35 35 0D 0A 2E 61 64 64 32 er.sub 55...add2
000090: 64 65 09 70 75 73 68 20 62 63 0D 0A 09 20 6C 64 de.push bc... ld
0000A0: 20 63 2C 61 3A 20 6C 64 20 62 2C 30 0D 0A 09 20 c,a: ld b,0...
0000B0: 65 78 20 68 6C 2C 64 65 3A 20 61 64 64 20 68 6C ex hl,de: add hl
0000C0: 2C 62 63 3A 20 65 78 20 68 6C 2C 64 65 0D 0A 09 ,bc: ex hl,de...
0000D0: 70 6F 70 20 62 63 0D 0A 09 69 6E 63 20 68 6C 3A pop bc...inc hl:
0000E0: 20 64 6A 6E 7A 20 68 63 6C 6F 6F 70 0D 0A 0D 0A djnz hcloop....
0000F0: 09 65 78 20 68 6C 2C 64 65 0D 0A 09 6C 64 20 61 .ex hl,de...ld a
000100: 2C 31 3A 20 6F 72 20 61 09 09 09 3B 7A 65 72 6F ,1: or a...;zero
000110: 20 30 20 63 61 72 72 79 20 30 2C 20 69 6E 64 69 0 carry 0, indi
000120: 63 61 74 65 73 20 6E 75 6D 62 65 72 20 69 6E 20 cates number in
000130: 48 4C 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6E 6F 68 HL...ret.....noh
000140: 69 6E 70 09 6C 64 20 61 2C 31 3A 20 6F 72 20 61 inp.ld a,1: or a
000150: 3A 20 73 63 66 09 09 3B 7A 65 72 6F 20 30 20 63 : scf..;zero 0 c
000160: 61 72 72 79 20 31 2C 20 69 6E 64 69 63 61 74 65 arry 1, indicate
000170: 73 20 6E 6F 20 69 6E 70 75 74 0D 0A 09 72 65 74 s no input...ret
000180: 0D 0A 1A 45 58 49 4E 50 32 20 24 24 24 FF 00 FF ...EXINP2 $$$...
000190: 32 2D 62 79 74 65 20 68 65 78 20 69 6E 70 75 74 2-byte hex input
0001A0: 20 73 75 62 72 6F 75 74 69 6E 65 0D 0A 0D 0A 2E subroutine.....
0001B0: 68 65 78 69 6E 70 20 6C 64 20 68 6C 2C 26 41 46 hexinp ld hl,&AF
0001C0: 34 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40
0001D0: 20 20 20 20 20 20 20 3B 69 6E 70 75 74 20 62 75 ;input bu
0001E0: 66 66 65 72 0D 0A 20 20 20 20 20 20 20 20 6C 64 ffer.. ld
0001F0: 20 62 2C 30 20 20 20 20 20 20 20 20 20 20 20 20 b,0
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 31 2D 62 ...;*** SUBR.1-b
000010: 79 74 65 20 68 65 78 20 69 6E 70 75 74 20 73 75 yte hex input su
000020: 62 72 6F 75 74 69 6E 65 0D 0A 0D 0A 2E 6F 6E 65 broutine.....one
000030: 68 65 78 09 63 61 6C 6C 20 67 65 74 69 70 31 3A hex.call getip1:
000040: 20 6A 72 20 6E 63 2C 6F 6E 65 68 65 78 0D 0A 09 jr nc,onehex...
000050: 72 6C 63 61 3A 20 72 6C 63 61 3A 20 72 6C 63 61 rlca: rlca: rlca
000060: 3A 20 72 6C 63 61 3A 20 6C 64 20 63 2C 61 0D 0A : rlca: ld c,a..
000070: 09 63 61 6C 6C 20 67 65 74 69 70 31 3A 20 6A 72 .call getip1: jr
000080: 20 63 2C 6E 64 65 6C 31 0D 0A 09 6C 64 20 61 2C c,ndel1...ld a,
000090: 38 3A 20 20 20 20 20 20 63 61 6C 6C 20 26 42 42 8: call &BB
0000A0: 35 41 0D 0A 09 6C 64 20 61 2C 31 36 3A 20 20 20 5A...ld a,16:
0000B0: 20 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 6A call &BB5A...j
0000C0: 72 20 6F 6E 65 68 65 78 0D 0A 2E 6E 64 65 6C 31 r onehex...ndel1
0000D0: 09 6F 72 20 63 3A 20 20 20 20 20 20 20 20 6A 70 .or c: jp
0000E0: 20 26 42 42 38 34 0D 0A 0D 0A 2E 67 65 74 69 70 &BB84.....getip
0000F0: 31 09 63 61 6C 6C 20 26 42 42 38 31 0D 0A 09 63 1.call &BB81...c
000100: 61 6C 6C 20 26 42 42 30 36 0D 0A 09 63 61 6C 6C all &BB06...call
000110: 20 75 63 61 73 65 3A 20 20 63 70 20 26 37 46 3A ucase: cp &7F:
000120: 20 72 65 74 20 7A 0D 0A 09 63 61 6C 6C 20 63 68 ret z...call ch
000130: 6B 68 65 78 3A 20 6A 72 20 6E 63 2C 67 65 74 69 khex: jr nc,geti
000140: 70 31 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 3A p1...call &BB5A:
000150: 20 20 6C 64 20 61 2C 65 0D 0A 09 72 65 74 0D 0A ld a,e...ret..
000160: 0D 0A 1A 61 3A 20 72 6C 63 61 3A 20 72 6C 63 61 ...a: rlca: rlca
000170: 3A 20 6C 64 20 63 2C 61 0D 0A 20 20 20 20 20 20 : ld c,a..
000180: 72 65 0D 0A 1A 49 44 45 20 20 24 24 24 FF 00 FF re...IDE $$$...
000190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0001F0: 00 00 00 00 00 00 06 00 40 00 01 00 1A 29 2C 61 ........@....),a
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 49 6E 2D ...;*** SUBR.In-
000010: 6C 69 6E 65 20 73 74 72 69 6E 67 20 70 72 69 6E line string prin
000020: 74 20 73 75 62 72 6F 75 74 69 6E 65 0D 0A 09 3B t subroutine...;
000030: 09 09 66 6F 6C 6C 6F 77 20 22 43 41 4C 4C 20 69 ..follow "CALL i
000040: 6E 6C 69 6E 65 22 20 77 69 74 68 20 22 53 54 52 nline" with "STR
000050: 20 6D 65 73 73 61 67 65 22 0D 0A 0D 0A 2E 69 6E message".....in
000060: 6C 69 6E 65 09 6C 64 20 28 68 6C 73 74 29 2C 68 line.ld (hlst),h
000070: 6C 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 75 73 68 l...pop hl: push
000080: 20 61 66 0D 0A 2E 67 69 6E 63 68 72 09 6C 64 20 af...ginchr.ld
000090: 61 2C 28 68 6C 29 0D 0A 09 62 69 74 20 37 2C 61 a,(hl)...bit 7,a
0000A0: 3A 20 72 65 73 20 37 2C 61 0D 0A 09 63 61 6C 6C : res 7,a...call
0000B0: 20 26 42 42 35 41 3A 20 69 6E 63 20 68 6C 0D 0A &BB5A: inc hl..
0000C0: 09 6A 72 20 7A 2C 67 69 6E 63 68 72 0D 0A 09 70 .jr z,ginchr...p
0000D0: 6F 70 20 61 66 3A 20 70 75 73 68 20 68 6C 0D 0A op af: push hl..
0000E0: 09 6C 64 20 68 6C 2C 28 68 6C 73 74 29 0D 0A 09 .ld hl,(hlst)...
0000F0: 72 65 74 0D 0A 0D 0A 2E 68 6C 73 74 09 64 77 20 ret.....hlst.dw
000100: 30 0D 0A 1A 4C 49 4E 45 20 20 24 24 24 FF 00 FF 0...LINE $$$...
000110: 72 69 6E 67 20 70 72 69 6E 74 20 73 75 62 72 6F ring print subro
000120: 75 74 69 6E 65 20 28 43 41 4C 4C 20 69 6E 6C 69 utine (CALL inli
000130: 6E 65 20 2D 20 53 54 52 20 6D 65 73 73 61 67 65 ne - STR message
000140: 29 0D 0A 0D 0A 2E 69 6E 6C 69 6E 65 09 6C 64 20 ).....inline.ld
000150: 28 68 6C 73 74 29 2C 68 6C 0D 0A 09 70 6F 70 20 (hlst),hl...pop
000160: 68 6C 3A 20 70 75 73 68 20 61 66 0D 0A 2E 67 69 hl: push af...gi
000170: 6E 63 68 72 09 6C 64 20 61 2C 28 68 6C 29 0D 0A nchr.ld a,(hl)..
000180: 0D 0A 1A 45 58 49 4E 50 32 20 24 24 24 FF 00 FF ...EXINP2 $$$...
000190: 32 2D 62 79 74 65 20 68 65 78 20 69 6E 70 75 74 2-byte hex input
0001A0: 20 73 75 62 72 6F 75 74 69 6E 65 0D 0A 0D 0A 2E subroutine.....
0001B0: 68 65 78 69 6E 70 20 6C 64 20 68 6C 2C 26 41 46 hexinp ld hl,&AF
0001C0: 34 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40
0001D0: 20 20 20 20 20 20 20 3B 69 6E 70 75 74 20 62 75 ;input bu
0001E0: 66 66 65 72 0D 0A 20 20 20 20 20 20 20 20 6C 64 ffer.. ld
0001F0: 20 62 2C 30 20 20 20 20 20 20 20 20 20 20 20 20 b,0
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 43 6F 6E ...;*** SUBR.Con
000010: 76 65 72 74 20 4D 4F 44 45 20 31 20 73 63 72 65 vert MODE 1 scre
000020: 65 6E 20 74 6F 20 4D 4F 44 45 20 32 0D 0A 0D 0A en to MODE 2....
000030: 2E 6D 31 74 6F 32 09 6C 64 20 68 6C 2C 26 43 30 .m1to2.ld hl,&C0
000040: 30 30 0D 0A 2E 6D 6C 6F 6F 70 09 6C 64 20 63 2C 00...mloop.ld c,
000050: 28 68 6C 29 3A 20 63 61 6C 6C 20 72 6F 75 74 6E (hl): call routn
000060: 65 0D 0A 09 6C 64 20 28 68 6C 29 2C 64 3A 20 69 e...ld (hl),d: i
000070: 6E 63 20 68 6C 0D 0A 09 6C 64 20 61 2C 68 3A 20 nc hl...ld a,h:
000080: 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 6D 6C 6F 6F or a: jr nz,mloo
000090: 70 3A 20 72 65 74 0D 0A 0D 0A 2E 72 6F 75 74 6E p: ret.....routn
0000A0: 65 09 6C 64 20 64 2C 30 3A 20 6C 64 20 62 2C 34 e.ld d,0: ld b,4
0000B0: 0D 0A 0D 0A 2E 6C 6F 6F 70 09 6C 64 20 61 2C 63 .....loop.ld a,c
0000C0: 0D 0A 09 61 6E 64 20 31 37 3A 20 72 72 63 20 63 ...and 17: rrc c
0000D0: 0D 0A 0D 0A 09 6F 72 20 61 3A 20 20 20 6A 72 20 .....or a: jr
0000E0: 7A 2C 61 73 65 74 0D 0A 09 63 70 20 31 36 3A 20 z,aset...cp 16:
0000F0: 20 6A 72 20 6E 7A 2C 6E 6F 74 31 36 0D 0A 09 6C jr nz,not16...l
000100: 64 20 61 2C 33 3A 20 6A 72 20 61 73 65 74 0D 0A d a,3: jr aset..
000110: 0D 0A 2E 6E 6F 74 31 36 09 63 70 20 31 3A 20 20 ...not16.cp 1:
000120: 20 6A 72 20 7A 2C 61 73 65 74 0D 0A 09 6C 64 20 jr z,aset...ld
000130: 61 2C 32 0D 0A 0D 0A 2E 61 73 65 74 09 6F 72 20 a,2.....aset.or
000140: 64 3A 20 72 72 63 61 3A 20 72 72 63 61 0D 0A 09 d: rrca: rrca...
000150: 6C 64 20 64 2C 61 3A 20 64 6A 6E 7A 20 6C 6F 6F ld d,a: djnz loo
000160: 70 0D 0A 09 72 65 74 0D 0A 1A 20 63 2C 28 68 6C p...ret... c,(hl
000170: 29 0D 0A 20 20 20 20 20 20 20 20 63 61 6C 6C 20 ).. call
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 48 69 67 ...;*** SUBR.Hig
000010: 68 6C 69 67 68 74 20 62 61 72 20 61 74 20 73 63 hlight bar at sc
000020: 72 65 65 6E 20 61 64 64 72 65 73 73 20 48 4C 2C reen address HL,
000030: 20 42 20 63 68 61 72 61 63 74 65 72 73 20 6C 6F B characters lo
000040: 6E 67 0D 0A 0D 0A 2E 69 6E 76 65 72 74 09 70 75 ng.....invert.pu
000050: 73 68 20 61 66 3A 20 72 6C 63 20 62 3A 20 6C 64 sh af: rlc b: ld
000060: 20 63 2C 62 0D 0A 2E 69 6E 76 5F 6F 6C 09 20 70 c,b...inv_ol. p
000070: 75 73 68 20 68 6C 3A 20 6C 64 20 62 2C 63 0D 0A ush hl: ld b,c..
000080: 2E 69 6E 76 5F 6C 70 09 20 20 6C 64 20 61 2C 28 .inv_lp. ld a,(
000090: 68 6C 29 3A 20 78 6F 72 20 32 35 35 0D 0A 09 20 hl): xor 255...
0000A0: 20 6C 64 20 28 68 6C 29 2C 61 3A 20 69 6E 63 20 ld (hl),a: inc
0000B0: 68 6C 3A 20 64 6A 6E 7A 20 69 6E 76 5F 6C 70 0D hl: djnz inv_lp.
0000C0: 0A 09 20 70 6F 70 20 68 6C 0D 0A 09 20 6C 64 20 .. pop hl... ld
0000D0: 61 2C 38 3A 20 61 64 64 20 68 0D 0A 09 20 6C 64 a,8: add h... ld
0000E0: 20 68 2C 61 3A 20 6A 72 20 6E 63 2C 69 6E 76 5F h,a: jr nc,inv_
0000F0: 6F 6C 0D 0A 09 70 6F 70 20 61 66 3A 20 72 65 74 ol...pop af: ret
000100: 0D 0A 0D 0A 1A 45 52 54 20 20 24 24 24 FF 00 FF .....ERT $$$...
000110: 69 67 68 74 20 62 61 72 20 61 74 20 48 4C 2C 20 ight bar at HL,
000120: 42 20 63 68 61 72 61 63 74 65 72 73 20 6C 6F 6E B characters lon
000130: 67 0D 0A 0D 0A 2E 69 6E 76 65 72 74 09 70 75 73 g.....invert.pus
000140: 68 20 61 66 3A 20 72 6C 63 20 62 3A 20 6C 64 20 h af: rlc b: ld
000150: 63 2C 62 0D 0A 2E 69 6E 76 5F 6F 6C 09 20 70 75 c,b...inv_ol. pu
000160: 73 68 20 68 6C 3A 20 6C 64 20 62 2C 63 0D 0A 2E sh hl: ld b,c...
000170: 69 6E 76 5F 6C 70 09 20 20 6C 64 20 61 2C 28 68 inv_lp. ld a,(h
000180: 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 20 61 2C all &BB5A: ld a,
000190: 33 32 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 32: call &BB5A..
0001A0: 09 20 6C 64 20 61 2C 38 3A 20 63 61 6C 6C 20 26 . ld a,8: call &
0001B0: 42 42 35 41 3A 20 6A 72 20 67 69 6E 6B 65 79 0D BB5A: jr ginkey.
0001C0: 0A 2E 65 69 6E 70 66 09 20 6C 64 20 28 68 6C 29 ..einpf. ld (hl)
0001D0: 2C 30 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 70 75 ,0...pop hl...pu
0001E0: 73 68 20 61 66 3A 20 63 61 6C 6C 20 26 42 42 38 sh af: call &BB8
0001F0: 34 3A 20 70 6F 70 20 61 66 0D 0A 09 63 70 20 26 4: pop af...cp &
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 4D 75 6C ...;*** SUBR.Mul
000010: 74 69 70 6C 79 20 48 4C 20 62 79 20 41 0D 0A 0D tiply HL by A...
000020: 0A 2E 6D 75 6C 74 69 09 6C 64 20 64 2C 68 3A 20 ..multi.ld d,h:
000030: 6C 64 20 65 2C 6C 3A 20 6C 64 20 68 6C 2C 30 0D ld e,l: ld hl,0.
000040: 0A 2E 6D 75 6C 74 69 6C 09 6F 72 20 61 3A 20 72 ..multil.or a: r
000050: 65 74 20 7A 0D 0A 09 61 64 64 20 68 6C 2C 64 65 et z...add hl,de
000060: 3A 20 64 65 63 20 61 3A 20 6A 72 20 6D 75 6C 74 : dec a: jr mult
000070: 69 6C 0D 0A 1A 65 20 22 23 54 52 41 43 4B 2E 42 il...e "#TRACK.B
000080: 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 6D 6C 6F 6F or a: jr nz,mloo
000090: 70 3A 20 72 65 74 0D 0A 0D 0A 2E 72 6F 75 74 6E p: ret.....routn
0000A0: 65 09 6C 64 20 64 2C 30 3A 20 6C 64 20 62 2C 34 e.ld d,0: ld b,4
0000B0: 0D 0A 0D 0A 2E 6C 6F 6F 70 09 6C 64 20 61 2C 63 .....loop.ld a,c
0000C0: 0D 0A 09 61 6E 64 20 31 37 3A 20 72 72 63 20 63 ...and 17: rrc c
0000D0: 0D 0A 0D 0A 09 6F 72 20 61 3A 20 20 20 6A 72 20 .....or a: jr
0000E0: 7A 2C 61 73 65 74 0D 0A 09 63 70 20 31 36 3A 20 z,aset...cp 16:
0000F0: 20 6A 72 20 6E 7A 2C 6E 6F 74 31 36 0D 0A 09 6C jr nz,not16...l
000100: 64 20 61 2C 33 3A 20 6A 72 20 61 73 65 74 0D 0A d a,3: jr aset..
000110: 0D 0A 2E 6E 6F 74 31 36 09 63 70 20 31 3A 20 20 ...not16.cp 1:
000120: 20 6A 72 20 7A 2C 61 73 65 74 0D 0A 09 6C 64 20 jr z,aset...ld
000130: 61 2C 32 0D 0A 0D 0A 2E 61 73 65 74 09 6F 72 20 a,2.....aset.or
000140: 64 3A 20 72 72 63 61 3A 20 72 72 63 61 0D 0A 09 d: rrca: rrca...
000150: 6C 64 20 64 2C 61 3A 20 64 6A 6E 7A 20 6C 6F 6F ld d,a: djnz loo
000160: 70 0D 0A 09 72 65 74 0D 0A 1A 20 63 2C 28 68 6C p...ret... c,(hl
000170: 29 0D 0A 20 20 20 20 20 20 20 20 63 61 6C 6C 20 ).. call
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 49 6E 70 ...;*** SUBR.Inp
000010: 75 74 20 66 69 6C 65 6E 61 6D 65 20 69 66 20 6E ut filename if n
000020: 6F 74 20 70 72 6F 76 69 64 65 64 20 74 6F 20 52 ot provided to R
000030: 53 58 0D 0A 0D 0A 2E 6E 6F 6E 61 6D 09 70 75 73 SX.....nonam.pus
000040: 68 20 68 6C 0D 0A 09 20 6C 64 20 69 78 2C 26 41 h hl... ld ix,&A
000050: 46 30 30 0D 0A 09 20 6C 64 20 28 69 78 2B 30 29 F00... ld (ix+0)
000060: 2C 26 30 32 3A 20 6C 64 20 28 69 78 2B 31 29 2C ,&02: ld (ix+1),
000070: 26 41 46 0D 0A 09 20 6C 64 20 28 69 78 2B 33 29 &AF... ld (ix+3)
000080: 2C 26 30 35 3A 20 6C 64 20 28 69 78 2B 34 29 2C ,&05: ld (ix+4),
000090: 26 41 46 09 3B 53 74 72 69 6E 67 20 64 65 73 63 &AF.;String desc
0000A0: 72 69 70 74 6F 72 20 62 6C 6F 63 6B 20 40 20 26 riptor block @ &
0000B0: 41 46 30 34 0D 0A 09 20 6C 64 20 68 6C 2C 66 74 AF04... ld hl,ft
0000C0: 65 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 ext: call string
0000D0: 0D 0A 09 20 6C 64 20 68 6C 2C 26 41 46 30 35 3A ... ld hl,&AF05:
0000E0: 20 63 61 6C 6C 20 69 6E 70 75 74 66 0D 0A 09 20 call inputf...
0000F0: 6C 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 26 42 ld a,10: call &B
000100: 42 35 41 0D 0A 09 20 6C 64 20 61 2C 31 33 3A 20 B5A... ld a,13:
000110: 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 70 6F 70 call &BB5A...pop
000120: 20 68 6C 0D 0A 09 6C 64 20 28 69 78 2B 32 29 2C hl...ld (ix+2),
000130: 62 0D 0A 09 6C 64 20 61 2C 30 3A 20 72 65 74 20 b...ld a,0: ret
000140: 7A 09 09 09 3B 4E 6F 20 70 61 72 61 6D 65 74 65 z...;No paramete
000150: 72 20 70 61 73 73 65 64 20 66 6F 72 20 45 53 43 r passed for ESC
000160: 2F 52 45 54 55 52 4E 0D 0A 09 6C 64 20 61 2C 62 /RETURN...ld a,b
000170: 3A 20 6F 72 20 61 3A 20 72 65 74 20 7A 09 09 3B : or a: ret z..;
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 49 6E 70 ...;*** SUBR.Inp
000010: 75 74 20 66 69 6C 65 6E 61 6D 65 20 74 6F 20 62 ut filename to b
000020: 75 66 66 65 72 20 61 74 20 48 4C 20 28 72 65 74 uffer at HL (ret
000030: 75 72 6E 73 20 6C 65 6E 67 74 68 20 69 6E 20 42 urns length in B
000040: 29 0D 0A 0D 0A 2E 69 6E 70 75 74 66 09 70 75 73 ).....inputf.pus
000050: 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 42 38 31 h hl: call &BB81
000060: 0D 0A 09 20 6C 64 20 62 2C 30 0D 0A 2E 67 69 6E ... ld b,0...gin
000070: 6B 65 79 09 20 63 61 6C 6C 20 26 42 42 31 38 0D key. call &BB18.
000080: 0A 09 20 63 70 20 26 46 43 3A 20 6A 72 20 7A 2C .. cp &FC: jr z,
000090: 65 69 6E 70 66 0D 0A 09 20 63 70 20 31 33 3A 20 einpf... cp 13:
0000A0: 6A 72 20 7A 2C 65 69 6E 70 66 0D 0A 09 20 63 70 jr z,einpf... cp
0000B0: 20 33 32 3A 20 6A 72 20 63 2C 67 69 6E 6B 65 79 32: jr c,ginkey
0000C0: 0D 0A 09 20 63 70 20 31 32 37 3A 20 6A 72 20 7A ... cp 127: jr z
0000D0: 2C 64 65 6C 65 74 65 3A 20 6A 72 20 6E 63 2C 67 ,delete: jr nc,g
0000E0: 69 6E 6B 65 79 0D 0A 09 20 62 69 74 20 34 2C 62 inkey... bit 4,b
0000F0: 3A 20 6A 72 20 6E 7A 2C 67 69 6E 6B 65 79 0D 0A : jr nz,ginkey..
000100: 09 20 63 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 . call &BB5A: ld
000110: 20 28 68 6C 29 2C 61 3A 20 69 6E 63 20 68 6C 0D (hl),a: inc hl.
000120: 0A 09 20 69 6E 63 20 62 3A 20 6A 72 20 67 69 6E .. inc b: jr gin
000130: 6B 65 79 0D 0A 2E 64 65 6C 65 74 65 09 20 6C 64 key...delete. ld
000140: 20 61 2C 62 3A 20 6F 72 20 61 3A 20 6A 72 20 7A a,b: or a: jr z
000150: 2C 67 69 6E 6B 65 79 0D 0A 09 20 64 65 63 20 62 ,ginkey... dec b
000160: 3A 20 64 65 63 20 68 6C 3A 20 6C 64 20 28 68 6C : dec hl: ld (hl
000170: 29 2C 30 0D 0A 09 20 6C 64 20 61 2C 38 3A 20 63 ),0... ld a,8: c
000180: 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 20 61 2C all &BB5A: ld a,
000190: 33 32 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 32: call &BB5A..
0001A0: 09 20 6C 64 20 61 2C 38 3A 20 63 61 6C 6C 20 26 . ld a,8: call &
0001B0: 42 42 35 41 3A 20 6A 72 20 67 69 6E 6B 65 79 0D BB5A: jr ginkey.
0001C0: 0A 2E 65 69 6E 70 66 09 20 6C 64 20 28 68 6C 29 ..einpf. ld (hl)
0001D0: 2C 30 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 70 75 ,0...pop hl...pu
0001E0: 73 68 20 61 66 3A 20 63 61 6C 6C 20 26 42 42 38 sh af: call &BB8
0001F0: 34 3A 20 70 6F 70 20 61 66 0D 0A 09 63 70 20 26 4: pop af...cp &
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 46 43 3A 20 72 65 74 0D 0A 1A 24 24 24 FF 00 FF FC: ret...$$$...
000010: 2C 38 3A 20 63 61 6C 6C 20 26 42 42 35 41 3A 20 ,8: call &BB5A:
000020: 6A 72 20 67 69 6E 6B 65 79 0D 0A 2E 65 69 6E 70 jr ginkey...einp
000030: 66 09 20 6C 64 20 28 68 6C 29 2C 30 0D 0A 09 70 f. ld (hl),0...p
000040: 6F 70 20 68 6C 0D 0A 09 70 75 73 68 20 61 66 3A op hl...push af:
000050: 20 63 61 6C 6C 20 26 42 42 38 34 3A 20 70 6F 70 call &BB84: pop
000060: 20 61 66 0D 0A 09 63 70 20 26 46 43 3A 20 72 65 af...cp &FC: re
000070: 74 0D 0A 1A 20 20 63 70 20 26 46 43 3A 20 6A 72 t... cp &FC: jr
000080: 0A 09 20 63 70 20 26 46 43 3A 20 6A 72 20 7A 2C .. cp &FC: jr z,
000090: 65 69 6E 70 66 0D 0A 09 20 63 70 20 31 33 3A 20 einpf... cp 13:
0000A0: 6A 72 20 7A 2C 65 69 6E 70 66 0D 0A 09 20 63 70 jr z,einpf... cp
0000B0: 20 33 32 3A 20 6A 72 20 63 2C 67 69 6E 6B 65 79 32: jr c,ginkey
0000C0: 0D 0A 09 20 63 70 20 31 32 37 3A 20 6A 72 20 7A ... cp 127: jr z
0000D0: 2C 64 65 6C 65 74 65 3A 20 6A 72 20 6E 63 2C 67 ,delete: jr nc,g
0000E0: 69 6E 6B 65 79 0D 0A 09 20 62 69 74 20 34 2C 62 inkey... bit 4,b
0000F0: 3A 20 6A 72 20 6E 7A 2C 67 69 6E 6B 65 79 0D 0A : jr nz,ginkey..
000100: 09 20 63 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 . call &BB5A: ld
000110: 20 28 68 6C 29 2C 61 3A 20 69 6E 63 20 68 6C 0D (hl),a: inc hl.
000120: 0A 09 20 69 6E 63 20 62 3A 20 6A 72 20 67 69 6E .. inc b: jr gin
000130: 6B 65 79 0D 0A 2E 64 65 6C 65 74 65 09 20 6C 64 key...delete. ld
000140: 20 61 2C 62 3A 20 6F 72 20 61 3A 20 6A 72 20 7A a,b: or a: jr z
000150: 2C 67 69 6E 6B 65 79 0D 0A 09 20 64 65 63 20 62 ,ginkey... dec b
000160: 3A 20 64 65 63 20 68 6C 3A 20 6C 64 20 28 68 6C : dec hl: ld (hl
000170: 29 2C 30 0D 0A 09 20 6C 64 20 61 2C 38 3A 20 63 ),0... ld a,8: c
000180: 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 20 61 2C all &BB5A: ld a,
000190: 33 32 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 32: call &BB5A..
0001A0: 09 20 6C 64 20 61 2C 38 3A 20 63 61 6C 6C 20 26 . ld a,8: call &
0001B0: 42 42 35 41 3A 20 6A 72 20 67 69 6E 6B 65 79 0D BB5A: jr ginkey.
0001C0: 0A 2E 65 69 6E 70 66 09 20 6C 64 20 28 68 6C 29 ..einpf. ld (hl)
0001D0: 2C 30 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 70 75 ,0...pop hl...pu
0001E0: 73 68 20 61 66 3A 20 63 61 6C 6C 20 26 42 42 38 sh af: call &BB8
0001F0: 34 3A 20 70 6F 70 20 61 66 0D 0A 09 63 70 20 26 4: pop af...cp &
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 50 72 69 ...;*** SUBR.Pri
000010: 6E 74 20 48 4C 20 61 73 20 28 75 70 20 74 6F 29 nt HL as (up to)
000020: 20 35 2D 64 69 67 69 74 20 64 65 63 69 6D 61 6C 5-digit decimal
000030: 0D 0A 0D 0A 2E 70 72 5F 68 6C 09 6C 64 20 63 2C .....pr_hl.ld c,
000040: 30 0D 0A 09 6C 64 20 64 65 2C 31 30 30 30 30 3A 0...ld de,10000:
000050: 20 63 61 6C 6C 20 70 72 68 6C 72 0D 0A 09 6C 64 call prhlr...ld
000060: 20 64 65 2C 31 30 30 30 3A 20 63 61 6C 6C 20 70 de,1000: call p
000070: 72 68 6C 72 0D 0A 09 6C 64 20 64 65 2C 31 30 30 rhlr...ld de,100
000080: 3A 20 63 61 6C 6C 20 70 72 68 6C 72 0D 0A 09 6C : call prhlr...l
000090: 64 20 64 65 2C 31 30 3A 20 63 61 6C 6C 20 70 72 d de,10: call pr
0000A0: 68 6C 72 0D 0A 09 6C 64 20 63 2C 31 3A 20 6C 64 hlr...ld c,1: ld
0000B0: 20 64 65 2C 31 0D 0A 2E 70 72 68 6C 72 09 78 6F de,1...prhlr.xo
0000C0: 72 20 61 0D 0A 2E 70 72 68 6C 6C 70 09 73 63 66 r a...prhllp.scf
0000D0: 3A 20 63 63 66 3A 20 73 62 63 20 68 6C 2C 64 65 : ccf: sbc hl,de
0000E0: 3A 20 6A 72 20 63 2C 70 72 68 6C 6F 0D 0A 09 69 : jr c,prhlo...i
0000F0: 6E 63 20 61 3A 20 6A 72 20 70 72 68 6C 6C 70 0D nc a: jr prhllp.
000100: 0A 2E 70 72 68 6C 6F 09 61 64 64 20 68 6C 2C 64 ..prhlo.add hl,d
000110: 65 3A 20 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 70 e: or a: jr nz,p
000120: 72 68 6C 79 3A 20 63 70 20 63 3A 20 72 65 74 20 rhly: cp c: ret
000130: 7A 0D 0A 2E 70 72 68 6C 79 09 6C 64 20 63 2C 31 z...prhly.ld c,1
000140: 3A 20 61 64 64 20 26 33 30 3A 20 63 61 6C 6C 20 : add &30: call
000150: 26 42 42 35 41 3A 20 72 65 74 0D 0A 1A 61 6C 6C &BB5A: ret...all
000160: 20 70 72 68 6C 72 0D 0A 20 20 20 20 20 20 20 20 prhlr..
000170: 6C 64 20 64 65 2C 31 30 30 30 3A 20 63 61 6C 6C ld de,1000: call
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 50 72 69 ...;*** SUBR.Pri
000010: 6E 74 20 41 20 61 73 20 33 2D 64 69 67 69 74 20 nt A as 3-digit
000020: 64 65 63 69 6D 61 6C 0D 0A 0D 0A 2E 70 72 5F 61 decimal.....pr_a
000030: 09 6C 64 20 64 2C 31 30 30 3A 20 63 61 6C 6C 20 .ld d,100: call
000040: 70 73 5F 63 68 72 0D 0A 09 6C 64 20 64 2C 31 30 ps_chr...ld d,10
000050: 3A 20 63 61 6C 6C 20 70 73 5F 63 68 72 0D 0A 09 : call ps_chr...
000060: 6C 64 20 64 2C 31 0D 0A 0D 0A 2E 70 73 5F 63 68 ld d,1.....ps_ch
000070: 72 09 6C 64 20 63 2C 30 0D 0A 2E 70 73 5F 6C 6F r.ld c,0...ps_lo
000080: 70 09 73 75 62 20 64 3A 20 6A 72 20 63 2C 70 73 p.sub d: jr c,ps
000090: 5F 66 69 6E 0D 0A 09 69 6E 63 20 63 3A 20 6A 72 _fin...inc c: jr
0000A0: 20 70 73 5F 6C 6F 70 0D 0A 0D 0A 2E 70 73 5F 66 ps_lop.....ps_f
0000B0: 69 6E 09 61 64 64 20 64 0D 0A 09 70 75 73 68 20 in.add d...push
0000C0: 61 66 0D 0A 09 20 6C 64 20 61 2C 63 3A 20 61 64 af... ld a,c: ad
0000D0: 64 20 34 38 3A 20 63 61 6C 6C 20 26 42 42 35 41 d 48: call &BB5A
0000E0: 0D 0A 09 70 6F 70 20 61 66 3A 20 72 65 74 0D 0A ...pop af: ret..
0000F0: 1A 2C 30 0D 0A 2E 70 73 5F 6C 6F 70 09 73 75 62 .,0...ps_lop.sub
000100: 64 20 61 2C 33 3A 20 6A 72 20 61 73 65 74 0D 0A d a,3: jr aset..
000110: 0D 0A 2E 6E 6F 74 31 36 09 63 70 20 31 3A 20 20 ...not16.cp 1:
000120: 20 6A 72 20 7A 2C 61 73 65 74 0D 0A 09 6C 64 20 jr z,aset...ld
000130: 61 2C 32 0D 0A 0D 0A 2E 61 73 65 74 09 6F 72 20 a,2.....aset.or
000140: 64 3A 20 72 72 63 61 3A 20 72 72 63 61 0D 0A 09 d: rrca: rrca...
000150: 6C 64 20 64 2C 61 3A 20 64 6A 6E 7A 20 6C 6F 6F ld d,a: djnz loo
000160: 70 0D 0A 09 72 65 74 0D 0A 1A 20 63 2C 28 68 6C p...ret... c,(hl
000170: 29 0D 0A 20 20 20 20 20 20 20 20 63 61 6C 6C 20 ).. call
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0A 20 20 20 20 20 20 20 20 3B 2A 2A 2A 20 32 2D . ;*** 2-
000010: 62 79 74 65 20 68 65 78 20 70 72 69 6E 74 20 5B byte hex print [
000020: 48 4C 5D 0D 0A 0D 0A 2E 74 62 74 68 65 78 20 6C HL].....tbthex l
000030: 64 20 61 2C 68 3A 20 63 61 6C 6C 20 68 65 78 70 d a,h: call hexp
000040: 72 74 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 61 rt.. ld a
000050: 2C 6C 3A 20 63 61 6C 6C 20 68 65 78 70 72 74 0D ,l: call hexprt.
000060: 0A 20 20 20 20 20 20 20 20 72 65 74 0D 0A 0D 0A . ret....
000070: 20 20 20 20 20 20 20 20 3B 2A 2A 2A 20 31 2D 62 ;*** 1-b
000080: 79 74 65 20 68 65 78 20 70 72 69 6E 74 20 5B 41 yte hex print [A
000090: 5D 0D 0A 0D 0A 2E 68 65 78 70 72 74 20 6C 64 20 ].....hexprt ld
0000A0: 62 2C 32 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 b,2.. ld
0000B0: 63 2C 61 0D 0A 20 20 20 20 20 20 20 20 72 72 61 c,a.. rra
0000C0: 3A 20 72 72 61 0D 0A 20 20 20 20 20 20 20 20 72 : rra.. r
0000D0: 72 61 3A 20 72 72 61 0D 0A 0D 0A 2E 68 65 78 6D ra: rra.....hexm
0000E0: 73 6B 20 61 6E 64 20 26 46 0D 0A 20 20 20 20 20 sk and &F..
0000F0: 20 20 20 63 70 20 31 30 3A 20 6A 72 20 6E 63 2C cp 10: jr nc,
000100: 68 65 78 67 72 74 0D 0A 20 20 20 20 20 20 20 20 hexgrt..
000110: 61 64 64 20 61 2C 34 38 3A 20 63 61 6C 6C 20 26 add a,48: call &
000120: 42 42 35 41 20 20 20 20 20 20 20 20 20 20 20 20 BB5A
000130: 3B 30 2D 39 0D 0A 20 20 20 20 20 20 20 20 6A 72 ;0-9.. jr
000140: 20 68 65 78 62 79 65 0D 0A 0D 0A 2E 68 65 78 67 hexbye.....hexg
000150: 72 74 20 61 64 64 20 61 2C 35 35 3A 20 63 61 6C rt add a,55: cal
000160: 6C 20 26 42 42 35 41 20 20 20 20 20 20 20 20 20 l &BB5A
000170: 20 20 20 3B 41 2D 46 0D 0A 0D 0A 2E 68 65 78 62 ;A-F.....hexb
000180: 79 65 20 6C 64 20 61 2C 63 0D 0A 20 20 20 20 20 ye ld a,c..
000190: 20 20 20 64 6A 6E 7A 20 68 65 78 6D 73 6B 0D 0A djnz hexmsk..
0001A0: 20 20 20 20 20 20 20 20 72 65 74 0D 0A 0D 1A 68 ret....h
0001B0: 20 30 2C 20 72 65 74 75 72 6E 0D 0A 20 20 20 20 0, return..
0001C0: 20 20 20 20 6C 64 20 61 2C 31 3A 20 72 65 74 20 ld a,1: ret
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 3B 72 65 74 75 72 6E 2C 20 6F 6E 65 ;return, one
0001F0: 20 70 61 72 61 6D 65 74 65 72 0D 0A 0D 1A 64 62 parameter....db
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 50 72 69 ...;*** SUBR.Pri
000010: 6E 74 20 41 20 61 73 20 73 70 61 63 65 64 20 33 nt A as spaced 3
000020: 2D 64 69 67 69 74 20 64 65 63 69 6D 61 6C 0D 0A -digit decimal..
000030: 0D 0A 2E 70 72 5F 61 09 6C 64 20 62 2C 30 0D 0A ...pr_a.ld b,0..
000040: 09 6C 64 20 64 2C 31 30 30 3A 20 63 61 6C 6C 20 .ld d,100: call
000050: 70 73 5F 63 68 72 0D 0A 09 6C 64 20 64 2C 31 30 ps_chr...ld d,10
000060: 3A 20 63 61 6C 6C 20 70 73 5F 63 68 72 0D 0A 09 : call ps_chr...
000070: 6C 64 20 62 2C 31 3A 20 6C 64 20 64 2C 31 0D 0A ld b,1: ld d,1..
000080: 0D 0A 2E 70 73 5F 63 68 72 09 6C 64 20 63 2C 30 ...ps_chr.ld c,0
000090: 0D 0A 2E 70 73 5F 6C 6F 70 09 73 75 62 20 64 3A ...ps_lop.sub d:
0000A0: 20 6A 72 20 63 2C 70 73 5F 66 69 6E 0D 0A 09 69 jr c,ps_fin...i
0000B0: 6E 63 20 63 3A 20 6A 72 20 70 73 5F 6C 6F 70 0D nc c: jr ps_lop.
0000C0: 0A 0D 0A 2E 70 73 5F 66 69 6E 09 61 64 64 20 61 ....ps_fin.add a
0000D0: 2C 64 0D 0A 09 70 75 73 68 20 61 66 3A 20 6C 64 ,d...push af: ld
0000E0: 20 61 2C 63 3A 20 6F 72 20 61 3A 20 6A 72 20 6E a,c: or a: jr n
0000F0: 7A 2C 70 73 5F 6E 73 70 0D 0A 09 20 62 69 74 20 z,ps_nsp... bit
000100: 30 2C 62 3A 20 6A 72 20 7A 2C 70 73 5F 73 70 63 0,b: jr z,ps_spc
000110: 0D 0A 2E 70 73 5F 6E 73 70 09 20 61 64 64 20 34 ...ps_nsp. add 4
000120: 38 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 8: call &BB5A...
000130: 20 6C 64 20 62 2C 31 0D 0A 09 70 6F 70 20 61 66 ld b,1...pop af
000140: 3A 20 72 65 74 0D 0A 2E 70 73 5F 73 70 63 09 20 : ret...ps_spc.
000150: 6C 64 20 61 2C 33 32 3A 20 63 61 6C 6C 20 26 42 ld a,32: call &B
000160: 42 35 41 0D 0A 09 70 6F 70 20 61 66 3A 20 72 65 B5A...pop af: re
000170: 74 0D 0A 1A 64 20 64 2C 31 0D 0A 0D 0A 2E 70 73 t...d d,1.....ps
000180: 49 66 20 66 69 6C 65 6E 61 6D 65 20 6C 65 6E 67 If filename leng
000190: 74 68 20 30 2C 20 72 65 74 75 72 6E 0D 0A 09 6C th 0, return...l
0001A0: 64 20 61 2C 31 3A 20 72 65 74 09 09 09 3B 52 65 d a,1: ret...;Re
0001B0: 74 75 72 6E 20 77 69 74 68 20 6F 6E 65 20 70 61 turn with one pa
0001C0: 72 61 6D 65 74 65 72 0D 0A 0D 0A 1A 78 2C 26 41 rameter.....x,&A
0001D0: 46 30 30 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 F00.. ld
0001E0: 28 69 78 2B 30 29 2C 26 30 32 3A 20 6C 64 20 28 (ix+0),&02: ld (
0001F0: 69 78 2B 31 29 2C 26 41 46 0D 0A 20 20 20 20 20 ix+1),&AF..
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 63 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 0D 0A 09 c: ex de,hl.....
000010: 64 65 63 20 61 0D 0A 09 6A 70 20 6E 7A 2C 6C 6E dec a...jp nz,ln
000020: 6C 6F 6F 70 0D 0A 0D 0A 09 6C 64 20 62 63 2C 35 loop.....ld bc,5
000030: 31 32 3A 20 61 64 64 20 68 6C 2C 62 63 3A 20 65 12: add hl,bc: e
000040: 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 62 63 2C x de,hl...ld bc,
000050: 31 32 38 3A 20 61 64 64 20 68 6C 2C 62 63 3A 20 128: add hl,bc:
000060: 65 78 20 64 65 2C 68 6C 0D 0A 0D 0A 09 6C 64 20 ex de,hl.....ld
000070: 61 2C 64 3A 20 6F 72 20 65 3A 20 6A 70 20 6E 7A a,d: or e: jp nz
000080: 2C 6F 6C 6C 6F 6F 70 0D 0A 09 72 65 74 0D 0A 1A ,olloop...ret...
000090: 72 74 20 53 70 65 63 74 72 75 6D 2D 73 69 7A 65 rt Spectrum-size
0000A0: 64 20 73 63 72 65 65 6E 20 66 72 6F 6D 20 26 34 d screen from &4
0000B0: 30 30 30 20 74 6F 20 26 43 30 30 30 20 28 4D 4F 000 to &C000 (MO
0000C0: 44 45 20 31 29 0D 0A 0D 0A 20 20 20 20 20 20 20 DE 1)....
0000D0: 20 6F 72 67 20 26 38 30 30 30 0D 0A 20 20 20 20 org &8000..
0000E0: 20 20 20 20 6E 6F 6C 69 73 74 0D 0A 0D 0A 20 20 nolist....
0000F0: 20 20 20 20 20 20 6C 64 20 68 6C 2C 26 43 30 30 ld hl,&C00
000100: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000110: 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 3A 6C :ldi:ldi...ldi:l
000120: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000130: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000140: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000150: 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 di:ldi:ldi...ldi
000160: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000170: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000180: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000190: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C :ldi:ldi:ldi...l
0001A0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001B0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001C0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001D0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A di:ldi:ldi:ldi..
0001E0: 0D 0A 09 6C 64 20 62 63 2C 31 36 0D 0A 09 65 78 ...ld bc,16...ex
0001F0: 20 64 65 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 62 de,hl: add hl,b
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 43 52 54 ...;*** SUBR.CRT
000010: 43 20 72 65 67 69 73 74 65 72 20 73 65 74 0D 0A C register set..
000020: 0D 0A 2E 63 72 74 63 09 6C 64 20 61 2C 62 0D 0A ...crtc.ld a,b..
000030: 09 6C 64 20 62 2C 26 42 43 3A 20 6F 75 74 20 28 .ld b,&BC: out (
000040: 63 29 2C 61 0D 0A 09 6C 64 20 62 2C 26 42 44 3A c),a...ld b,&BD:
000050: 20 6F 75 74 20 28 63 29 2C 63 0D 0A 09 72 65 74 out (c),c...ret
000060: 0D 0A 1A 20 20 6C 64 20 62 2C 26 42 44 3A 20 6F ... ld b,&BD: o
000070: 75 74 20 28 63 29 2C 63 0D 0A 20 20 20 20 20 20 ut (c),c..
000080: 6C 64 20 61 2C 32 3A 20 63 61 6C 6C 20 26 42 43 ld a,2: call &BC
000090: 30 45 0D 0A 09 6C 64 20 68 6C 2C 26 34 30 30 30 0E...ld hl,&4000
0000A0: 3A 20 63 61 6C 6C 20 26 42 43 38 33 3A 20 63 61 : call &BC83: ca
0000B0: 6C 6C 20 26 42 43 37 41 0D 0A 09 6C 64 20 68 6C ll &BC7A...ld hl
0000C0: 2C 26 33 46 46 42 2B 33 3A 20 6C 64 20 64 65 2C ,&3FFB+3: ld de,
0000D0: 28 68 65 69 67 68 74 29 0D 0A 09 61 64 64 20 68 (height)...add h
0000E0: 6C 2C 64 65 0D 0A 09 6C 64 20 65 2C 28 68 6C 29 l,de...ld e,(hl)
0000F0: 3A 20 6C 64 20 64 2C 30 3A 20 6C 64 20 62 63 2C : ld d,0: ld bc,
000100: 30 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 20 0...dec hl: dec
000110: 68 6C 3A 20 64 65 63 20 68 6C 3A 20 72 65 73 20 hl: dec hl: res
000120: 36 2C 68 0D 0A 2E 64 69 76 5F 6C 70 09 6F 72 20 6,h...div_lp.or
000130: 61 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 69 6E a: sbc hl,de: in
000140: 63 20 62 63 0D 0A 09 6A 72 20 6E 7A 2C 64 69 76 c bc...jr nz,div
000150: 5F 6C 70 0D 0A 09 6C 64 20 61 2C 65 0D 0A 0D 0A _lp...ld a,e....
000160: 09 6C 64 20 64 65 2C 26 43 30 30 30 3A 20 6C 64 .ld de,&C000: ld
000170: 20 68 6C 2C 26 34 30 30 30 0D 0A 2E 6D 77 6C 6F hl,&4000...mwlo
000180: 6F 70 09 70 75 73 68 20 61 66 0D 0A 09 20 70 75 op.push af... pu
000190: 73 68 20 20 62 63 3A 20 70 75 73 68 20 64 65 3A sh bc: push de:
0001A0: 20 6C 64 69 72 0D 0A 09 20 70 6F 70 20 20 20 64 ldir... pop d
0001B0: 65 3A 20 70 6F 70 20 20 62 63 0D 0A 09 20 65 78 e: pop bc... ex
0001C0: 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 6E 6C 69 de,hl: call nli
0001D0: 6E 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ne: ex de,hl...p
0001E0: 6F 70 20 61 66 0D 0A 09 64 65 63 20 61 3A 20 6A op af...dec a: j
0001F0: 72 20 6E 7A 2C 6D 77 6C 6F 6F 70 3A 20 72 65 74 r nz,mwloop: ret
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 43 6F 6E ...;*** SUBR.Con
000010: 76 65 72 74 20 41 20 74 6F 20 75 70 70 65 72 20 vert A to upper
000020: 63 61 73 65 0D 0A 0D 0A 2E 75 63 61 73 65 09 63 case.....ucase.c
000030: 70 20 22 61 22 3A 20 72 65 74 20 63 0D 0A 09 63 p "a": ret c...c
000040: 70 20 22 7B 22 3A 20 72 65 74 20 6E 63 0D 0A 09 p "{": ret nc...
000050: 73 75 62 20 33 32 3A 20 72 65 74 0D 0A 1A 20 20 sub 32: ret...
000060: 20 20 20 20 61 64 64 20 26 45 30 3A 20 72 65 74 add &E0: ret
000070: 0D 0A 0D 1A 74 61 69 6C 73 0D 0A 0D 0A 09 64 62 ....tails.....db
000080: 2C 6F 6C 6C 6F 6F 70 0D 0A 09 72 65 74 0D 0A 1A ,olloop...ret...
000090: 72 74 20 53 70 65 63 74 72 75 6D 2D 73 69 7A 65 rt Spectrum-size
0000A0: 64 20 73 63 72 65 65 6E 20 66 72 6F 6D 20 26 34 d screen from &4
0000B0: 30 30 30 20 74 6F 20 26 43 30 30 30 20 28 4D 4F 000 to &C000 (MO
0000C0: 44 45 20 31 29 0D 0A 0D 0A 20 20 20 20 20 20 20 DE 1)....
0000D0: 20 6F 72 67 20 26 38 30 30 30 0D 0A 20 20 20 20 org &8000..
0000E0: 20 20 20 20 6E 6F 6C 69 73 74 0D 0A 0D 0A 20 20 nolist....
0000F0: 20 20 20 20 20 20 6C 64 20 68 6C 2C 26 43 30 30 ld hl,&C00
000100: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000110: 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 3A 6C :ldi:ldi...ldi:l
000120: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000130: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000140: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000150: 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 di:ldi:ldi...ldi
000160: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000170: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000180: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000190: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C :ldi:ldi:ldi...l
0001A0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001B0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001C0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001D0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A di:ldi:ldi:ldi..
0001E0: 0D 0A 09 6C 64 20 62 63 2C 31 36 0D 0A 09 65 78 ...ld bc,16...ex
0001F0: 20 64 65 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 62 de,hl: add hl,b
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 50 72 69 ...;*** SUBR.Pri
000010: 6E 74 20 6E 75 6C 6C 2D 74 65 72 6D 69 6E 61 74 nt null-terminat
000020: 65 64 20 73 74 72 69 6E 67 20 66 72 6F 6D 20 48 ed string from H
000030: 4C 0D 0A 0D 0A 2E 73 74 72 69 6E 67 09 6C 64 20 L.....string.ld
000040: 61 2C 28 68 6C 29 20 3A 20 6F 72 20 61 3A 20 72 a,(hl) : or a: r
000050: 65 74 20 7A 0D 0A 09 63 61 6C 6C 20 26 42 42 35 et z...call &BB5
000060: 41 3A 20 69 6E 63 20 68 6C 3A 20 6A 72 20 73 74 A: inc hl: jr st
000070: 72 69 6E 67 0D 0A 0D 0A 1A 20 20 20 20 20 20 20 ring.....
000080: 79 74 65 20 68 65 78 20 70 72 69 6E 74 20 5B 41 yte hex print [A
000090: 5D 0D 0A 0D 0A 2E 68 65 78 70 72 74 20 6C 64 20 ].....hexprt ld
0000A0: 62 2C 32 0D 0A 20 20 20 20 20 20 20 20 6C 64 20 b,2.. ld
0000B0: 63 2C 61 0D 0A 20 20 20 20 20 20 20 20 72 72 61 c,a.. rra
0000C0: 3A 20 72 72 61 0D 0A 20 20 20 20 20 20 20 20 72 : rra.. r
0000D0: 72 61 3A 20 72 72 61 0D 0A 0D 0A 2E 68 65 78 6D ra: rra.....hexm
0000E0: 73 6B 20 61 6E 64 20 26 46 0D 0A 20 20 20 20 20 sk and &F..
0000F0: 20 20 20 63 70 20 31 30 3A 20 6A 72 20 6E 63 2C cp 10: jr nc,
000100: 68 65 78 67 72 74 0D 0A 20 20 20 20 20 20 20 20 hexgrt..
000110: 61 64 64 20 61 2C 34 38 3A 20 63 61 6C 6C 20 26 add a,48: call &
000120: 42 42 35 41 20 20 20 20 20 20 20 20 20 20 20 20 BB5A
000130: 3B 30 2D 39 0D 0A 20 20 20 20 20 20 20 20 6A 72 ;0-9.. jr
000140: 20 68 65 78 62 79 65 0D 0A 0D 0A 2E 68 65 78 67 hexbye.....hexg
000150: 72 74 20 61 64 64 20 61 2C 35 35 3A 20 63 61 6C rt add a,55: cal
000160: 6C 20 26 42 42 35 41 20 20 20 20 20 20 20 20 20 l &BB5A
000170: 20 20 20 3B 41 2D 46 0D 0A 0D 0A 2E 68 65 78 62 ;A-F.....hexb
000180: 79 65 20 6C 64 20 61 2C 63 0D 0A 20 20 20 20 20 ye ld a,c..
000190: 20 20 20 64 6A 6E 7A 20 68 65 78 6D 73 6B 0D 0A djnz hexmsk..
0001A0: 20 20 20 20 20 20 20 20 72 65 74 0D 0A 0D 1A 68 ret....h
0001B0: 20 30 2C 20 72 65 74 75 72 6E 0D 0A 20 20 20 20 0, return..
0001C0: 20 20 20 20 6C 64 20 61 2C 31 3A 20 72 65 74 20 ld a,1: ret
0001D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0001E0: 20 20 20 20 3B 72 65 74 75 72 6E 2C 20 6F 6E 65 ;return, one
0001F0: 20 70 61 72 61 6D 65 74 65 72 0D 0A 0D 1A 64 62 parameter....db
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 4C 6F 61 ...;*** SUBR.Loa
000010: 64 20 41 64 76 61 6E 63 65 64 20 41 72 74 20 53 d Advanced Art S
000020: 74 75 64 69 6F 20 28 75 6E 63 6F 6D 70 72 65 73 tudio (uncompres
000030: 73 65 64 29 20 77 69 6E 64 6F 77 0D 0A 09 3B 09 sed) window...;.
000040: 09 66 69 6C 65 20 6D 75 73 74 20 61 6C 72 65 61 .file must alrea
000050: 64 79 20 62 65 20 6F 70 65 6E 0D 0A 09 3B 09 09 dy be open...;..
000060: 75 73 65 73 20 26 34 30 30 30 20 61 73 20 62 75 uses &4000 as bu
000070: 66 66 65 72 0D 0A 0D 0A 2E 77 69 6E 6C 6F 64 09 ffer.....winlod.
000080: 6C 64 20 61 2C 32 3A 20 63 61 6C 6C 20 26 42 43 ld a,2: call &BC
000090: 30 45 0D 0A 09 6C 64 20 68 6C 2C 26 34 30 30 30 0E...ld hl,&4000
0000A0: 3A 20 63 61 6C 6C 20 26 42 43 38 33 3A 20 63 61 : call &BC83: ca
0000B0: 6C 6C 20 26 42 43 37 41 0D 0A 09 6C 64 20 68 6C ll &BC7A...ld hl
0000C0: 2C 26 33 46 46 42 2B 33 3A 20 6C 64 20 64 65 2C ,&3FFB+3: ld de,
0000D0: 28 68 65 69 67 68 74 29 0D 0A 09 61 64 64 20 68 (height)...add h
0000E0: 6C 2C 64 65 0D 0A 09 6C 64 20 65 2C 28 68 6C 29 l,de...ld e,(hl)
0000F0: 3A 20 6C 64 20 64 2C 30 3A 20 6C 64 20 62 63 2C : ld d,0: ld bc,
000100: 30 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 20 0...dec hl: dec
000110: 68 6C 3A 20 64 65 63 20 68 6C 3A 20 72 65 73 20 hl: dec hl: res
000120: 36 2C 68 0D 0A 2E 64 69 76 5F 6C 70 09 6F 72 20 6,h...div_lp.or
000130: 61 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 69 6E a: sbc hl,de: in
000140: 63 20 62 63 0D 0A 09 6A 72 20 6E 7A 2C 64 69 76 c bc...jr nz,div
000150: 5F 6C 70 0D 0A 09 6C 64 20 61 2C 65 0D 0A 0D 0A _lp...ld a,e....
000160: 09 6C 64 20 64 65 2C 26 43 30 30 30 3A 20 6C 64 .ld de,&C000: ld
000170: 20 68 6C 2C 26 34 30 30 30 0D 0A 2E 6D 77 6C 6F hl,&4000...mwlo
000180: 6F 70 09 70 75 73 68 20 61 66 0D 0A 09 20 70 75 op.push af... pu
000190: 73 68 20 20 62 63 3A 20 70 75 73 68 20 64 65 3A sh bc: push de:
0001A0: 20 6C 64 69 72 0D 0A 09 20 70 6F 70 20 20 20 64 ldir... pop d
0001B0: 65 3A 20 70 6F 70 20 20 62 63 0D 0A 09 20 65 78 e: pop bc... ex
0001C0: 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 6E 6C 69 de,hl: call nli
0001D0: 6E 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ne: ex de,hl...p
0001E0: 6F 70 20 61 66 0D 0A 09 64 65 63 20 61 3A 20 6A op af...dec a: j
0001F0: 72 20 6E 7A 2C 6D 77 6C 6F 6F 70 3A 20 72 65 74 r nz,mwloop: ret
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 43 6F 6E ...;*** SUBR.Con
000010: 76 65 72 74 20 53 70 65 63 74 72 75 6D 2D 73 69 vert Spectrum-si
000020: 7A 65 64 20 73 63 72 65 65 6E 0D 0A 09 3B 09 09 zed screen...;..
000030: 66 72 6F 6D 20 26 34 30 30 30 20 74 6F 20 26 43 from &4000 to &C
000040: 30 30 30 20 28 4D 4F 44 45 20 31 29 0D 0A 0D 0A 000 (MODE 1)....
000050: 09 6C 64 20 68 6C 2C 26 43 30 30 30 0D 0A 09 6C .ld hl,&C000...l
000060: 64 20 64 65 2C 26 34 30 30 30 0D 0A 09 6C 64 20 d de,&4000...ld
000070: 62 63 2C 26 34 30 30 30 0D 0A 09 70 75 73 68 20 bc,&4000...push
000080: 64 65 3A 20 70 75 73 68 20 68 6C 0D 0A 09 20 6C de: push hl... l
000090: 64 69 72 0D 0A 09 20 6C 64 20 61 2C 31 3A 20 63 dir... ld a,1: c
0000A0: 61 6C 6C 20 26 42 43 30 45 0D 0A 09 70 6F 70 20 all &BC0E...pop
0000B0: 64 65 3A 20 70 6F 70 20 68 6C 0D 0A 0D 0A 2E 6F de: pop hl.....o
0000C0: 6C 6C 6F 6F 70 09 6C 64 20 61 2C 32 34 0D 0A 0D lloop.ld a,24...
0000D0: 0A 2E 6C 6E 6C 6F 6F 70 09 6C 64 69 3A 6C 64 69 ..lnloop.ldi:ldi
0000E0: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
0000F0: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000100: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000110: 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 3A 6C :ldi:ldi...ldi:l
000120: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000130: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000140: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
000150: 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C 64 69 di:ldi:ldi...ldi
000160: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000170: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000180: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 :ldi:ldi:ldi:ldi
000190: 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A 09 6C :ldi:ldi:ldi...l
0001A0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001B0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001C0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C di:ldi:ldi:ldi:l
0001D0: 64 69 3A 6C 64 69 3A 6C 64 69 3A 6C 64 69 0D 0A di:ldi:ldi:ldi..
0001E0: 0D 0A 09 6C 64 20 62 63 2C 31 36 0D 0A 09 65 78 ...ld bc,16...ex
0001F0: 20 64 65 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 62 de,hl: add hl,b
Size : 512 (Real : 512)
000000: 0D 0A 1A 49 4E 4C 4F 41 44 20 24 24 24 FF 00 FF ...INLOAD $$$...
000010: 20 41 64 76 61 6E 63 65 64 20 41 72 74 20 53 74 Advanced Art St
000020: 75 64 69 6F 20 77 69 6E 64 6F 77 0D 0A 20 20 20 udio window..
000030: 20 20 20 20 20 3B 66 69 6C 65 20 6D 75 73 74 20 ;file must
000040: 61 6C 72 65 61 64 79 20 62 65 20 6F 70 65 6E 0D already be open.
000050: 0A 20 20 20 20 20 20 20 20 3B 6C 6F 61 64 73 20 . ;loads
000060: 66 69 6C 65 20 61 74 20 26 34 30 30 30 0D 0A 0D file at &4000...
000070: 0A 2E 77 69 6E 6C 6F 64 20 6C 64 20 61 2C 32 3A ..winlod ld a,2:
000080: 6C 64 20 61 2C 32 3A 20 63 61 6C 6C 20 26 42 43 ld a,2: call &BC
000090: 30 45 0D 0A 09 6C 64 20 68 6C 2C 26 34 30 30 30 0E...ld hl,&4000
0000A0: 3A 20 63 61 6C 6C 20 26 42 43 38 33 3A 20 63 61 : call &BC83: ca
0000B0: 6C 6C 20 26 42 43 37 41 0D 0A 09 6C 64 20 68 6C ll &BC7A...ld hl
0000C0: 2C 26 33 46 46 42 2B 33 3A 20 6C 64 20 64 65 2C ,&3FFB+3: ld de,
0000D0: 28 68 65 69 67 68 74 29 0D 0A 09 61 64 64 20 68 (height)...add h
0000E0: 6C 2C 64 65 0D 0A 09 6C 64 20 65 2C 28 68 6C 29 l,de...ld e,(hl)
0000F0: 3A 20 6C 64 20 64 2C 30 3A 20 6C 64 20 62 63 2C : ld d,0: ld bc,
000100: 30 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 20 0...dec hl: dec
000110: 68 6C 3A 20 64 65 63 20 68 6C 3A 20 72 65 73 20 hl: dec hl: res
000120: 36 2C 68 0D 0A 2E 64 69 76 5F 6C 70 09 6F 72 20 6,h...div_lp.or
000130: 61 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 69 6E a: sbc hl,de: in
000140: 63 20 62 63 0D 0A 09 6A 72 20 6E 7A 2C 64 69 76 c bc...jr nz,div
000150: 5F 6C 70 0D 0A 09 6C 64 20 61 2C 65 0D 0A 0D 0A _lp...ld a,e....
000160: 09 6C 64 20 64 65 2C 26 43 30 30 30 3A 20 6C 64 .ld de,&C000: ld
000170: 20 68 6C 2C 26 34 30 30 30 0D 0A 2E 6D 77 6C 6F hl,&4000...mwlo
000180: 6F 70 09 70 75 73 68 20 61 66 0D 0A 09 20 70 75 op.push af... pu
000190: 73 68 20 20 62 63 3A 20 70 75 73 68 20 64 65 3A sh bc: push de:
0001A0: 20 6C 64 69 72 0D 0A 09 20 70 6F 70 20 20 20 64 ldir... pop d
0001B0: 65 3A 20 70 6F 70 20 20 62 63 0D 0A 09 20 65 78 e: pop bc... ex
0001C0: 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 6E 6C 69 de,hl: call nli
0001D0: 6E 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ne: ex de,hl...p
0001E0: 6F 70 20 61 66 0D 0A 09 64 65 63 20 61 3A 20 6A op af...dec a: j
0001F0: 72 20 6E 7A 2C 6D 77 6C 6F 6F 70 3A 20 72 65 74 r nz,mwloop: ret
Size : 512 (Real : 512)
000000: 65 74 20 36 2C 63 09 09 3B 42 43 31 20 73 65 74 et 6,c..;BC1 set
000010: 20 28 72 65 61 64 20 72 65 67 69 73 74 65 72 29 (read register)
000020: 0D 0A 0D 0A 2E 6B 6C 6F 6F 70 09 20 6C 64 20 62 .....kloop. ld b
000030: 2C 26 46 36 20 20 3A 20 6F 75 74 20 28 63 29 2C ,&F6 : out (c),
000040: 63 09 3B 53 65 6E 64 20 22 72 65 61 64 20 72 65 c.;Send "read re
000050: 67 69 73 74 65 72 20 63 6F 6E 74 65 6E 74 73 22 gister contents"
000060: 20 73 69 67 6E 61 6C 20 74 6F 20 70 6F 72 74 20 signal to port
000070: 43 0D 0A 09 20 6C 64 20 62 2C 26 46 34 20 20 3A C... ld b,&F4 :
000080: 20 69 6E 20 61 2C 28 63 29 09 3B 47 65 74 20 74 in a,(c).;Get t
000090: 68 65 20 63 6F 6E 74 65 6E 74 73 20 6F 66 66 20 he contents off
0000A0: 70 6F 72 74 20 41 0D 0A 09 20 6C 64 20 28 68 6C port A... ld (hl
0000B0: 29 2C 61 09 09 3B 50 75 74 20 69 6E 20 62 75 66 ),a..;Put in buf
0000C0: 66 65 72 0D 0A 09 20 69 6E 63 20 68 6C 20 20 20 fer... inc hl
0000D0: 20 3A 20 69 6E 63 20 63 09 3B 47 6F 20 74 6F 20 : inc c.;Go to
0000E0: 6E 65 78 74 20 6B 65 79 20 62 6C 6F 63 6B 0D 0A next key block..
0000F0: 09 20 6C 64 20 61 2C 63 20 20 20 20 3A 20 61 6E . ld a,c : an
000100: 64 20 31 35 0D 0A 09 20 63 70 20 31 30 20 20 20 d 15... cp 10
000110: 20 20 3A 20 6A 72 20 6E 7A 2C 6B 6C 6F 6F 70 3B : jr nz,kloop;
000120: 4C 61 73 74 20 6B 65 79 20 62 6C 6F 63 6B 20 62 Last key block b
000130: 65 65 6E 20 72 65 61 63 68 65 64 20 79 65 74 3F een reached yet?
000140: 0D 0A 09 70 6F 70 20 62 63 09 09 09 3B 47 65 74 ...pop bc...;Get
000150: 20 6F 6C 64 20 73 74 61 74 75 73 20 6F 66 20 70 old status of p
000160: 6F 72 74 20 43 0D 0A 09 6C 64 20 61 2C 26 38 32 ort C...ld a,&82
000170: 20 20 20 3A 20 6F 75 74 20 28 63 29 2C 61 09 3B : out (c),a.;
000180: 52 65 73 74 6F 72 65 20 63 6F 6E 74 72 6F 6C 20 Restore control
000190: 70 6F 72 74 0D 0A 09 64 65 63 20 62 20 20 20 20 port...dec b
0001A0: 20 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 3B 52 : out (c),c.;R
0001B0: 65 73 74 6F 72 65 20 70 6F 72 74 20 43 0D 0A 0D estore port C...
0001C0: 0A 09 6C 64 20 61 2C 28 6B 65 79 62 75 66 2B 35 ..ld a,(keybuf+5
0001D0: 29 09 09 3B 47 65 74 20 6B 65 79 20 64 61 74 61 )..;Get key data
0001E0: 20 66 72 6F 6D 20 62 6C 6F 63 6B 20 35 20 6F 66 from block 5 of
0001F0: 20 6B 65 79 62 6F 61 72 64 20 62 75 66 66 65 72 keyboard buffer
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 63 70 20 26 37 46 09 09 09 3B 53 65 74 ...cp &7F...;Set
000010: 20 7A 65 72 6F 20 69 66 20 73 70 61 63 65 20 6B zero if space k
000020: 65 79 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6B 65 79 ey...ret.....key
000030: 62 75 66 09 64 73 20 31 30 0D 0A 1A 6B 65 79 73 buf.ds 10...keys
000040: 63 20 20 6C 64 20 68 6C 2C 6B 65 79 62 75 66 66 c ld hl,keybuff
000050: 20 20 20 20 20 20 20 20 20 20 20 3B 61 64 64 72 ;addr
000060: 65 73 73 20 6F 66 20 62 75 66 66 65 72 20 66 6F ess of buffer fo
000070: 72 20 6B 65 79 62 6F 61 72 64 20 62 6C 6F 63 6B r keyboard block
000080: 20 69 6E 20 61 2C 28 63 29 09 3B 47 65 74 20 74 in a,(c).;Get t
000090: 68 65 20 63 6F 6E 74 65 6E 74 73 20 6F 66 66 20 he contents off
0000A0: 70 6F 72 74 20 41 0D 0A 09 20 6C 64 20 28 68 6C port A... ld (hl
0000B0: 29 2C 61 09 09 3B 50 75 74 20 69 6E 20 62 75 66 ),a..;Put in buf
0000C0: 66 65 72 0D 0A 09 20 69 6E 63 20 68 6C 20 20 20 fer... inc hl
0000D0: 20 3A 20 69 6E 63 20 63 09 3B 47 6F 20 74 6F 20 : inc c.;Go to
0000E0: 6E 65 78 74 20 6B 65 79 20 62 6C 6F 63 6B 0D 0A next key block..
0000F0: 09 20 6C 64 20 61 2C 63 20 20 20 20 3A 20 61 6E . ld a,c : an
000100: 64 20 31 35 0D 0A 09 20 63 70 20 31 30 20 20 20 d 15... cp 10
000110: 20 20 3A 20 6A 72 20 6E 7A 2C 6B 6C 6F 6F 70 3B : jr nz,kloop;
000120: 4C 61 73 74 20 6B 65 79 20 62 6C 6F 63 6B 20 62 Last key block b
000130: 65 65 6E 20 72 65 61 63 68 65 64 20 79 65 74 3F een reached yet?
000140: 0D 0A 09 70 6F 70 20 62 63 09 09 09 3B 47 65 74 ...pop bc...;Get
000150: 20 6F 6C 64 20 73 74 61 74 75 73 20 6F 66 20 70 old status of p
000160: 6F 72 74 20 43 0D 0A 09 6C 64 20 61 2C 26 38 32 ort C...ld a,&82
000170: 20 20 20 3A 20 6F 75 74 20 28 63 29 2C 61 09 3B : out (c),a.;
000180: 52 65 73 74 6F 72 65 20 63 6F 6E 74 72 6F 6C 20 Restore control
000190: 70 6F 72 74 0D 0A 09 64 65 63 20 62 20 20 20 20 port...dec b
0001A0: 20 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 3B 52 : out (c),c.;R
0001B0: 65 73 74 6F 72 65 20 70 6F 72 74 20 43 0D 0A 0D estore port C...
0001C0: 0A 09 6C 64 20 61 2C 28 6B 65 79 62 75 66 2B 35 ..ld a,(keybuf+5
0001D0: 29 09 09 3B 47 65 74 20 6B 65 79 20 64 61 74 61 )..;Get key data
0001E0: 20 66 72 6F 6D 20 62 6C 6F 63 6B 20 35 20 6F 66 from block 5 of
0001F0: 20 6B 65 79 62 6F 61 72 64 20 62 75 66 66 65 72 keyboard buffer
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 46 61 64 ...;*** SUBR.Fad
000010: 65 20 73 63 72 65 65 6E 0D 0A 0D 0A 2E 66 61 64 e screen.....fad
000020: 65 09 6C 64 20 68 6C 2C 26 43 30 30 30 0D 0A 2E e.ld hl,&C000...
000030: 66 61 64 65 6F 6C 09 6C 64 20 62 63 2C 32 33 34 fadeol.ld bc,234
000040: 30 3A 20 6C 64 20 64 65 2C 37 0D 0A 09 70 75 73 0: ld de,7...pus
000050: 68 20 68 6C 0D 0A 2E 66 61 64 65 6C 70 09 20 6C h hl...fadelp. l
000060: 64 20 28 68 6C 29 2C 30 3A 20 61 64 64 20 68 6C d (hl),0: add hl
000070: 2C 64 65 0D 0A 09 20 64 65 63 20 62 63 3A 20 6C ,de... dec bc: l
000080: 64 20 61 2C 62 3A 20 6F 72 20 63 0D 0A 09 20 6A d a,b: or c... j
000090: 72 20 6E 7A 2C 66 61 64 65 6C 70 0D 0A 09 70 6F r nz,fadelp...po
0000A0: 70 20 68 6C 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C p hl...inc hl: l
0000B0: 64 20 61 2C 6C 0D 0A 09 63 70 20 37 3A 20 6A 72 d a,l...cp 7: jr
0000C0: 20 6E 7A 2C 66 61 64 65 6F 6C 0D 0A 09 72 65 74 nz,fadeol...ret
0000D0: 0D 0A 1A 20 20 70 75 73 68 20 68 6C 0D 0A 2E 66 ... push hl...f
0000E0: 61 64 65 6C 70 20 20 6C 64 20 28 68 6C 29 2C 30 adelp ld (hl),0
0000F0: 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 20 20 20 : add hl,de..
000100: 0D 0A 09 72 65 74 0D 0A 1A 20 24 24 24 FF 00 FF ...ret... $$$...
000110: 20 6C 6F 77 20 73 63 72 65 65 6E 20 74 6F 20 68 low screen to h
000120: 69 67 68 20 73 63 72 65 65 6E 0D 0A 0D 0A 2E 66 igh screen.....f
000130: 64 65 6C 32 68 20 6C 64 20 68 6C 2C 26 43 30 30 del2h ld hl,&C00
000140: 30 0D 0A 2E 66 64 65 32 6F 6C 20 6C 64 20 62 63 0...fde2ol ld bc
000150: 2C 32 33 34 30 3A 20 6C 64 20 64 65 2C 37 0D 0A ,2340: ld de,7..
000160: 20 20 20 20 20 20 20 20 70 75 73 68 20 68 6C 0D push hl.
000170: 0A 2E 66 64 65 32 6C 70 20 20 72 65 73 20 37 2C ..fde2lp res 7,
000180: 6F 70 09 70 75 73 68 20 61 66 0D 0A 09 20 70 75 op.push af... pu
000190: 73 68 20 20 62 63 3A 20 70 75 73 68 20 64 65 3A sh bc: push de:
0001A0: 20 6C 64 69 72 0D 0A 09 20 70 6F 70 20 20 20 64 ldir... pop d
0001B0: 65 3A 20 70 6F 70 20 20 62 63 0D 0A 09 20 65 78 e: pop bc... ex
0001C0: 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 6E 6C 69 de,hl: call nli
0001D0: 6E 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ne: ex de,hl...p
0001E0: 6F 70 20 61 66 0D 0A 09 64 65 63 20 61 3A 20 6A op af...dec a: j
0001F0: 72 20 6E 7A 2C 6D 77 6C 6F 6F 70 3A 20 72 65 74 r nz,mwloop: ret
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 48 61 72 ...;*** SUBR.Har
000010: 64 77 61 72 65 20 6B 65 79 73 63 61 6E 0D 0A 0D dware keyscan...
000020: 0A 2E 6B 65 79 73 63 09 6C 64 20 68 6C 2C 6B 65 ..keysc.ld hl,ke
000030: 79 62 75 66 09 09 3B 41 64 64 72 65 73 73 20 6F ybuf..;Address o
000040: 66 20 62 75 66 66 65 72 20 66 6F 72 20 6B 65 79 f buffer for key
000050: 62 6F 61 72 64 20 62 6C 6F 63 6B 20 64 61 74 61 board block data
000060: 0D 0A 09 6C 64 20 62 63 2C 26 46 34 30 45 3A 20 ...ld bc,&F40E:
000070: 6F 75 74 20 28 63 29 2C 63 09 3B 50 75 74 20 31 out (c),c.;Put 1
000080: 34 20 6F 6E 20 50 50 49 20 70 6F 72 74 20 41 0D 4 on PPI port A.
000090: 0A 09 6C 64 20 62 2C 26 46 36 20 20 20 3A 20 69 ..ld b,&F6 : i
0000A0: 6E 20 20 61 2C 28 63 29 09 3B 47 65 74 20 63 75 n a,(c).;Get cu
0000B0: 72 72 65 6E 74 20 73 74 61 74 75 73 20 6F 66 20 rrent status of
0000C0: 70 6F 72 74 20 43 0D 0A 09 61 6E 64 20 26 33 30 port C...and &30
0000D0: 09 09 09 3B 50 72 65 73 65 72 76 65 20 73 74 61 ...;Preserve sta
0000E0: 74 75 73 20 6F 66 20 63 61 73 73 65 74 74 65 0D tus of cassette.
0000F0: 0A 09 6C 64 20 63 2C 61 09 09 09 3B 20 7C 20 61 ..ld c,a...; | a
000100: 6E 64 20 70 6C 61 63 65 20 76 61 6C 75 65 20 69 nd place value i
000110: 6E 20 43 20 72 65 67 69 73 74 65 72 0D 0A 09 6F n C register...o
000120: 72 20 26 43 30 20 20 20 20 20 3A 20 6F 75 74 20 r &C0 : out
000130: 28 63 29 2C 61 09 3B 57 72 69 74 65 20 72 65 67 (c),a.;Write reg
000140: 69 73 74 65 72 0D 0A 09 09 20 20 20 20 20 6F 75 ister.... ou
000150: 74 20 28 63 29 2C 63 09 3B 20 7C 20 61 6E 64 20 t (c),c.; | and
000160: 71 75 69 63 6B 6C 79 20 72 65 73 74 6F 72 65 20 quickly restore
000170: 6F 6C 64 20 73 74 61 74 75 73 20 28 4E 42 20 31 old status (NB 1
000180: 30 6E 73 29 0D 0A 09 69 6E 63 20 62 0D 0A 09 6C 0ns)...inc b...l
000190: 64 20 61 2C 26 39 32 20 20 20 3A 20 6F 75 74 20 d a,&92 : out
0001A0: 28 63 29 2C 61 09 3B 43 6F 6E 74 72 6F 6C 20 77 (c),a.;Control w
0001B0: 6F 72 64 20 2D 20 70 6F 72 74 20 41 20 69 6E 70 ord - port A inp
0001C0: 75 74 2C 20 70 6F 72 74 20 42 20 69 6E 70 75 74 ut, port B input
0001D0: 0D 0A 09 70 75 73 68 20 62 63 09 09 09 3B 50 72 ...push bc...;Pr
0001E0: 65 73 65 72 76 65 20 6F 6C 64 20 73 74 61 74 75 eserve old statu
0001F0: 73 20 6F 66 20 70 6F 72 74 20 43 0D 0A 09 20 73 s of port C... s
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 46 61 64 ...;*** SUBR.Fad
000010: 65 20 6C 6F 77 20 73 63 72 65 65 6E 20 74 6F 20 e low screen to
000020: 68 69 67 68 20 73 63 72 65 65 6E 0D 0A 0D 0A 2E high screen.....
000030: 66 64 65 6C 32 68 09 6C 64 20 68 6C 2C 26 43 30 fdel2h.ld hl,&C0
000040: 30 30 0D 0A 2E 66 64 65 32 6F 6C 09 6C 64 20 62 00...fde2ol.ld b
000050: 63 2C 32 33 34 30 3A 20 6C 64 20 64 65 2C 37 0D c,2340: ld de,7.
000060: 0A 09 70 75 73 68 20 68 6C 0D 0A 2E 66 64 65 32 ..push hl...fde2
000070: 6C 70 09 20 72 65 73 20 37 2C 68 3A 20 6C 64 20 lp. res 7,h: ld
000080: 61 2C 28 68 6C 29 0D 0A 09 20 73 65 74 20 37 2C a,(hl)... set 7,
000090: 68 3A 20 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 20 h: ld (hl),a...
0000A0: 61 64 64 20 68 6C 2C 64 65 3A 20 64 65 63 20 62 add hl,de: dec b
0000B0: 63 0D 0A 09 20 6C 64 20 61 2C 62 3A 20 6F 72 20 c... ld a,b: or
0000C0: 63 0D 0A 09 20 6A 72 20 6E 7A 2C 66 64 65 32 6C c... jr nz,fde2l
0000D0: 70 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 69 6E 63 p...pop hl...inc
0000E0: 20 68 6C 3A 20 6C 64 20 61 2C 6C 0D 0A 09 63 70 hl: ld a,l...cp
0000F0: 20 37 3A 20 6A 72 20 6E 7A 2C 66 64 65 32 6F 6C 7: jr nz,fde2ol
000100: 0D 0A 09 72 65 74 0D 0A 1A 20 24 24 24 FF 00 FF ...ret... $$$...
000110: 20 6C 6F 77 20 73 63 72 65 65 6E 20 74 6F 20 68 low screen to h
000120: 69 67 68 20 73 63 72 65 65 6E 0D 0A 0D 0A 2E 66 igh screen.....f
000130: 64 65 6C 32 68 20 6C 64 20 68 6C 2C 26 43 30 30 del2h ld hl,&C00
000140: 30 0D 0A 2E 66 64 65 32 6F 6C 20 6C 64 20 62 63 0...fde2ol ld bc
000150: 2C 32 33 34 30 3A 20 6C 64 20 64 65 2C 37 0D 0A ,2340: ld de,7..
000160: 20 20 20 20 20 20 20 20 70 75 73 68 20 68 6C 0D push hl.
000170: 0A 2E 66 64 65 32 6C 70 20 20 72 65 73 20 37 2C ..fde2lp res 7,
000180: 6F 70 09 70 75 73 68 20 61 66 0D 0A 09 20 70 75 op.push af... pu
000190: 73 68 20 20 62 63 3A 20 70 75 73 68 20 64 65 3A sh bc: push de:
0001A0: 20 6C 64 69 72 0D 0A 09 20 70 6F 70 20 20 20 64 ldir... pop d
0001B0: 65 3A 20 70 6F 70 20 20 62 63 0D 0A 09 20 65 78 e: pop bc... ex
0001C0: 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 6E 6C 69 de,hl: call nli
0001D0: 6E 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ne: ex de,hl...p
0001E0: 6F 70 20 61 66 0D 0A 09 64 65 63 20 61 3A 20 6A op af...dec a: j
0001F0: 72 20 6E 7A 2C 6D 77 6C 6F 6F 70 3A 20 72 65 74 r nz,mwloop: ret
Size : 512 (Real : 512)
000000: 53 75 62 72 6F 75 74 69 6E 65 73 0D 0A 7E 7E 7E Subroutines..~~~
000010: 7E 7E 7E 7E 7E 7E 7E 7E 0D 0A 54 68 69 73 20 73 ~~~~~~~~..This s
000020: 69 64 65 20 63 6F 6E 74 61 69 6E 73 20 61 20 73 ide contains a s
000030: 65 6C 65 63 74 69 6F 6E 20 6F 66 20 73 75 62 72 election of subr
000040: 6F 75 74 69 6E 65 73 20 49 20 66 72 65 71 75 65 outines I freque
000050: 6E 74 6C 79 20 63 61 6C 6C 20 75 70 6F 6E 20 0D ntly call upon .
000060: 8A 66 6F 72 20 6D 61 63 68 69 6E 65 20 63 6F 64 .for machine cod
000070: 65 20 70 72 6F 67 72 61 6D 73 2E 20 4D 61 6E 79 e programs. Many
000080: 20 6F 66 20 74 68 65 6D 20 61 72 65 20 66 61 72 of them are far
000090: 20 66 72 6F 6D 20 74 68 65 20 71 75 69 63 6B 65 from the quicke
0000A0: 73 74 20 0D 8A 72 6F 75 74 69 6E 65 73 20 70 6F st ..routines po
0000B0: 73 73 69 62 6C 65 20 66 6F 72 20 73 75 63 68 20 ssible for such
0000C0: 74 61 73 6B 73 3A 20 74 68 65 20 64 69 76 69 73 tasks: the divis
0000D0: 69 6F 6E 20 61 6E 64 20 6D 75 6C 74 69 70 6C 69 ion and multipli
0000E0: 63 61 74 69 6F 6E 20 0D 8A 73 75 62 72 6F 75 74 cation ..subrout
0000F0: 69 6E 65 73 20 61 72 65 20 70 61 72 74 69 63 75 ines are particu
000100: 6C 61 72 6C 79 20 68 65 61 76 79 2D 68 61 6E 64 larly heavy-hand
000110: 65 64 2C 20 66 6F 72 20 65 78 61 6D 70 6C 65 2C ed, for example,
000120: 20 77 68 69 6C 65 20 65 76 65 6E 20 74 68 65 20 while even the
000130: 0D 8A 6E 65 78 74 20 73 63 72 65 65 6E 20 6C 69 ..next screen li
000140: 6E 65 20 72 6F 75 74 69 6E 65 20 69 73 20 71 75 ne routine is qu
000150: 69 74 65 20 73 6C 6F 77 2E 0D 0A 0D 0A 48 6F 77 ite slow.....How
000160: 65 76 65 72 2C 20 74 68 65 79 20 66 6F 72 6D 20 ever, they form
000170: 61 20 74 69 6D 65 2D 73 61 76 69 6E 67 20 70 72 a time-saving pr
000180: 6F 67 72 61 6D 6D 69 6E 67 20 72 65 73 6F 75 72 ogramming resour
000190: 63 65 2C 20 61 6E 64 20 49 20 68 6F 70 65 20 79 ce, and I hope y
0001A0: 6F 75 20 0D 8A 77 69 6C 6C 20 66 69 6E 64 20 74 ou ..will find t
0001B0: 68 65 6D 20 61 73 20 75 73 65 66 75 6C 20 61 73 hem as useful as
0001C0: 20 49 20 68 61 76 65 2E 20 59 6F 75 20 61 72 65 I have. You are
0001D0: 20 77 65 6C 63 6F 6D 65 20 74 6F 20 75 73 65 20 welcome to use
0001E0: 74 68 65 6D 20 69 6E 20 0D 8A 79 6F 75 72 20 6F them in ..your o
0001F0: 77 6E 20 70 72 6F 67 72 61 6D 73 3A 20 61 6E 20 wn programs: an
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 61 63 6B 6E 6F 77 6C 65 64 67 65 6D 65 6E 74 20 acknowledgement
000010: 74 68 61 74 20 6D 79 20 63 6F 64 65 20 68 61 73 that my code has
000020: 20 62 65 65 6E 20 75 73 65 64 20 77 6F 75 6C 64 been used would
000030: 20 0D 8A 62 65 20 77 65 6C 63 6F 6D 65 2E 0D 0A ..be welcome...
000040: 0D 0A 52 69 63 68 61 72 64 20 46 61 69 72 68 75 ..Richard Fairhu
000050: 72 73 74 2C 20 4F 63 74 6F 62 65 72 20 31 39 39 rst, October 199
000060: 37 0D 0A 0D 0A 0D 0A 46 69 6C 65 6E 61 6D 65 09 7......Filename.
000070: 50 75 72 70 6F 73 65 0D 0A 0D 0A 42 41 4E 4B 53 Purpose....BANKS
000080: 20 20 20 2E 09 52 65 61 64 2F 77 72 69 74 65 20 ..Read/write
000090: 62 79 74 65 20 74 6F 20 65 78 74 72 61 20 6D 65 byte to extra me
0000A0: 6D 6F 72 79 0D 0A 43 52 43 20 20 20 20 20 2E 09 mory..CRC ..
0000B0: 43 52 43 20 63 61 6C 63 75 6C 61 74 69 6F 6E 20 CRC calculation
0000C0: 72 6F 75 74 69 6E 65 0D 0A 43 52 54 43 20 20 20 routine..CRTC
0000D0: 20 2E 09 53 65 74 20 43 52 54 43 20 72 65 67 69 ..Set CRTC regi
0000E0: 73 74 65 72 0D 0A 44 49 56 49 44 45 20 20 2E 09 ster..DIVIDE ..
0000F0: 44 69 76 69 64 65 20 48 4C 20 62 79 20 42 43 2C Divide HL by BC,
000100: 20 72 65 74 75 72 6E 69 6E 67 20 72 6F 75 6E 64 returning round
000110: 65 64 20 72 65 73 75 6C 74 20 69 6E 20 44 45 0D ed result in DE.
000120: 0A 46 41 44 45 4C 32 48 20 2E 09 46 61 64 65 20 .FADEL2H ..Fade
000130: 6C 6F 77 20 73 63 72 65 65 6E 20 74 6F 20 68 69 low screen to hi
000140: 67 68 20 73 63 72 65 65 6E 0D 0A 46 41 44 45 53 gh screen..FADES
000150: 43 52 20 2E 09 46 61 64 65 20 68 69 67 68 20 73 CR ..Fade high s
000160: 63 72 65 65 6E 20 74 6F 20 62 61 63 6B 67 72 6F creen to backgro
000170: 75 6E 64 0D 0A 48 45 58 49 4E 50 31 20 2E 09 49 und..HEXINP1 ..I
000180: 6E 70 75 74 20 31 20 68 65 78 20 62 79 74 65 0D nput 1 hex byte.
000190: 0A 48 45 58 49 4E 50 32 20 2E 09 49 6E 70 75 74 .HEXINP2 ..Input
0001A0: 20 32 20 68 65 78 20 62 79 74 65 73 0D 0A 49 4E 2 hex bytes..IN
0001B0: 50 55 54 46 20 20 2E 09 49 6E 70 75 74 20 66 69 PUTF ..Input fi
0001C0: 6C 65 6E 61 6D 65 0D 0A 4B 45 59 53 43 41 4E 20 lename..KEYSCAN
0001D0: 2E 09 53 63 61 6E 20 61 6C 6C 20 6B 65 79 73 20 ..Scan all keys
0001E0: 6F 6E 20 6B 65 79 62 6F 61 72 64 0D 0A 4D 4F 44 on keyboard..MOD
0001F0: 45 31 54 4F 32 2E 09 43 6F 6E 76 65 72 74 20 4D E1TO2..Convert M
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 52 65 61 ...;*** SUBR.Rea
000010: 64 20 50 53 47 20 72 65 67 69 73 74 65 72 20 43 d PSG register C
000020: 20 69 6E 74 6F 20 44 0D 0A 09 3B 09 09 63 6F 72 into D...;..cor
000030: 72 75 70 74 73 20 41 46 2C 20 42 43 0D 0A 0D 0A rupts AF, BC....
000040: 2E 72 72 65 67 09 64 69 0D 0A 09 6C 64 20 62 2C .rreg.di...ld b,
000050: 26 46 34 3A 20 6F 75 74 20 28 63 29 2C 63 09 3B &F4: out (c),c.;
000060: 50 75 74 20 72 65 67 69 73 74 65 72 20 6F 6E 20 Put register on
000070: 70 6F 72 74 20 41 0D 0A 09 6C 64 20 62 2C 26 46 port A...ld b,&F
000080: 36 3A 20 69 6E 20 61 2C 28 63 29 09 3B 47 65 74 6: in a,(c).;Get
000090: 20 70 6F 72 74 20 43 20 73 74 61 74 75 73 0D 0A port C status..
0000A0: 09 61 6E 64 20 26 33 30 3A 20 20 6C 64 20 63 2C .and &30: ld c,
0000B0: 61 0D 0A 09 6F 72 20 26 43 30 3A 20 20 20 6F 75 a...or &C0: ou
0000C0: 74 20 28 63 29 2C 61 09 3B 22 57 72 69 74 65 20 t (c),a.;"Write
0000D0: 72 65 67 69 73 74 65 72 22 20 74 6F 20 70 6F 72 register" to por
0000E0: 74 20 43 0D 0A 09 09 20 20 6F 75 74 20 28 63 29 t C.... out (c)
0000F0: 2C 63 09 3B 52 65 73 74 6F 72 65 20 6F 6C 64 20 ,c.;Restore old
000100: 73 74 61 74 75 73 20 77 69 74 68 69 6E 20 31 30 status within 10
000110: 6E 73 0D 0A 09 69 6E 63 20 62 0D 0A 09 6C 64 20 ns...inc b...ld
000120: 61 2C 26 39 32 3A 20 6F 75 74 20 28 63 29 2C 61 a,&92: out (c),a
000130: 09 3B 53 65 74 20 63 6F 6E 74 72 6F 6C 20 74 6F .;Set control to
000140: 20 70 6F 72 74 20 41 20 69 6E 70 75 74 2C 20 70 port A input, p
000150: 6F 72 74 20 42 20 69 6E 70 75 74 0D 0A 09 70 75 ort B input...pu
000160: 73 68 20 62 63 20 3A 20 73 65 74 20 36 2C 63 0D sh bc : set 6,c.
000170: 0A 09 20 6C 64 20 62 2C 26 46 36 3A 20 6F 75 74 .. ld b,&F6: out
000180: 20 28 63 29 2C 63 09 3B 53 65 74 20 42 43 31 2F (c),c.;Set BC1/
000190: 42 44 49 52 20 74 6F 20 22 72 65 61 64 20 72 65 BDIR to "read re
0001A0: 67 69 73 74 65 72 20 63 6F 6E 74 65 6E 74 73 22 gister contents"
0001B0: 0D 0A 09 20 6C 64 20 62 2C 26 46 34 3A 20 69 6E ... ld b,&F4: in
0001C0: 20 64 2C 28 63 29 09 3B 47 65 74 20 63 6F 6E 74 d,(c).;Get cont
0001D0: 65 6E 74 73 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 ents...pop bc...
0001E0: 6C 64 20 61 2C 26 38 32 3A 20 6F 75 74 20 28 63 ld a,&82: out (c
0001F0: 29 2C 61 09 3B 52 65 73 74 6F 72 65 20 63 6F 6E ),a.;Restore con
Size : 512 (Real : 512)
000000: 0D 0A 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 4E .....;*** SUBR.N
000010: 65 78 74 20 6C 69 6E 65 20 64 6F 77 6E 20 66 72 ext line down fr
000020: 6F 6D 20 48 4C 0D 0A 0D 0A 2E 6E 6C 69 6E 65 09 om HL.....nline.
000030: 6C 64 20 61 2C 38 3A 20 61 64 64 20 68 3A 20 6C ld a,8: add h: l
000040: 64 20 68 2C 61 0D 0A 09 61 6E 64 20 36 34 3A 20 d h,a...and 64:
000050: 72 65 74 20 6E 7A 0D 0A 09 6C 64 20 62 63 2C 31 ret nz...ld bc,1
000060: 36 33 30 34 3A 20 73 62 63 20 68 6C 2C 62 63 0D 6304: sbc hl,bc.
000070: 0A 09 72 65 74 0D 0A 0D 0A 1A 20 68 6C 2C 62 63 ..ret..... hl,bc
000080: 65 2C 31 36 33 30 34 3A 20 6F 72 20 61 3A 20 73 e,16304: or a: s
000090: 62 63 20 68 6C 2C 64 65 0D 0A 20 20 20 20 20 20 bc hl,de..
0000A0: 20 20 70 6F 70 20 64 65 3A 20 72 65 74 0D 0A 0D pop de: ret...
0000B0: 1A 65 20 63 6F 64 65 20 73 6F 75 72 63 65 20 28 .e code source (
0000C0: 63 29 20 52 69 63 68 61 72 64 20 46 61 69 72 68 c) Richard Fairh
0000D0: 75 72 73 74 20 31 39 39 33 0D 0A 0D 0A 09 6F 72 urst 1993.....or
0000E0: 67 20 26 39 30 30 30 0D 0A 09 77 72 69 74 65 20 g &9000...write
0000F0: 22 67 72 61 70 68 69 63 73 2E 62 69 6E 22 0D 0A "graphics.bin"..
000100: 64 20 31 35 0D 0A 09 20 63 70 20 31 30 20 20 20 d 15... cp 10
000110: 20 20 3A 20 6A 72 20 6E 7A 2C 6B 6C 6F 6F 70 3B : jr nz,kloop;
000120: 4C 61 73 74 20 6B 65 79 20 62 6C 6F 63 6B 20 62 Last key block b
000130: 65 65 6E 20 72 65 61 63 68 65 64 20 79 65 74 3F een reached yet?
000140: 0D 0A 09 70 6F 70 20 62 63 09 09 09 3B 47 65 74 ...pop bc...;Get
000150: 20 6F 6C 64 20 73 74 61 74 75 73 20 6F 66 20 70 old status of p
000160: 6F 72 74 20 43 0D 0A 09 6C 64 20 61 2C 26 38 32 ort C...ld a,&82
000170: 20 20 20 3A 20 6F 75 74 20 28 63 29 2C 61 09 3B : out (c),a.;
000180: 52 65 73 74 6F 72 65 20 63 6F 6E 74 72 6F 6C 20 Restore control
000190: 70 6F 72 74 0D 0A 09 64 65 63 20 62 20 20 20 20 port...dec b
0001A0: 20 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 3B 52 : out (c),c.;R
0001B0: 65 73 74 6F 72 65 20 70 6F 72 74 20 43 0D 0A 0D estore port C...
0001C0: 0A 09 6C 64 20 61 2C 28 6B 65 79 62 75 66 2B 35 ..ld a,(keybuf+5
0001D0: 29 09 09 3B 47 65 74 20 6B 65 79 20 64 61 74 61 )..;Get key data
0001E0: 20 66 72 6F 6D 20 62 6C 6F 63 6B 20 35 20 6F 66 from block 5 of
0001F0: 20 6B 65 79 62 6F 61 72 64 20 62 75 66 66 65 72 keyboard buffer
Size : 512 (Real : 512)
000000: 74 72 6F 6C 20 70 6F 72 74 0D 0A 09 64 65 63 20 trol port...dec
000010: 62 20 20 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 b : out (c),c.
000020: 3B 52 65 73 74 6F 72 65 20 70 6F 72 74 20 43 0D ;Restore port C.
000030: 0A 09 72 65 73 20 34 2C 64 20 3A 20 65 69 3A 20 ..res 4,d : ei:
000040: 72 65 74 0D 0A 1A 65 72 20 69 6E 20 43 0D 0A 20 ret...er in C..
000050: 20 20 20 20 20 20 20 3B 6F 6E 20 65 78 69 74 20 ;on exit
000060: 20 2D 20 63 6F 6E 74 65 6E 74 73 20 69 6E 20 44 - contents in D
000070: 0D 0A 20 20 20 20 20 20 20 20 3B 63 6F 72 72 75 .. ;corru
000080: 36 3A 20 69 6E 20 61 2C 28 63 29 09 3B 47 65 74 6: in a,(c).;Get
000090: 20 70 6F 72 74 20 43 20 73 74 61 74 75 73 0D 0A port C status..
0000A0: 09 61 6E 64 20 26 33 30 3A 20 20 6C 64 20 63 2C .and &30: ld c,
0000B0: 61 0D 0A 09 6F 72 20 26 43 30 3A 20 20 20 6F 75 a...or &C0: ou
0000C0: 74 20 28 63 29 2C 61 09 3B 22 57 72 69 74 65 20 t (c),a.;"Write
0000D0: 72 65 67 69 73 74 65 72 22 20 74 6F 20 70 6F 72 register" to por
0000E0: 74 20 43 0D 0A 09 09 20 20 6F 75 74 20 28 63 29 t C.... out (c)
0000F0: 2C 63 09 3B 52 65 73 74 6F 72 65 20 6F 6C 64 20 ,c.;Restore old
000100: 73 74 61 74 75 73 20 77 69 74 68 69 6E 20 31 30 status within 10
000110: 6E 73 0D 0A 09 69 6E 63 20 62 0D 0A 09 6C 64 20 ns...inc b...ld
000120: 61 2C 26 39 32 3A 20 6F 75 74 20 28 63 29 2C 61 a,&92: out (c),a
000130: 09 3B 53 65 74 20 63 6F 6E 74 72 6F 6C 20 74 6F .;Set control to
000140: 20 70 6F 72 74 20 41 20 69 6E 70 75 74 2C 20 70 port A input, p
000150: 6F 72 74 20 42 20 69 6E 70 75 74 0D 0A 09 70 75 ort B input...pu
000160: 73 68 20 62 63 20 3A 20 73 65 74 20 36 2C 63 0D sh bc : set 6,c.
000170: 0A 09 20 6C 64 20 62 2C 26 46 36 3A 20 6F 75 74 .. ld b,&F6: out
000180: 20 28 63 29 2C 63 09 3B 53 65 74 20 42 43 31 2F (c),c.;Set BC1/
000190: 42 44 49 52 20 74 6F 20 22 72 65 61 64 20 72 65 BDIR to "read re
0001A0: 67 69 73 74 65 72 20 63 6F 6E 74 65 6E 74 73 22 gister contents"
0001B0: 0D 0A 09 20 6C 64 20 62 2C 26 46 34 3A 20 69 6E ... ld b,&F4: in
0001C0: 20 64 2C 28 63 29 09 3B 47 65 74 20 63 6F 6E 74 d,(c).;Get cont
0001D0: 65 6E 74 73 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 ents...pop bc...
0001E0: 6C 64 20 61 2C 26 38 32 3A 20 6F 75 74 20 28 63 ld a,&82: out (c
0001F0: 29 2C 61 09 3B 52 65 73 74 6F 72 65 20 63 6F 6E ),a.;Restore con
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 48 61 72 ...;*** SUBR.Har
000010: 64 77 61 72 65 20 6B 65 79 73 63 61 6E 20 2D 20 dware keyscan -
000020: 73 70 61 63 65 20 62 61 72 20 6F 6E 6C 79 0D 0A space bar only..
000030: 0D 0A 2E 6B 65 79 73 63 09 6C 64 20 62 63 2C 26 ...keysc.ld bc,&
000040: 46 34 30 45 3A 20 6F 75 74 20 28 63 29 2C 63 09 F40E: out (c),c.
000050: 09 3B 50 6F 72 74 20 41 20 20 2D 20 72 65 67 69 .;Port A - regi
000060: 73 74 65 72 20 31 34 0D 0A 09 6C 64 20 62 63 2C ster 14...ld bc,
000070: 26 46 36 34 35 3A 20 6C 64 20 61 2C 26 43 35 09 &F645: ld a,&C5.
000080: 09 3B 50 6F 72 74 20 43 20 20 2D 20 77 72 69 74 .;Port C - writ
000090: 65 20 7D 0D 0A 09 6F 75 74 20 28 63 29 2C 61 20 e }...out (c),a
0000A0: 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 09 3B 50 : out (c),c..;P
0000B0: 6F 72 74 20 43 20 20 2D 20 72 65 61 64 20 20 7D ort C - read }
0000C0: 0D 0A 09 6C 64 20 62 63 2C 26 46 37 39 32 3A 20 ...ld bc,&F792:
0000D0: 6F 75 74 20 28 63 29 2C 63 09 09 3B 43 6F 6E 74 out (c),c..;Cont
0000E0: 72 6F 6C 20 2D 20 70 6F 72 74 20 41 20 69 6E 70 rol - port A inp
0000F0: 75 74 0D 0A 09 6C 64 20 62 63 2C 26 46 36 34 35 ut...ld bc,&F645
000100: 3A 20 6F 75 74 20 28 63 29 2C 63 09 09 3B 50 6F : out (c),c..;Po
000110: 72 74 20 43 20 20 2D 20 72 65 61 64 20 63 6F 6E rt C - read con
000120: 74 65 6E 74 73 0D 0A 09 6C 64 20 62 20 2C 26 46 tents...ld b ,&F
000130: 34 20 20 3A 20 69 6E 20 61 2C 28 63 29 09 09 3B 4 : in a,(c)..;
000140: 50 6F 72 74 20 41 20 20 2D 20 72 65 61 64 0D 0A Port A - read..
000150: 09 6C 64 20 62 63 2C 26 46 37 38 32 3A 20 6F 75 .ld bc,&F782: ou
000160: 74 20 28 63 29 2C 63 09 09 3B 43 6F 6E 74 72 6F t (c),c..;Contro
000170: 6C 20 2D 20 70 6F 72 74 20 41 20 6F 75 74 70 75 l - port A outpu
000180: 74 0D 0A 09 63 70 20 26 37 46 3A 20 72 65 74 0D t...cp &7F: ret.
000190: 0A 0D 0A 1A 0A 2E 6B 65 79 73 63 09 6C 64 20 62 ......keysc.ld b
0001A0: 63 2C 26 46 34 30 45 3A 20 6F 75 74 20 28 63 29 c,&F40E: out (c)
0001B0: 2C 63 09 3B 70 6F 72 74 20 41 20 20 2D 20 72 65 ,c.;port A - re
0001C0: 67 69 73 74 65 72 20 31 34 0D 0A 09 6C 64 20 62 gister 14...ld b
0001D0: 63 2C 26 46 36 34 35 3A 20 6C 64 20 61 2C 26 43 c,&F645: ld a,&C
0001E0: 35 09 3B 70 6F 72 74 20 43 20 20 2D 20 77 72 69 5.;port C - wri
0001F0: 74 65 20 7D 0D 0A 09 6F 75 74 20 28 63 29 2C 61 te }...out (c),a
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 09 57 72 69 ...;*** SUBR.Wri
000010: 74 65 20 50 53 47 20 72 65 67 69 73 74 65 72 0D te PSG register.
000020: 0A 0D 0A 2E 70 73 67 09 6C 64 20 62 2C 26 46 34 ....psg.ld b,&F4
000030: 3A 20 6F 75 74 20 28 63 29 2C 61 09 3B 53 65 74 : out (c),a.;Set
000040: 20 75 70 20 72 65 67 69 73 74 65 72 0D 0A 09 6C up register...l
000050: 64 20 62 2C 26 46 36 3A 20 69 6E 20 20 61 2C 28 d b,&F6: in a,(
000060: 63 29 09 3B 20 7C 0D 0A 09 6F 72 20 26 43 30 20 c).; |...or &C0
000070: 20 3A 20 6F 75 74 20 28 63 29 2C 61 09 3B 20 7C : out (c),a.; |
000080: 0D 0A 09 61 6E 64 20 26 33 46 20 3A 20 6F 75 74 ...and &3F : out
000090: 20 28 63 29 2C 61 09 3B 20 7C 0D 0A 0D 0A 09 6C (c),a.; |.....l
0000A0: 64 20 62 2C 26 46 34 3A 20 6F 75 74 20 28 63 29 d b,&F4: out (c)
0000B0: 2C 63 09 3B 53 65 6E 64 20 64 61 74 61 0D 0A 09 ,c.;Send data...
0000C0: 6C 64 20 62 2C 26 46 36 3A 20 6C 64 20 63 2C 61 ld b,&F6: ld c,a
0000D0: 09 3B 20 7C 0D 0A 09 6F 72 20 26 38 30 20 20 3A .; |...or &80 :
0000E0: 20 6F 75 74 20 28 63 29 2C 61 09 3B 20 7C 0D 0A out (c),a.; |..
0000F0: 09 09 20 20 6F 75 74 20 28 63 29 2C 63 09 3B 20 .. out (c),c.;
000100: 7C 0D 0A 09 72 65 74 0D 0A 1A 24 24 24 FF 00 FF |...ret...$$$...
000110: 00 00 0A 00 00 72 01 00 E6 00 00 00 00 00 00 00 .....r..........
000120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000140: E6 00 00 33 04 69 73 74 65 72 0D 0A 0D 0A 09 6C ...3.ister.....l
000150: 64 20 62 2C 26 46 34 3A 20 6F 75 74 20 28 63 29 d b,&F4: out (c)
000160: 2C 63 0D 0A 09 6C 64 20 62 2C 26 46 36 3A 20 6C ,c...ld b,&F6: l
000170: 64 20 63 2C 61 0D 0A 09 6F 72 20 26 38 30 20 20 d c,a...or &80
000180: 52 65 73 74 6F 72 65 20 63 6F 6E 74 72 6F 6C 20 Restore control
000190: 70 6F 72 74 0D 0A 09 64 65 63 20 62 20 20 20 20 port...dec b
0001A0: 20 20 3A 20 6F 75 74 20 28 63 29 2C 63 09 3B 52 : out (c),c.;R
0001B0: 65 73 74 6F 72 65 20 70 6F 72 74 20 43 0D 0A 0D estore port C...
0001C0: 0A 09 6C 64 20 61 2C 28 6B 65 79 62 75 66 2B 35 ..ld a,(keybuf+5
0001D0: 29 09 09 3B 47 65 74 20 6B 65 79 20 64 61 74 61 )..;Get key data
0001E0: 20 66 72 6F 6D 20 62 6C 6F 63 6B 20 35 20 6F 66 from block 5 of
0001F0: 20 6B 65 79 62 6F 61 72 64 20 62 75 66 66 65 72 keyboard buffer
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 50 72 6F 2D 45 78 74 20 76 31 2E 35 ...;Pro-Ext v1.5
000010: 30 0D 0A 09 3B 61 20 52 65 61 6C 57 6F 72 6C 64 0...;a RealWorld
000020: 20 43 6F 64 69 6E 67 20 70 72 6F 64 75 63 74 69 Coding producti
000030: 6F 6E 20 66 6F 72 20 53 65 6E 74 69 6E 65 6C 0D on for Sentinel.
000040: 0A 09 3B 66 6F 6E 74 20 65 64 69 74 6F 72 20 52 ..;font editor R
000050: 53 58 20 6C 69 62 72 61 72 79 0D 0A 0D 0A 09 3B SX library.....;
000060: 76 31 2E 30 20 20 20 20 20 20 32 31 20 4D 61 72 v1.0 21 Mar
000070: 63 68 20 31 39 39 33 0D 0A 0D 0A 09 6F 72 67 20 ch 1993.....org
000080: 26 38 30 30 30 0D 0A 09 77 72 69 74 65 20 22 65 &8000...write "e
000090: 64 69 74 2E 62 69 6E 22 0D 0A 09 6E 6F 6C 69 73 dit.bin"...nolis
0000A0: 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 49 6E 69 74 69 t.....;*** Initi
0000B0: 61 6C 69 73 65 20 52 53 58 73 0D 0A 0D 0A 09 6C alise RSXs.....l
0000C0: 64 20 62 63 2C 63 6F 6D 5F 74 0D 0A 09 6C 64 20 d bc,com_t...ld
0000D0: 68 6C 2C 77 6B 73 70 0D 0A 09 6A 70 20 26 42 43 hl,wksp...jp &BC
0000E0: 44 31 0D 0A 0D 0A 2E 77 6B 73 70 09 64 73 20 34 D1.....wksp.ds 4
0000F0: 0D 0A 0D 0A 2E 63 6F 6D 5F 74 09 64 77 20 20 6E .....com_t.dw n
000100: 61 6D 65 5F 74 0D 0A 09 6A 70 20 20 67 72 69 64 ame_t...jp grid
000110: 5F 69 3A 09 6A 70 20 20 69 6E 76 5F 5F 69 0D 0A _i:.jp inv__i..
000120: 09 6A 70 20 20 6C 6F 61 64 5F 69 3A 09 6A 70 20 .jp load_i:.jp
000130: 20 73 61 76 65 5F 69 0D 0A 09 6A 70 20 20 73 65 save_i...jp se
000140: 74 5F 5F 69 3A 09 6A 70 20 20 67 65 74 5F 5F 69 t__i:.jp get__i
000150: 0D 0A 09 6A 70 20 20 63 6F 70 79 5F 69 3A 09 6A ...jp copy_i:.j
000160: 70 20 20 77 69 64 74 5F 69 0D 0A 09 6A 70 20 20 p widt_i...jp
000170: 72 65 64 6F 5F 69 3A 09 6A 70 20 20 6E 65 77 5F redo_i:.jp new_
000180: 5F 69 0D 0A 09 6A 70 20 20 70 6C 6F 74 5F 69 3A _i...jp plot_i:
000190: 09 6A 70 20 20 72 73 78 6F 5F 69 0D 0A 0D 0A 2E .jp rsxo_i.....
0001A0: 6E 61 6D 65 5F 74 09 73 74 72 20 22 47 52 49 44 name_t.str "GRID
0001B0: 22 3A 09 73 74 72 20 22 49 4E 56 45 52 54 22 0D ":.str "INVERT".
0001C0: 0A 09 73 74 72 20 22 4C 4F 41 44 22 3A 09 73 74 ..str "LOAD":.st
0001D0: 72 20 22 53 41 56 45 22 0D 0A 09 73 74 72 20 22 r "SAVE"...str "
0001E0: 53 45 54 22 20 3A 09 73 74 72 20 22 47 45 54 22 SET" :.str "GET"
0001F0: 0D 0A 09 73 74 72 20 22 43 4F 50 59 22 3A 09 73 ...str "COPY":.s
Size : 512 (Real : 512)
000000: 6F 6F 70 09 20 6C 64 20 68 6C 2C 67 70 61 74 74 oop. ld hl,gpatt
000010: 09 09 09 09 3B 6E 65 77 20 63 6F 6C 75 6D 6E 0D ....;new column.
000020: 0A 2E 63 72 6C 6F 6F 70 09 20 20 6C 64 20 61 2C ..crloop. ld a,
000030: 28 68 6C 29 3A 20 6C 64 20 28 64 65 29 2C 61 3A (hl): ld (de),a:
000040: 20 69 6E 63 20 68 6C 3A 20 69 6E 63 20 64 65 09 inc hl: inc de.
000050: 3B 6E 65 77 20 72 6F 77 20 69 6E 20 63 68 61 72 ;new row in char
000060: 61 63 74 65 72 0D 0A 09 20 20 6C 64 20 61 2C 28 acter... ld a,(
000070: 68 6C 29 3A 20 6C 64 20 28 64 65 29 2C 61 3A 20 hl): ld (de),a:
000080: 69 6E 63 20 68 6C 3A 20 64 65 63 20 64 65 0D 0A inc hl: dec de..
000090: 09 20 20 6C 64 20 61 2C 38 3A 20 61 64 64 20 64 . ld a,8: add d
0000A0: 3A 20 6C 64 20 64 2C 61 0D 0A 09 20 20 62 69 74 : ld d,a... bit
0000B0: 20 37 2C 64 3A 20 6A 72 20 6E 7A 2C 63 72 6C 6F 7,d: jr nz,crlo
0000C0: 6F 70 0D 0A 09 20 6C 64 20 61 2C 26 43 30 3A 20 op... ld a,&C0:
0000D0: 61 64 64 20 64 3A 20 6C 64 20 64 2C 61 0D 0A 09 add d: ld d,a...
0000E0: 20 69 6E 63 20 64 65 3A 20 69 6E 63 20 64 65 3A inc de: inc de:
0000F0: 20 64 6A 6E 7A 20 63 63 6C 6F 6F 70 0D 0A 09 6C djnz ccloop...l
000100: 64 20 68 6C 2C 33 32 3A 20 61 64 64 20 68 6C 2C d hl,32: add hl,
000110: 64 65 3A 20 65 78 20 64 65 2C 68 6C 0D 0A 09 64 de: ex de,hl...d
000120: 65 63 20 63 3A 20 6A 72 20 6E 7A 2C 63 6F 6C 6F ec c: jr nz,colo
000130: 6F 70 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 26 43 30 op.....ld hl,&C0
000140: 30 30 3A 20 6C 64 20 62 63 2C 34 38 3A 20 6C 64 00: ld bc,48: ld
000150: 69 72 09 09 3B 63 6F 70 79 20 6C 69 6E 65 20 74 ir..;copy line t
000160: 6F 20 62 6F 74 74 6F 6D 0D 0A 0D 0A 09 6C 64 20 o bottom.....ld
000170: 68 6C 2C 26 43 30 30 30 3A 20 6C 64 20 62 2C 31 hl,&C000: ld b,1
000180: 39 33 0D 0A 2E 63 70 6C 6F 6F 70 09 70 75 73 68 93...cploop.push
000190: 20 68 6C 3A 20 6C 64 20 61 2C 28 68 6C 29 0D 0A hl: ld a,(hl)..
0001A0: 09 20 6C 64 20 64 65 2C 34 38 3A 20 61 64 64 20 . ld de,48: add
0001B0: 68 6C 2C 64 65 0D 0A 09 20 61 6E 64 20 31 32 38 hl,de... and 128
0001C0: 3A 20 20 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 70 : ld (hl),a...p
0001D0: 6F 70 20 68 6C 3A 20 63 61 6C 6C 20 26 42 43 32 op hl: call &BC2
0001E0: 36 0D 0A 09 64 6A 6E 7A 20 63 70 6C 6F 6F 70 0D 6...djnz cploop.
0001F0: 0A 09 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C ..ret.....;*** |
Size : 512 (Real : 512)
000000: 74 72 20 22 57 49 44 54 48 22 0D 0A 09 73 74 72 tr "WIDTH"...str
000010: 20 22 52 45 44 4F 22 3A 09 73 74 72 20 22 4E 45 "REDO":.str "NE
000020: 57 22 0D 0A 09 73 74 72 20 22 50 4C 4F 54 22 3A W"...str "PLOT":
000030: 09 73 74 72 20 22 52 53 58 4F 46 46 22 0D 0A 09 .str "RSXOFF"...
000040: 64 62 20 30 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C 49 db 0.....;*** |I
000050: 4E 56 45 52 54 2C 77 69 64 74 68 2C 68 65 69 67 NVERT,width,heig
000060: 68 74 0D 0A 0D 0A 2E 69 6E 76 5F 5F 69 09 6C 64 ht.....inv__i.ld
000070: 20 68 6C 2C 33 39 38 3A 20 6C 64 20 61 2C 28 67 hl,398: ld a,(g
000080: 73 69 7A 65 29 0D 0A 09 6C 64 20 65 2C 28 69 78 size)...ld e,(ix
000090: 2B 30 29 3A 20 6C 64 20 64 2C 28 69 78 2B 31 29 +0): ld d,(ix+1)
0000A0: 0D 0A 09 6F 72 20 61 3A 20 72 6C 20 64 3A 20 72 ...or a: rl d: r
0000B0: 6C 20 65 0D 0A 09 6F 72 20 61 3A 20 73 62 63 20 l e...or a: sbc
0000C0: 68 6C 2C 64 65 0D 0A 09 6F 72 20 61 3A 20 73 62 hl,de...or a: sb
0000D0: 63 20 68 6C 2C 64 65 3A 20 63 70 20 34 3A 20 6A c hl,de: cp 4: j
0000E0: 72 20 7A 2C 69 6E 76 5F 67 79 0D 0A 09 6F 72 20 r z,inv_gy...or
0000F0: 61 3A 20 73 62 63 20 68 6C 2C 64 65 0D 0A 09 6F a: sbc hl,de...o
000100: 72 20 61 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 r a: sbc hl,de:
000110: 63 70 20 32 3A 20 6A 72 20 7A 2C 69 6E 76 5F 67 cp 2: jr z,inv_g
000120: 79 0D 0A 09 6F 72 20 61 3A 20 73 62 63 20 68 6C y...or a: sbc hl
000130: 2C 64 65 3A 20 6F 72 20 61 3A 20 73 62 63 20 68 ,de: or a: sbc h
000140: 6C 2C 64 65 0D 0A 09 6F 72 20 61 3A 20 73 62 63 l,de...or a: sbc
000150: 20 68 6C 2C 64 65 3A 20 6F 72 20 61 3A 20 73 62 hl,de: or a: sb
000160: 63 20 68 6C 2C 64 65 0D 0A 0D 0A 2E 69 6E 76 5F c hl,de.....inv_
000170: 67 79 09 70 75 73 68 20 68 6C 0D 0A 09 20 6C 64 gy.push hl... ld
000180: 20 6C 2C 28 69 78 2B 32 29 3A 20 6C 64 20 68 2C l,(ix+2): ld h,
000190: 28 69 78 2B 33 29 0D 0A 09 20 61 64 64 20 68 6C (ix+3)... add hl
0001A0: 2C 68 6C 0D 0A 09 20 61 64 64 20 68 6C 2C 68 6C ,hl... add hl,hl
0001B0: 3A 20 63 70 20 34 3A 20 6A 72 20 7A 2C 69 6E 76 : cp 4: jr z,inv
0001C0: 5F 67 78 0D 0A 09 20 61 64 64 20 68 6C 2C 68 6C _gx... add hl,hl
0001D0: 3A 20 63 70 20 32 3A 20 6A 72 20 7A 2C 69 6E 76 : cp 2: jr z,inv
0001E0: 5F 67 78 0D 0A 09 20 61 64 64 20 68 6C 2C 68 6C _gx... add hl,hl
0001F0: 0D 0A 2E 69 6E 76 5F 67 78 09 20 65 78 20 64 65 ...inv_gx. ex de
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 2C 68 6C 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 70 ,hl...pop hl...p
000010: 75 73 68 20 64 65 3A 20 70 75 73 68 20 68 6C 0D ush de: push hl.
000020: 0A 09 20 63 61 6C 6C 20 26 42 42 43 30 0D 0A 09 .. call &BBC0...
000030: 20 6C 64 20 64 65 2C 31 3A 20 6C 64 20 68 6C 2C ld de,1: ld hl,
000040: 26 46 46 46 45 3A 20 63 61 6C 6C 20 26 42 42 46 &FFFE: call &BBF
000050: 33 09 3B 47 65 74 20 63 75 72 72 65 6E 74 20 73 3.;Get current s
000060: 74 61 74 65 20 28 54 45 53 54 52 20 31 2C 2D 32 tate (TESTR 1,-2
000070: 29 0D 0A 09 20 70 75 73 68 20 61 66 3A 20 6C 64 )... push af: ld
000080: 20 64 65 2C 26 46 46 46 46 3A 20 6C 64 20 68 6C de,&FFFF: ld hl
000090: 2C 32 3A 20 63 61 6C 6C 20 26 42 42 43 33 0D 0A ,2: call &BBC3..
0000A0: 09 20 70 6F 70 20 61 66 3A 20 78 6F 72 20 31 3A . pop af: xor 1:
0000B0: 20 63 61 6C 6C 20 26 42 42 44 45 09 09 3B 61 6E call &BBDE..;an
0000C0: 64 20 69 6E 76 65 72 74 20 70 65 6E 20 61 63 63 d invert pen acc
0000D0: 6F 72 64 69 6E 67 6C 79 0D 0A 09 20 63 61 6C 6C ordingly... call
0000E0: 20 73 71 75 61 72 65 09 09 09 09 3B 64 72 61 77 square....;draw
0000F0: 20 73 71 75 61 72 65 0D 0A 09 70 6F 70 20 68 6C square...pop hl
000100: 3A 20 70 6F 70 20 64 65 0D 0A 09 72 72 20 68 3A : pop de...rr h:
000110: 20 72 72 20 6C 0D 0A 09 63 61 6C 6C 20 26 42 43 rr l...call &BC
000120: 31 44 3A 20 72 65 73 20 30 2C 6C 09 09 09 3B 66 1D: res 0,l...;f
000130: 69 6E 64 20 73 63 72 65 65 6E 20 61 64 64 72 65 ind screen addre
000140: 73 73 0D 0A 0D 0A 09 6C 64 20 64 65 2C 67 70 61 ss.....ld de,gpa
000150: 74 74 3A 20 6C 64 20 62 2C 38 0D 0A 2E 69 6E 76 tt: ld b,8...inv
000160: 5F 63 6C 09 6C 64 20 61 2C 28 64 65 29 3A 20 6F _cl.ld a,(de): o
000170: 72 20 28 68 6C 29 3A 20 6C 64 20 28 68 6C 29 2C r (hl): ld (hl),
000180: 61 3A 20 69 6E 63 20 68 6C 3A 20 69 6E 63 20 64 a: inc hl: inc d
000190: 65 0D 0A 09 6C 64 20 61 2C 28 64 65 29 3A 20 6F e...ld a,(de): o
0001A0: 72 20 28 68 6C 29 3A 20 6C 64 20 28 68 6C 29 2C r (hl): ld (hl),
0001B0: 61 3A 20 64 65 63 20 68 6C 3A 20 69 6E 63 20 64 a: dec hl: inc d
0001C0: 65 0D 0A 09 63 61 6C 6C 20 26 42 43 32 36 3A 20 e...call &BC26:
0001D0: 64 6A 6E 7A 20 69 6E 76 5F 63 6C 0D 0A 09 72 65 djnz inv_cl...re
0001E0: 74 0D 0A 0D 0A 09 3B 53 75 62 72 6F 75 74 69 6E t.....;Subroutin
0001F0: 65 20 74 6F 20 64 72 61 77 20 73 71 75 61 72 65 e to draw square
Size : 512 (Real : 512)
000000: 4F 44 45 20 31 20 73 63 72 65 65 6E 20 74 6F 20 ODE 1 screen to
000010: 4D 4F 44 45 20 32 0D 0A 4D 4B 24 50 41 52 41 4D MODE 2..MK$PARAM
000020: 2E 09 4D 61 6B 65 20 73 74 72 69 6E 67 20 70 61 ..Make string pa
000030: 72 61 6D 65 74 65 72 20 66 6F 72 20 52 53 58 0D rameter for RSX.
000040: 0A 4D 55 4C 54 49 20 20 20 2E 09 4D 75 6C 74 69 .MULTI ..Multi
000050: 70 6C 79 20 48 4C 20 62 79 20 41 0D 0A 4E 4C 49 ply HL by A..NLI
000060: 4E 45 20 20 20 2E 09 47 6F 20 74 6F 20 6E 65 78 NE ..Go to nex
000070: 74 20 70 69 78 65 6C 20 6C 69 6E 65 20 64 6F 77 t pixel line dow
000080: 6E 0D 0A 50 44 45 43 41 20 20 20 2E 53 50 43 09 n..PDECA .SPC.
000090: 50 72 69 6E 74 20 41 20 61 73 20 73 70 61 63 65 Print A as space
0000A0: 64 20 64 65 63 69 6D 61 6C 0D 0A 50 44 45 43 48 d decimal..PDECH
0000B0: 4C 20 20 2E 09 50 72 69 6E 74 20 48 4C 20 61 73 L ..Print HL as
0000C0: 20 75 6E 73 70 61 63 65 64 20 64 65 63 69 6D 61 unspaced decima
0000D0: 6C 0D 0A 50 48 45 58 20 20 20 20 2E 09 50 72 69 l..PHEX ..Pri
0000E0: 6E 74 20 41 20 6F 72 20 48 4C 20 61 73 20 68 65 nt A or HL as he
0000F0: 78 0D 0A 50 53 47 20 20 20 20 20 2E 09 53 65 6E x..PSG ..Sen
000100: 64 20 73 6F 75 6E 64 20 63 68 69 70 20 72 65 67 d sound chip reg
000110: 69 73 74 65 72 0D 0A 50 53 54 52 49 4E 47 20 2E ister..PSTRING .
000120: 09 50 72 69 6E 74 20 73 74 72 69 6E 67 0D 0A 52 .Print string..R
000130: 45 41 44 52 45 47 20 2E 09 52 65 61 64 20 73 6F EADREG ..Read so
000140: 75 6E 64 20 63 68 69 70 20 72 65 67 69 73 74 65 und chip registe
000150: 72 0D 0A 53 50 43 53 43 41 4E 20 2E 09 53 63 61 r..SPCSCAN ..Sca
000160: 6E 20 6B 65 79 62 6F 61 72 64 20 66 6F 72 20 73 n keyboard for s
000170: 70 61 63 65 20 62 61 72 20 6F 6E 6C 79 0D 0A 53 pace bar only..S
000180: 50 45 43 43 4F 4E 56 2E 09 43 6F 6E 76 65 72 74 PECCONV..Convert
000190: 20 53 70 65 63 74 72 75 6D 2D 73 69 7A 65 64 20 Spectrum-sized
0001A0: 73 63 72 65 65 6E 0D 0A 55 43 41 53 45 20 20 20 screen..UCASE
0001B0: 2E 09 43 6F 6E 76 65 72 74 20 41 20 74 6F 20 75 ..Convert A to u
0001C0: 70 70 65 72 20 63 61 73 65 0D 0A 57 49 4E 4C 4F pper case..WINLO
0001D0: 41 44 20 2E 09 4C 6F 61 64 20 41 64 76 61 6E 63 AD ..Load Advanc
0001E0: 65 64 20 41 72 74 20 53 74 75 64 69 6F 20 77 69 ed Art Studio wi
0001F0: 6E 64 6F 77 0D 0A 1A 43 6F 6E 76 65 72 74 20 41 ndow...Convert A
Size : 512 (Real : 512)
000000: 20 62 6F 78 0D 0A 0D 0A 2E 73 71 75 61 72 65 09 box.....square.
000010: 6C 64 20 61 2C 28 67 6E 65 78 74 29 3A 20 6C 64 ld a,(gnext): ld
000020: 20 62 2C 61 3A 20 72 72 63 20 62 3A 20 72 72 63 b,a: rrc b: rrc
000030: 20 62 0D 0A 09 64 65 63 20 61 3A 20 6C 64 20 28 b...dec a: ld (
000040: 64 69 6D 65 6E 31 29 2C 61 0D 0A 09 6E 65 67 20 dimen1),a...neg
000050: 20 3A 20 6C 64 20 28 64 69 6D 65 6E 32 29 2C 61 : ld (dimen2),a
000060: 0D 0A 2E 73 71 6C 6F 6F 70 09 70 75 73 68 20 62 ...sqloop.push b
000070: 63 0D 0A 09 20 6C 64 20 64 65 2C 28 64 69 6D 65 c... ld de,(dime
000080: 6E 31 29 3A 20 6C 64 20 68 6C 2C 30 3A 20 63 61 n1): ld hl,0: ca
000090: 6C 6C 20 26 42 42 46 39 0D 0A 09 20 6C 64 20 64 ll &BBF9... ld d
0000A0: 65 2C 30 3A 20 6C 64 20 68 6C 2C 26 46 46 46 45 e,0: ld hl,&FFFE
0000B0: 3A 20 63 61 6C 6C 20 26 42 42 43 33 0D 0A 09 20 : call &BBC3...
0000C0: 6C 64 20 64 65 2C 28 64 69 6D 65 6E 32 29 3A 20 ld de,(dimen2):
0000D0: 6C 64 20 68 6C 2C 30 3A 20 63 61 6C 6C 20 26 42 ld hl,0: call &B
0000E0: 42 46 39 0D 0A 09 20 6C 64 20 64 65 2C 30 3A 20 BF9... ld de,0:
0000F0: 6C 64 20 68 6C 2C 26 46 46 46 45 3A 20 63 61 6C ld hl,&FFFE: cal
000100: 6C 20 26 42 42 43 33 0D 0A 09 70 6F 70 20 62 63 l &BBC3...pop bc
000110: 0D 0A 09 64 6A 6E 7A 20 73 71 6C 6F 6F 70 3A 20 ...djnz sqloop:
000120: 72 65 74 0D 0A 0D 0A 2E 64 69 6D 65 6E 31 09 64 ret.....dimen1.d
000130: 77 20 26 30 30 30 30 0D 0A 2E 64 69 6D 65 6E 32 w &0000...dimen2
000140: 09 64 77 20 26 46 46 30 30 0D 0A 0D 0A 09 3B 2A .dw &FF00.....;*
000150: 2A 2A 20 7C 47 52 49 44 2C 77 69 64 74 68 2C 68 ** |GRID,width,h
000160: 65 69 67 68 74 0D 0A 0D 0A 09 3B 53 69 7A 65 73 eight.....;Sizes
000170: 2E 2E 2E 09 63 68 61 72 61 63 74 65 72 20 09 6D ....character .m
000180: 61 78 69 6D 75 6D 20 64 69 6D 65 6E 73 69 6F 6E aximum dimension
000190: 0D 0A 09 3B 09 09 31 78 31 09 09 32 34 0D 0A 09 ...;..1x1..24...
0001A0: 3B 09 09 32 78 32 09 09 34 38 0D 0A 09 3B 09 09 ;..2x2..48...;..
0001B0: 34 78 34 09 09 39 36 0D 0A 0D 0A 2E 67 72 69 64 4x4..96.....grid
0001C0: 5F 69 09 6C 64 20 6C 2C 28 69 78 2B 30 29 3A 20 _i.ld l,(ix+0):
0001D0: 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 ld h,(ix+1)...ld
0001E0: 20 65 2C 28 69 78 2B 32 29 3A 20 6C 64 20 64 2C e,(ix+2): ld d,
0001F0: 28 69 78 2B 33 29 0D 0A 09 70 75 73 68 20 68 6C (ix+3)...push hl
Size : 512 (Real : 512)
000000: 50 45 43 43 4F 4E 56 2E 09 43 6F 6E 76 65 72 74 PECCONV..Convert
000010: 20 53 70 65 63 74 72 75 6D 2D 73 69 7A 65 64 20 Spectrum-sized
000020: 73 63 72 65 65 6E 0D 0A 55 43 41 53 45 20 20 20 screen..UCASE
000030: 2E 09 43 6F 6E 76 65 72 74 20 41 20 74 6F 20 75 ..Convert A to u
000040: 70 70 65 72 20 63 61 73 65 0D 0A 57 49 4E 4C 4F pper case..WINLO
000050: 41 44 20 2E 09 4C 6F 61 64 20 41 64 76 61 6E 63 AD ..Load Advanc
000060: 65 64 20 41 72 74 20 53 74 75 64 69 6F 20 77 69 ed Art Studio wi
000070: 6E 64 6F 77 0D 0A 1A 52 20 2E 09 46 61 64 65 20 ndow...R ..Fade
000080: 4F 44 45 20 31 20 73 63 72 65 65 6E 20 74 6F 20 ODE 1 screen to
000090: 4D 4F 44 45 20 32 0D 0A 4D 4B 24 50 41 52 41 4D MODE 2..MK$PARAM
0000A0: 2E 09 4D 61 6B 65 20 73 74 72 69 6E 67 20 70 61 ..Make string pa
0000B0: 72 61 6D 65 74 65 72 20 66 6F 72 20 52 53 58 0D rameter for RSX.
0000C0: 0A 4D 55 4C 54 49 20 20 20 2E 09 4D 75 6C 74 69 .MULTI ..Multi
0000D0: 70 6C 79 20 48 4C 20 62 79 20 41 0D 0A 4E 4C 49 ply HL by A..NLI
0000E0: 4E 45 20 20 20 2E 09 47 6F 20 74 6F 20 6E 65 78 NE ..Go to nex
0000F0: 74 20 70 69 78 65 6C 20 6C 69 6E 65 20 64 6F 77 t pixel line dow
000100: 6E 0D 0A 50 44 45 43 41 20 20 20 2E 53 50 43 09 n..PDECA .SPC.
000110: 50 72 69 6E 74 20 41 20 61 73 20 73 70 61 63 65 Print A as space
000120: 64 20 64 65 63 69 6D 61 6C 0D 0A 50 44 45 43 48 d decimal..PDECH
000130: 4C 20 20 2E 09 50 72 69 6E 74 20 48 4C 20 61 73 L ..Print HL as
000140: 20 75 6E 73 70 61 63 65 64 20 64 65 63 69 6D 61 unspaced decima
000150: 6C 0D 0A 50 48 45 58 20 20 20 20 2E 09 50 72 69 l..PHEX ..Pri
000160: 6E 74 20 41 20 6F 72 20 48 4C 20 61 73 20 68 65 nt A or HL as he
000170: 78 0D 0A 50 53 47 20 20 20 20 20 2E 09 53 65 6E x..PSG ..Sen
000180: 64 20 73 6F 75 6E 64 20 63 68 69 70 20 72 65 67 d sound chip reg
000190: 69 73 74 65 72 0D 0A 50 53 54 52 49 4E 47 20 2E ister..PSTRING .
0001A0: 09 50 72 69 6E 74 20 73 74 72 69 6E 67 0D 0A 52 .Print string..R
0001B0: 45 41 44 52 45 47 20 2E 09 52 65 61 64 20 73 6F EADREG ..Read so
0001C0: 75 6E 64 20 63 68 69 70 20 72 65 67 69 73 74 65 und chip registe
0001D0: 72 0D 0A 53 50 43 53 43 41 4E 20 2E 09 53 63 61 r..SPCSCAN ..Sca
0001E0: 6E 20 6B 65 79 62 6F 61 72 64 20 66 6F 72 20 73 n keyboard for s
0001F0: 70 61 63 65 20 62 61 72 20 6F 6E 6C 79 0D 0A 53 pace bar only..S
Size : 512 (Real : 512)
000000: 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 70 6F 70 : sbc hl,de: pop
000010: 20 68 6C 0D 0A 09 6A 72 20 6E 63 2C 67 6F 74 62 hl...jr nc,gotb
000020: 69 67 0D 0A 09 65 78 20 64 65 2C 68 6C 0D 0A 0D ig...ex de,hl...
000030: 0A 2E 67 6F 74 62 69 67 09 64 65 63 20 68 6C 3A ..gotbig.dec hl:
000040: 20 6C 64 20 64 65 2C 32 34 09 09 09 3B 48 4C 20 ld de,24...;HL
000050: 6E 6F 77 20 63 6F 6E 74 61 69 6E 73 20 6C 61 72 now contains lar
000060: 67 65 73 74 0D 0A 09 73 62 63 20 68 6C 2C 64 65 gest...sbc hl,de
000070: 3A 20 6A 72 20 63 2C 63 68 31 78 31 0D 0A 09 73 : jr c,ch1x1...s
000080: 62 63 20 68 6C 2C 64 65 3A 20 6A 72 20 63 2C 63 bc hl,de: jr c,c
000090: 68 32 78 32 0D 0A 2E 63 68 34 78 34 09 6C 64 20 h2x2...ch4x4.ld
0000A0: 61 2C 34 3A 20 6C 64 20 28 67 73 69 7A 65 29 2C a,4: ld (gsize),
0000B0: 61 0D 0A 09 6C 64 20 61 2C 34 3A 20 6C 64 20 28 a...ld a,4: ld (
0000C0: 67 6E 65 78 74 29 2C 61 0D 0A 09 6C 64 20 68 6C gnext),a...ld hl
0000D0: 2C 70 61 74 34 78 34 3A 20 6A 72 20 67 6F 74 63 ,pat4x4: jr gotc
0000E0: 68 0D 0A 2E 63 68 32 78 32 09 6C 64 20 61 2C 32 h...ch2x2.ld a,2
0000F0: 3A 20 6C 64 20 28 67 73 69 7A 65 29 2C 61 0D 0A : ld (gsize),a..
000100: 09 6C 64 20 61 2C 38 3A 20 6C 64 20 28 67 6E 65 .ld a,8: ld (gne
000110: 78 74 29 2C 61 0D 0A 09 6C 64 20 68 6C 2C 70 61 xt),a...ld hl,pa
000120: 74 32 78 32 3A 20 6A 72 20 67 6F 74 63 68 0D 0A t2x2: jr gotch..
000130: 2E 63 68 31 78 31 09 6C 64 20 61 2C 31 3A 20 6C .ch1x1.ld a,1: l
000140: 64 20 28 67 73 69 7A 65 29 2C 61 0D 0A 09 6C 64 d (gsize),a...ld
000150: 20 61 2C 31 36 3A 20 6C 64 20 28 67 6E 65 78 74 a,16: ld (gnext
000160: 29 2C 61 0D 0A 09 6C 64 20 68 6C 2C 70 61 74 31 ),a...ld hl,pat1
000170: 78 31 3A 20 6A 72 20 67 6F 74 63 68 0D 0A 0D 0A x1: jr gotch....
000180: 2E 67 6F 74 63 68 09 6C 64 20 64 65 2C 67 70 61 .gotch.ld de,gpa
000190: 74 74 09 09 09 09 3B 73 74 6F 72 65 20 61 70 70 tt....;store app
0001A0: 72 6F 70 72 69 61 74 65 20 70 61 74 74 65 72 6E ropriate pattern
0001B0: 0D 0A 09 6C 64 20 62 63 2C 31 36 3A 20 6C 64 69 ...ld bc,16: ldi
0001C0: 72 0D 0A 0D 0A 09 6C 64 20 64 65 2C 26 43 30 30 r.....ld de,&C00
0001D0: 30 3A 20 6C 64 20 63 2C 26 31 38 0D 0A 2E 63 6F 0: ld c,&18...co
0001E0: 6C 6F 6F 70 09 6C 64 20 62 2C 26 31 38 09 09 09 loop.ld b,&18...
0001F0: 09 3B 6E 65 77 20 6C 69 6E 65 0D 0A 2E 63 63 6C .;new line...ccl
Size : 512 (Real : 512)
000000: 0D 0A 09 20 63 61 6C 6C 20 69 6E 76 5F 5F 69 0D ... call inv__i.
000010: 0A 09 20 6C 64 20 6C 2C 28 69 78 2B 32 29 3A 20 .. ld l,(ix+2):
000020: 6C 64 20 68 2C 28 69 78 2B 33 29 3A 20 61 64 64 ld h,(ix+3): add
000030: 20 68 6C 2C 68 6C 0D 0A 09 20 6C 64 20 64 65 2C hl,hl... ld de,
000040: 33 39 32 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 392: add hl,de..
000050: 09 20 70 75 73 68 20 68 6C 0D 0A 09 20 20 6C 64 . push hl... ld
000060: 20 65 2C 28 69 78 2B 30 29 3A 20 6C 64 20 64 2C e,(ix+0): ld d,
000070: 28 69 78 2B 31 29 3A 20 6F 72 20 61 0D 0A 09 20 (ix+1): or a...
000080: 20 6C 64 20 68 6C 2C 31 39 30 3A 20 73 62 63 20 ld hl,190: sbc
000090: 68 6C 2C 64 65 3A 20 73 62 63 20 68 6C 2C 64 65 hl,de: sbc hl,de
0000A0: 0D 0A 09 20 70 6F 70 20 64 65 3A 20 63 61 6C 6C ... pop de: call
0000B0: 20 26 42 42 45 41 0D 0A 09 20 6C 64 20 64 65 2C &BBEA... ld de,
0000C0: 31 3A 20 6C 64 20 68 6C 2C 30 3A 20 63 61 6C 6C 1: ld hl,0: call
0000D0: 20 26 42 42 45 44 0D 0A 0D 0A 2E 70 6C 6F 74 5F &BBED.....plot_
0000E0: 30 09 20 6C 64 20 6C 2C 28 69 78 2B 32 29 3A 20 0. ld l,(ix+2):
0000F0: 6C 64 20 68 2C 28 69 78 2B 33 29 3A 20 64 65 63 ld h,(ix+3): dec
000100: 20 68 6C 0D 0A 09 20 6C 64 20 28 69 78 2B 32 29 hl... ld (ix+2)
000110: 2C 6C 3A 20 6C 64 20 28 69 78 2B 33 29 2C 68 3A ,l: ld (ix+3),h:
000120: 20 6C 64 20 61 2C 68 3A 20 61 6E 64 20 6C 0D 0A ld a,h: and l..
000130: 09 20 63 70 20 26 46 46 3A 20 6A 70 20 6E 7A 2C . cp &FF: jp nz,
000140: 70 6C 6F 74 5F 6C 0D 0A 09 70 6F 70 20 68 6C 0D plot_l...pop hl.
000150: 0A 09 6C 64 20 28 69 78 2B 32 29 2C 6C 3A 20 6C ..ld (ix+2),l: l
000160: 64 20 28 69 78 2B 33 29 2C 68 0D 0A 09 6C 64 20 d (ix+3),h...ld
000170: 6C 2C 28 69 78 2B 30 29 3A 20 6C 64 20 68 2C 28 l,(ix+0): ld h,(
000180: 69 78 2B 31 29 3A 20 64 65 63 20 68 6C 0D 0A 09 ix+1): dec hl...
000190: 6C 64 20 28 69 78 2B 30 29 2C 6C 3A 20 6C 64 20 ld (ix+0),l: ld
0001A0: 28 69 78 2B 31 29 2C 68 3A 20 6C 64 20 61 2C 68 (ix+1),h: ld a,h
0001B0: 3A 20 61 6E 64 20 6C 0D 0A 09 63 70 20 26 46 46 : and l...cp &FF
0001C0: 3A 20 6A 70 20 6E 7A 2C 70 6C 6F 74 5F 69 0D 0A : jp nz,plot_i..
0001D0: 09 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C 53 .ret.....;*** |S
0001E0: 45 54 2C 63 68 61 72 2C 78 2C 79 2C 6E 25 0D 0A ET,char,x,y,n%..
0001F0: 0D 0A 2E 73 65 74 5F 5F 69 09 63 61 6C 6C 20 63 ...set__i.call c
Size : 512 (Real : 512)
000000: 0A 2E 72 6C 69 5F 6F 6C 09 6C 64 20 64 2C 30 0D ..rli_ol.ld d,0.
000010: 0A 2E 72 6C 69 5F 6C 31 09 70 75 73 68 20 62 63 ..rli_l1.push bc
000020: 3A 20 63 61 6C 6C 20 67 62 62 79 74 65 3A 20 70 : call gbbyte: p
000030: 6F 70 20 62 63 0D 0A 09 6C 64 20 28 69 79 29 2C op bc...ld (iy),
000040: 61 3A 20 69 6E 63 20 69 79 3A 20 69 6E 63 20 68 a: inc iy: inc h
000050: 6C 0D 0A 09 69 6E 63 20 64 3A 20 6C 64 20 61 2C l...inc d: ld a,
000060: 64 3A 20 63 70 20 65 3A 20 6A 72 20 6E 7A 2C 72 d: cp e: jr nz,r
000070: 6C 69 5F 6C 31 0D 0A 2E 72 6C 69 5F 6C 32 09 6C li_l1...rli_l2.l
000080: 64 20 28 69 79 29 2C 30 3A 20 69 6E 63 20 69 79 d (iy),0: inc iy
000090: 0D 0A 09 69 6E 63 20 64 3A 20 6C 64 20 61 2C 64 ...inc d: ld a,d
0000A0: 3A 20 63 70 20 28 69 78 2B 32 29 3A 20 6A 72 20 : cp (ix+2): jr
0000B0: 6E 7A 2C 72 6C 69 5F 6C 32 0D 0A 09 64 65 63 20 nz,rli_l2...dec
0000C0: 63 3A 20 6A 72 20 6E 7A 2C 72 6C 69 5F 6F 6C 0D c: jr nz,rli_ol.
0000D0: 0A 09 6A 70 20 63 6F 70 79 5F 65 0D 0A 0D 0A 09 ..jp copy_e.....
0000E0: 3B 2A 2A 2A 20 7C 53 41 56 45 0D 0A 09 3B 20 20 ;*** |SAVE...;
0000F0: 20 20 66 69 6C 65 20 6D 75 73 74 20 61 6C 72 65 file must alre
000100: 61 64 79 20 62 65 20 6F 70 65 6E 0D 0A 0D 0A 2E ady be open.....
000110: 73 61 76 65 5F 69 09 70 75 73 68 20 69 78 3A 20 save_i.push ix:
000120: 70 6F 70 20 69 79 0D 0A 0D 0A 09 6C 64 20 68 6C pop iy.....ld hl
000130: 2C 66 69 6C 65 69 64 3A 20 6C 64 20 62 2C 31 30 ,fileid: ld b,10
000140: 0D 0A 2E 73 63 68 6B 6C 70 09 6C 64 20 61 2C 28 ...schklp.ld a,(
000150: 68 6C 29 3A 20 63 61 6C 6C 20 26 42 43 39 35 0D hl): call &BC95.
000160: 0A 09 69 6E 63 20 68 6C 3A 20 64 6A 6E 7A 20 73 ..inc hl: djnz s
000170: 63 68 6B 6C 70 0D 0A 0D 0A 09 6C 64 20 61 2C 28 chklp.....ld a,(
000180: 68 65 69 67 68 74 29 3A 20 63 61 6C 6C 20 26 42 height): call &B
000190: 43 39 35 0D 0A 09 6C 64 20 61 2C 28 6C 61 73 74 C95...ld a,(last
0001A0: 6C 66 29 3A 20 63 61 6C 6C 20 26 42 43 39 35 0D lf): call &BC95.
0001B0: 0A 0D 0A 09 6C 64 20 62 2C 33 32 0D 0A 2E 73 74 ....ld b,32...st
0001C0: 72 73 6C 70 09 70 75 73 68 20 62 63 0D 0A 09 20 rslp.push bc...
0001D0: 6C 64 20 61 2C 62 3A 20 63 61 6C 6C 20 73 74 61 ld a,b: call sta
0001E0: 64 64 72 09 09 09 3B 66 69 6E 64 20 73 74 61 72 ddr...;find star
0001F0: 74 20 61 64 64 72 65 73 73 0D 0A 09 20 63 61 6C t address... cal
Size : 512 (Real : 512)
000000: 61 6C 63 78 79 3A 20 6C 64 20 63 2C 61 0D 0A 09 alcxy: ld c,a...
000010: 6C 64 20 61 2C 28 69 78 29 3A 20 6F 72 20 61 3A ld a,(ix): or a:
000020: 20 6A 72 20 6E 7A 2C 73 65 74 31 0D 0A 09 6C 64 jr nz,set1...ld
000030: 20 61 2C 64 3A 20 63 70 6C 3A 20 61 6E 64 20 63 a,d: cpl: and c
000040: 3A 20 6A 70 20 70 62 62 79 74 65 0D 0A 2E 73 65 : jp pbbyte...se
000050: 74 31 09 6C 64 20 61 2C 64 3A 20 20 20 20 20 20 t1.ld a,d:
000060: 6F 72 20 20 63 3A 20 6A 70 20 70 62 62 79 74 65 or c: jp pbbyte
000070: 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C 47 45 54 2C 63 .....;*** |GET,c
000080: 68 61 72 2C 78 2C 79 2C 40 6E 25 0D 0A 0D 0A 2E har,x,y,@n%.....
000090: 67 65 74 5F 5F 69 09 63 61 6C 6C 20 63 61 6C 63 get__i.call calc
0000A0: 78 79 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 xy...ld l,(ix):
0000B0: 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A 09 61 6E ld h,(ix+1)...an
0000C0: 64 20 64 3A 20 6A 72 20 7A 2C 70 69 78 65 6C 30 d d: jr z,pixel0
0000D0: 0D 0A 09 6C 64 20 28 68 6C 29 2C 31 3A 20 69 6E ...ld (hl),1: in
0000E0: 63 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 3A c hl: ld (hl),0:
0000F0: 20 72 65 74 09 3B 50 75 74 20 69 6E 74 6F 20 76 ret.;Put into v
000100: 61 72 69 61 62 6C 65 0D 0A 2E 70 69 78 65 6C 30 ariable...pixel0
000110: 09 6C 64 20 28 68 6C 29 2C 30 3A 20 69 6E 63 20 .ld (hl),0: inc
000120: 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 3A 20 72 hl: ld (hl),0: r
000130: 65 74 0D 0A 0D 0A 09 3B 2B 2B 2B 20 53 75 62 72 et.....;+++ Subr
000140: 6F 75 74 69 6E 65 20 74 6F 20 63 61 6C 63 75 6C outine to calcul
000150: 61 74 65 20 78 79 70 6F 73 20 28 72 65 74 75 72 ate xypos (retur
000160: 6E 73 20 61 64 64 72 20 48 4C 2C 20 76 61 6C 75 ns addr HL, valu
000170: 65 20 41 2C 20 6D 61 73 6B 20 44 29 0D 0A 0D 0A e A, mask D)....
000180: 2E 63 61 6C 63 78 79 09 6C 64 20 61 2C 28 69 78 .calcxy.ld a,(ix
000190: 2B 36 29 0D 0A 09 63 61 6C 6C 20 73 74 61 64 64 +6)...call stadd
0001A0: 72 3A 20 63 61 6C 6C 20 67 62 62 79 74 65 0D 0A r: call gbbyte..
0001B0: 09 6C 64 20 65 2C 61 3A 20 6C 64 20 64 2C 30 0D .ld e,a: ld d,0.
0001C0: 0A 09 69 6E 63 20 68 6C 3A 20 6C 64 20 61 2C 28 ..inc hl: ld a,(
0001D0: 69 78 2B 32 29 0D 0A 0D 0A 2E 67 65 74 69 79 6C ix+2).....getiyl
0001E0: 09 63 70 20 37 3A 20 6A 72 20 63 2C 67 65 74 69 .cp 7: jr c,geti
0001F0: 73 63 09 09 3B 46 69 6E 64 20 73 74 61 72 74 20 sc..;Find start
Size : 512 (Real : 512)
000000: 6C 20 67 62 62 79 74 65 3A 20 6C 64 20 64 2C 61 l gbbyte: ld d,a
000010: 3A 20 63 61 6C 6C 20 26 42 43 39 35 09 3B 63 6F : call &BC95.;co
000020: 70 79 20 22 77 69 64 74 68 22 20 62 79 74 65 0D py "width" byte.
000030: 0A 0D 0A 09 20 6C 64 20 61 2C 28 68 65 69 67 68 .... ld a,(heigh
000040: 74 29 3A 20 6C 64 20 62 2C 61 0D 0A 2E 73 74 6F t): ld b,a...sto
000050: 73 6C 70 09 20 6C 64 20 63 2C 64 0D 0A 2E 73 74 slp. ld c,d...st
000060: 62 73 6C 70 09 20 69 6E 63 20 68 6C 09 09 09 09 bslp. inc hl....
000070: 09 3B 63 6F 70 79 20 65 61 63 68 20 63 68 61 72 .;copy each char
000080: 61 63 74 65 72 0D 0A 09 20 70 75 73 68 20 62 63 acter... push bc
000090: 0D 0A 09 20 20 63 61 6C 6C 20 67 62 62 79 74 65 ... call gbbyte
0000A0: 3A 20 63 61 6C 6C 20 26 42 43 39 35 0D 0A 09 20 : call &BC95...
0000B0: 70 6F 70 20 62 63 0D 0A 09 20 64 65 63 20 63 3A pop bc... dec c:
0000C0: 20 6A 72 20 6E 7A 2C 73 74 62 73 6C 70 0D 0A 09 jr nz,stbslp...
0000D0: 20 64 6A 6E 7A 20 73 74 6F 73 6C 70 0D 0A 09 70 djnz stoslp...p
0000E0: 6F 70 20 62 63 0D 0A 09 69 6E 63 20 62 3A 20 6C op bc...inc b: l
0000F0: 64 20 61 2C 31 32 33 09 09 09 09 3B 72 65 70 65 d a,123....;repe
000100: 61 74 20 75 6E 74 69 6C 20 66 69 6E 69 73 68 65 at until finishe
000110: 64 2E 2E 2E 21 0D 0A 09 63 70 20 62 3A 20 6A 72 d...!...cp b: jr
000120: 20 6E 7A 2C 73 74 72 73 6C 70 0D 0A 0D 0A 09 63 nz,strslp.....c
000130: 61 6C 6C 20 26 42 43 38 46 09 09 09 09 3B 63 6C all &BC8F....;cl
000140: 6F 73 65 20 6F 75 74 70 75 74 20 66 69 6C 65 0D ose output file.
000150: 0A 09 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C ..ret.....;*** |
000160: 4C 4F 41 44 2C 40 68 65 69 67 68 74 0D 0A 09 3B LOAD,@height...;
000170: 20 20 20 20 66 69 6C 65 20 6D 75 73 74 20 61 6C file must al
000180: 72 65 61 64 79 20 62 65 20 6F 70 65 6E 0D 0A 0D ready be open...
000190: 0A 2E 6C 6F 61 64 5F 69 09 70 75 73 68 20 69 78 ..load_i.push ix
0001A0: 3A 20 70 6F 70 20 69 79 0D 0A 0D 0A 09 6C 64 20 : pop iy.....ld
0001B0: 63 2C 32 35 35 3A 20 6C 64 20 62 2C 31 30 0D 0A c,255: ld b,10..
0001C0: 2E 63 68 6B 6C 70 09 63 61 6C 6C 20 26 42 43 38 .chklp.call &BC8
0001D0: 30 0D 0A 09 78 6F 72 20 63 3A 20 6C 64 20 63 2C 0...xor c: ld c,
0001E0: 61 0D 0A 09 64 6A 6E 7A 20 63 68 6B 6C 70 0D 0A a...djnz chklp..
0001F0: 0D 0A 09 6C 64 20 61 2C 63 3A 20 6C 64 20 63 2C ...ld a,c: ld c,
Size : 512 (Real : 512)
000000: 61 64 64 72 65 73 73 20 28 79 29 0D 0A 09 73 75 address (y)...su
000010: 62 20 37 3A 20 61 64 64 20 68 6C 2C 64 65 3A 20 b 7: add hl,de:
000020: 6A 72 20 67 65 74 69 79 6C 0D 0A 0D 0A 2E 67 65 jr getiyl.....ge
000030: 74 69 73 63 09 6C 64 20 65 2C 28 69 78 2B 34 29 tisc.ld e,(ix+4)
000040: 3A 20 6C 64 20 64 2C 28 69 78 2B 35 29 09 3B 46 : ld d,(ix+5).;F
000050: 69 6E 64 20 73 74 61 72 74 20 61 64 64 72 65 73 ind start addres
000060: 73 20 28 79 2B 78 29 0D 0A 09 61 64 64 20 68 6C s (y+x)...add hl
000070: 2C 64 65 0D 0A 09 6C 64 20 64 2C 36 34 09 09 09 ,de...ld d,64...
000080: 09 3B 43 61 6C 63 75 6C 61 74 65 20 62 69 74 77 .;Calculate bitw
000090: 69 73 65 20 76 61 6C 75 65 0D 0A 2E 63 6C 63 62 ise value...clcb
0000A0: 69 74 09 6F 72 20 61 3A 20 6A 72 20 7A 2C 67 6F it.or a: jr z,go
0000B0: 74 62 69 74 0D 0A 09 72 72 63 20 64 3A 20 64 65 tbit...rrc d: de
0000C0: 63 20 61 3A 20 6A 72 20 63 6C 63 62 69 74 0D 0A c a: jr clcbit..
0000D0: 0D 0A 2E 67 6F 74 62 69 74 09 6A 70 20 67 62 62 ...gotbit.jp gbb
0000E0: 79 74 65 09 09 09 3B 47 65 74 20 62 79 74 65 0D yte...;Get byte.
0000F0: 0A 0D 0A 09 3B 2A 2A 2A 20 7C 52 53 58 4F 46 46 ....;*** |RSXOFF
000100: 0D 0A 0D 0A 2E 72 73 78 6F 5F 69 09 6C 64 20 68 .....rsxo_i.ld h
000110: 6C 2C 28 26 42 43 44 32 29 3A 20 72 65 73 20 37 l,(&BCD2): res 7
000120: 2C 68 0D 0A 09 63 61 6C 6C 20 26 42 39 30 36 09 ,h...call &B906.
000130: 09 09 3B 6C 6F 77 65 72 20 52 4F 4D 20 6F 6E 0D ..;lower ROM on.
000140: 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 20 68 6C ..inc hl: inc hl
000150: 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 65 2C : inc hl...ld e,
000160: 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C (hl): inc hl...l
000170: 64 20 64 2C 28 68 6C 29 3A 20 70 75 73 68 20 64 d d,(hl): push d
000180: 65 3A 20 65 78 20 64 65 2C 68 6C 09 3B 48 4C 3D e: ex de,hl.;HL=
000190: 77 6F 72 6B 73 70 61 63 65 20 70 6F 69 6E 74 65 workspace pointe
0001A0: 72 0D 0A 09 20 6C 64 20 65 2C 28 68 6C 29 3A 20 r... ld e,(hl):
0001B0: 69 6E 63 20 68 6C 0D 0A 09 20 6C 64 20 64 2C 28 inc hl... ld d,(
0001C0: 68 6C 29 3A 20 65 78 20 64 65 2C 68 6C 09 09 3B hl): ex de,hl..;
0001D0: 48 4C 3D 61 64 64 72 65 73 73 20 6F 66 20 52 53 HL=address of RS
0001E0: 58 20 77 6F 72 6B 73 70 61 63 65 0D 0A 09 20 6C X workspace... l
0001F0: 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C d e,(hl): inc hl
Size : 512 (Real : 512)
000000: 31 0D 0A 09 63 70 20 32 34 30 3A 20 6A 70 20 6E 1...cp 240: jp n
000010: 7A 2C 6C 64 65 72 72 0D 0A 0D 0A 09 63 61 6C 6C z,lderr.....call
000020: 20 26 42 43 38 30 3A 20 6C 64 20 28 68 65 69 67 &BC80: ld (heig
000030: 68 74 29 2C 61 0D 0A 09 63 61 6C 6C 20 26 42 43 ht),a...call &BC
000040: 38 30 3A 20 6C 64 20 28 6C 61 73 74 6C 66 29 2C 80: ld (lastlf),
000050: 61 0D 0A 0D 0A 09 6C 64 20 62 2C 33 32 0D 0A 0D a.....ld b,32...
000060: 0A 2E 73 74 72 5F 6C 70 09 70 75 73 68 20 62 63 ..str_lp.push bc
000070: 0D 0A 09 20 6C 64 20 61 2C 62 3A 20 63 61 6C 6C ... ld a,b: call
000080: 20 73 74 61 64 64 72 09 09 3B 66 69 6E 64 20 73 staddr..;find s
000090: 74 61 72 74 20 61 64 64 72 65 73 73 0D 0A 09 20 tart address...
0000A0: 63 61 6C 6C 20 26 42 43 38 30 3A 20 63 61 6C 6C call &BC80: call
0000B0: 20 70 62 62 79 74 65 09 3B 70 75 74 20 62 79 74 pbbyte.;put byt
0000C0: 65 0D 0A 09 20 6C 64 20 64 2C 61 0D 0A 0D 0A 09 e... ld d,a.....
0000D0: 20 6C 64 20 61 2C 28 68 65 69 67 68 74 29 3A 20 ld a,(height):
0000E0: 6C 64 20 62 2C 61 0D 0A 2E 73 74 6F 5F 6C 70 09 ld b,a...sto_lp.
0000F0: 20 6C 64 20 63 2C 64 0D 0A 2E 73 74 62 5F 6C 70 ld c,d...stb_lp
000100: 09 20 69 6E 63 20 68 6C 0D 0A 09 20 70 75 73 68 . inc hl... push
000110: 20 62 63 3A 20 63 61 6C 6C 20 26 42 43 38 30 3A bc: call &BC80:
000120: 20 63 61 6C 6C 20 70 62 62 79 74 65 3A 20 70 6F call pbbyte: po
000130: 70 20 62 63 0D 0A 09 20 64 65 63 20 63 3A 20 6A p bc... dec c: j
000140: 72 20 6E 7A 2C 73 74 62 5F 6C 70 0D 0A 09 20 64 r nz,stb_lp... d
000150: 6A 6E 7A 20 73 74 6F 5F 6C 70 0D 0A 0D 0A 09 70 jnz sto_lp.....p
000160: 6F 70 20 62 63 0D 0A 09 69 6E 63 20 62 3A 20 6C op bc...inc b: l
000170: 64 20 61 2C 31 32 33 0D 0A 09 63 70 20 62 20 3A d a,123...cp b :
000180: 20 6A 72 20 6E 7A 2C 73 74 72 5F 6C 70 0D 0A 09 jr nz,str_lp...
000190: 63 61 6C 6C 20 26 42 43 37 41 09 09 09 3B 63 6C call &BC7A...;cl
0001A0: 6F 73 65 20 69 6E 70 75 74 20 66 69 6C 65 0D 0A ose input file..
0001B0: 0D 0A 09 6C 64 20 68 6C 2C 30 3A 20 6C 64 20 61 ...ld hl,0: ld a
0001C0: 2C 28 68 65 69 67 68 74 29 09 09 3B 63 61 6C 63 ,(height)..;calc
0001D0: 75 6C 61 74 65 20 68 65 69 67 68 74 0D 0A 09 64 ulate height...d
0001E0: 65 63 20 61 20 20 3A 20 6A 72 20 7A 2C 6C 61 73 ec a : jr z,las
0001F0: 74 68 74 0D 0A 09 6C 64 20 65 2C 61 20 3A 20 6C tht...ld e,a : l
Size : 512 (Real : 512)
000000: 4E 45 57 2C 68 65 69 67 68 74 2C 6C 61 73 74 6C NEW,height,lastl
000010: 66 2C 63 68 61 72 0D 0A 0D 0A 2E 6E 65 77 5F 5F f,char.....new__
000020: 69 09 6C 64 20 61 2C 28 69 78 2B 34 29 20 3A 20 i.ld a,(ix+4) :
000030: 6C 64 20 28 68 65 69 67 68 74 29 2C 61 0D 0A 09 ld (height),a...
000040: 6C 64 20 61 2C 28 69 78 2B 32 29 20 3A 20 6C 64 ld a,(ix+2) : ld
000050: 20 28 6C 61 73 74 6C 66 29 2C 61 0D 0A 09 6C 64 (lastlf),a...ld
000060: 20 68 6C 2C 62 75 66 66 65 72 3A 20 6C 64 20 64 hl,buffer: ld d
000070: 65 2C 62 75 66 66 65 72 2B 31 0D 0A 09 6C 64 20 e,buffer+1...ld
000080: 62 63 2C 35 31 31 20 20 20 3A 20 6C 64 20 28 68 bc,511 : ld (h
000090: 6C 29 2C 30 3A 20 6C 64 69 72 0D 0A 09 6C 64 20 l),0: ldir...ld
0000A0: 68 6C 2C 62 75 66 66 65 72 3A 20 6C 64 20 28 68 hl,buffer: ld (h
0000B0: 6C 29 2C 34 0D 0A 09 6A 72 20 63 6F 70 79 5F 65 l),4...jr copy_e
0000C0: 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C 43 4F 50 59 2C .....;*** |COPY,
0000D0: 66 72 6F 6D 2C 74 6F 0D 0A 0D 0A 2E 63 6F 70 79 from,to.....copy
0000E0: 5F 69 09 6C 64 20 61 2C 28 69 78 2B 32 29 3A 20 _i.ld a,(ix+2):
0000F0: 63 61 6C 6C 20 73 74 61 64 64 72 0D 0A 09 6C 64 call staddr...ld
000100: 20 61 2C 68 3A 20 72 6C 63 61 3A 20 72 6C 63 61 a,h: rlca: rlca
000110: 3A 20 61 6E 64 20 33 3A 20 61 64 64 20 26 43 34 : and 3: add &C4
000120: 0D 0A 09 6C 64 20 62 2C 26 37 46 3A 20 6F 75 74 ...ld b,&7F: out
000130: 20 28 63 29 2C 61 3A 20 72 65 73 20 37 2C 68 3A (c),a: res 7,h:
000140: 20 73 65 74 20 36 2C 68 0D 0A 09 6C 64 20 64 65 set 6,h...ld de
000150: 2C 62 75 66 66 65 72 3A 20 6C 64 20 62 63 2C 35 ,buffer: ld bc,5
000160: 31 32 3A 20 6C 64 69 72 0D 0A 0D 0A 2E 63 6F 70 12: ldir.....cop
000170: 79 5F 65 09 6C 64 20 61 2C 28 69 78 2B 30 29 3A y_e.ld a,(ix+0):
000180: 20 63 61 6C 6C 20 73 74 61 64 64 72 0D 0A 09 6C call staddr...l
000190: 64 20 61 2C 68 3A 20 72 6C 63 61 3A 20 72 6C 63 d a,h: rlca: rlc
0001A0: 61 3A 20 61 6E 64 20 33 3A 20 61 64 64 20 26 43 a: and 3: add &C
0001B0: 34 0D 0A 09 6C 64 20 62 2C 26 37 46 3A 20 6F 75 4...ld b,&7F: ou
0001C0: 74 20 28 63 29 2C 61 3A 20 72 65 73 20 37 2C 68 t (c),a: res 7,h
0001D0: 3A 20 73 65 74 20 36 2C 68 0D 0A 09 65 78 20 64 : set 6,h...ex d
0001E0: 65 2C 68 6C 3A 20 6C 64 20 68 6C 2C 62 75 66 66 e,hl: ld hl,buff
0001F0: 65 72 3A 20 6C 64 20 62 63 2C 35 31 32 3A 20 6C er: ld bc,512: l
Size : 512 (Real : 512)
000000: 64 20 64 2C 30 0D 0A 09 6C 64 20 62 2C 37 0D 0A d d,0...ld b,7..
000010: 2E 6D 75 6C 74 5F 6C 09 61 64 64 20 68 6C 2C 64 .mult_l.add hl,d
000020: 65 0D 0A 09 64 6A 6E 7A 20 6D 75 6C 74 5F 6C 0D e...djnz mult_l.
000030: 0A 0D 0A 2E 6C 61 73 74 68 74 09 6C 64 20 61 2C ....lastht.ld a,
000040: 28 6C 61 73 74 6C 66 29 0D 0A 09 6C 64 20 65 2C (lastlf)...ld e,
000050: 61 3A 20 6C 64 20 64 2C 30 3A 20 61 64 64 20 68 a: ld d,0: add h
000060: 6C 2C 64 65 0D 0A 09 65 78 20 64 65 2C 68 6C 0D l,de...ex de,hl.
000070: 0A 09 6C 64 20 6C 2C 28 69 79 29 3A 20 6C 64 20 ..ld l,(iy): ld
000080: 68 2C 28 69 79 2B 31 29 09 09 3B 70 6C 61 63 65 h,(iy+1)..;place
000090: 20 69 6E 20 76 61 72 69 61 62 6C 65 0D 0A 09 6C in variable...l
0000A0: 64 20 28 68 6C 29 2C 65 3A 20 69 6E 63 20 68 6C d (hl),e: inc hl
0000B0: 0D 0A 09 6C 64 20 28 68 6C 29 2C 64 3A 20 72 65 ...ld (hl),d: re
0000C0: 74 0D 0A 0D 0A 2E 6C 64 65 72 72 09 63 61 6C 6C t.....lderr.call
0000D0: 20 26 42 43 37 44 3A 20 72 65 74 0D 0A 0D 0A 09 &BC7D: ret.....
0000E0: 3B 2A 2A 2A 20 7C 57 49 44 54 48 2C 63 68 61 72 ;*** |WIDTH,char
0000F0: 2C 40 6E 25 0D 0A 0D 0A 2E 77 69 64 74 5F 69 09 ,@n%.....widt_i.
000100: 6C 64 20 61 2C 28 69 78 2B 32 29 0D 0A 09 63 61 ld a,(ix+2)...ca
000110: 6C 6C 20 73 74 61 64 64 72 3A 20 63 61 6C 6C 20 ll staddr: call
000120: 67 62 62 79 74 65 0D 0A 09 6C 64 20 6C 2C 28 69 gbbyte...ld l,(i
000130: 78 2B 30 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 x+0): ld h,(ix+1
000140: 29 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 20 20 3A )...ld (hl),a :
000150: 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 28 68 6C inc hl...ld (hl
000160: 29 2C 30 20 20 3A 20 72 65 74 0D 0A 0D 0A 09 3B ),0 : ret.....;
000170: 2A 2A 2A 20 7C 50 4C 4F 54 2C 63 68 61 72 2C 78 *** |PLOT,char,x
000180: 2C 79 0D 0A 0D 0A 2E 70 6C 6F 74 5F 69 09 6C 64 ,y.....plot_i.ld
000190: 20 6C 2C 28 69 78 2B 32 29 3A 20 6C 64 20 68 2C l,(ix+2): ld h,
0001A0: 28 69 78 2B 33 29 0D 0A 09 70 75 73 68 20 68 6C (ix+3)...push hl
0001B0: 0D 0A 2E 70 6C 6F 74 5F 6C 09 20 64 65 63 20 69 ...plot_l. dec i
0001C0: 78 3A 20 64 65 63 20 69 78 3A 20 63 61 6C 6C 20 x: dec ix: call
0001D0: 63 61 6C 63 78 79 0D 0A 09 20 69 6E 63 20 69 78 calcxy... inc ix
0001E0: 3A 20 69 6E 63 20 69 78 0D 0A 09 20 61 6E 64 20 : inc ix... and
0001F0: 64 3A 20 6A 72 20 7A 2C 70 6C 6F 74 5F 30 0D 0A d: jr z,plot_0..
Size : 512 (Real : 512)
000000: 64 69 72 0D 0A 0D 0A 09 6C 64 20 62 63 2C 26 37 dir.....ld bc,&7
000010: 46 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 3A 20 FC0: out (c),c:
000020: 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 7C 52 45 ret.....;*** |RE
000030: 44 4F 2C 77 69 64 74 68 2C 63 68 61 72 61 63 74 DO,width,charact
000040: 65 72 0D 0A 0D 0A 2E 72 65 64 6F 5F 69 09 6C 64 er.....redo_i.ld
000050: 20 69 79 2C 62 75 66 66 65 72 3A 20 6C 64 20 61 iy,buffer: ld a
000060: 2C 28 69 78 2B 32 29 0D 0A 09 6C 64 20 28 69 79 ,(ix+2)...ld (iy
000070: 29 2C 61 3A 20 69 6E 63 20 69 79 0D 0A 0D 0A 09 ),a: inc iy.....
000080: 6C 64 20 61 2C 28 69 78 2B 30 29 3A 20 63 61 6C ld a,(ix+0): cal
000090: 6C 20 73 74 61 64 64 72 0D 0A 09 63 61 6C 6C 20 l staddr...call
0000A0: 67 62 62 79 74 65 3A 20 69 6E 63 20 68 6C 0D 0A gbbyte: inc hl..
0000B0: 09 63 70 20 28 69 78 2B 32 29 3A 20 72 65 74 20 .cp (ix+2): ret
0000C0: 7A 09 09 3B 52 65 74 75 72 6E 20 69 66 20 77 69 z..;Return if wi
0000D0: 64 74 68 20 74 68 65 20 73 61 6D 65 0D 0A 09 6A dth the same...j
0000E0: 72 20 63 2C 6C 61 72 67 65 72 0D 0A 0D 0A 09 6C r c,larger.....l
0000F0: 64 20 62 63 2C 28 68 65 69 67 68 74 29 09 09 09 d bc,(height)...
000100: 3B 4E 65 77 20 6F 6E 65 20 73 6D 61 6C 6C 65 72 ;New one smaller
000110: 0D 0A 09 6C 64 20 65 2C 61 3A 20 6C 64 20 64 2C ...ld e,a: ld d,
000120: 30 0D 0A 2E 72 73 69 5F 6F 6C 09 70 75 73 68 20 0...rsi_ol.push
000130: 68 6C 0D 0A 09 20 6C 64 20 62 2C 28 69 78 2B 32 hl... ld b,(ix+2
000140: 29 0D 0A 2E 72 73 69 5F 6C 70 09 20 70 75 73 68 )...rsi_lp. push
000150: 20 62 63 3A 20 63 61 6C 6C 20 67 62 62 79 74 65 bc: call gbbyte
000160: 3A 20 70 6F 70 20 62 63 0D 0A 09 20 6C 64 20 28 : pop bc... ld (
000170: 69 79 29 2C 61 3A 20 69 6E 63 20 69 79 3A 20 69 iy),a: inc iy: i
000180: 6E 63 20 68 6C 0D 0A 09 20 64 6A 6E 7A 20 72 73 nc hl... djnz rs
000190: 69 5F 6C 70 0D 0A 09 70 6F 70 20 68 6C 3A 20 61 i_lp...pop hl: a
0001A0: 64 64 20 68 6C 2C 64 65 0D 0A 09 64 65 63 20 63 dd hl,de...dec c
0001B0: 3A 20 6A 72 20 6E 7A 2C 72 73 69 5F 6F 6C 0D 0A : jr nz,rsi_ol..
0001C0: 09 6A 70 20 63 6F 70 79 5F 65 0D 0A 0D 0A 2E 6C .jp copy_e.....l
0001D0: 61 72 67 65 72 09 6C 64 20 62 63 2C 28 68 65 69 arger.ld bc,(hei
0001E0: 67 68 74 29 09 09 09 3B 4E 65 77 20 6F 6E 65 20 ght)...;New one
0001F0: 6C 61 72 67 65 72 0D 0A 09 6C 64 20 65 2C 61 0D larger...ld e,a.
Size : 512 (Real : 512)
000000: 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 70 6F ...ld d,(hl): po
000010: 70 20 69 78 09 09 3B 44 45 3D 61 64 64 72 65 73 p ix..;DE=addres
000020: 73 20 6F 66 20 6E 65 78 74 20 52 53 58 20 77 6F s of next RSX wo
000030: 72 6B 73 70 61 63 65 0D 0A 09 6C 64 20 28 69 78 rkspace...ld (ix
000040: 29 2C 65 3A 20 6C 64 20 28 69 78 2B 31 29 2C 64 ),e: ld (ix+1),d
000050: 09 09 3B 75 70 64 61 74 65 20 77 6F 72 6B 73 70 ..;update worksp
000060: 61 63 65 20 70 6F 69 6E 74 65 72 0D 0A 09 63 61 ace pointer...ca
000070: 6C 6C 20 26 42 39 30 43 09 09 09 3B 72 65 73 74 ll &B90C...;rest
000080: 6F 72 65 20 52 4F 4D 20 73 74 61 74 65 0D 0A 09 ore ROM state...
000090: 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 53 75 62 ret.....;*** Sub
0000A0: 72 6F 75 74 69 6E 65 73 0D 0A 0D 0A 09 3B 2B 2B routines.....;++
0000B0: 2B 20 47 65 74 20 62 79 74 65 20 66 72 6F 6D 20 + Get byte from
0000C0: 48 4C 20 69 6E 20 73 65 63 6F 6E 64 20 36 34 6B HL in second 64k
0000D0: 20 28 63 6F 72 72 75 70 74 73 20 42 43 29 0D 0A (corrupts BC)..
0000E0: 0D 0A 2E 67 62 62 79 74 65 09 70 75 73 68 20 68 ...gbbyte.push h
0000F0: 6C 0D 0A 0D 0A 09 20 6C 64 20 61 2C 68 0D 0A 09 l..... ld a,h...
000100: 20 72 6C 63 61 3A 20 72 6C 63 61 0D 0A 09 20 61 rlca: rlca... a
000110: 6E 64 20 33 3A 20 61 64 64 20 26 43 34 0D 0A 0D nd 3: add &C4...
000120: 0A 09 20 6C 64 20 62 2C 26 37 46 0D 0A 09 20 6F .. ld b,&7F... o
000130: 75 74 20 28 63 29 2C 61 0D 0A 0D 0A 09 20 72 65 ut (c),a..... re
000140: 73 20 37 2C 68 3A 20 73 65 74 20 36 2C 68 0D 0A s 7,h: set 6,h..
000150: 09 20 6C 64 20 61 2C 28 68 6C 29 0D 0A 0D 0A 09 . ld a,(hl).....
000160: 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 62 63 2C 26 pop hl...ld bc,&
000170: 37 46 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D 7FC0: out (c),c.
000180: 0A 09 72 65 74 0D 0A 0D 0A 09 3B 2B 2B 2B 20 50 ..ret.....;+++ P
000190: 75 74 20 62 79 74 65 20 74 6F 20 48 4C 20 69 6E ut byte to HL in
0001A0: 20 73 65 63 6F 6E 64 20 36 34 6B 20 28 63 6F 72 second 64k (cor
0001B0: 72 75 70 74 73 20 42 43 29 0D 0A 0D 0A 2E 70 62 rupts BC).....pb
0001C0: 62 79 74 65 09 70 75 73 68 20 68 6C 3A 20 70 75 byte.push hl: pu
0001D0: 73 68 20 61 66 0D 0A 09 20 6C 64 20 61 2C 68 0D sh af... ld a,h.
0001E0: 0A 09 20 72 6C 63 61 3A 20 72 6C 63 61 0D 0A 09 .. rlca: rlca...
0001F0: 20 61 6E 64 20 33 3A 20 61 64 64 20 26 43 34 0D and 3: add &C4.
Size : 512 (Real : 512)
000000: 33 3A 20 6A 70 20 7A 2C 6D 72 69 67 68 74 0D 0A 3: jp z,mright..
000010: 09 63 70 20 32 34 34 3A 20 6A 70 20 7A 2C 6C 75 .cp 244: jp z,lu
000020: 70 0D 0A 09 63 70 20 32 34 35 3A 20 6A 70 20 7A p...cp 245: jp z
000030: 2C 6C 64 6F 77 6E 0D 0A 09 63 70 20 32 34 36 3A ,ldown...cp 246:
000040: 20 6A 70 20 7A 2C 6C 6C 65 66 74 0D 0A 09 63 70 jp z,lleft...cp
000050: 20 32 34 37 3A 20 6A 70 20 7A 2C 6C 72 69 67 68 247: jp z,lrigh
000060: 74 0D 0A 09 6A 70 20 65 64 69 74 6C 70 0D 0A 0D t...jp editlp...
000070: 0A 2E 6D 64 6F 77 6E 09 6C 64 20 68 6C 2C 28 65 ..mdown.ld hl,(e
000080: 74 6F 70 29 3A 09 64 65 63 20 68 6C 3A 09 64 65 top):.dec hl:.de
000090: 63 20 68 6C 3A 09 63 61 6C 6C 20 74 63 68 65 63 c hl:.call tchec
0000A0: 6B 3A 20 6C 64 20 28 65 74 6F 70 29 2C 68 6C 3A k: ld (etop),hl:
0000B0: 20 20 20 6A 70 20 76 62 6C 69 6E 65 0D 0A 2E 6D jp vbline...m
0000C0: 75 70 09 6C 64 20 68 6C 2C 28 65 62 6F 74 74 6D up.ld hl,(ebottm
0000D0: 29 3A 09 69 6E 63 20 68 6C 3A 09 69 6E 63 20 68 ):.inc hl:.inc h
0000E0: 6C 3A 09 63 61 6C 6C 20 62 63 68 65 63 6B 3A 20 l:.call bcheck:
0000F0: 6C 64 20 28 65 62 6F 74 74 6D 29 2C 68 6C 3A 20 ld (ebottm),hl:
000100: 6A 70 20 76 62 6C 69 6E 65 0D 0A 2E 6D 72 69 67 jp vbline...mrig
000110: 68 74 09 6C 64 20 64 65 2C 28 65 6C 65 66 74 29 ht.ld de,(eleft)
000120: 3A 09 69 6E 63 20 64 65 3A 09 09 63 61 6C 6C 20 :.inc de:..call
000130: 6C 63 68 65 63 6B 3A 20 6C 64 20 28 65 6C 65 66 lcheck: ld (elef
000140: 74 29 2C 64 65 3A 20 20 6A 70 20 68 62 6C 69 6E t),de: jp hblin
000150: 65 0D 0A 2E 6D 6C 65 66 74 09 6C 64 20 64 65 2C e...mleft.ld de,
000160: 28 65 72 69 67 68 74 29 3A 09 64 65 63 20 64 65 (eright):.dec de
000170: 3A 09 09 63 61 6C 6C 20 72 63 68 65 63 6B 3A 20 :..call rcheck:
000180: 6C 64 20 28 65 72 69 67 68 74 29 2C 64 65 3A 20 ld (eright),de:
000190: 6A 70 20 68 62 6C 69 6E 65 0D 0A 0D 0A 2E 6C 64 jp hbline.....ld
0001A0: 6F 77 6E 09 6C 64 20 68 6C 2C 28 65 74 6F 70 29 own.ld hl,(etop)
0001B0: 3A 09 69 6E 63 20 68 6C 3A 09 69 6E 63 20 68 6C :.inc hl:.inc hl
0001C0: 3A 09 63 61 6C 6C 20 74 63 68 65 63 6B 3A 20 6C :.call tcheck: l
0001D0: 64 20 28 65 74 6F 70 29 2C 68 6C 3A 20 20 20 64 d (etop),hl: d
0001E0: 65 63 20 68 6C 3A 20 64 65 63 20 68 6C 3A 20 6A ec hl: dec hl: j
0001F0: 70 20 76 72 6C 69 6E 65 0D 0A 2E 6C 75 70 09 6C p vrline...lup.l
Size : 512 (Real : 512)
000000: 0A 09 20 6C 64 20 62 2C 26 37 46 3A 20 6F 75 74 .. ld b,&7F: out
000010: 20 28 63 29 2C 61 0D 0A 09 20 72 65 73 20 37 2C (c),a... res 7,
000020: 68 3A 20 73 65 74 20 36 2C 68 0D 0A 09 70 6F 70 h: set 6,h...pop
000030: 20 61 66 3A 20 6C 64 20 28 68 6C 29 2C 61 3A 20 af: ld (hl),a:
000040: 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 62 63 2C 26 pop hl...ld bc,&
000050: 37 46 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D 7FC0: out (c),c.
000060: 0A 09 72 65 74 0D 0A 0D 0A 09 3B 2B 2B 2B 20 46 ..ret.....;+++ F
000070: 69 6E 64 20 73 74 61 72 74 20 61 64 64 72 65 73 ind start addres
000080: 73 20 6F 66 20 63 68 61 72 61 63 74 65 72 20 41 s of character A
000090: 20 69 6E 20 48 4C 20 28 63 6F 72 72 75 70 74 73 in HL (corrupts
0000A0: 20 41 29 0D 0A 0D 0A 2E 73 74 61 64 64 72 09 73 A).....staddr.s
0000B0: 75 62 20 33 32 0D 0A 09 6C 64 20 6C 2C 61 3A 20 ub 32...ld l,a:
0000C0: 6C 64 20 68 2C 30 0D 0A 09 61 64 64 20 68 6C 2C ld h,0...add hl,
0000D0: 68 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 hl: add hl,hl: a
0000E0: 64 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 68 6C dd hl,hl: add hl
0000F0: 2C 68 6C 0D 0A 09 61 64 64 20 68 6C 2C 68 6C 3A ,hl...add hl,hl:
000100: 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 add hl,hl: add
000110: 68 6C 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 68 6C hl,hl: add hl,hl
000120: 0D 0A 09 61 64 64 20 68 6C 2C 68 6C 0D 0A 09 72 ...add hl,hl...r
000130: 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 44 61 74 61 et.....;*** Data
000140: 0D 0A 0D 0A 2E 66 69 6C 65 69 64 09 64 62 20 22 .....fileid.db "
000150: 46 6F 6E 74 20 66 69 6C 65 22 2C 32 36 0D 0A 0D Font file",26...
000160: 0A 09 3B 2B 2B 2B 20 50 61 74 74 65 72 6E 20 64 ..;+++ Pattern d
000170: 61 74 61 0D 0A 0D 0A 2E 70 61 74 31 78 31 09 64 ata.....pat1x1.d
000180: 62 20 31 33 36 2C 31 33 36 2C 30 2C 30 2C 31 32 b 136,136,0,0,12
000190: 38 2C 30 30 30 2C 30 2C 30 2C 31 32 38 2C 30 30 8,000,0,0,128,00
0001A0: 30 2C 30 2C 30 2C 31 32 38 2C 30 30 30 2C 30 2C 0,0,0,128,000,0,
0001B0: 30 0D 0A 2E 70 61 74 32 78 32 09 64 62 20 31 33 0...pat2x2.db 13
0001C0: 36 2C 31 33 36 2C 30 2C 30 2C 31 32 38 2C 31 32 6,136,0,0,128,12
0001D0: 38 2C 30 2C 30 2C 31 33 36 2C 31 33 36 2C 30 2C 8,0,0,136,136,0,
0001E0: 30 2C 31 32 38 2C 31 32 38 2C 30 2C 30 0D 0A 2E 0,128,128,0,0...
0001F0: 70 61 74 34 78 34 09 64 62 20 31 33 36 2C 31 33 pat4x4.db 136,13
Size : 512 (Real : 512)
000000: 64 20 68 6C 2C 28 65 62 6F 74 74 6D 29 3A 09 64 d hl,(ebottm):.d
000010: 65 63 20 68 6C 3A 09 64 65 63 20 68 6C 3A 09 63 ec hl:.dec hl:.c
000020: 61 6C 6C 20 62 63 68 65 63 6B 3A 20 6C 64 20 28 all bcheck: ld (
000030: 65 62 6F 74 74 6D 29 2C 68 6C 3A 20 69 6E 63 20 ebottm),hl: inc
000040: 68 6C 3A 20 69 6E 63 20 68 6C 3A 20 6A 70 20 76 hl: inc hl: jp v
000050: 72 6C 69 6E 65 0D 0A 2E 6C 72 69 67 68 74 09 6C rline...lright.l
000060: 64 20 64 65 2C 28 65 6C 65 66 74 29 3A 09 64 65 d de,(eleft):.de
000070: 63 20 64 65 3A 09 09 63 61 6C 6C 20 6C 63 68 65 c de:..call lche
000080: 63 6B 3A 20 6C 64 20 28 65 6C 65 66 74 29 2C 64 ck: ld (eleft),d
000090: 65 3A 20 20 69 6E 63 20 64 65 3A 20 20 20 20 20 e: inc de:
0000A0: 20 20 20 20 6A 70 20 68 72 6C 69 6E 65 0D 0A 2E jp hrline...
0000B0: 6C 6C 65 66 74 09 6C 64 20 64 65 2C 28 65 72 69 lleft.ld de,(eri
0000C0: 67 68 74 29 3A 09 69 6E 63 20 64 65 3A 09 09 63 ght):.inc de:..c
0000D0: 61 6C 6C 20 72 63 68 65 63 6B 3A 20 6C 64 20 28 all rcheck: ld (
0000E0: 65 72 69 67 68 74 29 2C 64 65 3A 20 64 65 63 20 eright),de: dec
0000F0: 64 65 3A 20 20 20 20 20 20 20 20 20 6A 70 20 68 de: jp h
000100: 72 6C 69 6E 65 0D 0A 0D 0A 2E 76 62 6C 69 6E 65 rline.....vbline
000110: 09 6C 64 20 64 65 2C 28 65 6C 65 66 74 29 3A 20 .ld de,(eleft):
000120: 20 70 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 26 push hl: call &
000130: 42 42 43 30 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C BBC0: pop hl...l
000140: 64 20 64 65 2C 28 65 72 69 67 68 74 29 3A 20 63 d de,(eright): c
000150: 61 6C 6C 20 26 42 42 46 36 3A 20 6A 70 20 65 64 all &BBF6: jp ed
000160: 69 74 6C 70 0D 0A 2E 68 62 6C 69 6E 65 09 6C 64 itlp...hbline.ld
000170: 20 68 6C 2C 28 65 74 6F 70 29 0D 0A 09 70 75 73 hl,(etop)...pus
000180: 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 42 43 30 h hl: call &BBC0
000190: 3A 20 70 6F 70 20 64 65 0D 0A 09 6C 64 20 68 6C : pop de...ld hl
0001A0: 2C 28 65 62 6F 74 74 6D 29 3A 20 6F 72 20 61 3A ,(ebottm): or a:
0001B0: 20 73 62 63 20 68 6C 2C 64 65 0D 0A 09 6C 64 20 sbc hl,de...ld
0001C0: 64 65 2C 30 3A 20 63 61 6C 6C 20 26 42 42 46 39 de,0: call &BBF9
0001D0: 3A 20 6A 70 20 65 64 69 74 6C 70 0D 0A 0D 0A 2E : jp editlp.....
0001E0: 76 72 6C 69 6E 65 09 70 75 73 68 20 68 6C 0D 0A vrline.push hl..
0001F0: 09 20 6C 64 20 64 65 2C 30 3A 20 73 72 6C 20 68 . ld de,0: srl h
Size : 512 (Real : 512)
000000: 36 2C 30 2C 30 2C 31 33 36 2C 31 33 36 2C 30 2C 6,0,0,136,136,0,
000010: 30 2C 31 33 36 2C 31 33 36 2C 30 2C 30 2C 31 33 0,136,136,0,0,13
000020: 36 2C 31 33 36 2C 30 2C 30 0D 0A 0D 0A 09 3B 2A 6,136,0,0.....;*
000030: 2A 2A 20 56 61 72 69 61 62 6C 65 73 0D 0A 0D 0A ** Variables....
000040: 2E 67 73 69 7A 65 09 64 62 20 31 09 09 09 09 09 .gsize.db 1.....
000050: 3B 67 72 69 64 20 73 69 7A 65 20 28 31 2C 32 2C ;grid size (1,2,
000060: 34 29 0D 0A 2E 67 6E 65 78 74 09 64 62 20 38 09 4)...gnext.db 8.
000070: 09 09 09 09 3B 61 64 64 69 74 69 6F 6E 20 66 6F ....;addition fo
000080: 72 20 6E 65 78 74 20 70 6F 73 69 74 69 6F 6E 0D r next position.
000090: 0A 2E 67 70 61 74 74 09 64 73 20 31 36 09 09 09 ..gpatt.ds 16...
0000A0: 09 09 3B 70 61 74 74 65 72 6E 20 64 61 74 61 0D ..;pattern data.
0000B0: 0A 2E 68 65 69 67 68 74 09 64 62 20 30 09 09 09 ..height.db 0...
0000C0: 09 09 3B 68 65 69 67 68 74 20 44 49 56 20 37 0D ..;height DIV 7.
0000D0: 0A 2E 6C 61 73 74 6C 66 09 64 62 20 30 09 09 09 ..lastlf.db 0...
0000E0: 09 09 3B 68 65 69 67 68 74 20 4D 4F 44 20 37 0D ..;height MOD 7.
0000F0: 0A 2E 62 75 66 66 65 72 09 64 73 20 35 31 32 09 ..buffer.ds 512.
000100: 09 09 09 09 3B 63 6F 70 79 20 63 68 61 72 61 63 ....;copy charac
000110: 74 65 72 20 62 75 66 66 65 72 0D 0A 1A 72 6C 64 ter buffer...rld
000120: 20 43 6F 64 69 6E 67 20 70 72 6F 64 75 63 74 69 Coding producti
000130: 6F 6E 20 66 6F 72 20 53 65 6E 74 69 6E 65 6C 0D on for Sentinel.
000140: 0A 09 3B 66 6F 6E 74 20 65 64 69 74 6F 72 20 52 ..;font editor R
000150: 53 58 20 6C 69 62 72 61 72 79 0D 0A 0D 0A 09 3B SX library.....;
000160: 76 31 2E 30 20 20 20 20 20 20 32 31 20 4D 61 72 v1.0 21 Mar
000170: 63 68 20 31 39 39 33 0D 0A 0D 0A 09 6F 72 67 20 ch 1993.....org
000180: 62 20 31 33 36 2C 31 33 36 2C 30 2C 30 2C 31 32 b 136,136,0,0,12
000190: 38 2C 30 30 30 2C 30 2C 30 2C 31 32 38 2C 30 30 8,000,0,0,128,00
0001A0: 30 2C 30 2C 30 2C 31 32 38 2C 30 30 30 2C 30 2C 0,0,0,128,000,0,
0001B0: 30 0D 0A 2E 70 61 74 32 78 32 09 64 62 20 31 33 0...pat2x2.db 13
0001C0: 36 2C 31 33 36 2C 30 2C 30 2C 31 32 38 2C 31 32 6,136,0,0,128,12
0001D0: 38 2C 30 2C 30 2C 31 33 36 2C 31 33 36 2C 30 2C 8,0,0,136,136,0,
0001E0: 30 2C 31 32 38 2C 31 32 38 2C 30 2C 30 0D 0A 2E 0,128,128,0,0...
0001F0: 70 61 74 34 78 34 09 64 62 20 31 33 36 2C 31 33 pat4x4.db 136,13
Size : 512 (Real : 512)
000000: 3A 20 72 72 20 6C 3A 20 63 61 6C 6C 20 26 42 43 : rr l: call &BC
000010: 31 44 3A 20 70 75 73 68 20 68 6C 3A 20 70 6F 70 1D: push hl: pop
000020: 20 64 65 0D 0A 09 20 72 65 73 20 37 2C 68 3A 20 de... res 7,h:
000030: 6C 64 20 62 63 2C 38 30 3A 20 6C 64 69 72 0D 0A ld bc,80: ldir..
000040: 09 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 2C .pop hl...ld de,
000050: 26 46 46 46 46 3A 09 70 75 73 68 20 68 6C 3A 20 &FFFF:.push hl:
000060: 63 61 6C 6C 20 26 42 42 43 30 3A 20 70 6F 70 20 call &BBC0: pop
000070: 68 6C 0D 0A 09 6C 64 20 64 65 2C 28 65 6C 65 66 hl...ld de,(elef
000080: 74 29 3A 09 70 75 73 68 20 68 6C 3A 20 63 61 6C t):.push hl: cal
000090: 6C 20 26 42 42 46 36 3A 20 70 6F 70 20 68 6C 0D l &BBF6: pop hl.
0000A0: 0A 09 6C 64 20 64 65 2C 28 65 72 69 67 68 74 29 ..ld de,(eright)
0000B0: 3A 09 70 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 :.push hl: call
0000C0: 26 42 42 43 30 3A 20 70 6F 70 20 68 6C 0D 0A 09 &BBC0: pop hl...
0000D0: 6C 64 20 64 65 2C 36 34 30 3A 09 63 61 6C 6C 20 ld de,640:.call
0000E0: 26 42 42 46 36 0D 0A 09 6A 70 20 65 64 69 74 6C &BBF6...jp editl
0000F0: 70 0D 0A 0D 0A 2E 68 72 6C 69 6E 65 09 6C 64 20 p.....hrline.ld
000100: 68 6C 2C 28 65 74 6F 70 29 3A 20 73 72 6C 20 68 hl,(etop): srl h
000110: 3A 20 72 72 20 6C 3A 20 64 65 63 20 68 6C 0D 0A : rr l: dec hl..
000120: 09 70 75 73 68 20 64 65 0D 0A 09 20 6C 64 20 64 .push de... ld d
000130: 65 2C 28 65 62 6F 74 74 6D 29 3A 20 73 72 6C 20 e,(ebottm): srl
000140: 64 3A 20 72 72 20 65 0D 0A 09 20 70 75 73 68 20 d: rr e... push
000150: 68 6C 0D 0A 09 20 20 6F 72 20 61 3A 20 73 62 63 hl... or a: sbc
000160: 20 68 6C 2C 64 65 0D 0A 09 20 20 6C 64 20 61 2C hl,de... ld a,
000170: 6C 0D 0A 09 20 20 6F 72 20 61 3A 20 6A 70 20 7A l... or a: jp z
000180: 2C 63 68 66 61 69 32 0D 0A 09 20 70 6F 70 20 68 ,chfai2... pop h
000190: 6C 0D 0A 09 70 6F 70 20 64 65 0D 0A 09 70 75 73 l...pop de...pus
0001A0: 68 20 61 66 0D 0A 09 20 63 61 6C 6C 20 26 42 43 h af... call &BC
0001B0: 31 44 0D 0A 09 20 6C 64 20 61 2C 63 0D 0A 09 70 1D... ld a,c...p
0001C0: 6F 70 20 62 63 0D 0A 09 6C 64 20 63 2C 61 0D 0A op bc...ld c,a..
0001D0: 2E 68 72 6C 6E 6C 70 09 72 65 73 20 37 2C 68 3A .hrlnlp.res 7,h:
0001E0: 20 6C 64 20 61 2C 28 68 6C 29 3A 20 61 6E 64 20 ld a,(hl): and
0001F0: 63 0D 0A 09 73 65 74 20 37 2C 68 3A 20 6A 72 20 c...set 7,h: jr
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 50 72 6F 2D 45 78 74 20 67 72 61 70 ...;Pro-Ext grap
000010: 68 69 63 73 20 63 6F 6E 76 65 72 73 69 6F 6E 20 hics conversion
000020: 75 74 69 6C 69 74 79 0D 0A 09 3B 4D 61 63 68 69 utility...;Machi
000030: 6E 65 20 63 6F 64 65 20 73 6F 75 72 63 65 20 28 ne code source (
000040: 63 29 20 52 69 63 68 61 72 64 20 46 61 69 72 68 c) Richard Fairh
000050: 75 72 73 74 20 31 39 39 33 0D 0A 0D 0A 09 6F 72 urst 1993.....or
000060: 67 20 26 39 30 30 30 0D 0A 09 77 72 69 74 65 20 g &9000...write
000070: 22 67 72 61 70 68 69 63 73 2E 62 69 6E 22 0D 0A "graphics.bin"..
000080: 09 6E 6F 6C 69 73 74 0D 0A 0D 0A 09 6C 64 20 68 .nolist.....ld h
000090: 6C 2C 77 6B 73 70 09 09 09 3B 53 65 74 20 75 70 l,wksp...;Set up
0000A0: 20 52 53 58 73 0D 0A 09 6C 64 20 62 63 2C 63 6F RSXs...ld bc,co
0000B0: 6D 5F 74 0D 0A 09 6A 70 20 26 42 43 44 31 0D 0A m_t...jp &BCD1..
0000C0: 0D 0A 2E 77 6B 73 70 09 64 73 20 34 09 09 09 09 ...wksp.ds 4....
0000D0: 3B 43 68 61 69 6E 20 6C 69 6E 6B 20 77 6F 72 6B ;Chain link work
0000E0: 73 70 61 63 65 0D 0A 0D 0A 2E 63 6F 6D 5F 74 09 space.....com_t.
0000F0: 64 77 20 6E 61 6D 65 5F 74 09 09 09 3B 43 6F 6D dw name_t...;Com
000100: 6D 61 6E 64 20 74 61 62 6C 65 0D 0A 09 6A 70 20 mand table...jp
000110: 77 72 63 75 74 0D 0A 09 6A 70 20 6D 31 74 6F 32 wrcut...jp m1to2
000120: 0D 0A 09 6A 70 20 63 70 79 68 32 6C 0D 0A 09 6A ...jp cpyh2l...j
000130: 70 20 63 70 79 6C 32 68 0D 0A 09 6A 70 20 77 69 p cpyl2h...jp wi
000140: 6E 6C 6F 64 0D 0A 09 6A 70 20 73 63 72 6C 6F 64 nlod...jp scrlod
000150: 0D 0A 09 6A 70 20 6D 66 63 6C 6F 64 0D 0A 09 6A ...jp mfclod...j
000160: 70 20 66 61 64 65 0D 0A 09 6A 70 20 66 64 65 6C p fade...jp fdel
000170: 32 68 0D 0A 09 6A 70 20 65 64 69 74 0D 0A 09 6A 2h...jp edit...j
000180: 70 20 63 61 74 0D 0A 09 6A 70 20 6F 70 65 6E 6F p cat...jp openo
000190: 69 0D 0A 09 6A 70 20 6F 70 65 6E 69 69 0D 0A 09 i...jp openii...
0001A0: 6A 70 20 72 73 78 6F 66 66 0D 0A 0D 0A 2E 6E 61 jp rsxoff.....na
0001B0: 6D 65 5F 74 09 73 74 72 20 22 57 52 43 55 54 22 me_t.str "WRCUT"
0001C0: 09 09 09 3B 4E 61 6D 65 20 74 61 62 6C 65 0D 0A ...;Name table..
0001D0: 09 73 74 72 20 22 4D 4F 44 45 31 54 4F 32 22 0D .str "MODE1TO2".
0001E0: 0A 09 73 74 72 20 22 43 4F 50 59 48 32 4C 22 0D ..str "COPYH2L".
0001F0: 0A 09 73 74 72 20 22 43 4F 50 59 4C 32 48 22 0D ..str "COPYL2H".
Size : 512 (Real : 512)
000000: 6E 7A 2C 6E 70 62 79 74 65 0D 0A 09 6C 64 20 61 nz,npbyte...ld a
000010: 2C 63 3A 20 63 70 6C 3A 20 61 6E 64 20 28 68 6C ,c: cpl: and (hl
000020: 29 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 0D 0A 2E )...ld (hl),a...
000030: 6E 70 62 79 74 65 09 63 61 6C 6C 20 6E 6C 69 6E npbyte.call nlin
000040: 65 0D 0A 09 64 6A 6E 7A 20 68 72 6C 6E 6C 70 0D e...djnz hrlnlp.
000050: 0A 09 6A 70 20 65 64 69 74 6C 70 0D 0A 0D 0A 2E ..jp editlp.....
000060: 74 63 68 65 63 6B 09 6C 64 20 64 65 2C 28 65 62 tcheck.ld de,(eb
000070: 6F 74 74 6D 29 0D 0A 09 6C 64 20 61 2C 68 3A 20 ottm)...ld a,h:
000080: 63 70 20 26 30 31 3A 20 6A 72 20 6E 7A 2C 74 63 cp &01: jr nz,tc
000090: 6E 6F 6C 6D 3A 20 6C 64 20 61 2C 6C 3A 20 63 70 nolm: ld a,l: cp
0000A0: 20 26 39 32 3A 20 6A 72 20 7A 2C 63 68 66 61 69 &92: jr z,chfai
0000B0: 6C 0D 0A 2E 74 63 6E 6F 6C 6D 09 6C 64 20 61 2C l...tcnolm.ld a,
0000C0: 68 3A 20 63 70 20 64 3A 20 20 20 72 65 74 20 6E h: cp d: ret n
0000D0: 7A 3A 20 20 20 20 20 20 20 6C 64 20 61 2C 6C 3A z: ld a,l:
0000E0: 20 63 70 20 65 3A 20 20 20 72 65 74 20 6E 7A 0D cp e: ret nz.
0000F0: 0A 09 6A 72 20 63 68 66 61 69 6C 0D 0A 0D 0A 2E ..jr chfail.....
000100: 62 63 68 65 63 6B 09 6C 64 20 64 65 2C 28 65 74 bcheck.ld de,(et
000110: 6F 70 29 0D 0A 09 6C 64 20 61 2C 68 3A 20 63 70 op)...ld a,h: cp
000120: 20 26 46 46 3A 20 6A 72 20 6E 7A 2C 62 63 6E 6F &FF: jr nz,bcno
000130: 6C 6D 3A 20 6C 64 20 61 2C 6C 3A 20 63 70 20 26 lm: ld a,l: cp &
000140: 46 43 3A 20 6A 72 20 7A 2C 63 68 66 61 69 6C 0D FC: jr z,chfail.
000150: 0A 2E 62 63 6E 6F 6C 6D 09 6C 64 20 61 2C 68 3A ..bcnolm.ld a,h:
000160: 20 63 70 20 64 3A 20 20 20 72 65 74 20 6E 7A 3A cp d: ret nz:
000170: 20 20 20 20 20 20 20 6C 64 20 61 2C 6C 3A 20 63 ld a,l: c
000180: 70 20 65 3A 20 20 20 72 65 74 20 6E 7A 0D 0A 09 p e: ret nz...
000190: 6A 72 20 63 68 66 61 69 6C 0D 0A 0D 0A 2E 6C 63 jr chfail.....lc
0001A0: 68 65 63 6B 09 6C 64 20 68 6C 2C 28 65 72 69 67 heck.ld hl,(erig
0001B0: 68 74 29 0D 0A 09 6C 64 20 61 2C 64 3A 20 63 70 ht)...ld a,d: cp
0001C0: 20 26 46 46 3A 20 6A 72 20 6E 7A 2C 6C 63 6E 6F &FF: jr nz,lcno
0001D0: 6C 6D 3A 20 6C 64 20 61 2C 65 3A 20 63 70 20 26 lm: ld a,e: cp &
0001E0: 46 45 3A 20 6A 72 20 7A 2C 63 68 66 61 69 6C 0D FE: jr z,chfail.
0001F0: 0A 2E 6C 63 6E 6F 6C 6D 09 6C 64 20 61 2C 64 3A ..lcnolm.ld a,d:
Size : 512 (Real : 512)
000000: 0A 09 73 74 72 20 22 57 49 4E 4C 4F 41 44 22 0D ..str "WINLOAD".
000010: 0A 09 73 74 72 20 22 53 43 52 4C 4F 41 44 22 0D ..str "SCRLOAD".
000020: 0A 09 73 74 72 20 22 4D 46 43 4C 4F 41 44 22 0D ..str "MFCLOAD".
000030: 0A 09 73 74 72 20 22 46 41 44 45 53 43 52 22 0D ..str "FADESCR".
000040: 0A 09 73 74 72 20 22 46 41 44 45 4C 32 48 22 0D ..str "FADEL2H".
000050: 0A 09 73 74 72 20 22 45 44 49 54 22 0D 0A 09 73 ..str "EDIT"...s
000060: 74 72 20 22 43 41 54 22 0D 0A 09 73 74 72 20 22 tr "CAT"...str "
000070: 4F 50 45 4E 4F 55 54 22 0D 0A 09 73 74 72 20 22 OPENOUT"...str "
000080: 4F 50 45 4E 49 4E 22 0D 0A 09 73 74 72 20 22 52 OPENIN"...str "R
000090: 53 58 4F 46 46 22 0D 0A 09 64 62 20 30 0D 0A 0D SXOFF"...db 0...
0000A0: 0A 09 3B 7C 45 44 49 54 2C 40 6C 65 66 74 2C 40 ..;|EDIT,@left,@
0000B0: 72 69 67 68 74 2C 40 74 6F 70 2C 40 62 6F 74 74 right,@top,@bott
0000C0: 6F 6D 0D 0A 0D 0A 2E 65 64 69 74 09 6C 64 20 68 om.....edit.ld h
0000D0: 6C 2C 26 46 46 46 46 3A 20 6C 64 20 28 65 6C 65 l,&FFFF: ld (ele
0000E0: 66 74 29 20 2C 68 6C 0D 0A 09 6C 64 20 68 6C 2C ft) ,hl...ld hl,
0000F0: 36 34 30 3A 20 20 20 6C 64 20 28 65 72 69 67 68 640: ld (erigh
000100: 74 29 2C 68 6C 0D 0A 09 6C 64 20 68 6C 2C 34 30 t),hl...ld hl,40
000110: 30 3A 20 20 20 6C 64 20 28 65 74 6F 70 29 20 20 0: ld (etop)
000120: 2C 68 6C 0D 0A 09 6C 64 20 68 6C 2C 26 46 46 46 ,hl...ld hl,&FFF
000130: 45 3A 20 6C 64 20 28 65 62 6F 74 74 6D 29 2C 68 E: ld (ebottm),h
000140: 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 31 3A 20 63 61 l.....ld a,1: ca
000150: 6C 6C 20 26 42 42 44 45 09 0D 0A 09 6C 64 20 61 ll &BBDE....ld a
000160: 2C 32 3A 20 63 61 6C 6C 20 26 42 43 30 45 0D 0A ,2: call &BC0E..
000170: 09 63 61 6C 6C 20 66 64 65 6C 32 68 0D 0A 0D 0A .call fdel2h....
000180: 2E 65 64 69 74 6C 70 09 63 61 6C 6C 20 26 42 42 .editlp.call &BB
000190: 31 38 0D 0A 09 63 70 20 32 32 34 3A 09 6A 70 20 18...cp 224:.jp
0001A0: 7A 2C 65 65 78 69 74 0D 0A 09 63 70 20 31 33 3A z,eexit...cp 13:
0001B0: 09 6A 70 20 7A 2C 65 65 78 69 74 0D 0A 09 63 70 .jp z,eexit...cp
0001C0: 20 32 34 30 3A 20 6A 70 20 7A 2C 6D 75 70 0D 0A 240: jp z,mup..
0001D0: 09 63 70 20 32 34 31 3A 20 6A 70 20 7A 2C 6D 64 .cp 241: jp z,md
0001E0: 6F 77 6E 0D 0A 09 63 70 20 32 34 32 3A 20 6A 70 own...cp 242: jp
0001F0: 20 7A 2C 6D 6C 65 66 74 0D 0A 09 63 70 20 32 34 z,mleft...cp 24
Size : 512 (Real : 512)
000000: 26 42 43 38 33 3A 20 63 61 6C 6C 20 26 34 30 30 &BC83: call &400
000010: 30 09 3B 63 6F 6D 70 72 65 73 73 65 64 0D 0A 09 0.;compressed...
000020: 6A 70 20 26 42 43 37 41 0D 0A 0D 0A 09 3B 7C 4D jp &BC7A.....;|M
000030: 46 43 4C 4F 41 44 2C 40 72 65 73 75 6C 74 25 2C FCLOAD,@result%,
000040: 66 69 6C 65 6E 61 6D 65 24 0D 0A 0D 0A 2E 6D 66 filename$.....mf
000050: 63 6C 6F 64 09 63 61 6C 6C 20 6F 70 65 6E 69 6E clod.call openin
000060: 0D 0A 0D 0A 09 65 78 20 64 65 2C 68 6C 3A 20 63 .....ex de,hl: c
000070: 61 6C 6C 20 26 42 43 38 33 3A 20 63 61 6C 6C 20 all &BC83: call
000080: 26 42 43 37 41 0D 0A 09 6C 64 20 61 2C 32 3A 20 &BC7A...ld a,2:
000090: 63 61 6C 6C 20 26 42 43 30 45 0D 0A 09 63 61 6C call &BC0E...cal
0000A0: 6C 20 26 38 30 30 30 0D 0A 09 6C 64 20 61 2C 28 l &8000...ld a,(
0000B0: 26 38 30 38 38 29 3A 20 61 6E 64 20 33 3A 20 63 &8088): and 3: c
0000C0: 70 20 32 0D 0A 09 72 65 74 20 7A 0D 0A 09 64 69 p 2...ret z...di
0000D0: 3A 20 65 78 78 0D 0A 09 20 72 65 73 20 30 2C 63 : exx... res 0,c
0000E0: 3A 20 73 65 74 20 31 2C 63 0D 0A 09 65 78 78 3A : set 1,c...exx:
0000F0: 20 65 69 0D 0A 09 63 61 6C 6C 20 6D 31 74 6F 32 ei...call m1to2
000100: 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 7C 57 52 43 ...ret.....;|WRC
000110: 55 54 2C 77 69 64 74 68 2C 64 65 70 74 68 2C 40 UT,width,depth,@
000120: 72 65 73 75 6C 74 25 2C 66 69 6C 65 6E 61 6D 65 result%,filename
000130: 24 0D 0A 0D 0A 2E 77 72 63 75 74 09 63 61 6C 6C $.....wrcut.call
000140: 20 6F 70 65 6E 6F 0D 0A 0D 0A 09 6C 64 20 6C 2C openo.....ld l,
000150: 28 69 78 2B 34 29 3A 20 6C 64 20 68 2C 28 69 78 (ix+4): ld h,(ix
000160: 2B 35 29 0D 0A 09 6C 64 20 65 2C 28 69 78 2B 36 +5)...ld e,(ix+6
000170: 29 3A 20 6C 64 20 64 2C 28 69 78 2B 37 29 0D 0A ): ld d,(ix+7)..
000180: 0D 0A 09 64 65 63 20 68 6C 0D 0A 09 6C 64 20 28 ...dec hl...ld (
000190: 64 65 70 74 68 29 2C 68 6C 0D 0A 09 64 65 63 20 depth),hl...dec
0001A0: 68 6C 3A 20 64 65 63 20 68 6C 0D 0A 0D 0A 09 6C hl: dec hl.....l
0001B0: 64 20 61 2C 6C 3A 20 63 61 6C 6C 20 26 42 43 39 d a,l: call &BC9
0001C0: 35 0D 0A 09 6C 64 20 61 2C 68 3A 20 63 61 6C 6C 5...ld a,h: call
0001D0: 20 26 42 43 39 35 0D 0A 0D 0A 09 70 75 73 68 20 &BC95.....push
0001E0: 64 65 0D 0A 09 20 64 65 63 20 64 65 3A 20 64 65 de... dec de: de
0001F0: 63 20 64 65 0D 0A 09 20 6C 64 20 61 2C 65 3A 20 c de... ld a,e:
Size : 512 (Real : 512)
000000: 73 74 6F 72 65 20 52 4F 4D 20 73 74 61 74 65 0D store ROM state.
000010: 0A 09 72 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 4F ..ret.....;*** O
000020: 70 65 6E 20 6F 75 74 70 75 74 20 66 69 6C 65 20 pen output file
000030: 28 73 68 6F 75 6C 64 20 62 65 20 66 69 72 73 74 (should be first
000040: 20 43 41 4C 4C 29 0D 0A 09 3B 72 65 73 75 6C 74 CALL)...;result
000050: 20 69 73 20 30 20 69 66 20 75 6E 73 75 63 63 65 is 0 if unsucce
000060: 73 73 66 75 6C 2C 20 31 20 69 66 20 6F 6B 0D 0A ssful, 1 if ok..
000070: 0D 0A 2E 6F 70 65 6E 6F 69 09 63 61 6C 6C 20 6F ...openoi.call o
000080: 70 65 6E 6F 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6F peno...ret.....o
000090: 70 65 6E 6F 09 63 61 6C 6C 20 26 42 43 39 32 0D peno.call &BC92.
0000A0: 0A 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C ....ld l,(ix): l
0000B0: 64 20 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 d h,(ix+1)...ld
0000C0: 62 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A b,(hl): inc hl..
0000D0: 09 6C 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 .ld e,(hl): inc
0000E0: 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 hl...ld d,(hl):
0000F0: 65 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 64 65 ex de,hl...ld de
000100: 2C 62 75 66 66 3A 20 70 75 73 68 20 69 78 0D 0A ,buff: push ix..
000110: 09 63 61 6C 6C 20 26 42 43 38 43 3A 20 70 6F 70 .call &BC8C: pop
000120: 20 69 78 0D 0A 0D 0A 09 6A 72 20 63 2C 73 75 63 ix.....jr c,suc
000130: 63 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 29 3A c...ld l,(ix+2):
000140: 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 6C ld h,(ix+3)...l
000150: 64 20 28 68 6C 29 2C 30 3A 20 69 6E 63 20 68 6C d (hl),0: inc hl
000160: 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 70 6F ...ld (hl),0: po
000170: 70 20 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6F p hl...ret.....o
000180: 73 75 63 63 09 6C 64 20 6C 2C 28 69 78 2B 32 29 succ.ld l,(ix+2)
000190: 3A 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 : ld h,(ix+3)...
0001A0: 6C 64 20 28 68 6C 29 2C 31 3A 20 69 6E 63 20 68 ld (hl),1: inc h
0001B0: 6C 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 72 l...ld (hl),0: r
0001C0: 65 74 0D 0A 0D 0A 0D 0A 09 3B 2A 2A 2A 20 4F 70 et.......;*** Op
0001D0: 65 6E 20 69 6E 70 75 74 20 66 69 6C 65 20 28 73 en input file (s
0001E0: 68 6F 75 6C 64 20 62 65 20 66 69 72 73 74 20 43 hould be first C
0001F0: 41 4C 4C 29 0D 0A 09 3B 72 65 73 75 6C 74 20 69 ALL)...;result i
Size : 512 (Real : 512)
000000: 63 61 6C 6C 20 26 42 43 39 35 0D 0A 09 20 6C 64 call &BC95... ld
000010: 20 61 2C 64 3A 20 63 61 6C 6C 20 26 42 43 39 35 a,d: call &BC95
000020: 0D 0A 09 70 6F 70 20 64 65 0D 0A 0D 0A 09 6C 64 ...pop de.....ld
000030: 20 61 2C 64 0D 0A 09 20 61 6E 64 20 33 0D 0A 09 a,d... and 3...
000040: 20 73 6C 61 20 61 3A 20 73 6C 61 20 61 3A 20 73 sla a: sla a: s
000050: 6C 61 20 61 0D 0A 09 20 73 6C 61 20 61 3A 20 73 la a... sla a: s
000060: 6C 61 20 61 0D 0A 09 6C 64 20 64 2C 61 0D 0A 0D la a...ld d,a...
000070: 0A 09 6C 64 20 61 2C 65 0D 0A 09 20 73 72 6C 20 ..ld a,e... srl
000080: 61 3A 20 73 72 6C 20 61 3A 20 73 72 6C 20 61 0D a: srl a: srl a.
000090: 0A 09 20 6F 72 20 64 0D 0A 09 6C 64 20 62 2C 61 .. or d...ld b,a
0000A0: 0D 0A 09 69 6E 63 20 62 0D 0A 0D 0A 09 63 61 6C ...inc b.....cal
0000B0: 6C 20 26 42 42 43 36 0D 0A 09 6C 64 20 28 78 70 l &BBC6...ld (xp
0000C0: 6F 73 29 2C 64 65 0D 0A 09 6C 64 20 28 79 70 6F os),de...ld (ypo
0000D0: 73 29 2C 68 6C 0D 0A 09 6C 64 20 28 6C 65 6E 67 s),hl...ld (leng
0000E0: 74 68 29 2C 62 63 0D 0A 0D 0A 2E 6F 6C 6F 6F 70 th),bc.....oloop
0000F0: 09 70 75 73 68 20 62 63 0D 0A 09 20 64 65 63 20 .push bc... dec
000100: 64 65 0D 0A 09 20 63 61 6C 6C 20 26 42 42 43 30 de... call &BBC0
000110: 0D 0A 09 70 6F 70 20 62 63 0D 0A 0D 0A 2E 69 6C ...pop bc.....il
000120: 6F 6F 70 09 70 75 73 68 20 62 63 0D 0A 09 20 6C oop.push bc... l
000130: 64 20 62 2C 38 0D 0A 2E 74 6C 6F 6F 70 09 20 6C d b,8...tloop. l
000140: 64 20 64 65 2C 31 3A 20 6C 64 20 68 6C 2C 30 0D d de,1: ld hl,0.
000150: 0A 09 20 70 75 73 68 20 62 63 0D 0A 09 20 20 70 .. push bc... p
000160: 75 73 68 20 61 66 0D 0A 09 20 20 20 63 61 6C 6C ush af... call
000170: 20 26 42 42 46 33 3A 20 6C 64 20 63 2C 61 0D 0A &BBF3: ld c,a..
000180: 09 20 20 70 6F 70 20 61 66 0D 0A 09 20 20 73 6C . pop af... sl
000190: 61 20 61 3A 20 6F 72 20 63 0D 0A 09 20 70 6F 70 a a: or c... pop
0001A0: 20 62 63 0D 0A 09 20 64 6A 6E 7A 20 74 6C 6F 6F bc... djnz tloo
0001B0: 70 0D 0A 09 20 63 61 6C 6C 20 26 42 43 39 35 0D p... call &BC95.
0001C0: 0A 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 64 6A 6E ....pop bc...djn
0001D0: 7A 20 69 6C 6F 6F 70 0D 0A 0D 0A 09 6C 64 20 64 z iloop.....ld d
0001E0: 65 2C 28 78 70 6F 73 29 0D 0A 09 20 6C 64 20 68 e,(xpos)... ld h
0001F0: 6C 2C 28 79 70 6F 73 29 0D 0A 09 20 64 65 63 20 l,(ypos)... dec
Size : 512 (Real : 512)
000000: 20 63 70 20 68 3A 20 20 20 72 65 74 20 6E 7A 3A cp h: ret nz:
000010: 20 20 20 20 20 20 20 6C 64 20 61 2C 65 3A 20 63 ld a,e: c
000020: 70 20 6C 3A 20 20 20 72 65 74 20 6E 7A 0D 0A 09 p l: ret nz...
000030: 6A 72 20 63 68 66 61 69 6C 0D 0A 0D 0A 2E 72 63 jr chfail.....rc
000040: 68 65 63 6B 09 6C 64 20 68 6C 2C 28 65 6C 65 66 heck.ld hl,(elef
000050: 74 29 0D 0A 09 6C 64 20 61 2C 64 3A 20 63 70 20 t)...ld a,d: cp
000060: 26 30 32 3A 20 6A 72 20 6E 7A 2C 72 63 6E 6F 6C &02: jr nz,rcnol
000070: 6D 3A 20 6C 64 20 61 2C 65 3A 20 63 70 20 26 38 m: ld a,e: cp &8
000080: 31 3A 20 6A 72 20 7A 2C 63 68 66 61 69 6C 0D 0A 1: jr z,chfail..
000090: 2E 72 63 6E 6F 6C 6D 09 6C 64 20 61 2C 64 3A 20 .rcnolm.ld a,d:
0000A0: 63 70 20 68 3A 20 20 20 72 65 74 20 6E 7A 3A 20 cp h: ret nz:
0000B0: 20 20 20 20 20 20 6C 64 20 61 2C 65 3A 20 63 70 ld a,e: cp
0000C0: 20 6C 3A 20 20 20 72 65 74 20 6E 7A 0D 0A 09 6A l: ret nz...j
0000D0: 72 20 63 68 66 61 69 6C 0D 0A 0D 0A 2E 63 68 66 r chfail.....chf
0000E0: 61 69 32 09 70 6F 70 20 68 6C 0D 0A 2E 63 68 66 ai2.pop hl...chf
0000F0: 61 69 6C 09 70 6F 70 20 68 6C 3A 20 6A 70 20 65 ail.pop hl: jp e
000100: 64 69 74 6C 70 0D 0A 0D 0A 2E 65 65 78 69 74 09 ditlp.....eexit.
000110: 6C 64 20 64 65 2C 28 65 6C 65 66 74 29 3A 09 69 ld de,(eleft):.i
000120: 6E 63 20 64 65 3A 20 09 6C 64 20 6C 2C 28 69 78 nc de: .ld l,(ix
000130: 2B 36 29 3A 20 6C 64 20 68 2C 28 69 78 2B 37 29 +6): ld h,(ix+7)
000140: 3A 20 6C 64 20 28 68 6C 29 2C 65 3A 20 69 6E 63 : ld (hl),e: inc
000150: 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 64 0D 0A hl: ld (hl),d..
000160: 09 6C 64 20 64 65 2C 28 65 72 69 67 68 74 29 3A .ld de,(eright):
000170: 09 64 65 63 20 64 65 3A 20 09 6C 64 20 6C 2C 28 .dec de: .ld l,(
000180: 69 78 2B 34 29 3A 20 6C 64 20 68 2C 28 69 78 2B ix+4): ld h,(ix+
000190: 35 29 3A 20 6C 64 20 28 68 6C 29 2C 65 3A 20 69 5): ld (hl),e: i
0001A0: 6E 63 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 64 nc hl: ld (hl),d
0001B0: 0D 0A 09 6C 64 20 64 65 2C 28 65 74 6F 70 29 3A ...ld de,(etop):
0001C0: 09 64 65 63 20 64 65 3A 09 64 65 63 20 64 65 3A .dec de:.dec de:
0001D0: 09 6C 64 20 6C 2C 28 69 78 2B 32 29 3A 20 6C 64 .ld l,(ix+2): ld
0001E0: 20 68 2C 28 69 78 2B 33 29 3A 20 6C 64 20 28 68 h,(ix+3): ld (h
0001F0: 6C 29 2C 65 3A 20 69 6E 63 20 68 6C 3A 20 6C 64 l),e: inc hl: ld
Size : 512 (Real : 512)
000000: 68 6C 3A 20 64 65 63 20 68 6C 0D 0A 09 20 6C 64 hl: dec hl... ld
000010: 20 28 79 70 6F 73 29 2C 68 6C 0D 0A 09 6C 64 20 (ypos),hl...ld
000020: 62 63 2C 28 6C 65 6E 67 74 68 29 0D 0A 09 6C 64 bc,(length)...ld
000030: 20 68 6C 2C 28 64 65 70 74 68 29 0D 0A 09 64 65 hl,(depth)...de
000040: 63 20 68 6C 0D 0A 09 6C 64 20 61 2C 68 3A 20 6F c hl...ld a,h: o
000050: 72 20 6C 3A 20 6A 72 20 7A 2C 71 77 72 63 75 74 r l: jr z,qwrcut
000060: 0D 0A 09 64 65 63 20 68 6C 0D 0A 09 6C 64 20 28 ...dec hl...ld (
000070: 64 65 70 74 68 29 2C 68 6C 0D 0A 09 6C 64 20 61 depth),hl...ld a
000080: 2C 68 3A 20 6F 72 20 6C 0D 0A 09 6C 64 20 68 6C ,h: or l...ld hl
000090: 2C 28 79 70 6F 73 29 0D 0A 09 6A 72 20 6E 7A 2C ,(ypos)...jr nz,
0000A0: 6F 6C 6F 6F 70 0D 0A 2E 71 77 72 63 75 74 09 6A oloop...qwrcut.j
0000B0: 70 20 26 42 43 38 46 0D 0A 0D 0A 2E 78 70 6F 73 p &BC8F.....xpos
0000C0: 09 64 77 20 30 0D 0A 2E 79 70 6F 73 09 64 77 20 .dw 0...ypos.dw
0000D0: 30 0D 0A 2E 6C 65 6E 67 74 68 09 64 77 20 30 0D 0...length.dw 0.
0000E0: 0A 2E 64 65 70 74 68 09 64 77 20 30 0D 0A 0D 0A ..depth.dw 0....
0000F0: 09 3B 7C 4D 4F 44 45 31 54 4F 32 0D 0A 0D 0A 2E .;|MODE1TO2.....
000100: 6D 31 74 6F 32 09 6C 64 20 68 6C 2C 26 43 30 30 m1to2.ld hl,&C00
000110: 30 0D 0A 0D 0A 09 3B 2B 2B 2B 20 4D 61 69 6E 20 0.....;+++ Main
000120: 6C 6F 6F 70 0D 0A 0D 0A 2E 6D 6C 6F 6F 70 09 6C loop.....mloop.l
000130: 64 20 63 2C 28 68 6C 29 0D 0A 09 63 61 6C 6C 20 d c,(hl)...call
000140: 72 6F 75 74 6E 65 0D 0A 09 6C 64 20 28 68 6C 29 routne...ld (hl)
000150: 2C 64 0D 0A 0D 0A 09 69 6E 63 20 68 6C 0D 0A 09 ,d.....inc hl...
000160: 6C 64 20 61 2C 68 3A 20 6F 72 20 61 3A 20 6A 72 ld a,h: or a: jr
000170: 20 6E 7A 2C 6D 6C 6F 6F 70 0D 0A 09 72 65 74 0D nz,mloop...ret.
000180: 0A 0D 0A 09 3B 2B 2B 2B 20 53 75 62 72 6F 75 74 ....;+++ Subrout
000190: 69 6E 65 0D 0A 0D 0A 2E 72 6F 75 74 6E 65 09 6C ine.....routne.l
0001A0: 64 20 64 2C 30 0D 0A 09 6C 64 20 62 2C 34 0D 0A d d,0...ld b,4..
0001B0: 0D 0A 2E 6C 6F 6F 70 09 6C 64 20 61 2C 63 0D 0A ...loop.ld a,c..
0001C0: 09 61 6E 64 20 31 37 0D 0A 09 72 72 63 20 63 0D .and 17...rrc c.
0001D0: 0A 0D 0A 09 6F 72 20 61 3A 20 20 6A 72 20 7A 2C ....or a: jr z,
0001E0: 61 73 65 74 0D 0A 0D 0A 09 63 70 20 31 36 3A 20 aset.....cp 16:
0001F0: 6A 72 20 6E 7A 2C 6E 6F 74 31 36 0D 0A 09 6C 64 jr nz,not16...ld
Size : 512 (Real : 512)
000000: 20 28 68 6C 29 2C 64 0D 0A 09 6C 64 20 64 65 2C (hl),d...ld de,
000010: 28 65 62 6F 74 74 6D 29 3A 09 69 6E 63 20 64 65 (ebottm):.inc de
000020: 3A 20 69 6E 63 20 64 65 3A 09 6C 64 20 6C 2C 28 : inc de:.ld l,(
000030: 69 78 2B 30 29 3A 20 6C 64 20 68 2C 28 69 78 2B ix+0): ld h,(ix+
000040: 31 29 3A 20 6C 64 20 28 68 6C 29 2C 65 3A 20 69 1): ld (hl),e: i
000050: 6E 63 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 64 nc hl: ld (hl),d
000060: 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 65 6C 65 66 74 ...ret.....eleft
000070: 09 64 77 20 30 0D 0A 2E 65 72 69 67 68 74 09 64 .dw 0...eright.d
000080: 77 20 30 0D 0A 2E 65 74 6F 70 09 64 77 20 30 0D w 0...etop.dw 0.
000090: 0A 2E 65 62 6F 74 74 6D 09 64 77 20 30 0D 0A 0D ..ebottm.dw 0...
0000A0: 0A 0D 0A 09 3B 7C 43 41 54 0D 0A 0D 0A 2E 63 61 ....;|CAT.....ca
0000B0: 74 09 6C 64 20 64 65 2C 62 75 66 66 0D 0A 09 6A t.ld de,buff...j
0000C0: 70 20 26 42 43 39 42 0D 0A 0D 0A 09 3B 7C 43 4F p &BC9B.....;|CO
0000D0: 50 59 48 32 4C 0D 0A 0D 0A 2E 63 70 79 68 32 6C PYH2L.....cpyh2l
0000E0: 09 6C 64 20 64 65 2C 26 34 30 30 30 0D 0A 09 6C .ld de,&4000...l
0000F0: 64 20 68 6C 2C 26 43 30 30 30 0D 0A 09 6C 64 20 d hl,&C000...ld
000100: 62 63 2C 26 34 30 30 30 0D 0A 09 6C 64 69 72 3A bc,&4000...ldir:
000110: 09 72 65 74 0D 0A 0D 0A 09 3B 7C 43 4F 50 59 4C .ret.....;|COPYL
000120: 32 48 0D 0A 0D 0A 2E 63 70 79 6C 32 68 09 6C 64 2H.....cpyl2h.ld
000130: 20 64 65 2C 26 43 30 30 30 0D 0A 09 6C 64 20 68 de,&C000...ld h
000140: 6C 2C 26 34 30 30 30 0D 0A 09 6C 64 20 62 63 2C l,&4000...ld bc,
000150: 26 34 30 30 30 0D 0A 09 6C 64 69 72 3A 09 72 65 &4000...ldir:.re
000160: 74 0D 0A 0D 0A 09 3B 7C 46 41 44 45 4C 32 48 0D t.....;|FADEL2H.
000170: 0A 0D 0A 2E 66 64 65 6C 32 68 09 6C 64 20 68 6C ....fdel2h.ld hl
000180: 2C 26 43 30 30 30 0D 0A 2E 66 64 65 32 6F 6C 09 ,&C000...fde2ol.
000190: 6C 64 20 62 63 2C 32 33 34 30 3A 20 6C 64 20 64 ld bc,2340: ld d
0001A0: 65 2C 37 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 2E e,7...push hl...
0001B0: 66 64 65 32 6C 70 09 20 72 65 73 20 37 2C 68 3A fde2lp. res 7,h:
0001C0: 20 6C 64 20 61 2C 28 68 6C 29 0D 0A 09 20 73 65 ld a,(hl)... se
0001D0: 74 20 37 2C 68 3A 20 6C 64 20 28 68 6C 29 2C 61 t 7,h: ld (hl),a
0001E0: 0D 0A 09 20 61 64 64 20 68 6C 2C 64 65 3A 20 64 ... add hl,de: d
0001F0: 65 63 20 62 63 0D 0A 09 20 6C 64 20 61 2C 62 3A ec bc... ld a,b:
Size : 512 (Real : 512)
000000: 20 61 2C 33 0D 0A 09 6A 72 20 61 73 65 74 0D 0A a,3...jr aset..
000010: 0D 0A 2E 6E 6F 74 31 36 09 63 70 20 31 3A 20 20 ...not16.cp 1:
000020: 6A 72 20 7A 2C 61 73 65 74 0D 0A 09 6C 64 20 61 jr z,aset...ld a
000030: 2C 32 0D 0A 0D 0A 2E 61 73 65 74 09 6F 72 20 64 ,2.....aset.or d
000040: 0D 0A 09 72 72 63 61 3A 20 72 72 63 61 0D 0A 09 ...rrca: rrca...
000050: 6C 64 20 64 2C 61 0D 0A 09 64 6A 6E 7A 20 6C 6F ld d,a...djnz lo
000060: 6F 70 0D 0A 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B op.....ret.....;
000070: 7C 57 49 4E 4C 4F 41 44 2C 40 72 65 73 75 6C 74 |WINLOAD,@result
000080: 25 2C 66 69 6C 65 6E 61 6D 65 24 0D 0A 0D 0A 2E %,filename$.....
000090: 77 69 6E 6C 6F 64 09 63 61 6C 6C 20 6F 70 65 6E winlod.call open
0000A0: 69 6E 0D 0A 0D 0A 09 6C 64 20 61 2C 32 3A 20 63 in.....ld a,2: c
0000B0: 61 6C 6C 20 26 42 43 30 45 0D 0A 09 6C 64 20 68 all &BC0E...ld h
0000C0: 6C 2C 26 34 30 30 30 3A 20 63 61 6C 6C 20 26 42 l,&4000: call &B
0000D0: 43 38 33 3A 20 63 61 6C 6C 20 26 42 43 37 41 0D C83: call &BC7A.
0000E0: 0A 09 6C 64 20 68 6C 2C 26 33 46 46 42 2B 33 3A ..ld hl,&3FFB+3:
0000F0: 20 6C 64 20 64 65 2C 28 68 65 69 67 68 74 29 0D ld de,(height).
000100: 0A 09 61 64 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 ..add hl,de...ld
000110: 20 65 2C 28 68 6C 29 3A 20 6C 64 20 64 2C 30 3A e,(hl): ld d,0:
000120: 20 6C 64 20 62 63 2C 30 0D 0A 09 64 65 63 20 68 ld bc,0...dec h
000130: 6C 3A 20 64 65 63 20 68 6C 3A 20 64 65 63 20 68 l: dec hl: dec h
000140: 6C 3A 20 72 65 73 20 36 2C 68 0D 0A 2E 64 69 76 l: res 6,h...div
000150: 5F 6C 70 09 6F 72 20 61 3A 20 73 62 63 20 68 6C _lp.or a: sbc hl
000160: 2C 64 65 3A 20 69 6E 63 20 62 63 0D 0A 09 6A 72 ,de: inc bc...jr
000170: 20 6E 7A 2C 64 69 76 5F 6C 70 0D 0A 09 6C 64 20 nz,div_lp...ld
000180: 61 2C 65 0D 0A 0D 0A 09 6C 64 20 64 65 2C 26 43 a,e.....ld de,&C
000190: 30 30 30 3A 20 6C 64 20 68 6C 2C 26 34 30 30 30 000: ld hl,&4000
0001A0: 0D 0A 2E 6D 77 6C 6F 6F 70 09 70 75 73 68 20 61 ...mwloop.push a
0001B0: 66 0D 0A 09 20 70 75 73 68 20 62 63 3A 20 70 75 f... push bc: pu
0001C0: 73 68 20 64 65 0D 0A 09 20 20 6C 64 69 72 0D 0A sh de... ldir..
0001D0: 09 20 70 6F 70 20 64 65 3A 20 70 6F 70 20 62 63 . pop de: pop bc
0001E0: 0D 0A 09 20 65 78 20 64 65 2C 68 6C 09 09 09 3B ... ex de,hl...;
0001F0: 6E 65 78 74 20 73 63 72 65 65 6E 20 6C 69 6E 65 next screen line
Size : 512 (Real : 512)
000000: 20 6F 72 20 63 0D 0A 09 20 6A 72 20 6E 7A 2C 66 or c... jr nz,f
000010: 64 65 32 6C 70 0D 0A 09 70 6F 70 20 68 6C 0D 0A de2lp...pop hl..
000020: 09 69 6E 63 20 68 6C 3A 20 6C 64 20 61 2C 6C 0D .inc hl: ld a,l.
000030: 0A 09 63 70 20 37 3A 20 6A 72 20 6E 7A 2C 66 64 ..cp 7: jr nz,fd
000040: 65 32 6F 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B e2ol...ret.....;
000050: 7C 46 41 44 45 53 43 52 20 2D 20 6A 75 73 74 20 |FADESCR - just
000060: 66 6F 72 20 66 75 6E 21 0D 0A 0D 0A 2E 66 61 64 for fun!.....fad
000070: 65 09 6C 64 20 68 6C 2C 26 43 30 30 30 0D 0A 2E e.ld hl,&C000...
000080: 66 61 64 65 6F 6C 09 6C 64 20 62 63 2C 32 33 34 fadeol.ld bc,234
000090: 30 3A 20 6C 64 20 64 65 2C 37 0D 0A 09 70 75 73 0: ld de,7...pus
0000A0: 68 20 68 6C 0D 0A 2E 66 61 64 65 6C 70 09 20 6C h hl...fadelp. l
0000B0: 64 20 28 68 6C 29 2C 30 3A 20 61 64 64 20 68 6C d (hl),0: add hl
0000C0: 2C 64 65 0D 0A 09 20 64 65 63 20 62 63 3A 20 6C ,de... dec bc: l
0000D0: 64 20 61 2C 62 3A 20 6F 72 20 63 0D 0A 09 20 6A d a,b: or c... j
0000E0: 72 20 6E 7A 2C 66 61 64 65 6C 70 0D 0A 09 70 6F r nz,fadelp...po
0000F0: 70 20 68 6C 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C p hl...inc hl: l
000100: 64 20 61 2C 6C 0D 0A 09 63 70 20 37 3A 20 6A 72 d a,l...cp 7: jr
000110: 20 6E 7A 2C 66 61 64 65 6F 6C 0D 0A 09 72 65 74 nz,fadeol...ret
000120: 0D 0A 0D 0A 09 3B 7C 53 43 52 4C 4F 41 44 2C 40 .....;|SCRLOAD,@
000130: 72 65 73 75 6C 74 25 2C 66 69 6C 65 6E 61 6D 65 result%,filename
000140: 24 0D 0A 0D 0A 2E 73 63 72 6C 6F 64 09 63 61 6C $.....scrlod.cal
000150: 6C 20 6F 70 65 6E 69 6E 0D 0A 0D 0A 09 70 75 73 l openin.....pus
000160: 68 20 62 63 0D 0A 09 20 6C 64 20 61 2C 32 3A 20 h bc... ld a,2:
000170: 63 61 6C 6C 20 26 42 43 30 45 0D 0A 09 70 6F 70 call &BC0E...pop
000180: 20 68 6C 0D 0A 09 6C 64 20 64 65 2C 31 36 32 35 hl...ld de,1625
000190: 36 3A 20 6F 72 20 61 3A 20 73 62 63 20 68 6C 2C 6: or a: sbc hl,
0001A0: 64 65 0D 0A 09 6A 72 20 63 2C 73 63 6F 6D 70 72 de...jr c,scompr
0001B0: 0D 0A 09 6C 64 20 68 6C 2C 26 43 30 30 30 3A 20 ...ld hl,&C000:
0001C0: 63 61 6C 6C 20 26 42 43 38 33 3A 20 6A 70 20 26 call &BC83: jp &
0001D0: 42 43 37 41 09 3B 6E 6F 74 20 63 6F 6D 70 72 65 BC7A.;not compre
0001E0: 73 73 65 64 0D 0A 2E 73 63 6F 6D 70 72 09 6C 64 ssed...scompr.ld
0001F0: 20 68 6C 2C 26 34 30 30 30 3A 20 63 61 6C 6C 20 hl,&4000: call
Size : 512 (Real : 512)
000000: 20 70 6C 65 61 73 65 0D 0A 09 20 20 63 61 6C 6C please... call
000010: 20 6E 6C 69 6E 65 0D 0A 09 20 65 78 20 64 65 2C nline... ex de,
000020: 68 6C 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 64 65 hl...pop af...de
000030: 63 20 61 3A 20 6A 72 20 6E 7A 2C 6D 77 6C 6F 6F c a: jr nz,mwloo
000040: 70 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 7C 52 53 p...ret.....;|RS
000050: 58 4F 46 46 0D 0A 09 3B 28 63 29 20 43 52 54 43 XOFF...;(c) CRTC
000060: 20 6F 66 20 44 69 73 63 6F 76 65 72 79 20 66 6F of Discovery fo
000070: 72 20 52 65 61 6C 57 6F 72 6C 64 20 43 6F 64 69 r RealWorld Codi
000080: 6E 67 0D 0A 0D 0A 2E 72 73 78 6F 66 66 09 6C 64 ng.....rsxoff.ld
000090: 20 68 6C 2C 28 26 42 43 44 32 29 3A 20 72 65 73 hl,(&BCD2): res
0000A0: 20 37 2C 68 0D 0A 09 63 61 6C 6C 20 26 42 39 30 7,h...call &B90
0000B0: 36 09 09 09 3B 6C 6F 77 65 72 20 52 4F 4D 20 6F 6...;lower ROM o
0000C0: 6E 0D 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 20 n...inc hl: inc
0000D0: 68 6C 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 hl: inc hl...ld
0000E0: 65 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A e,(hl): inc hl..
0000F0: 09 6C 64 20 64 2C 28 68 6C 29 3A 20 70 75 73 68 .ld d,(hl): push
000100: 20 64 65 3A 20 65 78 20 64 65 2C 68 6C 09 3B 48 de: ex de,hl.;H
000110: 4C 3D 77 6F 72 6B 73 70 61 63 65 20 70 6F 69 6E L=workspace poin
000120: 74 65 72 0D 0A 09 20 6C 64 20 65 2C 28 68 6C 29 ter... ld e,(hl)
000130: 3A 20 69 6E 63 20 68 6C 0D 0A 09 20 6C 64 20 64 : inc hl... ld d
000140: 2C 28 68 6C 29 3A 20 65 78 20 64 65 2C 68 6C 09 ,(hl): ex de,hl.
000150: 09 3B 48 4C 3D 61 64 64 72 65 73 73 20 6F 66 20 .;HL=address of
000160: 52 53 58 20 77 6F 72 6B 73 70 61 63 65 0D 0A 09 RSX workspace...
000170: 20 6C 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 ld e,(hl): inc
000180: 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 hl...ld d,(hl):
000190: 70 6F 70 20 69 78 09 09 3B 44 45 3D 61 64 64 72 pop ix..;DE=addr
0001A0: 65 73 73 20 6F 66 20 6E 65 78 74 20 52 53 58 20 ess of next RSX
0001B0: 77 6F 72 6B 73 70 61 63 65 0D 0A 09 6C 64 20 28 workspace...ld (
0001C0: 69 78 29 2C 65 3A 20 6C 64 20 28 69 78 2B 31 29 ix),e: ld (ix+1)
0001D0: 2C 64 09 09 3B 75 70 64 61 74 65 20 77 6F 72 6B ,d..;update work
0001E0: 73 70 61 63 65 20 70 6F 69 6E 74 65 72 0D 0A 09 space pointer...
0001F0: 63 61 6C 6C 20 26 42 39 30 43 09 09 09 3B 72 65 call &B90C...;re
Size : 512 (Real : 512)
000000: 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D 0A 09 70 0: out (c),c...p
000010: 6F 70 20 62 63 3A 20 72 65 74 0D 0A 0D 0A 0D 0A op bc: ret......
000020: 09 3B 50 72 69 6E 74 20 6D 65 73 73 61 67 65 20 .;Print message
000030: 28 61 6C 6C 20 72 6F 77 73 29 0D 0A 0D 0A 2E 70 (all rows).....p
000040: 72 69 6E 74 09 6C 64 20 61 2C 28 68 65 69 67 68 rint.ld a,(heigh
000050: 74 29 3A 20 6C 64 20 6C 2C 61 0D 0A 09 6C 64 20 t): ld l,a...ld
000060: 61 2C 28 6C 61 73 74 6C 66 29 3A 20 61 64 64 20 a,(lastlf): add
000070: 61 2C 6C 0D 0A 09 6C 64 20 68 6C 2C 6E 6F 66 74 a,l...ld hl,noft
000080: 78 74 0D 0A 09 6F 72 20 61 3A 20 6A 70 20 7A 2C xt...or a: jp z,
000090: 73 74 72 69 6E 67 0D 0A 0D 0A 09 6C 64 20 61 2C string.....ld a,
0000A0: 28 70 62 6C 6F 6E 67 29 0D 0A 09 6C 64 20 68 6C (pblong)...ld hl
0000B0: 2C 70 61 72 74 78 74 0D 0A 09 6F 72 20 61 3A 20 ,partxt...or a:
0000C0: 6A 70 20 7A 2C 73 74 72 69 6E 67 0D 0A 0D 0A 09 jp z,string.....
0000D0: 6C 64 20 61 2C 31 33 3A 20 63 61 6C 6C 20 70 63 ld a,13: call pc
0000E0: 68 61 72 0D 0A 09 6C 64 20 61 2C 30 3A 20 6C 64 har...ld a,0: ld
0000F0: 20 28 72 6F 77 29 2C 61 0D 0A 0D 0A 2E 70 72 61 (row),a.....pra
000100: 5F 6C 70 09 70 75 73 68 20 62 63 0D 0A 09 20 62 _lp.push bc... b
000110: 69 74 20 30 2C 62 3A 20 63 61 6C 6C 20 6E 7A 2C it 0,b: call nz,
000120: 63 74 61 62 0D 0A 09 20 63 61 6C 6C 20 70 72 69 ctab... call pri
000130: 6E 74 31 0D 0A 0D 0A 09 20 6C 64 20 61 2C 31 33 nt1..... ld a,13
000140: 3A 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 : call pchar...
000150: 20 6C 64 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 ld a,esc: call
000160: 70 63 68 61 72 0D 0A 09 20 6C 64 20 61 2C 22 4A pchar... ld a,"J
000170: 22 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 0D ": call pchar...
000180: 0A 09 20 6C 64 20 61 2C 28 68 65 69 67 68 74 29 .. ld a,(height)
000190: 0D 0A 09 20 64 65 63 20 61 0D 0A 09 20 6C 64 20 ... dec a... ld
0001A0: 68 6C 2C 72 6F 77 0D 0A 09 20 69 6E 63 20 28 68 hl,row... inc (h
0001B0: 6C 29 0D 0A 09 20 63 70 20 28 68 6C 29 3A 20 6A l)... cp (hl): j
0001C0: 72 20 6E 63 2C 64 6F 5F 37 6C 66 0D 0A 0D 0A 09 r nc,do_7lf.....
0001D0: 20 3B 49 66 20 6C 61 73 74 20 74 69 6D 65 20 61 ;If last time a
0001E0: 72 6F 75 6E 64 0D 0A 0D 0A 09 20 6C 64 20 61 2C round..... ld a,
0001F0: 28 70 74 79 70 65 29 0D 0A 09 20 6F 72 20 61 3A (ptype)... or a:
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 20 6A 72 20 7A 2C 6C 64 72 61 66 74 0D 0A 0D 0A jr z,ldraft....
000010: 2E 6C 6E 6C 71 09 20 6C 64 20 68 6C 2C 72 6F 77 .lnlq. ld hl,row
000020: 09 09 3B 6C 61 73 74 20 74 69 6D 65 2C 20 4E 4C ..;last time, NL
000030: 51 0D 0A 09 20 64 65 63 20 28 68 6C 29 0D 0A 0D Q... dec (hl)...
000040: 0A 09 20 6C 64 20 61 2C 31 3A 20 63 61 6C 6C 20 .. ld a,1: call
000050: 70 63 68 61 72 0D 0A 09 70 6F 70 20 62 63 0D 0A pchar...pop bc..
000060: 09 62 69 74 20 30 2C 62 3A 20 63 61 6C 6C 20 6E .bit 0,b: call n
000070: 7A 2C 63 74 61 62 0D 0A 09 63 61 6C 6C 20 70 72 z,ctab...call pr
000080: 69 6E 74 31 0D 0A 0D 0A 09 6C 64 20 61 2C 31 33 int1.....ld a,13
000090: 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C : call pchar...l
0000A0: 64 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 70 63 d a,esc: call pc
0000B0: 68 61 72 0D 0A 09 6C 64 20 61 2C 22 4A 22 3A 20 har...ld a,"J":
0000C0: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 call pchar...ld
0000D0: 61 2C 28 6C 61 73 74 6C 66 29 3A 20 64 65 63 20 a,(lastlf): dec
0000E0: 61 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 a: call pchar...
0000F0: 72 65 74 0D 0A 0D 0A 2E 6C 64 72 61 66 74 09 6C ret.....ldraft.l
000100: 64 20 61 2C 28 6C 61 73 74 6C 66 29 0D 0A 09 63 d a,(lastlf)...c
000110: 61 6C 6C 20 70 63 68 61 72 09 09 3B 6C 61 73 74 all pchar..;last
000120: 20 74 69 6D 65 2C 20 64 72 61 66 74 0D 0A 09 70 time, draft...p
000130: 6F 70 20 62 63 3A 20 72 65 74 0D 0A 0D 0A 09 20 op bc: ret.....
000140: 3B 49 66 20 6E 6F 74 20 6C 61 73 74 20 74 69 6D ;If not last tim
000150: 65 0D 0A 0D 0A 2E 64 6F 5F 37 6C 66 09 20 6C 64 e.....do_7lf. ld
000160: 20 61 2C 28 70 74 79 70 65 29 0D 0A 09 20 6F 72 a,(ptype)... or
000170: 20 61 3A 20 6A 72 20 7A 2C 64 72 61 66 74 09 3B a: jr z,draft.;
000180: 64 72 61 66 74 20 6F 72 20 4E 4C 51 3F 0D 0A 0D draft or NLQ?...
000190: 0A 2E 6E 6C 71 09 20 6C 64 20 68 6C 2C 72 6F 77 ..nlq. ld hl,row
0001A0: 09 09 3B 4E 4C 51 2C 0D 0A 09 20 64 65 63 20 28 ..;NLQ,... dec (
0001B0: 68 6C 29 09 09 3B 73 6F 20 67 6F 20 62 61 63 6B hl)..;so go back
0001C0: 20 74 6F 20 72 6F 77 20 6A 75 73 74 20 64 6F 6E to row just don
0001D0: 65 0D 0A 0D 0A 09 20 6C 64 20 61 2C 31 3A 20 63 e..... ld a,1: c
0001E0: 61 6C 6C 20 70 63 68 61 72 0D 0A 09 70 6F 70 20 all pchar...pop
0001F0: 62 63 3A 20 70 75 73 68 20 62 63 0D 0A 09 20 62 bc: push bc... b
Size : 512 (Real : 512)
000000: 09 0D 0A 09 3B 50 72 6F 2D 45 78 74 20 76 31 2E ....;Pro-Ext v1.
000010: 35 30 20 72 6F 75 74 69 6E 65 73 0D 0A 09 3B 28 50 routines...;(
000020: 63 29 20 31 39 39 33 20 52 69 63 68 61 72 64 20 c) 1993 Richard
000030: 46 61 69 72 68 75 72 73 74 0D 0A 0D 0A 09 6F 72 Fairhurst.....or
000040: 67 20 26 39 34 30 30 0D 0A 09 77 72 69 74 65 20 g &9400...write
000050: 22 70 72 6F 2D 65 78 74 2E 62 69 6E 22 0D 0A 09 "pro-ext.bin"...
000060: 6E 6F 6C 69 73 74 0D 0A 0D 0A 65 73 63 09 65 71 nolist....esc.eq
000070: 75 20 32 37 0D 0A 0D 0A 09 3B 49 6E 69 74 69 61 u 27.....;Initia
000080: 6C 69 73 65 20 73 79 73 74 65 6D 0D 0A 0D 0A 2E lise system.....
000090: 69 6E 69 74 09 6C 64 20 61 2C 28 26 42 44 32 42 init.ld a,(&BD2B
0000A0: 29 0D 0A 09 63 70 20 26 43 33 0D 0A 09 72 65 74 )...cp &C3...ret
0000B0: 20 7A 09 09 09 3B 72 65 74 75 72 6E 20 69 66 20 z...;return if
0000C0: 61 6C 72 65 61 64 79 20 69 6E 69 74 69 61 6C 69 already initiali
0000D0: 73 65 64 0D 0A 0D 0A 09 6C 64 20 69 78 2C 26 42 sed.....ld ix,&B
0000E0: 44 32 42 09 09 3B 72 65 64 69 72 65 63 74 20 70 D2B..;redirect p
0000F0: 72 69 6E 74 65 72 20 6A 75 6D 70 0D 0A 09 6C 64 rinter jump...ld
000100: 20 69 79 2C 6F 72 69 67 0D 0A 09 6C 64 20 68 6C iy,orig...ld hl
000110: 2C 70 72 65 64 72 0D 0A 0D 0A 09 6C 64 20 61 2C ,predr.....ld a,
000120: 28 69 78 29 3A 20 20 20 6C 64 20 65 2C 28 69 78 (ix): ld e,(ix
000130: 2B 31 29 3A 20 6C 64 20 64 2C 28 69 78 2B 32 29 +1): ld d,(ix+2)
000140: 0D 0A 09 6C 64 20 28 69 79 29 2C 61 3A 20 20 20 ...ld (iy),a:
000150: 6C 64 20 28 69 79 2B 31 29 2C 65 3A 20 6C 64 20 ld (iy+1),e: ld
000160: 28 69 79 2B 32 29 2C 64 0D 0A 09 6C 64 20 28 69 (iy+2),d...ld (i
000170: 78 29 2C 26 43 33 3A 20 6C 64 20 28 69 78 2B 31 x),&C3: ld (ix+1
000180: 29 2C 6C 3A 20 6C 64 20 28 69 78 2B 32 29 2C 68 ),l: ld (ix+2),h
000190: 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 77 6B 73 70 0D .....ld hl,wksp.
0001A0: 0A 09 6C 64 20 62 63 2C 63 6F 6D 5F 74 0D 0A 09 ..ld bc,com_t...
0001B0: 6A 70 20 26 42 43 44 31 09 09 3B 69 6E 69 74 69 jp &BCD1..;initi
0001C0: 61 6C 69 73 65 20 52 53 58 0D 0A 0D 0A 09 3B 52 alise RSX.....;R
0001D0: 53 58 20 63 6F 6D 6D 61 6E 64 20 74 61 62 6C 65 SX command table
0001E0: 0D 0A 0D 0A 2E 63 6F 6D 5F 74 09 64 77 20 6E 61 .....com_t.dw na
0001F0: 6D 65 5F 74 0D 0A 09 6A 70 20 70 78 68 65 6C 70 me_t...jp pxhelp
Size : 512 (Real : 512)
000000: 69 74 20 30 2C 62 3A 20 63 61 6C 6C 20 6E 7A 2C it 0,b: call nz,
000010: 63 74 61 62 0D 0A 09 20 63 61 6C 6C 20 70 72 69 ctab... call pri
000020: 6E 74 31 09 09 3B 64 6F 20 69 74 20 61 67 61 69 nt1..;do it agai
000030: 6E 0D 0A 0D 0A 09 20 6C 64 20 68 6C 2C 72 6F 77 n..... ld hl,row
000040: 0D 0A 09 20 69 6E 63 20 28 68 6C 29 09 09 3B 61 ... inc (hl)..;a
000050: 6E 64 20 6F 6E 74 6F 20 6E 65 78 74 20 72 6F 77 nd onto next row
000060: 21 0D 0A 0D 0A 09 20 6C 64 20 61 2C 31 33 3A 20 !..... ld a,13:
000070: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 20 6C 64 call pchar... ld
000080: 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 70 63 68 a,esc: call pch
000090: 61 72 0D 0A 09 20 6C 64 20 61 2C 22 4A 22 3A 20 ar... ld a,"J":
0000A0: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 20 6C 64 call pchar... ld
0000B0: 20 61 2C 32 30 3A 20 63 61 6C 6C 20 70 63 68 61 a,20: call pcha
0000C0: 72 09 3B 64 6F 20 74 68 65 20 4C 46 20 62 69 74 r.;do the LF bit
0000D0: 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 6A 70 20 70 ...pop bc...jp p
0000E0: 72 61 5F 6C 70 09 09 3B 61 6E 64 20 6C 6F 6F 70 ra_lp..;and loop
0000F0: 0D 0A 0D 0A 2E 64 72 61 66 74 09 6C 64 20 61 2C .....draft.ld a,
000100: 32 31 3A 20 63 61 6C 6C 20 70 63 68 61 72 09 3B 21: call pchar.;
000110: 69 66 20 64 72 61 66 74 20 71 75 61 6C 69 74 79 if draft quality
000120: 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 6A 70 20 70 ...pop bc...jp p
000130: 72 61 5F 6C 70 09 09 3B 6C 6F 6F 70 0D 0A 0D 0A ra_lp..;loop....
000140: 09 3B 50 72 69 6E 74 20 6D 65 73 73 61 67 65 20 .;Print message
000150: 66 72 6F 6D 20 70 61 72 61 6D 65 74 65 72 20 62 from parameter b
000160: 6C 6F 63 6B 20 28 6F 6E 65 20 72 6F 77 29 0D 0A lock (one row)..
000170: 0D 0A 2E 70 72 69 6E 74 31 09 63 61 6C 6C 20 63 ...print1.call c
000180: 61 6C 63 6C 6E 3A 20 78 6F 72 20 61 0D 0A 09 62 alcln: xor a...b
000190: 69 74 20 37 2C 6C 3A 20 6A 72 20 7A 2C 6E 6F 70 it 7,l: jr z,nop
0001A0: 72 6F 62 0D 0A 09 6C 64 20 61 2C 32 3A 20 72 65 rob...ld a,2: re
0001B0: 73 20 37 2C 6C 0D 0A 0D 0A 2E 6E 6F 70 72 6F 62 s 7,l.....noprob
0001C0: 09 6C 64 20 28 78 74 36 34 29 2C 61 0D 0A 09 6C .ld (xt64),a...l
0001D0: 64 20 28 63 6F 6C 75 6D 6E 29 2C 68 6C 0D 0A 0D d (column),hl...
0001E0: 0A 09 6C 64 20 61 2C 65 73 63 3A 20 20 20 20 20 ..ld a,esc:
0001F0: 20 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 call pchar...
Size : 512 (Real : 512)
000000: 0D 0A 0D 0A 2E 6E 61 6D 65 5F 74 09 73 74 72 20 .....name_t.str
000010: 22 50 58 48 45 4C 50 22 0D 0A 09 64 62 20 30 0D "PXHELP"...db 0.
000020: 0A 0D 0A 09 3B 4C 6F 61 64 20 66 6F 6E 74 20 69 ....;Load font i
000030: 6E 74 6F 20 6D 65 6D 6F 72 79 0D 0A 0D 0A 2E 6C nto memory.....l
000040: 6F 61 64 09 6C 64 20 68 6C 2C 70 62 6C 6F 63 6B oad.ld hl,pblock
000050: 0D 0A 09 6C 64 20 61 2C 28 70 62 6C 6F 6E 67 29 ...ld a,(pblong)
000060: 3A 20 6C 64 20 62 2C 61 0D 0A 09 6C 64 20 64 65 : ld b,a...ld de
000070: 2C 26 34 30 30 30 0D 0A 09 63 61 6C 6C 20 73 5F ,&4000...call s_
000080: 42 43 37 37 09 09 3B 6F 70 65 6E 20 66 69 6C 65 BC77..;open file
000090: 0D 0A 09 6A 70 20 6E 63 2C 6C 64 65 72 72 0D 0A ...jp nc,lderr..
0000A0: 0D 0A 09 6C 64 20 63 2C 32 35 35 0D 0A 09 6C 64 ...ld c,255...ld
0000B0: 20 62 2C 31 30 0D 0A 2E 63 68 6B 6C 70 09 63 61 b,10...chklp.ca
0000C0: 6C 6C 20 73 5F 42 43 38 30 0D 0A 09 78 6F 72 20 ll s_BC80...xor
0000D0: 63 3A 20 6C 64 20 63 2C 61 0D 0A 09 64 6A 6E 7A c: ld c,a...djnz
0000E0: 20 63 68 6B 6C 70 0D 0A 0D 0A 09 6C 64 20 61 2C chklp.....ld a,
0000F0: 63 3A 20 6C 64 20 63 2C 31 0D 0A 09 63 70 20 32 c: ld c,1...cp 2
000100: 34 30 3A 20 6A 70 20 6E 7A 2C 6C 64 65 72 72 0D 40: jp nz,lderr.
000110: 0A 0D 0A 09 63 61 6C 6C 20 73 5F 42 43 38 30 0D ....call s_BC80.
000120: 0A 09 6C 64 20 28 68 65 69 67 68 74 29 2C 61 0D ..ld (height),a.
000130: 0A 0D 0A 09 63 61 6C 6C 20 73 5F 42 43 38 30 0D ....call s_BC80.
000140: 0A 09 6C 64 20 62 2C 61 0D 0A 09 61 64 64 20 61 ..ld b,a...add a
000150: 2C 61 3A 20 61 64 64 20 61 2C 62 09 3B 61 3D 61 ,a: add a,b.;a=a
000160: 2A 33 0D 0A 09 6C 64 20 28 6C 61 73 74 6C 66 29 *3...ld (lastlf)
000170: 2C 61 0D 0A 0D 0A 09 6C 64 20 62 2C 33 32 0D 0A ,a.....ld b,32..
000180: 0D 0A 2E 73 74 72 5F 6C 70 09 70 75 73 68 20 62 ...str_lp.push b
000190: 63 0D 0A 0D 0A 09 20 6C 64 20 61 2C 62 0D 0A 09 c..... ld a,b...
0001A0: 20 63 61 6C 6C 20 73 74 61 64 64 72 09 09 3B 66 call staddr..;f
0001B0: 69 6E 64 20 73 74 61 72 74 20 61 64 64 72 65 73 ind start addres
0001C0: 73 0D 0A 09 20 63 61 6C 6C 20 73 5F 42 43 38 30 s... call s_BC80
0001D0: 0D 0A 09 20 63 61 6C 6C 20 70 62 62 79 74 65 09 ... call pbbyte.
0001E0: 09 3B 70 75 74 20 62 79 74 65 0D 0A 09 20 6C 64 .;put byte... ld
0001F0: 20 64 2C 61 0D 0A 0D 0A 09 20 6C 64 20 61 2C 28 d,a..... ld a,(
Size : 512 (Real : 512)
000000: 73 20 30 20 69 66 20 75 6E 73 75 63 63 65 73 73 s 0 if unsuccess
000010: 66 75 6C 2C 20 31 20 69 66 20 6F 6B 0D 0A 0D 0A ful, 1 if ok....
000020: 2E 6F 70 65 6E 69 69 09 63 61 6C 6C 20 6F 70 65 .openii.call ope
000030: 6E 69 6E 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 6F 70 nin...ret.....op
000040: 65 6E 69 6E 09 63 61 6C 6C 20 26 42 43 37 44 0D enin.call &BC7D.
000050: 0A 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C ....ld l,(ix): l
000060: 64 20 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 d h,(ix+1)...ld
000070: 62 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A b,(hl): inc hl..
000080: 09 6C 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 .ld e,(hl): inc
000090: 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 hl...ld d,(hl):
0000A0: 65 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 64 65 ex de,hl...ld de
0000B0: 2C 62 75 66 66 3A 20 70 75 73 68 20 69 78 0D 0A ,buff: push ix..
0000C0: 09 63 61 6C 6C 20 26 42 43 37 37 3A 20 70 6F 70 .call &BC77: pop
0000D0: 20 69 78 0D 0A 0D 0A 09 6A 72 20 63 2C 73 75 63 ix.....jr c,suc
0000E0: 63 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 29 3A c...ld l,(ix+2):
0000F0: 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 6C ld h,(ix+3)...l
000100: 64 20 28 68 6C 29 2C 30 3A 20 69 6E 63 20 68 6C d (hl),0: inc hl
000110: 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 70 6F ...ld (hl),0: po
000120: 70 20 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 73 p hl...ret.....s
000130: 75 63 63 09 6C 64 20 28 68 65 69 67 68 74 29 2C ucc.ld (height),
000140: 62 63 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 29 bc...ld l,(ix+2)
000150: 3A 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 : ld h,(ix+3)...
000160: 6C 64 20 28 68 6C 29 2C 31 3A 20 69 6E 63 20 68 ld (hl),1: inc h
000170: 6C 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 72 l...ld (hl),0: r
000180: 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 4E 65 78 74 et.....;*** Next
000190: 20 6C 69 6E 65 20 64 6F 77 6E 20 66 72 6F 6D 20 line down from
0001A0: 48 4C 0D 0A 0D 0A 2E 6E 6C 69 6E 65 09 6C 64 20 HL.....nline.ld
0001B0: 61 2C 38 3A 20 61 64 64 20 68 3A 20 6C 64 20 68 a,8: add h: ld h
0001C0: 2C 61 0D 0A 09 62 69 74 20 36 2C 61 3A 20 72 65 ,a...bit 6,a: re
0001D0: 74 20 6E 7A 0D 0A 09 70 75 73 68 20 64 65 0D 0A t nz...push de..
0001E0: 09 20 6C 64 20 64 65 2C 31 36 33 30 34 3A 20 6F . ld de,16304: o
0001F0: 72 20 61 3A 20 73 62 63 20 68 6C 2C 64 65 0D 0A r a: sbc hl,de..
Size : 512 (Real : 512)
000000: 68 65 69 67 68 74 29 0D 0A 09 20 6C 64 20 62 2C height)... ld b,
000010: 61 0D 0A 0D 0A 2E 73 74 6F 5F 6C 70 09 20 6C 64 a.....sto_lp. ld
000020: 20 63 2C 64 0D 0A 2E 73 74 62 5F 6C 70 09 20 69 c,d...stb_lp. i
000030: 6E 63 20 68 6C 0D 0A 09 20 70 75 73 68 20 62 63 nc hl... push bc
000040: 0D 0A 09 20 20 63 61 6C 6C 20 73 5F 42 43 38 30 ... call s_BC80
000050: 0D 0A 09 20 20 63 61 6C 6C 20 70 62 62 79 74 65 ... call pbbyte
000060: 0D 0A 09 20 70 6F 70 20 62 63 0D 0A 09 20 64 65 ... pop bc... de
000070: 63 20 63 0D 0A 09 20 6A 72 20 6E 7A 2C 73 74 62 c c... jr nz,stb
000080: 5F 6C 70 0D 0A 09 20 64 6A 6E 7A 20 73 74 6F 5F _lp... djnz sto_
000090: 6C 70 0D 0A 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 lp.....pop bc...
0000A0: 69 6E 63 20 62 0D 0A 09 6C 64 20 61 2C 31 32 33 inc b...ld a,123
0000B0: 0D 0A 09 63 70 20 62 0D 0A 09 6A 72 20 6E 7A 2C ...cp b...jr nz,
0000C0: 73 74 72 5F 6C 70 0D 0A 0D 0A 09 63 61 6C 6C 20 str_lp.....call
0000D0: 73 5F 42 43 37 41 09 09 09 3B 63 6C 6F 73 65 20 s_BC7A...;close
0000E0: 69 6E 70 75 74 20 66 69 6C 65 0D 0A 09 72 65 74 input file...ret
0000F0: 0D 0A 0D 0A 2E 73 5F 42 43 37 37 09 70 75 73 68 .....s_BC77.push
000100: 20 62 63 3A 20 6C 64 20 62 63 2C 26 37 46 43 37 bc: ld bc,&7FC7
000110: 3A 20 6F 75 74 20 28 63 29 2C 63 3A 20 70 6F 70 : out (c),c: pop
000120: 20 62 63 0D 0A 09 63 61 6C 6C 20 26 42 43 37 37 bc...call &BC77
000130: 0D 0A 09 70 75 73 68 20 62 63 3A 20 6C 64 20 62 ...push bc: ld b
000140: 63 2C 26 37 46 43 30 3A 20 6F 75 74 20 28 63 29 c,&7FC0: out (c)
000150: 2C 63 3A 20 70 6F 70 20 62 63 0D 0A 09 72 65 74 ,c: pop bc...ret
000160: 0D 0A 2E 73 5F 42 43 37 41 09 70 75 73 68 20 62 ...s_BC7A.push b
000170: 63 0D 0A 09 6C 64 20 62 63 2C 26 37 46 43 37 3A c...ld bc,&7FC7:
000180: 20 6F 75 74 20 28 63 29 2C 63 3A 20 63 61 6C 6C out (c),c: call
000190: 20 26 42 43 37 41 0D 0A 09 6C 64 20 62 63 2C 26 &BC7A...ld bc,&
0001A0: 37 46 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D 7FC0: out (c),c.
0001B0: 0A 09 70 6F 70 20 62 63 3A 20 72 65 74 0D 0A 2E ..pop bc: ret...
0001C0: 73 5F 42 43 38 30 09 70 75 73 68 20 62 63 0D 0A s_BC80.push bc..
0001D0: 09 6C 64 20 62 63 2C 26 37 46 43 37 3A 20 6F 75 .ld bc,&7FC7: ou
0001E0: 74 20 28 63 29 2C 63 3A 20 63 61 6C 6C 20 26 42 t (c),c: call &B
0001F0: 43 38 30 0D 0A 09 6C 64 20 62 63 2C 26 37 46 43 C80...ld bc,&7FC
Size : 512 (Real : 512)
000000: 09 70 6F 70 20 64 65 3A 20 72 65 74 0D 0A 0D 0A .pop de: ret....
000010: 2E 68 65 69 67 68 74 09 64 77 20 30 09 09 09 09 .height.dw 0....
000020: 3B 48 65 69 67 68 74 0D 0A 2E 62 75 66 66 09 64 ;Height...buff.d
000030: 73 20 32 30 34 38 09 09 09 09 3B 46 69 6C 65 20 s 2048....;File
000040: 62 75 66 66 65 72 0D 0A 1A 64 20 46 61 69 72 68 buffer...d Fairh
000050: 75 72 73 74 20 31 39 39 33 0D 0A 0D 0A 09 6F 72 urst 1993.....or
000060: 67 20 26 39 30 30 30 0D 0A 09 77 72 69 74 65 20 g &9000...write
000070: 22 67 72 61 70 68 69 63 73 2E 62 69 6E 22 0D 0A "graphics.bin"..
000080: 09 6C 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 .ld e,(hl): inc
000090: 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 hl...ld d,(hl):
0000A0: 65 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 64 65 ex de,hl...ld de
0000B0: 2C 62 75 66 66 3A 20 70 75 73 68 20 69 78 0D 0A ,buff: push ix..
0000C0: 09 63 61 6C 6C 20 26 42 43 37 37 3A 20 70 6F 70 .call &BC77: pop
0000D0: 20 69 78 0D 0A 0D 0A 09 6A 72 20 63 2C 73 75 63 ix.....jr c,suc
0000E0: 63 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 29 3A c...ld l,(ix+2):
0000F0: 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 6C ld h,(ix+3)...l
000100: 64 20 28 68 6C 29 2C 30 3A 20 69 6E 63 20 68 6C d (hl),0: inc hl
000110: 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 70 6F ...ld (hl),0: po
000120: 70 20 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 73 p hl...ret.....s
000130: 75 63 63 09 6C 64 20 28 68 65 69 67 68 74 29 2C ucc.ld (height),
000140: 62 63 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 29 bc...ld l,(ix+2)
000150: 3A 20 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 : ld h,(ix+3)...
000160: 6C 64 20 28 68 6C 29 2C 31 3A 20 69 6E 63 20 68 ld (hl),1: inc h
000170: 6C 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 72 l...ld (hl),0: r
000180: 65 74 0D 0A 0D 0A 09 3B 2A 2A 2A 20 4E 65 78 74 et.....;*** Next
000190: 20 6C 69 6E 65 20 64 6F 77 6E 20 66 72 6F 6D 20 line down from
0001A0: 48 4C 0D 0A 0D 0A 2E 6E 6C 69 6E 65 09 6C 64 20 HL.....nline.ld
0001B0: 61 2C 38 3A 20 61 64 64 20 68 3A 20 6C 64 20 68 a,8: add h: ld h
0001C0: 2C 61 0D 0A 09 62 69 74 20 36 2C 61 3A 20 72 65 ,a...bit 6,a: re
0001D0: 74 20 6E 7A 0D 0A 09 70 75 73 68 20 64 65 0D 0A t nz...push de..
0001E0: 09 20 6C 64 20 64 65 2C 31 36 33 30 34 3A 20 6F . ld de,16304: o
0001F0: 72 20 61 3A 20 73 62 63 20 68 6C 2C 64 65 0D 0A r a: sbc hl,de..
Size : 512 (Real : 512)
000000: 6C 64 20 61 2C 28 70 67 6D 6F 64 65 29 3A 20 20 ld a,(pgmode):
000010: 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 call pchar...ld
000020: 20 61 2C 28 63 6F 6C 75 6D 6E 29 3A 20 20 20 63 a,(column): c
000030: 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 all pchar...ld a
000040: 2C 28 63 6F 6C 75 6D 6E 2B 31 29 3A 20 63 61 6C ,(column+1): cal
000050: 6C 20 70 63 68 61 72 0D 0A 0D 0A 09 6C 64 20 69 l pchar.....ld i
000060: 78 2C 70 62 6C 6F 63 6B 0D 0A 09 6C 64 20 61 2C x,pblock...ld a,
000070: 28 70 62 6C 6F 6E 67 29 3A 20 6C 64 20 62 2C 61 (pblong): ld b,a
000080: 0D 0A 0D 0A 2E 6F 70 63 5F 6C 70 09 70 75 73 68 .....opc_lp.push
000090: 20 62 63 0D 0A 0D 0A 09 20 6C 64 20 61 2C 28 72 bc..... ld a,(r
0000A0: 6F 77 29 3A 20 6C 64 20 62 2C 61 0D 0A 09 20 6C ow): ld b,a... l
0000B0: 64 20 61 2C 28 69 78 29 0D 0A 09 20 63 61 6C 6C d a,(ix)... call
0000C0: 20 73 74 72 61 64 64 0D 0A 0D 0A 2E 70 63 6C 6F stradd.....pclo
0000D0: 6F 70 09 20 63 61 6C 6C 20 67 62 62 79 74 65 0D op. call gbbyte.
0000E0: 0A 09 20 63 61 6C 6C 20 70 72 62 79 74 65 0D 0A .. call prbyte..
0000F0: 09 20 69 6E 63 20 68 6C 0D 0A 09 20 64 65 63 20 . inc hl... dec
000100: 65 3A 20 6A 72 20 6E 7A 2C 70 63 6C 6F 6F 70 0D e: jr nz,pcloop.
000110: 0A 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 69 6E 63 ....pop bc...inc
000120: 20 69 78 0D 0A 09 64 6A 6E 7A 20 6F 70 63 5F 6C ix...djnz opc_l
000130: 70 0D 0A 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 50 p.....ret.....;P
000140: 72 69 6E 74 20 62 79 74 65 0D 0A 0D 0A 2E 70 72 rint byte.....pr
000150: 62 79 74 65 09 70 75 73 68 20 68 6C 3A 20 70 75 byte.push hl: pu
000160: 73 68 20 61 66 0D 0A 09 20 6C 64 20 68 6C 2C 28 sh af... ld hl,(
000170: 63 6F 6C 75 6D 6E 29 0D 0A 09 20 64 65 63 20 68 column)... dec h
000180: 6C 0D 0A 09 20 6C 64 20 61 2C 68 3A 20 61 6E 64 l... ld a,h: and
000190: 20 6C 0D 0A 09 20 63 70 20 26 46 46 3A 20 6A 72 l... cp &FF: jr
0001A0: 20 6E 7A 2C 75 70 64 63 6F 6C 0D 0A 0D 0A 09 20 nz,updcol.....
0001B0: 6C 64 20 61 2C 65 73 63 3A 09 63 61 6C 6C 20 70 ld a,esc:.call p
0001C0: 63 68 61 72 0D 0A 09 20 6C 64 20 61 2C 28 70 67 char... ld a,(pg
0001D0: 6D 6F 64 65 29 3A 09 63 61 6C 6C 20 70 63 68 61 mode):.call pcha
0001E0: 72 0D 0A 09 20 6C 64 20 61 2C 36 34 3A 09 63 61 r... ld a,64:.ca
0001F0: 6C 6C 20 70 63 68 61 72 0D 0A 09 20 6C 64 20 61 ll pchar... ld a
Size : 512 (Real : 512)
000000: 66 20 70 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 f parameter bloc
000010: 6B 3F 0D 0A 0D 0A 09 70 75 73 68 20 61 66 0D 0A k?.....push af..
000020: 09 20 6C 64 20 61 2C 28 77 63 68 61 72 29 0D 0A . ld a,(wchar)..
000030: 09 20 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 63 68 . or a: jr nz,ch
000040: 6B 77 61 69 09 3B 77 61 69 74 69 6E 67 20 66 6F kwai.;waiting fo
000050: 72 20 63 68 61 72 61 63 74 65 72 3F 0D 0A 09 70 r character?...p
000060: 6F 70 20 61 66 0D 0A 09 6A 70 20 6F 72 69 67 0D op af...jp orig.
000070: 0A 0D 0A 2E 63 68 6B 77 61 69 09 20 6C 64 20 28 ....chkwai. ld (
000080: 63 70 61 63 68 72 2B 31 29 2C 61 09 3B 20 3C 3C cpachr+1),a.; <<
000090: 3C 3C 3C 3C 20 43 68 65 63 6B 20 69 66 20 63 68 <<<< Check if ch
0000A0: 61 72 61 63 74 65 72 20 69 73 20 22 65 78 70 65 aracter is "expe
0000B0: 63 74 65 64 22 21 0D 0A 09 70 6F 70 20 61 66 0D cted"!...pop af.
0000C0: 0A 2E 63 70 61 63 68 72 09 63 70 20 26 46 46 09 ..cpachr.cp &FF.
0000D0: 09 09 3B 63 6F 6D 70 61 72 65 20 77 69 74 68 20 ..;compare with
0000E0: 63 68 61 72 61 63 74 65 72 20 62 65 69 6E 67 20 character being
0000F0: 77 61 69 74 65 64 20 66 6F 72 0D 0A 09 6A 72 20 waited for...jr
000100: 7A 2C 67 6F 74 77 61 69 09 09 3B 74 68 65 20 73 z,gotwai..;the s
000110: 61 6D 65 3F 0D 0A 09 70 75 73 68 20 61 66 0D 0A ame?...push af..
000120: 09 20 78 6F 72 20 61 3A 20 6C 64 20 28 77 63 68 . xor a: ld (wch
000130: 61 72 29 2C 61 09 3B 69 66 20 6E 6F 74 2C 20 63 ar),a.;if not, c
000140: 61 6E 63 65 6C 20 77 61 69 74 0D 0A 09 70 6F 70 ancel wait...pop
000150: 20 61 66 0D 0A 09 6A 70 20 6F 72 69 67 09 09 09 af...jp orig...
000160: 3B 61 6E 64 20 67 6F 20 61 6E 64 20 70 72 69 6E ;and go and prin
000170: 74 20 63 68 61 72 61 63 74 65 72 0D 0A 0D 0A 2E t character.....
000180: 67 6F 74 77 61 69 09 63 70 20 31 33 09 09 09 3B gotwai.cp 13...;
000190: 43 52 3F 0D 0A 09 6A 72 20 7A 2C 67 6F 74 63 72 CR?...jr z,gotcr
0001A0: 0D 0A 09 78 6F 72 20 61 3A 20 6C 64 20 28 77 63 ...xor a: ld (wc
0001B0: 68 61 72 29 2C 61 0D 0A 09 73 63 66 3A 20 72 65 har),a...scf: re
0001C0: 74 0D 0A 0D 0A 2E 67 6F 74 63 72 09 6C 64 20 61 t.....gotcr.ld a
0001D0: 2C 31 30 3A 20 6C 64 20 28 77 63 68 61 72 29 2C ,10: ld (wchar),
0001E0: 61 09 3B 6E 6F 77 20 77 61 69 74 20 66 6F 72 20 a.;now wait for
0001F0: 4C 46 21 0D 0A 09 73 63 66 3A 20 72 65 74 0D 0A LF!...scf: ret..
Size : 512 (Real : 512)
000000: 2C 30 3A 09 63 61 6C 6C 20 70 63 68 61 72 0D 0A ,0:.call pchar..
000010: 09 20 6C 64 20 68 6C 2C 36 33 0D 0A 0D 0A 2E 75 . ld hl,63.....u
000020: 70 64 63 6F 6C 09 20 6C 64 20 28 63 6F 6C 75 6D pdcol. ld (colum
000030: 6E 29 2C 68 6C 0D 0A 09 70 6F 70 20 61 66 3A 20 n),hl...pop af:
000040: 63 61 6C 6C 20 70 63 68 61 72 3A 20 70 6F 70 20 call pchar: pop
000050: 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 4C 6F hl...ret.....;Lo
000060: 61 64 20 66 69 6C 65 20 65 72 72 6F 72 20 72 6F ad file error ro
000070: 75 74 69 6E 65 0D 0A 0D 0A 2E 6C 64 65 72 72 09 utine.....lderr.
000080: 6C 64 20 68 6C 2C 6C 64 65 74 78 74 0D 0A 09 6A ld hl,ldetxt...j
000090: 70 20 73 74 72 69 6E 67 0D 0A 0D 0A 09 3B 47 65 p string.....;Ge
0000A0: 74 20 62 79 74 65 20 66 72 6F 6D 20 48 4C 20 69 t byte from HL i
0000B0: 6E 20 73 65 63 6F 6E 64 20 36 34 6B 20 28 63 6F n second 64k (co
0000C0: 72 72 75 70 74 73 20 42 43 29 0D 0A 0D 0A 2E 67 rrupts BC).....g
0000D0: 62 62 79 74 65 09 70 75 73 68 20 68 6C 0D 0A 0D bbyte.push hl...
0000E0: 0A 09 20 6C 64 20 61 2C 68 0D 0A 09 20 72 6C 63 .. ld a,h... rlc
0000F0: 61 3A 20 72 6C 63 61 0D 0A 09 20 61 6E 64 20 33 a: rlca... and 3
000100: 3A 20 61 64 64 20 26 43 34 0D 0A 0D 0A 09 20 6C : add &C4..... l
000110: 64 20 62 2C 26 37 46 0D 0A 09 20 6F 75 74 20 28 d b,&7F... out (
000120: 63 29 2C 61 0D 0A 0D 0A 09 20 72 65 73 20 37 2C c),a..... res 7,
000130: 68 3A 20 73 65 74 20 36 2C 68 0D 0A 09 20 6C 64 h: set 6,h... ld
000140: 20 61 2C 28 68 6C 29 0D 0A 0D 0A 09 70 6F 70 20 a,(hl).....pop
000150: 68 6C 0D 0A 09 6A 70 20 72 73 74 62 6E 6B 0D 0A hl...jp rstbnk..
000160: 0D 0A 09 3B 50 75 74 20 62 79 74 65 20 74 6F 20 ...;Put byte to
000170: 48 4C 20 69 6E 20 73 65 63 6F 6E 64 20 36 34 6B HL in second 64k
000180: 20 28 63 6F 72 72 75 70 74 73 20 42 43 29 0D 0A (corrupts BC)..
000190: 0D 0A 2E 70 62 62 79 74 65 09 70 75 73 68 20 68 ...pbbyte.push h
0001A0: 6C 3A 20 70 75 73 68 20 61 66 0D 0A 09 20 6C 64 l: push af... ld
0001B0: 20 61 2C 68 0D 0A 09 20 72 6C 63 61 3A 20 72 6C a,h... rlca: rl
0001C0: 63 61 0D 0A 09 20 61 6E 64 20 33 3A 20 61 64 64 ca... and 3: add
0001D0: 20 26 43 34 0D 0A 09 20 6C 64 20 62 2C 26 37 46 &C4... ld b,&7F
0001E0: 3A 20 6F 75 74 20 28 63 29 2C 61 0D 0A 09 20 72 : out (c),a... r
0001F0: 65 73 20 37 2C 68 3A 20 73 65 74 20 36 2C 68 0D es 7,h: set 6,h.
Size : 512 (Real : 512)
000000: 0D 0A 2E 61 64 64 62 6C 63 09 70 6F 70 20 61 66 ...addblc.pop af
000010: 09 09 3B 20 3C 3C 3C 3C 3C 3C 20 41 64 64 20 74 ..; <<<<<< Add t
000020: 6F 20 70 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 o parameter bloc
000030: 6B 0D 0A 09 63 70 20 31 32 39 0D 0A 09 6A 70 20 k...cp 129...jp
000040: 7A 2C 64 6F 63 6F 6D 09 09 3B 45 6E 64 20 6F 66 z,docom..;End of
000050: 20 70 61 72 61 6D 65 74 65 72 73 3F 0D 0A 09 70 parameters?...p
000060: 75 73 68 20 68 6C 0D 0A 09 20 6C 64 20 68 6C 2C ush hl... ld hl,
000070: 28 70 62 6C 6F 63 29 3A 20 6C 64 20 28 68 6C 29 (pbloc): ld (hl)
000080: 2C 61 09 3B 53 74 6F 72 65 20 63 68 61 72 61 63 ,a.;Store charac
000090: 74 65 72 20 69 6E 20 70 61 72 61 6D 65 74 65 72 ter in parameter
0000A0: 20 62 6C 6F 63 6B 0D 0A 09 20 69 6E 63 20 68 6C block... inc hl
0000B0: 3A 20 20 6C 64 20 28 70 62 6C 6F 63 29 2C 68 6C : ld (pbloc),hl
0000C0: 0D 0A 0D 0A 09 20 6C 64 20 61 2C 28 70 62 6C 6F ..... ld a,(pblo
0000D0: 6E 67 29 3A 20 69 6E 63 20 61 09 09 3B 49 6E 63 ng): inc a..;Inc
0000E0: 72 65 61 73 65 20 70 61 72 61 6D 65 74 65 72 20 rease parameter
0000F0: 62 6C 6F 63 6B 20 6C 65 6E 67 74 68 0D 0A 09 20 block length...
000100: 63 70 20 26 38 31 3A 20 6A 72 20 6E 7A 2C 6E 6F cp &81: jr nz,no
000110: 74 6F 76 72 0D 0A 09 20 6C 64 20 68 6C 2C 6F 76 tovr... ld hl,ov
000120: 72 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E rtxt: call strin
000130: 67 09 3B 22 4F 76 65 72 66 6C 6F 77 22 20 65 72 g.;"Overflow" er
000140: 72 6F 72 0D 0A 09 20 78 6F 72 20 61 3A 20 6C 64 ror... xor a: ld
000150: 20 28 69 6E 6F 70 29 2C 61 09 09 3B 53 74 6F 70 (inop),a..;Stop
000160: 20 63 61 70 74 75 72 69 6E 67 21 0D 0A 2E 6E 6F capturing!...no
000170: 74 6F 76 72 09 20 6C 64 20 28 70 62 6C 6F 6E 67 tovr. ld (pblong
000180: 29 2C 61 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 73 ),a...pop hl...s
000190: 63 66 3A 20 72 65 74 0D 0A 0D 0A 2E 6C 65 74 73 cf: ret.....lets
0001A0: 67 6F 09 6C 64 20 61 2C 31 09 09 3B 20 3C 3C 3C go.ld a,1..; <<<
0001B0: 3C 3C 3C 20 53 74 61 72 74 20 63 61 70 74 75 72 <<< Start captur
0001C0: 69 6E 67 20 63 68 61 72 61 63 74 65 72 73 0D 0A ing characters..
0001D0: 09 6C 64 20 28 69 6E 6F 70 29 2C 61 0D 0A 09 6C .ld (inop),a...l
0001E0: 64 20 61 2C 30 3A 20 6C 64 20 28 70 62 6C 6F 6E d a,0: ld (pblon
0001F0: 67 29 2C 61 0D 0A 09 70 75 73 68 20 68 6C 0D 0A g),a...push hl..
Size : 512 (Real : 512)
000000: 0A 09 70 6F 70 20 61 66 3A 20 6C 64 20 28 68 6C ..pop af: ld (hl
000010: 29 2C 61 3A 20 70 6F 70 20 68 6C 0D 0A 09 6A 70 ),a: pop hl...jp
000020: 20 72 73 74 62 6E 6B 0D 0A 0D 0A 09 3B 52 65 73 rstbnk.....;Res
000030: 74 6F 72 65 20 62 61 6E 6B 73 20 28 63 6F 72 72 tore banks (corr
000040: 75 70 74 73 20 42 43 29 0D 0A 0D 0A 2E 72 73 74 upts BC).....rst
000050: 62 6E 6B 09 6C 64 20 62 63 2C 26 37 46 43 30 0D bnk.ld bc,&7FC0.
000060: 0A 09 6F 75 74 20 28 63 29 2C 63 3A 20 72 65 74 ..out (c),c: ret
000070: 0D 0A 0D 0A 09 3B 46 69 6E 64 20 73 74 61 72 74 .....;Find start
000080: 20 61 64 64 72 65 73 73 20 6F 66 20 63 68 61 72 address of char
000090: 61 63 74 65 72 20 41 20 69 6E 20 48 4C 20 28 63 acter A in HL (c
0000A0: 6F 72 72 75 70 74 73 20 41 29 0D 0A 0D 0A 2E 73 orrupts A).....s
0000B0: 74 61 64 64 72 09 73 75 62 20 33 32 0D 0A 09 6C taddr.sub 32...l
0000C0: 64 20 6C 2C 61 3A 20 6C 64 20 68 2C 30 0D 0A 09 d l,a: ld h,0...
0000D0: 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 68 add hl,hl: add h
0000E0: 6C 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 3A l,hl: add hl,hl:
0000F0: 20 61 64 64 20 68 6C 2C 68 6C 0D 0A 09 61 64 64 add hl,hl...add
000100: 20 68 6C 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 68 hl,hl: add hl,h
000110: 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 l: add hl,hl: ad
000120: 64 20 68 6C 2C 68 6C 0D 0A 09 61 64 64 20 68 6C d hl,hl...add hl
000130: 2C 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 46 ,hl...ret.....;F
000140: 69 6E 64 20 73 74 61 72 74 20 61 64 64 72 65 73 ind start addres
000150: 73 20 6F 66 20 63 68 61 72 61 63 74 65 72 20 41 s of character A
000160: 2C 20 72 6F 77 20 42 2C 20 69 6E 20 48 4C 20 28 , row B, in HL (
000170: 77 69 64 74 68 20 69 6E 20 44 45 29 0D 0A 0D 0A width in DE)....
000180: 2E 73 74 72 61 64 64 09 63 61 6C 6C 20 73 74 61 .stradd.call sta
000190: 64 64 72 0D 0A 09 70 75 73 68 20 62 63 0D 0A 09 ddr...push bc...
0001A0: 20 63 61 6C 6C 20 67 62 62 79 74 65 0D 0A 09 70 call gbbyte...p
0001B0: 6F 70 20 62 63 0D 0A 09 69 6E 63 20 68 6C 0D 0A op bc...inc hl..
0001C0: 09 6C 64 20 65 2C 61 3A 20 6C 64 20 64 2C 30 0D .ld e,a: ld d,0.
0001D0: 0A 09 6C 64 20 61 2C 62 0D 0A 09 6F 72 20 61 3A ..ld a,b...or a:
0001E0: 20 72 65 74 20 7A 0D 0A 2E 6D 6F 76 65 6F 6E 09 ret z...moveon.
0001F0: 61 64 64 20 68 6C 2C 64 65 0D 0A 09 64 6A 6E 7A add hl,de...djnz
Size : 512 (Real : 512)
000000: 09 20 6C 64 20 68 6C 2C 70 62 6C 6F 63 6B 3A 20 . ld hl,pblock:
000010: 6C 64 20 28 70 62 6C 6F 63 29 2C 68 6C 0D 0A 09 ld (pbloc),hl...
000020: 70 6F 70 20 68 6C 0D 0A 09 73 63 66 3A 20 72 65 pop hl...scf: re
000030: 74 09 0D 0A 0D 0A 2E 64 6F 63 6F 6D 09 6C 64 20 t......docom.ld
000040: 61 2C 32 09 09 3B 20 3C 3C 3C 3C 3C 3C 20 44 6F a,2..; <<<<<< Do
000050: 20 63 6F 6D 6D 61 6E 64 20 6E 65 78 74 20 74 69 command next ti
000060: 6D 65 0D 0A 09 6C 64 20 28 69 6E 6F 70 29 2C 61 me...ld (inop),a
000070: 0D 0A 09 73 63 66 3A 20 72 65 74 0D 0A 0D 0A 2E ...scf: ret.....
000080: 65 78 65 63 6F 6D 09 78 6F 72 20 61 09 09 3B 20 execom.xor a..;
000090: 3C 3C 3C 3C 3C 3C 20 45 78 65 63 75 74 65 20 63 <<<<<< Execute c
0000A0: 6F 6D 6D 61 6E 64 0D 0A 09 6C 64 20 28 69 6E 6F ommand...ld (ino
0000B0: 70 29 2C 61 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 p),a...pop af...
0000C0: 63 70 20 22 46 22 3A 20 6A 70 20 7A 2C 63 5F 6C cp "F": jp z,c_l
0000D0: 6F 61 64 0D 0A 09 63 70 20 22 48 22 3A 20 6A 70 oad...cp "H": jp
0000E0: 20 7A 2C 63 5F 68 65 61 64 0D 0A 09 63 70 20 22 z,c_head...cp "
0000F0: 68 22 3A 20 6A 70 20 7A 2C 63 5F 68 64 65 6E 0D h": jp z,c_hden.
000100: 0A 09 63 70 20 22 43 22 3A 20 6A 70 20 7A 2C 63 ..cp "C": jp z,c
000110: 5F 68 65 61 63 0D 0A 09 63 70 20 22 41 22 3A 20 _heac...cp "A":
000120: 6A 70 20 7A 2C 63 5F 63 6C 69 70 0D 0A 09 63 70 jp z,c_clip...cp
000130: 20 22 61 22 3A 20 6A 70 20 7A 2C 63 5F 63 6C 6F "a": jp z,c_clo
000140: 70 0D 0A 09 63 70 20 22 52 22 3A 20 6A 70 20 7A p...cp "R": jp z
000150: 2C 63 5F 72 6C 6C 6E 0D 0A 09 63 70 20 22 72 22 ,c_rlln...cp "r"
000160: 3A 20 6A 70 20 7A 2C 63 5F 72 6C 6F 70 0D 0A 09 : jp z,c_rlop...
000170: 63 70 20 22 50 22 3A 20 6A 70 20 7A 2C 63 5F 70 cp "P": jp z,c_p
000180: 61 67 65 0D 0A 0D 0A 09 70 75 73 68 20 68 6C 0D age.....push hl.
000190: 0A 09 20 6C 64 20 68 6C 2C 75 6B 63 74 78 74 3A .. ld hl,ukctxt:
0001A0: 20 63 61 6C 6C 20 73 74 72 69 6E 67 09 3B 22 55 call string.;"U
0001B0: 6E 6B 6E 6F 77 6E 20 63 6F 6D 6D 61 6E 64 22 21 nknown command"!
0001C0: 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 73 63 66 3A ...pop hl...scf:
0001D0: 20 72 65 74 0D 0A 0D 0A 2E 63 5F 6C 6F 61 64 09 ret.....c_load.
0001E0: 70 75 73 68 20 62 63 3A 20 70 75 73 68 20 64 65 push bc: push de
0001F0: 09 3B 3E 3E 3E 20 22 46 22 20 2D 20 4C 6F 61 64 .;>>> "F" - Load
Size : 512 (Real : 512)
000000: 20 6D 6F 76 65 6F 6E 0D 0A 09 72 65 74 0D 0A 0D moveon...ret...
000010: 0A 09 3B 43 61 6C 63 75 6C 61 74 65 20 6C 65 6E ..;Calculate len
000020: 67 74 68 20 6F 66 20 73 74 72 69 6E 67 20 69 6E gth of string in
000030: 74 6F 20 48 4C 0D 0A 0D 0A 2E 63 61 6C 63 6C 6E to HL.....calcln
000040: 09 6C 64 20 68 6C 2C 30 0D 0A 09 6C 64 20 69 78 .ld hl,0...ld ix
000050: 2C 70 62 6C 6F 63 6B 0D 0A 09 6C 64 20 61 2C 28 ,pblock...ld a,(
000060: 70 62 6C 6F 6E 67 29 3A 20 6C 64 20 62 2C 61 0D pblong): ld b,a.
000070: 0A 0D 0A 2E 63 6C 63 5F 6C 70 09 6C 64 20 61 2C ....clc_lp.ld a,
000080: 28 69 78 29 0D 0A 09 70 75 73 68 20 68 6C 3A 20 (ix)...push hl:
000090: 70 75 73 68 20 62 63 0D 0A 09 20 6C 64 20 62 2C push bc... ld b,
0000A0: 30 3A 20 63 61 6C 6C 20 73 74 72 61 64 64 0D 0A 0: call stradd..
0000B0: 09 70 6F 70 20 62 63 3A 20 70 6F 70 20 68 6C 0D .pop bc: pop hl.
0000C0: 0A 09 61 64 64 20 68 6C 2C 64 65 0D 0A 0D 0A 09 ..add hl,de.....
0000D0: 69 6E 63 20 69 78 0D 0A 09 64 6A 6E 7A 20 63 6C inc ix...djnz cl
0000E0: 63 5F 6C 70 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B c_lp...ret.....;
0000F0: 43 65 6E 74 72 65 20 73 70 61 63 69 6E 67 0D 0A Centre spacing..
000100: 0D 0A 2E 63 74 61 62 09 63 61 6C 6C 20 63 61 6C ...ctab.call cal
000110: 63 6C 6E 0D 0A 09 65 78 20 68 6C 2C 64 65 3A 20 cln...ex hl,de:
000120: 6C 64 20 68 6C 2C 38 34 30 0D 0A 09 73 62 63 20 ld hl,840...sbc
000130: 68 6C 2C 64 65 3A 20 73 72 6C 20 68 3A 20 72 72 hl,de: srl h: rr
000140: 20 6C 0D 0A 09 6A 70 20 64 6F 63 74 61 62 0D 0A l...jp doctab..
000150: 0D 0A 2E 64 6F 63 74 61 62 09 62 69 74 20 37 2C ...doctab.bit 7,
000160: 6C 3A 20 6A 72 20 7A 2C 63 74 61 62 6F 6B 0D 0A l: jr z,ctabok..
000170: 09 6C 64 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 .ld a,esc: call
000180: 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 22 59 22 pchar...ld a,"Y"
000190: 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C : call pchar...l
0001A0: 64 20 61 2C 31 32 37 3A 20 63 61 6C 6C 20 70 63 d a,127: call pc
0001B0: 68 61 72 0D 0A 09 6C 64 20 61 2C 30 3A 20 20 20 har...ld a,0:
0001C0: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 call pchar...ld
0001D0: 62 2C 31 32 37 0D 0A 2E 63 74 61 62 36 6C 09 78 b,127...ctab6l.x
0001E0: 6F 72 20 61 3A 20 63 61 6C 6C 20 70 63 68 61 72 or a: call pchar
0001F0: 0D 0A 09 64 6A 6E 7A 20 63 74 61 62 36 6C 0D 0A ...djnz ctab6l..
Size : 512 (Real : 512)
000000: 20 68 65 61 64 6C 69 6E 65 20 66 6F 6E 74 0D 0A headline font..
000010: 09 70 75 73 68 20 68 6C 3A 20 70 75 73 68 20 69 .push hl: push i
000020: 78 0D 0A 09 20 63 61 6C 6C 20 6C 6F 61 64 0D 0A x... call load..
000030: 09 70 6F 70 20 69 78 3A 20 70 6F 70 20 68 6C 0D .pop ix: pop hl.
000040: 0A 09 70 6F 70 20 64 65 3A 20 70 6F 70 20 62 63 ..pop de: pop bc
000050: 0D 0A 09 6A 70 20 61 62 73 6F 72 62 0D 0A 0D 0A ...jp absorb....
000060: 2E 63 5F 68 65 61 64 09 70 75 73 68 20 62 63 3A .c_head.push bc:
000070: 20 70 75 73 68 20 64 65 09 3B 3E 3E 3E 20 22 48 push de.;>>> "H
000080: 22 20 2D 20 50 72 69 6E 74 20 68 65 61 64 6C 69 " - Print headli
000090: 6E 65 0D 0A 09 70 75 73 68 20 68 6C 3A 20 70 75 ne...push hl: pu
0000A0: 73 68 20 69 78 0D 0A 09 20 6C 64 20 62 2C 30 3A sh ix... ld b,0:
0000B0: 20 63 61 6C 6C 20 70 72 69 6E 74 0D 0A 09 70 6F call print...po
0000C0: 70 20 69 78 3A 20 70 6F 70 20 68 6C 0D 0A 09 70 p ix: pop hl...p
0000D0: 6F 70 20 64 65 3A 20 70 6F 70 20 62 63 0D 0A 09 op de: pop bc...
0000E0: 6A 70 20 61 62 73 6F 72 62 0D 0A 0D 0A 2E 63 5F jp absorb.....c_
0000F0: 68 65 61 63 09 70 75 73 68 20 62 63 3A 20 70 75 heac.push bc: pu
000100: 73 68 20 64 65 09 3B 3E 3E 3E 20 22 43 22 20 2D sh de.;>>> "C" -
000110: 20 50 72 69 6E 74 20 63 65 6E 74 72 65 64 20 68 Print centred h
000120: 65 61 64 6C 69 6E 65 0D 0A 09 70 75 73 68 20 68 eadline...push h
000130: 6C 3A 20 70 75 73 68 20 69 78 0D 0A 09 20 6C 64 l: push ix... ld
000140: 20 61 2C 28 70 67 6D 6F 64 65 29 0D 0A 09 20 70 a,(pgmode)... p
000150: 75 73 68 20 61 66 0D 0A 09 20 20 6C 64 20 61 2C ush af... ld a,
000160: 22 4C 22 3A 20 6C 64 20 28 70 67 6D 6F 64 65 29 "L": ld (pgmode)
000170: 2C 61 0D 0A 09 20 20 6C 64 20 62 2C 31 3A 20 63 ,a... ld b,1: c
000180: 61 6C 6C 20 70 72 69 6E 74 0D 0A 09 20 70 6F 70 all print... pop
000190: 20 61 66 0D 0A 09 20 6C 64 20 28 70 67 6D 6F 64 af... ld (pgmod
0001A0: 65 29 2C 61 0D 0A 09 70 6F 70 20 69 78 3A 20 70 e),a...pop ix: p
0001B0: 6F 70 20 68 6C 0D 0A 09 70 6F 70 20 64 65 3A 20 op hl...pop de:
0001C0: 70 6F 70 20 62 63 0D 0A 09 6A 70 20 61 62 73 6F pop bc...jp abso
0001D0: 72 62 0D 0A 0D 0A 2E 63 5F 68 64 65 6E 09 70 75 rb.....c_hden.pu
0001E0: 73 68 20 61 66 3A 20 70 75 73 68 20 62 63 09 3B sh af: push bc.;
0001F0: 3E 3E 3E 20 22 68 22 20 2D 20 53 65 74 20 68 65 >>> "h" - Set he
Size : 512 (Real : 512)
000000: 09 72 65 73 20 37 2C 6C 0D 0A 0D 0A 2E 63 74 61 .res 7,l.....cta
000010: 62 6F 6B 09 6C 64 20 61 2C 65 73 63 3A 20 63 61 bok.ld a,esc: ca
000020: 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C ll pchar...ld a,
000030: 22 59 22 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D "Y": call pchar.
000040: 0A 09 6C 64 20 61 2C 6C 3A 20 20 20 63 61 6C 6C ..ld a,l: call
000050: 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 68 3A pchar...ld a,h:
000060: 20 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 2E call pchar...
000070: 63 74 61 62 6F 6C 09 78 6F 72 20 61 3A 20 63 61 ctabol.xor a: ca
000080: 6C 6C 20 70 63 68 61 72 0D 0A 09 64 65 63 20 68 ll pchar...dec h
000090: 6C 3A 20 6C 64 20 61 2C 68 3A 20 6F 72 20 6C 0D l: ld a,h: or l.
0000A0: 0A 09 6A 72 20 6E 7A 2C 63 74 61 62 6F 6C 0D 0A ..jr nz,ctabol..
0000B0: 09 72 65 74 0D 0A 0D 0A 09 3B 50 72 69 6E 74 20 .ret.....;Print
0000C0: 63 68 61 72 61 63 74 65 72 0D 0A 0D 0A 2E 70 63 character.....pc
0000D0: 68 61 72 09 70 75 73 68 20 62 63 0D 0A 09 20 6C har.push bc... l
0000E0: 64 20 63 2C 61 0D 0A 2E 70 63 68 61 72 6C 09 20 d c,a...pcharl.
0000F0: 63 61 6C 6C 20 6F 72 69 67 0D 0A 09 20 6C 64 20 call orig... ld
000100: 61 2C 63 3A 20 6A 72 20 6E 63 2C 70 63 68 61 72 a,c: jr nc,pchar
000110: 6C 0D 0A 09 70 6F 70 20 62 63 0D 0A 09 72 65 74 l...pop bc...ret
000120: 0D 0A 0D 0A 09 3B 4F 72 69 67 69 6E 61 6C 20 26 .....;Original &
000130: 42 44 32 42 20 63 61 6C 6C 0D 0A 0D 0A 2E 6F 72 BD2B call.....or
000140: 69 67 09 64 73 20 33 0D 0A 0D 0A 09 3B 50 72 69 ig.ds 3.....;Pri
000150: 6E 74 20 63 68 61 72 61 63 74 65 72 20 72 65 64 nt character red
000160: 69 72 65 63 74 69 6F 6E 0D 0A 0D 0A 2E 70 72 65 irection.....pre
000170: 64 72 09 70 75 73 68 20 61 66 0D 0A 09 20 6C 64 dr.push af... ld
000180: 20 61 2C 28 69 6E 6F 70 29 0D 0A 09 20 63 70 20 a,(inop)... cp
000190: 31 3A 20 6A 72 20 7A 2C 61 64 64 62 6C 63 09 3B 1: jr z,addblc.;
0001A0: 61 64 64 20 74 6F 20 70 61 72 61 6D 65 74 65 72 add to parameter
0001B0: 20 62 6C 6F 63 6B 3F 0D 0A 09 20 63 70 20 32 3A block?... cp 2:
0001C0: 20 6A 72 20 7A 2C 65 78 65 63 6F 6D 09 3B 63 6F jr z,execom.;co
0001D0: 6D 6D 61 6E 64 3F 0D 0A 09 70 6F 70 20 61 66 0D mmand?...pop af.
0001E0: 0A 0D 0A 09 63 70 20 31 32 38 3A 20 6A 70 20 7A ....cp 128: jp z
0001F0: 2C 6C 65 74 73 67 6F 09 3B 73 74 61 72 74 20 6F ,letsgo.;start o
Size : 512 (Real : 512)
000000: 61 72 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 ar...dec hl: dec
000010: 20 64 65 0D 0A 09 6C 64 20 61 2C 64 3A 20 6F 72 de...ld a,d: or
000020: 20 65 0D 0A 09 6A 72 20 6E 7A 2C 70 6D 6C 5F 6C e...jr nz,pml_l
000030: 70 0D 0A 0D 0A 2E 70 6C 62 5F 6C 70 09 6C 64 20 p.....plb_lp.ld
000040: 61 2C 30 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D a,0: call pchar.
000050: 0A 09 64 65 63 20 68 6C 0D 0A 09 6C 64 20 61 2C ..dec hl...ld a,
000060: 68 3A 20 6F 72 20 6C 0D 0A 09 6A 72 20 6E 7A 2C h: or l...jr nz,
000070: 70 6C 62 5F 6C 70 0D 0A 0D 0A 09 6C 64 20 61 2C plb_lp.....ld a,
000080: 31 33 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 13: call pchar..
000090: 09 73 63 66 3A 20 72 65 74 0D 0A 0D 0A 2E 63 5F .scf: ret.....c_
0000A0: 70 61 67 65 09 6C 64 20 61 2C 31 31 3A 20 63 61 page.ld a,11: ca
0000B0: 6C 6C 20 70 63 68 61 72 09 3B 3E 3E 3E 20 22 50 ll pchar.;>>> "P
0000C0: 22 20 2D 20 50 61 67 65 20 62 72 65 61 6B 0D 0A " - Page break..
0000D0: 09 6C 64 20 68 6C 2C 28 70 62 6C 6F 63 29 3A 20 .ld hl,(pbloc):
0000E0: 64 65 63 20 68 6C 0D 0A 09 6C 64 20 61 2C 28 68 dec hl...ld a,(h
0000F0: 6C 29 0D 0A 09 62 69 74 20 30 2C 61 3A 20 63 61 l)...bit 0,a: ca
000100: 6C 6C 20 6E 7A 2C 62 6C 69 6E 65 0D 0A 0D 0A 09 ll nz,bline.....
000110: 6C 64 20 68 6C 2C 70 62 6C 6F 63 6B 0D 0A 09 6C ld hl,pblock...l
000120: 64 20 61 2C 28 70 62 6C 6F 6E 67 29 3A 20 6C 64 d a,(pblong): ld
000130: 20 62 2C 61 0D 0A 2E 70 6E 6F 5F 6C 70 09 6C 64 b,a...pno_lp.ld
000140: 20 61 2C 28 68 6C 29 3A 20 63 61 6C 6C 20 70 63 a,(hl): call pc
000150: 68 61 72 0D 0A 09 69 6E 63 20 68 6C 3A 20 64 6A har...inc hl: dj
000160: 6E 7A 20 70 6E 6F 5F 6C 70 0D 0A 0D 0A 09 6C 64 nz pno_lp.....ld
000170: 20 68 6C 2C 28 70 62 6C 6F 63 29 3A 20 64 65 63 hl,(pbloc): dec
000180: 20 68 6C 0D 0A 09 6C 64 20 61 2C 28 68 6C 29 0D hl...ld a,(hl).
000190: 0A 09 62 69 74 20 30 2C 61 3A 20 63 61 6C 6C 20 ..bit 0,a: call
0001A0: 7A 2C 62 6C 69 6E 65 32 0D 0A 0D 0A 09 6C 64 20 z,bline2.....ld
0001B0: 61 2C 31 32 3A 20 63 61 6C 6C 20 70 63 68 61 72 a,12: call pchar
0001C0: 0D 0A 09 6A 70 20 61 62 73 6F 72 62 0D 0A 0D 0A ...jp absorb....
0001D0: 2E 62 6C 69 6E 65 09 6C 64 20 61 2C 65 73 63 3A .bline.ld a,esc:
0001E0: 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 call pchar...ld
0001F0: 20 61 2C 22 2D 22 3A 20 63 61 6C 6C 20 70 63 68 a,"-": call pch
Size : 512 (Real : 512)
000000: 0D 0A 09 6C 64 20 61 2C 22 4A 22 3A 20 63 61 6C ...ld a,"J": cal
000010: 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 28 l pchar...ld a,(
000020: 63 6C 67 61 70 29 3A 20 63 61 6C 6C 20 70 63 68 clgap): call pch
000030: 61 72 0D 0A 09 6C 64 20 61 2C 31 33 3A 20 63 61 ar...ld a,13: ca
000040: 6C 6C 20 70 63 68 61 72 0D 0A 09 63 61 6C 6C 20 ll pchar...call
000050: 64 6F 6D 61 72 67 0D 0A 09 6A 72 20 73 6C 6F 6F domarg...jr sloo
000060: 70 0D 0A 0D 0A 09 3B 50 6C 6F 74 20 70 6F 69 6E p.....;Plot poin
000070: 74 20 69 66 20 6E 6F 74 20 61 74 20 65 6E 64 20 t if not at end
000080: 6F 66 20 6C 69 6E 65 0D 0A 0D 0A 2E 70 6C 6F 74 of line.....plot
000090: 09 64 65 63 20 64 65 0D 0A 09 70 75 73 68 20 61 .dec de...push a
0000A0: 66 0D 0A 09 20 6C 64 20 61 2C 64 3A 20 6F 72 20 f... ld a,d: or
0000B0: 65 3A 20 6A 72 20 6E 7A 2C 73 61 6D 65 0D 0A 09 e: jr nz,same...
0000C0: 20 78 6F 72 20 61 3A 20 6C 64 20 28 6E 65 77 6C xor a: ld (newl
0000D0: 69 6E 65 29 2C 61 0D 0A 09 20 6C 64 20 64 65 2C ine),a... ld de,
0000E0: 31 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 72 65 73 1...pop af...res
0000F0: 20 37 2C 61 0D 0A 09 70 75 73 68 20 61 66 0D 0A 7,a...push af..
000100: 0D 0A 2E 73 61 6D 65 09 20 63 61 6C 6C 20 71 75 ...same. call qu
000110: 61 64 63 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 70 adc...pop af...p
000120: 75 73 68 20 62 63 0D 0A 09 20 6C 64 20 63 2C 30 ush bc... ld c,0
000130: 0D 0A 09 20 72 6C 20 61 3A 20 6A 72 20 6E 63 2C ... rl a: jr nc,
000140: 64 6F 73 65 6E 64 0D 0A 2E 69 73 5F 31 09 20 6C dosend...is_1. l
000150: 64 20 62 63 2C 28 62 69 74 70 61 74 29 09 09 09 d bc,(bitpat)...
000160: 3B 3D 20 6C 64 20 63 2C 28 62 69 74 70 61 74 29 ;= ld c,(bitpat)
000170: 0D 0A 2E 64 6F 73 65 6E 64 09 20 70 75 73 68 20 ...dosend. push
000180: 61 66 0D 0A 09 20 20 6C 64 20 61 2C 63 0D 0A 09 af... ld a,c...
000190: 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 20 call pchar...
0001A0: 70 6F 70 20 61 66 0D 0A 09 70 6F 70 20 62 63 0D pop af...pop bc.
0001B0: 0A 09 72 65 74 0D 0A 0D 0A 2E 71 75 61 64 63 09 ..ret.....quadc.
0001C0: 6C 64 20 61 2C 28 62 63 6F 75 6E 74 29 3A 20 63 ld a,(bcount): c
0001D0: 70 20 36 34 0D 0A 09 6A 72 20 6E 7A 2C 69 62 63 p 64...jr nz,ibc
0001E0: 6E 74 0D 0A 0D 0A 09 6C 64 20 61 2C 65 73 63 3A nt.....ld a,esc:
0001F0: 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 call pchar...ld
Size : 512 (Real : 512)
000000: 61 72 0D 0A 09 6C 64 20 61 2C 31 3A 20 20 20 63 ar...ld a,1: c
000010: 61 6C 6C 20 70 63 68 61 72 0D 0A 0D 0A 09 6C 64 all pchar.....ld
000020: 20 61 2C 28 70 62 6C 6F 6E 67 29 3A 20 6C 64 20 a,(pblong): ld
000030: 62 2C 61 0D 0A 09 6C 64 20 61 2C 37 30 3A 20 73 b,a...ld a,70: s
000040: 75 62 20 62 3A 20 6C 64 20 62 2C 61 0D 0A 2E 62 ub b: ld b,a...b
000050: 6C 6C 6F 6F 70 09 6C 64 20 61 2C 33 32 3A 20 63 lloop.ld a,32: c
000060: 61 6C 6C 20 70 63 68 61 72 0D 0A 09 64 6A 6E 7A all pchar...djnz
000070: 20 62 6C 6C 6F 6F 70 0D 0A 0D 0A 09 6C 64 20 61 blloop.....ld a
000080: 2C 65 73 63 3A 20 63 61 6C 6C 20 70 63 68 61 72 ,esc: call pchar
000090: 0D 0A 09 6C 64 20 61 2C 22 2D 22 3A 20 63 61 6C ...ld a,"-": cal
0000A0: 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 30 l pchar...ld a,0
0000B0: 3A 20 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A : call pchar..
0000C0: 0D 0A 09 6C 64 20 61 2C 65 73 63 3A 20 63 61 6C ...ld a,esc: cal
0000D0: 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 22 l pchar...ld a,"
0000E0: 4A 22 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A J": call pchar..
0000F0: 09 6C 64 20 61 2C 31 32 3A 20 20 63 61 6C 6C 20 .ld a,12: call
000100: 70 63 68 61 72 0D 0A 09 72 65 74 0D 0A 0D 0A 2E pchar...ret.....
000110: 62 6C 69 6E 65 32 09 6C 64 20 61 2C 28 70 62 6C bline2.ld a,(pbl
000120: 6F 6E 67 29 0D 0A 09 6C 64 20 68 2C 30 3A 20 6C ong)...ld h,0: l
000130: 64 20 6C 2C 61 0D 0A 09 61 64 64 20 68 6C 2C 68 d l,a...add hl,h
000140: 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 0D 0A 09 6C l: add hl,hl...l
000150: 64 20 64 2C 68 3A 20 6C 64 20 65 2C 6C 3A 20 61 d d,h: ld e,l: a
000160: 64 64 20 68 6C 2C 68 6C 0D 0A 09 61 64 64 20 68 dd hl,hl...add h
000170: 6C 2C 64 65 3A 20 65 78 20 68 6C 2C 64 65 0D 0A l,de: ex hl,de..
000180: 09 6C 64 20 68 6C 2C 38 34 30 3A 20 73 62 63 20 .ld hl,840: sbc
000190: 68 6C 2C 64 65 0D 0A 0D 0A 09 62 69 74 20 37 2C hl,de.....bit 7,
0001A0: 6C 3A 20 6A 72 20 7A 2C 62 32 6F 6B 37 0D 0A 09 l: jr z,b2ok7...
0001B0: 6C 64 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 70 ld a,esc: call p
0001C0: 63 68 61 72 0D 0A 09 6C 64 20 61 2C 22 59 22 3A char...ld a,"Y":
0001D0: 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 call pchar...ld
0001E0: 20 61 2C 31 32 37 3A 20 63 61 6C 6C 20 70 63 68 a,127: call pch
0001F0: 61 72 0D 0A 09 6C 64 20 61 2C 30 3A 20 20 20 63 ar...ld a,0: c
Size : 512 (Real : 512)
000000: 61 64 6C 69 6E 65 20 6F 70 74 69 6F 6E 73 20 28 adline options (
000010: 31 3D 77 69 64 74 68 2C 20 32 3D 4E 4C 51 29 0D 1=width, 2=NLQ).
000020: 0A 09 70 75 73 68 20 64 65 3A 20 70 75 73 68 20 ..push de: push
000030: 68 6C 0D 0A 09 20 63 61 6C 6C 20 63 70 61 72 61 hl... call cpara
000040: 6D 0D 0A 09 20 6C 64 20 61 2C 28 70 73 74 6F 72 m... ld a,(pstor
000050: 65 29 0D 0A 09 20 63 70 20 31 3A 20 6A 72 20 7A e)... cp 1: jr z
000060: 2C 73 6E 67 77 64 74 68 0D 0A 09 20 6C 64 20 61 ,sngwdth... ld a
000070: 2C 22 4B 22 3A 20 6A 72 20 70 75 74 64 65 6E 0D ,"K": jr putden.
000080: 0A 2E 73 6E 67 77 64 74 68 20 6C 64 20 61 2C 22 ..sngwdth ld a,"
000090: 4C 22 0D 0A 2E 70 75 74 64 65 6E 09 20 6C 64 20 L"...putden. ld
0000A0: 28 70 67 6D 6F 64 65 29 2C 61 0D 0A 0D 0A 09 20 (pgmode),a.....
0000B0: 6C 64 20 61 2C 28 70 73 74 6F 72 65 2B 31 29 0D ld a,(pstore+1).
0000C0: 0A 09 20 61 6E 64 20 31 0D 0A 09 20 6C 64 20 28 .. and 1... ld (
0000D0: 70 74 79 70 65 29 2C 61 0D 0A 09 70 6F 70 20 68 ptype),a...pop h
0000E0: 6C 3A 20 70 6F 70 20 64 65 0D 0A 09 70 6F 70 20 l: pop de...pop
0000F0: 62 63 3A 20 70 6F 70 20 61 66 0D 0A 09 6A 70 20 bc: pop af...jp
000100: 61 62 73 6F 72 62 0D 0A 0D 0A 2E 63 5F 63 6C 69 absorb.....c_cli
000110: 70 09 70 75 73 68 20 62 63 09 09 09 3B 3E 3E 3E p.push bc...;>>>
000120: 20 22 41 22 20 2D 20 50 72 69 6E 74 20 63 6C 69 "A" - Print cli
000130: 70 20 61 72 74 0D 0A 09 70 75 73 68 20 64 65 3A p art...push de:
000140: 20 70 75 73 68 20 68 6C 0D 0A 09 70 75 73 68 20 push hl...push
000150: 69 78 3A 20 70 75 73 68 20 69 79 0D 0A 09 20 63 ix: push iy... c
000160: 61 6C 6C 20 63 6C 69 70 0D 0A 09 70 6F 70 20 69 all clip...pop i
000170: 79 3A 20 70 6F 70 20 69 78 0D 0A 09 70 6F 70 20 y: pop ix...pop
000180: 68 6C 3A 20 70 6F 70 20 64 65 0D 0A 09 70 6F 70 hl: pop de...pop
000190: 20 62 63 0D 0A 09 6A 70 20 61 62 73 6F 72 62 0D bc...jp absorb.
0001A0: 0A 0D 0A 2E 63 5F 63 6C 6F 70 09 70 75 73 68 20 ....c_clop.push
0001B0: 62 63 09 09 09 3B 3E 3E 3E 20 22 61 22 20 2D 20 bc...;>>> "a" -
0001C0: 53 65 74 20 63 6C 69 70 20 61 72 74 20 6F 70 74 Set clip art opt
0001D0: 69 6F 6E 73 0D 0A 09 70 75 73 68 20 64 65 3A 20 ions...push de:
0001E0: 70 75 73 68 20 68 6C 0D 0A 09 20 63 61 6C 6C 20 push hl... call
0001F0: 63 70 61 72 61 6D 0D 0A 09 20 6C 64 20 61 2C 28 cparam... ld a,(
Size : 512 (Real : 512)
000000: 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 62 all pchar...ld b
000010: 2C 31 32 37 0D 0A 2E 62 32 5F 6C 70 09 6C 64 20 ,127...b2_lp.ld
000020: 61 2C 38 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D a,8: call pchar.
000030: 0A 09 64 6A 6E 7A 20 62 32 5F 6C 70 0D 0A 09 72 ..djnz b2_lp...r
000040: 65 73 20 37 2C 6C 0D 0A 0D 0A 2E 62 32 6F 6B 37 es 7,l.....b2ok7
000050: 09 6C 64 20 61 2C 65 73 63 3A 20 63 61 6C 6C 20 .ld a,esc: call
000060: 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 22 59 22 pchar...ld a,"Y"
000070: 3A 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C : call pchar...l
000080: 64 20 61 2C 6C 3A 20 20 20 63 61 6C 6C 20 70 63 d a,l: call pc
000090: 68 61 72 0D 0A 09 6C 64 20 61 2C 68 3A 20 20 20 har...ld a,h:
0000A0: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 2E 62 32 6F call pchar...b2o
0000B0: 5F 6C 70 09 6C 64 20 61 2C 38 3A 20 63 61 6C 6C _lp.ld a,8: call
0000C0: 20 70 63 68 61 72 0D 0A 09 64 65 63 20 68 6C 3A pchar...dec hl:
0000D0: 20 6C 64 20 61 2C 68 3A 20 6F 72 20 6C 0D 0A 09 ld a,h: or l...
0000E0: 6A 72 20 6E 7A 2C 62 32 6F 5F 6C 70 0D 0A 09 72 jr nz,b2o_lp...r
0000F0: 65 74 0D 0A 0D 0A 0D 0A 0D 0A 09 3B 41 62 73 6F et.........;Abso
000100: 72 62 20 6E 65 78 74 20 43 52 2F 4C 46 20 61 6E rb next CR/LF an
000110: 64 20 72 65 74 75 72 6E 0D 0A 0D 0A 2E 61 62 73 d return.....abs
000120: 6F 72 62 09 6C 64 20 61 2C 31 33 0D 0A 09 6C 64 orb.ld a,13...ld
000130: 20 28 77 63 68 61 72 29 2C 61 0D 0A 09 73 63 66 (wchar),a...scf
000140: 3A 20 72 65 74 0D 0A 0D 0A 0D 0A 0D 0A 09 3B 50 : ret.........;P
000150: 72 69 6E 74 20 53 74 6F 70 20 50 72 65 73 73 20 rint Stop Press
000160: 63 6C 69 70 20 61 72 74 20 66 69 6C 65 0D 0A 0D clip art file...
000170: 0A 2E 63 6C 69 70 09 6C 64 20 68 6C 2C 70 62 6C ..clip.ld hl,pbl
000180: 6F 63 6B 0D 0A 09 6C 64 20 61 2C 28 70 62 6C 6F ock...ld a,(pblo
000190: 6E 67 29 3A 20 6C 64 20 62 2C 61 0D 0A 09 6C 64 ng): ld b,a...ld
0001A0: 20 64 65 2C 26 34 30 30 30 0D 0A 09 63 61 6C 6C de,&4000...call
0001B0: 20 73 5F 42 43 37 37 09 09 3B 6F 70 65 6E 20 66 s_BC77..;open f
0001C0: 69 6C 65 0D 0A 09 6A 70 20 6E 63 2C 6C 64 65 72 ile...jp nc,lder
0001D0: 72 0D 0A 0D 0A 09 63 61 6C 6C 20 73 5F 42 43 38 r.....call s_BC8
0001E0: 30 3A 20 6C 64 20 6C 2C 61 0D 0A 09 63 61 6C 6C 0: ld l,a...call
0001F0: 20 73 5F 42 43 38 30 3A 20 6C 64 20 68 2C 61 0D s_BC80: ld h,a.
Size : 512 (Real : 512)
000000: 70 73 74 6F 72 65 29 0D 0A 09 20 63 70 20 31 3A pstore)... cp 1:
000010: 20 6A 72 20 7A 2C 61 73 6E 67 77 74 68 0D 0A 09 jr z,asngwth...
000020: 20 63 70 20 32 3A 20 6A 72 20 7A 2C 61 64 62 6C cp 2: jr z,adbl
000030: 77 74 68 0D 0A 09 20 63 70 20 34 3A 20 6A 72 20 wth... cp 4: jr
000040: 7A 2C 61 71 75 61 77 74 68 0D 0A 2E 61 73 6E 67 z,aquawth...asng
000050: 77 74 68 20 6C 64 20 61 2C 22 5A 22 3A 20 6A 72 wth ld a,"Z": jr
000060: 20 61 70 75 74 77 74 68 0D 0A 2E 61 64 62 6C 77 aputwth...adblw
000070: 74 68 20 6C 64 20 61 2C 22 4C 22 3A 20 6A 72 20 th ld a,"L": jr
000080: 61 70 75 74 77 74 68 0D 0A 2E 61 71 75 61 77 74 aputwth...aquawt
000090: 68 20 6C 64 20 61 2C 22 4B 22 3A 20 6A 72 20 61 h ld a,"K": jr a
0000A0: 70 75 74 77 74 68 0D 0A 2E 61 70 75 74 77 74 68 putwth...aputwth
0000B0: 20 6C 64 20 28 63 6C 74 79 70 65 29 2C 61 0D 0A ld (cltype),a..
0000C0: 0D 0A 09 20 6C 64 20 61 2C 28 70 73 74 6F 72 65 ... ld a,(pstore
0000D0: 2B 31 29 0D 0A 09 20 61 64 64 20 61 0D 0A 09 20 +1)... add a...
0000E0: 6C 64 20 28 63 6C 67 61 70 29 2C 61 0D 0A 0D 0A ld (clgap),a....
0000F0: 09 20 6C 64 20 61 2C 28 70 73 74 6F 72 65 2B 32 . ld a,(pstore+2
000100: 29 0D 0A 09 20 6C 64 20 28 62 69 74 70 61 74 29 )... ld (bitpat)
000110: 2C 61 0D 0A 0D 0A 09 20 6C 64 20 61 2C 28 70 73 ,a..... ld a,(ps
000120: 74 6F 72 65 2B 33 29 0D 0A 09 20 6C 64 20 28 6D tore+3)... ld (m
000130: 61 72 67 69 6E 29 2C 61 0D 0A 09 70 6F 70 20 68 argin),a...pop h
000140: 6C 3A 20 70 6F 70 20 64 65 0D 0A 09 70 6F 70 20 l: pop de...pop
000150: 62 63 0D 0A 09 73 63 66 3A 20 72 65 74 0D 0A 0D bc...scf: ret...
000160: 0A 2E 63 5F 72 6C 6F 70 09 70 75 73 68 20 62 63 ..c_rlop.push bc
000170: 09 09 09 3B 3E 3E 3E 20 22 72 22 20 2D 20 53 65 ...;>>> "r" - Se
000180: 74 20 72 75 6C 65 72 20 6C 69 6E 65 20 6F 70 74 t ruler line opt
000190: 69 6F 6E 73 0D 0A 09 70 75 73 68 20 64 65 3A 20 ions...push de:
0001A0: 70 75 73 68 20 68 6C 0D 0A 09 20 63 61 6C 6C 20 push hl... call
0001B0: 63 70 61 72 61 6D 0D 0A 09 20 6C 64 20 61 2C 28 cparam... ld a,(
0001C0: 70 73 74 6F 72 65 29 0D 0A 09 20 6C 64 20 28 72 pstore)... ld (r
0001D0: 6C 77 69 64 29 2C 61 0D 0A 09 20 6C 64 20 61 2C lwid),a... ld a,
0001E0: 28 70 73 74 6F 72 65 2B 31 29 0D 0A 09 20 6C 64 (pstore+1)... ld
0001F0: 20 28 72 6C 62 69 74 29 2C 61 0D 0A 09 70 6F 70 (rlbit),a...pop
Size : 512 (Real : 512)
000000: 0A 09 73 72 6C 20 68 3A 20 72 72 20 6C 09 09 3B ..srl h: rr l..;
000010: 64 69 76 69 64 65 20 62 79 20 32 0D 0A 09 69 6E divide by 2...in
000020: 63 20 68 6C 3A 09 69 6E 63 20 68 6C 0D 0A 09 63 c hl:.inc hl...c
000030: 61 6C 6C 20 61 72 74 70 6D 73 09 09 3B 73 65 74 all artpms..;set
000040: 20 75 70 20 70 72 6F 67 72 65 73 73 20 6D 65 74 up progress met
000050: 65 72 0D 0A 09 70 75 73 68 20 68 6C 09 09 09 3B er...push hl...;
000060: 77 69 6C 6C 20 62 65 20 72 65 74 72 69 65 76 65 will be retrieve
000070: 64 20 6C 61 74 65 72 20 62 79 20 22 70 6F 70 20 d later by "pop
000080: 69 79 22 0D 0A 09 20 63 61 6C 6C 20 73 5F 42 43 iy"... call s_BC
000090: 38 30 3A 20 6C 64 20 65 2C 61 0D 0A 09 20 63 61 80: ld e,a... ca
0000A0: 6C 6C 20 73 5F 42 43 38 30 3A 20 6C 64 20 64 2C ll s_BC80: ld d,
0000B0: 61 0D 0A 09 20 69 6E 63 20 64 65 3A 20 69 6E 63 a... inc de: inc
0000C0: 20 64 65 3A 20 69 6E 63 20 64 65 0D 0A 09 70 6F de: inc de...po
0000D0: 70 20 69 79 0D 0A 09 6C 64 20 61 2C 31 33 3A 20 p iy...ld a,13:
0000E0: 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 0D 0A 2E call pchar.....
0000F0: 73 6C 6F 6F 70 09 70 75 73 68 20 64 65 0D 0A 09 sloop.push de...
000100: 20 6C 64 20 61 2C 36 34 3A 20 6C 64 20 28 62 63 ld a,64: ld (bc
000110: 6F 75 6E 74 29 2C 61 09 09 09 3B 73 65 6E 74 20 ount),a...;sent
000120: 36 34 20 62 79 74 65 73 20 2D 3E 20 73 65 6E 64 64 bytes -> send
000130: 20 45 53 43 20 63 6F 64 65 0D 0A 0D 0A 2E 6C 6F ESC code.....lo
000140: 6F 70 09 20 63 61 6C 6C 20 73 5F 42 43 38 30 0D op. call s_BC80.
000150: 0A 09 20 6C 64 20 62 2C 38 0D 0A 2E 70 6C 6F 6F .. ld b,8...ploo
000160: 70 09 20 63 61 6C 6C 20 70 6C 6F 74 3A 20 64 6A p. call plot: dj
000170: 6E 7A 20 70 6C 6F 6F 70 0D 0A 09 20 6C 64 20 61 nz ploop... ld a
000180: 2C 28 6E 65 77 6C 69 6E 65 29 3A 20 6F 72 20 61 ,(newline): or a
000190: 3A 20 6A 72 20 6E 7A 2C 6C 6F 6F 70 09 3B 6C 6F : jr nz,loop.;lo
0001A0: 6F 70 20 69 66 20 6E 65 77 20 6C 69 6E 65 20 6E op if new line n
0001B0: 6F 74 20 6E 65 65 64 65 64 0D 0A 0D 0A 09 20 3B ot needed..... ;
0001C0: 4E 65 77 20 6C 69 6E 65 20 6E 65 65 64 65 64 2E New line needed.
0001D0: 2E 2E 20 66 69 6E 69 73 68 20 6F 66 66 20 67 72 .. finish off gr
0001E0: 61 70 68 69 63 73 20 63 6F 6D 6D 61 6E 64 20 77 aphics command w
0001F0: 69 74 68 20 7A 65 72 6F 73 0D 0A 0D 0A 09 20 6C ith zeros..... l
Size : 512 (Real : 512)
000000: 20 68 6C 3A 20 70 6F 70 20 64 65 0D 0A 09 70 6F hl: pop de...po
000010: 70 20 62 63 0D 0A 09 73 63 66 3A 20 72 65 74 0D p bc...scf: ret.
000020: 0A 0D 0A 2E 63 5F 72 6C 6C 6E 09 6C 64 20 61 2C ....c_rlln.ld a,
000030: 65 73 63 3A 20 63 61 6C 6C 20 70 63 68 61 72 09 esc: call pchar.
000040: 3B 3E 3E 3E 20 22 52 22 20 2D 20 50 72 69 6E 74 ;>>> "R" - Print
000050: 20 72 75 6C 65 72 20 6C 69 6E 65 0D 0A 09 6C 64 ruler line...ld
000060: 20 61 2C 22 59 22 3A 20 63 61 6C 6C 20 70 63 68 a,"Y": call pch
000070: 61 72 0D 0A 09 6C 64 20 61 2C 26 34 38 3A 20 63 ar...ld a,&48: c
000080: 61 6C 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 all pchar...ld a
000090: 2C 26 30 33 3A 20 63 61 6C 6C 20 70 63 68 61 72 ,&03: call pchar
0000A0: 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 38 34 30 0D 0A .....ld hl,840..
0000B0: 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 09 20 6C 64 ...push hl... ld
0000C0: 20 61 2C 28 72 6C 77 69 64 29 3A 20 6C 64 20 6C a,(rlwid): ld l
0000D0: 2C 61 3A 20 6C 64 20 68 2C 30 0D 0A 09 20 61 64 ,a: ld h,0... ad
0000E0: 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 68 6C 2C d hl,hl: add hl,
0000F0: 68 6C 0D 0A 09 20 65 78 20 68 6C 2C 64 65 3A 20 hl... ex hl,de:
000100: 6C 64 20 68 6C 2C 38 34 30 0D 0A 09 20 73 62 63 ld hl,840... sbc
000110: 20 68 6C 2C 64 65 3A 20 65 78 20 68 6C 2C 64 65 hl,de: ex hl,de
000120: 0D 0A 09 20 73 72 6C 20 64 3A 20 72 72 20 65 0D ... srl d: rr e.
000130: 0A 09 70 6F 70 20 68 6C 0D 0A 0D 0A 2E 70 6F 62 ..pop hl.....pob
000140: 5F 6C 70 09 6C 64 20 61 2C 30 3A 20 63 61 6C 6C _lp.ld a,0: call
000150: 20 70 63 68 61 72 0D 0A 09 64 65 63 20 68 6C 3A pchar...dec hl:
000160: 20 64 65 63 20 64 65 0D 0A 09 6C 64 20 61 2C 64 dec de...ld a,d
000170: 3A 20 6F 72 20 65 0D 0A 09 6A 72 20 6E 7A 2C 70 : or e...jr nz,p
000180: 6F 62 5F 6C 70 0D 0A 0D 0A 09 70 75 73 68 20 68 ob_lp.....push h
000190: 6C 0D 0A 09 20 6C 64 20 61 2C 28 72 6C 77 69 64 l... ld a,(rlwid
0001A0: 29 3A 20 6C 64 20 6C 2C 61 3A 20 6C 64 20 68 2C ): ld l,a: ld h,
0001B0: 30 0D 0A 09 20 61 64 64 20 68 6C 2C 68 6C 3A 20 0... add hl,hl:
0001C0: 61 64 64 20 68 6C 2C 68 6C 0D 0A 09 20 65 78 20 add hl,hl... ex
0001D0: 68 6C 2C 64 65 0D 0A 09 70 6F 70 20 68 6C 0D 0A hl,de...pop hl..
0001E0: 0D 0A 2E 70 6D 6C 5F 6C 70 09 6C 64 20 61 2C 28 ...pml_lp.ld a,(
0001F0: 72 6C 62 69 74 29 3A 20 63 61 6C 6C 20 70 63 68 rlbit): call pch
Size : 512 (Real : 512)
000000: 64 20 61 2C 28 62 63 6F 75 6E 74 29 0D 0A 2E 66 d a,(bcount)...f
000010: 62 75 66 66 72 09 20 63 70 20 36 34 3A 20 6A 72 buffr. cp 64: jr
000020: 20 7A 2C 61 6C 6C 73 6E 74 0D 0A 09 20 70 75 73 z,allsnt... pus
000030: 68 20 61 66 0D 0A 09 20 20 78 6F 72 20 61 3A 20 h af... xor a:
000040: 63 61 6C 6C 20 70 63 68 61 72 0D 0A 09 20 70 6F call pchar... po
000050: 70 20 61 66 3A 20 69 6E 63 20 61 0D 0A 09 20 6A p af: inc a... j
000060: 72 20 66 62 75 66 66 72 0D 0A 0D 0A 2E 61 6C 6C r fbuffr.....all
000070: 73 6E 74 09 20 6C 64 20 61 2C 32 35 35 3A 20 6C snt. ld a,255: l
000080: 64 20 28 6E 65 77 6C 69 6E 65 29 2C 61 09 09 3B d (newline),a..;
000090: 64 6F 6E 27 74 20 6E 65 65 64 20 6E 65 77 20 6C don't need new l
0000A0: 69 6E 65 0D 0A 0D 0A 09 20 6C 64 20 61 2C 28 61 ine..... ld a,(a
0000B0: 72 74 63 6E 74 29 3A 20 6F 72 20 61 3A 20 6A 72 rtcnt): or a: jr
0000C0: 20 6E 7A 2C 6E 6F 70 63 68 72 09 3B 70 72 6F 67 nz,nopchr.;prog
0000D0: 72 65 73 73 20 6D 65 74 65 72 20 68 61 6E 64 6C ress meter handl
0000E0: 69 6E 67 0D 0A 09 20 6C 64 20 61 2C 31 34 33 3A ing... ld a,143:
0000F0: 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 20 78 call &BB5A... x
000100: 6F 72 20 61 0D 0A 2E 6E 6F 70 63 68 72 09 20 69 or a...nopchr. i
000110: 6E 63 20 61 3A 20 61 6E 64 20 37 3A 20 6C 64 20 nc a: and 7: ld
000120: 28 61 72 74 63 6E 74 29 2C 61 0D 0A 0D 0A 09 20 (artcnt),a.....
000130: 64 65 63 20 69 79 0D 0A 09 20 64 62 20 26 46 44 dec iy... db &FD
000140: 3A 20 6C 64 20 61 2C 68 0D 0A 09 20 64 62 20 26 : ld a,h... db &
000150: 46 44 3A 20 6F 72 20 6C 0D 0A 09 70 6F 70 20 64 FD: or l...pop d
000160: 65 3A 20 6A 72 20 6E 7A 2C 6E 6F 74 66 69 6E 09 e: jr nz,notfin.
000170: 09 09 3B 46 69 6E 69 73 68 65 64 20 77 68 6F 6C ..;Finished whol
000180: 65 20 6C 6F 74 20 79 65 74 3F 0D 0A 09 6C 64 20 e lot yet?...ld
000190: 61 2C 31 30 3A 20 63 61 6C 6C 20 26 42 42 35 41 a,10: call &BB5A
0001A0: 09 09 09 3B 59 65 73 20 2D 20 43 52 2C 20 63 6C ...;Yes - CR, cl
0001B0: 6F 73 65 20 66 69 6C 65 2C 20 71 75 69 74 0D 0A ose file, quit..
0001C0: 09 6C 64 20 61 2C 31 33 3A 20 63 61 6C 6C 20 26 .ld a,13: call &
0001D0: 42 42 35 41 0D 0A 09 6A 70 20 73 5F 42 43 37 41 BB5A...jp s_BC7A
0001E0: 0D 0A 0D 0A 2E 6E 6F 74 66 69 6E 09 6C 64 20 61 .....notfin.ld a
0001F0: 2C 65 73 63 3A 20 63 61 6C 6C 20 70 63 68 61 72 ,esc: call pchar
Size : 512 (Real : 512)
000000: 67 20 6E 75 6D 62 65 72 20 6F 66 20 70 61 72 61 g number of para
000010: 6D 65 74 65 72 73 22 2C 31 33 2C 31 30 2C 30 0D meters",13,10,0.
000020: 0A 2E 6F 76 72 74 78 74 09 64 62 20 22 50 52 4F ..ovrtxt.db "PRO
000030: 2D 45 58 54 3A 20 70 61 72 61 6D 65 74 65 72 20 -EXT: parameter
000040: 6F 76 65 72 66 6C 6F 77 22 2C 31 33 2C 31 30 2C overflow",13,10,
000050: 30 0D 0A 2E 61 72 74 74 78 74 09 64 62 20 22 50 0...arttxt.db "P
000060: 52 4F 2D 45 58 54 3A 20 70 72 69 6E 74 69 6E 67 RO-EXT: printing
000070: 20 63 6C 69 70 20 61 72 74 20 20 22 2C 30 0D 0A clip art ",0..
000080: 0D 0A 2E 68 65 6C 70 62 67 09 64 62 20 34 2C 32 ...helpbg.db 4,2
000090: 2C 22 50 52 4F 2D 45 58 54 20 76 31 2E 35 30 20 ,"PRO-EXT v1.50
0000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0000B0: 20 20 20 20 20 20 20 22 2C 31 36 34 2C 22 31 39 ",164,"19
0000C0: 39 33 20 52 69 63 68 61 72 64 20 46 61 69 72 68 93 Richard Fairh
0000D0: 75 72 73 74 22 2C 31 30 2C 31 33 2C 31 30 2C 30 urst",10,13,10,0
0000E0: 0D 0A 2E 68 65 6C 70 65 6E 09 64 62 20 31 30 2C ...helpen.db 10,
0000F0: 22 46 6F 72 20 61 20 6C 69 73 74 20 6F 66 20 63 "For a list of c
000100: 6F 6D 6D 61 6E 64 73 2C 20 74 79 70 65 20 50 58 ommands, type PX
000110: 48 45 4C 50 2E 22 2C 31 33 2C 31 30 2C 31 30 2C HELP.",13,10,10,
000120: 30 0D 0A 1A 63 68 61 72 64 20 46 61 69 72 68 75 0...chard Fairhu
000130: 72 73 74 0D 0A 0D 0A 09 6F 72 67 20 26 39 34 30 rst.....org &940
000140: 30 0D 0A 09 77 72 69 74 65 20 22 70 72 6F 2D 65 0...write "pro-e
000150: 78 74 2E 62 69 6E 22 0D 0A 09 6E 6F 6C 69 73 74 xt.bin"...nolist
000160: 0D 0A 0D 0A 65 73 63 09 65 71 75 20 32 37 0D 0A ....esc.equ 27..
000170: 0D 0A 09 3B 49 6E 69 74 69 61 6C 69 73 65 20 73 ...;Initialise s
000180: 2C 30 0D 0A 2E 75 6B 63 74 78 74 09 64 62 20 22 ,0...ukctxt.db "
000190: 50 52 4F 2D 45 58 54 3A 20 75 6E 6B 6E 6F 77 6E PRO-EXT: unknown
0001A0: 20 63 6F 6D 6D 61 6E 64 22 2C 31 33 2C 31 30 2C command",13,10,
0001B0: 30 0D 0A 2E 6E 6F 66 74 78 74 09 64 62 20 22 50 0...noftxt.db "P
0001C0: 52 4F 2D 45 58 54 3A 20 66 6F 6E 74 20 66 69 6C RO-EXT: font fil
0001D0: 65 20 6E 6F 74 20 6C 6F 61 64 65 64 22 2C 31 33 e not loaded",13
0001E0: 2C 31 30 2C 30 0D 0A 2E 70 61 72 74 78 74 09 64 ,10,0...partxt.d
0001F0: 62 20 22 50 52 4F 2D 45 58 54 3A 20 77 72 6F 6E b "PRO-EXT: wron
Size : 512 (Real : 512)
000000: 64 69 73 70 09 6C 64 20 68 6C 2C 68 65 6C 70 65 disp.ld hl,helpe
000010: 6E 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A n: call string..
000020: 2E 71 6E 64 69 73 70 09 6C 64 20 62 63 2C 26 37 .qndisp.ld bc,&7
000030: 46 43 30 3A 20 6F 75 74 20 28 63 29 2C 63 0D 0A FC0: out (c),c..
000040: 09 72 65 74 0D 0A 0D 0A 2E 68 6E 66 6F 75 6E 09 .ret.....hnfoun.
000050: 6C 64 20 62 63 2C 26 37 46 43 30 3A 20 6F 75 74 ld bc,&7FC0: out
000060: 20 28 63 29 2C 63 0D 0A 09 6C 64 20 68 6C 2C 75 (c),c...ld hl,u
000070: 6B 63 74 78 74 3A 20 6A 70 20 73 74 72 69 6E 67 kctxt: jp string
000080: 0D 0A 0D 0A 09 3B 50 72 69 6E 74 20 73 74 72 69 .....;Print stri
000090: 6E 67 20 6F 6E 20 73 63 72 65 65 6E 0D 0A 0D 0A ng on screen....
0000A0: 2E 73 74 72 69 6E 67 09 6C 64 20 61 2C 28 68 6C .string.ld a,(hl
0000B0: 29 3A 20 6F 72 20 61 3A 20 72 65 74 20 7A 0D 0A ): or a: ret z..
0000C0: 09 63 61 6C 6C 20 26 42 42 35 41 3A 20 69 6E 63 .call &BB5A: inc
0000D0: 20 68 6C 3A 20 6A 72 20 73 74 72 69 6E 67 0D 0A hl: jr string..
0000E0: 0D 0A 09 3B 43 6F 6E 76 65 72 74 20 70 61 72 61 ...;Convert para
0000F0: 6D 65 74 65 72 73 20 66 72 6F 6D 20 22 70 62 6C meters from "pbl
000100: 6F 63 6B 22 20 28 41 53 43 49 49 29 20 69 6E 74 ock" (ASCII) int
000110: 6F 20 22 70 73 74 6F 72 65 22 20 28 76 61 6C 75 o "pstore" (valu
000120: 65 73 29 0D 0A 0D 0A 2E 63 70 61 72 61 6D 09 6C es).....cparam.l
000130: 64 20 61 2C 28 70 62 6C 6F 6E 67 29 3A 20 6C 64 d a,(pblong): ld
000140: 20 62 2C 61 0D 0A 09 6C 64 20 68 6C 2C 70 62 6C b,a...ld hl,pbl
000150: 6F 63 6B 3A 20 6C 64 20 64 65 2C 70 73 74 6F 72 ock: ld de,pstor
000160: 65 0D 0A 09 6C 64 20 63 2C 30 0D 0A 0D 0A 2E 63 e...ld c,0.....c
000170: 70 72 6D 6C 70 09 6C 64 20 61 2C 28 68 6C 29 0D prmlp.ld a,(hl).
000180: 0A 09 63 70 20 22 2C 22 3A 20 6A 72 20 7A 2C 20 ..cp ",": jr z,
000190: 70 75 74 63 68 72 0D 0A 09 63 70 20 22 30 22 3A putchr...cp "0":
0001A0: 20 6A 72 20 63 2C 20 6E 78 74 63 68 72 0D 0A 09 jr c, nxtchr...
0001B0: 63 70 20 22 3A 22 3A 20 6A 72 20 6E 63 2C 6E 78 cp ":": jr nc,nx
0001C0: 74 63 68 72 0D 0A 09 72 6C 63 20 63 3A 20 6C 64 tchr...rlc c: ld
0001D0: 20 61 2C 63 0D 0A 09 72 6C 63 20 63 3A 20 72 6C a,c...rlc c: rl
0001E0: 63 20 63 0D 0A 09 61 64 64 20 63 3A 20 6C 64 20 c c...add c: ld
0001F0: 63 2C 61 09 09 3B 43 3D 43 2A 31 30 0D 0A 0D 0A c,a..;C=C*10....
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 09 6C 64 20 61 2C 28 68 6C 29 3A 20 73 75 62 20 .ld a,(hl): sub
000010: 34 38 0D 0A 09 61 64 64 20 63 3A 20 6C 64 20 63 48...add c: ld c
000020: 2C 61 0D 0A 0D 0A 2E 6E 78 74 63 68 72 09 69 6E ,a.....nxtchr.in
000030: 63 20 68 6C 3A 20 64 6A 6E 7A 20 63 70 72 6D 6C c hl: djnz cprml
000040: 70 09 3B 6E 65 78 74 20 63 68 61 72 61 63 74 65 p.;next characte
000050: 72 20 61 6E 64 20 6C 6F 6F 70 0D 0A 09 6C 64 20 r and loop...ld
000060: 61 2C 63 3A 20 6C 64 20 28 64 65 29 2C 61 3A 20 a,c: ld (de),a:
000070: 72 65 74 09 3B 69 66 20 72 75 6E 20 6F 75 74 2C ret.;if run out,
000080: 20 70 75 74 20 6C 61 73 74 20 70 61 72 61 6D 65 put last parame
000090: 74 65 72 20 69 6E 20 61 6E 64 20 65 6E 64 21 0D ter in and end!.
0000A0: 0A 0D 0A 2E 70 75 74 63 68 72 09 6C 64 20 61 2C ....putchr.ld a,
0000B0: 63 3A 20 6C 64 20 63 2C 30 09 09 3B 73 74 6F 72 c: ld c,0..;stor
0000C0: 65 20 76 61 6C 75 65 20 61 6E 64 20 62 6C 61 6E e value and blan
0000D0: 6B 20 69 74 20 66 6F 72 20 6E 65 78 74 20 74 69 k it for next ti
0000E0: 6D 65 0D 0A 09 6C 64 20 28 64 65 29 2C 61 3A 20 me...ld (de),a:
0000F0: 69 6E 63 20 64 65 09 3B 20 7C 0D 0A 09 69 6E 63 inc de.; |...inc
000100: 20 68 6C 3A 20 64 6A 6E 7A 20 63 70 72 6D 6C 70 hl: djnz cprmlp
000110: 09 3B 67 6F 20 6F 6E 74 6F 20 6E 65 78 74 20 63 .;go onto next c
000120: 68 61 72 61 63 74 65 72 0D 0A 09 72 65 74 09 09 haracter...ret..
000130: 09 3B 75 6E 6C 65 73 73 20 61 6C 6C 20 63 68 61 .;unless all cha
000140: 72 61 63 74 65 72 73 20 75 73 65 64 0D 0A 0D 0A racters used....
000150: 09 3B 44 61 74 61 0D 0A 0D 0A 2E 70 62 6C 6F 63 .;Data.....pbloc
000160: 6B 09 64 62 20 22 4F 46 46 49 43 45 2E 46 4E 54 k.db "OFFICE.FNT
000170: 22 3A 20 64 73 20 26 37 34 09 3B 31 32 38 2D 62 ": ds &74.;128-b
000180: 79 74 65 20 70 61 72 61 6D 65 74 65 72 20 62 6C yte parameter bl
000190: 6F 63 6B 0D 0A 2E 70 62 6C 6F 6E 67 09 64 62 20 ock...pblong.db
0001A0: 31 30 09 09 09 3B 6C 65 6E 67 74 68 20 6F 66 20 10...;length of
0001B0: 70 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 6B 0D parameter block.
0001C0: 0A 2E 70 62 6C 6F 63 09 64 77 20 70 62 6C 6F 63 ..pbloc.dw pbloc
0001D0: 6B 09 09 3B 6C 6F 63 61 74 69 6F 6E 20 69 6E 20 k..;location in
0001E0: 70 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 6B 0D parameter block.
0001F0: 0A 2E 69 6E 6F 70 09 64 62 20 30 09 09 09 3B 70 ..inop.db 0...;p
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 42 42 53 2E 4D 4F 44 20 ...;*** BBS.MOD
000010: 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 53 43 41 ***.....;>>> SCA
000020: 4E 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 73 63 N command.....sc
000030: 61 6E 5F 69 09 63 61 6C 6C 20 62 75 66 66 5F 63 an_i.call buff_c
000040: 0D 0A 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 33 ...ld c,2...cp 3
000050: 0D 0A 09 6A 70 20 63 2C 65 72 72 6F 72 0D 0A 0D ...jp c,error...
000060: 0A 09 64 65 63 20 61 3A 20 64 65 63 20 61 0D 0A ..dec a: dec a..
000070: 09 63 61 6C 6C 20 72 66 6E 61 6D 65 0D 0A 0D 0A .call rfname....
000080: 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 .ld l,(ix): ld h
000090: 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 61 2C 28 ,(ix+1)...ld a,(
0000A0: 69 79 2B 37 32 29 09 09 09 3B 66 69 6C 65 73 20 iy+72)...;files
0000B0: 74 6F 20 73 65 6E 64 0D 0A 09 6C 64 20 28 68 6C to send...ld (hl
0000C0: 29 2C 61 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C 64 ),a...inc hl: ld
0000D0: 20 28 68 6C 29 2C 30 0D 0A 0D 0A 09 6C 64 20 6C (hl),0.....ld l
0000E0: 2C 28 69 78 2B 32 29 3A 20 6C 64 20 68 2C 28 69 ,(ix+2): ld h,(i
0000F0: 78 2B 33 29 0D 0A 09 6C 64 20 65 2C 28 69 79 2B x+3)...ld e,(iy+
000100: 37 33 29 3A 20 6C 64 20 64 2C 28 69 79 2B 37 34 73): ld d,(iy+74
000110: 29 09 3B 6B 20 74 6F 20 73 65 6E 64 0D 0A 09 6C ).;k to send...l
000120: 64 20 28 68 6C 29 2C 65 0D 0A 09 69 6E 63 20 68 d (hl),e...inc h
000130: 6C 3A 20 6C 64 20 28 68 6C 29 2C 64 0D 0A 09 72 l: ld (hl),d...r
000140: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 42 43 4C 45 et.....;>>> BCLE
000150: 41 52 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 AR command.....b
000160: 63 6C 72 5F 69 09 6C 64 20 61 2C 26 43 34 0D 0A clr_i.ld a,&C4..
000170: 2E 62 63 6C 72 6C 70 09 6C 64 20 62 2C 26 37 46 .bclrlp.ld b,&7F
000180: 0D 0A 09 6F 75 74 20 28 63 29 2C 61 0D 0A 09 6C ...out (c),a...l
000190: 64 20 68 6C 2C 26 34 30 30 30 0D 0A 09 6C 64 20 d hl,&4000...ld
0001A0: 64 65 2C 26 34 30 30 31 0D 0A 09 6C 64 20 62 63 de,&4001...ld bc
0001B0: 2C 26 33 66 66 66 0D 0A 09 6C 64 20 28 68 6C 29 ,&3fff...ld (hl)
0001C0: 2C 30 3A 20 6C 64 69 72 0D 0A 09 69 6E 63 20 61 ,0: ldir...inc a
0001D0: 3A 20 63 70 20 26 43 38 0D 0A 09 6A 72 20 6E 7A : cp &C8...jr nz
0001E0: 2C 62 63 6C 72 6C 70 0D 0A 09 63 61 6C 6C 20 72 ,bclrlp...call r
0001F0: 73 74 62 6E 6B 0D 0A 0D 0A 09 78 6F 72 20 61 0D stbnk.....xor a.
Size : 512 (Real : 512)
000000: 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 6B 20 69 arameter block i
000010: 6E 20 6F 70 65 72 61 74 69 6F 6E 3F 20 28 31 2F n operation? (1/
000020: 32 29 0D 0A 2E 68 65 69 67 68 74 09 64 62 20 30 2)...height.db 0
000030: 09 09 09 3B 68 65 69 67 68 74 20 6F 66 20 63 68 ...;height of ch
000040: 61 72 61 63 74 65 72 73 0D 0A 2E 6C 61 73 74 6C aracters...lastl
000050: 66 09 64 62 20 30 09 09 09 3B 6E 75 6D 62 65 72 f.db 0...;number
000060: 20 74 6F 20 6C 69 6E 65 20 66 65 65 64 20 61 74 to line feed at
000070: 20 6C 61 73 74 20 4C 46 0D 0A 2E 72 6F 77 09 64 last LF...row.d
000080: 62 20 30 09 09 09 3B 63 75 72 72 65 6E 74 20 63 b 0...;current c
000090: 68 61 72 61 63 74 65 72 20 72 6F 77 0D 0A 2E 78 haracter row...x
0000A0: 74 36 34 09 64 62 20 30 09 09 09 3B 65 78 74 72 t64.db 0...;extr
0000B0: 61 20 36 34 2D 62 79 74 65 20 62 6C 6F 63 6B 73 a 64-byte blocks
0000C0: 20 74 6F 20 73 65 6E 64 0D 0A 2E 63 6F 6C 75 6D to send...colum
0000D0: 6E 09 64 77 20 30 09 09 09 3B 6E 75 6D 62 65 72 n.dw 0...;number
0000E0: 20 6F 66 20 63 6F 6C 75 6D 6E 73 20 74 6F 20 73 of columns to s
0000F0: 65 6E 64 0D 0A 2E 70 67 6D 6F 64 65 09 64 62 20 end...pgmode.db
000100: 22 4C 22 09 09 09 3B 64 6F 75 62 6C 65 20 64 65 "L"...;double de
000110: 6E 73 69 74 79 20 66 6F 72 20 66 6F 6E 74 73 0D nsity for fonts.
000120: 0A 2E 70 74 79 70 65 09 64 62 20 30 09 09 09 3B ..ptype.db 0...;
000130: 64 72 61 66 74 20 28 30 29 20 6F 72 20 4E 4C 51 draft (0) or NLQ
000140: 20 28 31 29 20 66 6F 6E 74 0D 0A 2E 63 6C 67 61 (1) font...clga
000150: 70 09 64 62 20 32 09 09 09 3B 32 20 6C 69 6E 65 p.db 2...;2 line
000160: 20 66 65 65 64 20 66 6F 72 20 63 6C 69 70 20 61 feed for clip a
000170: 72 74 0D 0A 2E 63 6C 74 79 70 65 09 64 62 20 22 rt...cltype.db "
000180: 5A 22 09 09 09 3B 71 75 61 64 20 64 65 6E 73 69 Z"...;quad densi
000190: 74 79 20 66 6F 72 20 63 6C 69 70 20 61 72 74 0D ty for clip art.
0001A0: 0A 2E 62 69 74 70 61 74 09 64 62 20 31 09 09 09 ..bitpat.db 1...
0001B0: 3B 62 69 74 20 70 61 74 74 65 72 6E 20 66 6F 72 ;bit pattern for
0001C0: 20 63 6C 69 70 20 61 72 74 0D 0A 2E 6D 61 72 67 clip art...marg
0001D0: 69 6E 09 64 62 20 30 09 09 09 3B 6D 61 72 67 69 in.db 0...;margi
0001E0: 6E 20 66 6F 72 20 63 6C 69 70 20 61 72 74 0D 0A n for clip art..
0001F0: 2E 72 6C 62 69 74 09 64 62 20 25 31 30 31 30 30 .rlbit.db %10100
Size : 512 (Real : 512)
000000: 20 61 2C 28 63 6C 74 79 70 65 29 3A 20 63 61 6C a,(cltype): cal
000010: 6C 20 70 63 68 61 72 0D 0A 09 6C 64 20 61 2C 36 l pchar...ld a,6
000020: 34 3A 20 20 63 61 6C 6C 20 70 63 68 61 72 0D 0A 4: call pchar..
000030: 09 6C 64 20 61 2C 30 3A 20 20 20 63 61 6C 6C 20 .ld a,0: call
000040: 70 63 68 61 72 0D 0A 0D 0A 09 78 6F 72 20 61 0D pchar.....xor a.
000050: 0A 0D 0A 2E 69 62 63 6E 74 09 69 6E 63 20 61 3A ....ibcnt.inc a:
000060: 20 6C 64 20 28 62 63 6F 75 6E 74 29 2C 61 3A 20 ld (bcount),a:
000070: 72 65 74 0D 0A 0D 0A 09 3B 43 6C 69 70 20 61 72 ret.....;Clip ar
000080: 74 20 6D 61 72 67 69 6E 0D 0A 0D 0A 2E 64 6F 6D t margin.....dom
000090: 61 72 67 09 6C 64 20 61 2C 28 6D 61 72 67 69 6E arg.ld a,(margin
0000A0: 29 0D 0A 09 6F 72 20 61 3A 20 72 65 74 20 7A 0D )...or a: ret z.
0000B0: 0A 2E 64 6F 6D 61 6C 70 09 70 75 73 68 20 61 66 ..domalp.push af
0000C0: 0D 0A 09 20 6C 64 20 61 2C 33 32 3A 20 63 61 6C ... ld a,32: cal
0000D0: 6C 20 70 63 68 61 72 0D 0A 09 70 6F 70 20 61 66 l pchar...pop af
0000E0: 0D 0A 09 64 65 63 20 61 3A 20 6A 72 20 6E 7A 2C ...dec a: jr nz,
0000F0: 64 6F 6D 61 6C 70 0D 0A 09 72 65 74 0D 0A 0D 0A domalp...ret....
000100: 09 3B 43 6C 69 70 20 61 72 74 20 70 72 6F 67 72 .;Clip art progr
000110: 65 73 73 20 6D 65 74 65 72 20 2D 20 73 65 74 20 ess meter - set
000120: 75 70 0D 0A 0D 0A 2E 61 72 74 70 6D 73 09 70 75 up.....artpms.pu
000130: 73 68 20 68 6C 0D 0A 09 20 6C 64 20 68 6C 2C 61 sh hl... ld hl,a
000140: 72 74 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 rttxt: call stri
000150: 6E 67 0D 0A 09 70 6F 70 20 68 6C 0D 0A 09 6C 64 ng...pop hl...ld
000160: 20 61 2C 32 30 37 3A 20 63 61 6C 6C 20 61 72 74 a,207: call art
000170: 70 6D 38 0D 0A 09 6C 64 20 61 2C 38 20 20 3A 20 pm8...ld a,8 :
000180: 63 61 6C 6C 20 61 72 74 70 6D 38 0D 0A 09 78 6F call artpm8...xo
000190: 72 20 61 3A 20 6C 64 20 28 61 72 74 63 6E 74 29 r a: ld (artcnt)
0001A0: 2C 61 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 61 72 74 ,a...ret.....art
0001B0: 70 6D 38 09 70 75 73 68 20 68 6C 0D 0A 2E 61 72 pm8.push hl...ar
0001C0: 74 70 6D 6C 09 20 63 61 6C 6C 20 26 42 42 35 41 tpml. call &BB5A
0001D0: 0D 0A 09 20 6F 72 20 61 3A 20 6C 64 20 64 65 2C ... or a: ld de,
0001E0: 38 3A 20 73 62 63 20 68 6C 2C 64 65 0D 0A 09 20 8: sbc hl,de...
0001F0: 6A 72 20 6E 63 2C 61 72 74 70 6D 6C 0D 0A 09 70 jr nc,artpml...p
Size : 512 (Real : 512)
000000: 09 09 3B 70 61 74 74 65 72 6E 20 66 6F 72 20 72 ..;pattern for r
000010: 75 6C 65 72 20 6C 69 6E 65 0D 0A 2E 72 6C 77 69 uler line...rlwi
000020: 64 09 64 62 20 31 30 30 09 09 09 3B 72 75 6C 65 d.db 100...;rule
000030: 72 20 77 69 64 74 68 0D 0A 2E 77 63 68 61 72 09 r width...wchar.
000040: 64 62 20 30 09 09 09 3B 63 68 61 72 61 63 74 65 db 0...;characte
000050: 72 20 74 6F 20 77 61 69 74 20 66 6F 72 0D 0A 2E r to wait for...
000060: 70 73 74 6F 72 65 09 64 73 20 36 09 09 09 3B 73 pstore.ds 6...;s
000070: 74 6F 72 61 67 65 20 6F 66 20 63 68 61 72 61 63 torage of charac
000080: 74 65 72 73 20 6E 75 6D 65 72 69 63 61 6C 6C 79 ters numerically
000090: 0D 0A 2E 61 72 74 63 6E 74 09 64 62 20 30 09 09 ...artcnt.db 0..
0000A0: 09 3B 63 6F 75 6E 74 65 72 20 66 6F 72 20 70 72 .;counter for pr
0000B0: 6F 67 72 65 73 73 20 6D 65 74 65 72 0D 0A 0D 0A ogress meter....
0000C0: 2E 6E 65 77 6C 69 6E 65 20 64 62 20 32 35 35 09 .newline db 255.
0000D0: 09 09 3B 30 20 69 66 20 61 20 6E 65 77 20 6C 69 ..;0 if a new li
0000E0: 6E 65 20 69 73 20 6E 65 65 64 65 64 2C 20 6E 6F ne is needed, no
0000F0: 6E 2D 7A 65 72 6F 20 6F 74 68 65 72 77 69 73 65 n-zero otherwise
000100: 0D 0A 2E 62 63 6F 75 6E 74 09 64 62 20 30 09 09 ...bcount.db 0..
000110: 09 3B 62 79 74 65 73 20 73 65 6E 74 20 63 6F 75 .;bytes sent cou
000120: 6E 74 0D 0A 0D 0A 2E 77 6B 73 70 09 64 73 20 34 nt.....wksp.ds 4
000130: 09 09 09 3B 52 53 58 20 77 6F 72 6B 73 70 61 63 ...;RSX workspac
000140: 65 0D 0A 0D 0A 09 3B 54 65 78 74 0D 0A 0D 0A 2E e.....;Text.....
000150: 6C 64 65 74 78 74 09 64 62 20 22 50 52 4F 2D 45 ldetxt.db "PRO-E
000160: 58 54 3A 20 65 72 72 6F 72 20 69 6E 20 6C 6F 61 XT: error in loa
000170: 64 69 6E 67 20 66 69 6C 65 22 2C 31 33 2C 31 30 ding file",13,10
000180: 2C 30 0D 0A 2E 75 6B 63 74 78 74 09 64 62 20 22 ,0...ukctxt.db "
000190: 50 52 4F 2D 45 58 54 3A 20 75 6E 6B 6E 6F 77 6E PRO-EXT: unknown
0001A0: 20 63 6F 6D 6D 61 6E 64 22 2C 31 33 2C 31 30 2C command",13,10,
0001B0: 30 0D 0A 2E 6E 6F 66 74 78 74 09 64 62 20 22 50 0...noftxt.db "P
0001C0: 52 4F 2D 45 58 54 3A 20 66 6F 6E 74 20 66 69 6C RO-EXT: font fil
0001D0: 65 20 6E 6F 74 20 6C 6F 61 64 65 64 22 2C 31 33 e not loaded",13
0001E0: 2C 31 30 2C 30 0D 0A 2E 70 61 72 74 78 74 09 64 ,10,0...partxt.d
0001F0: 62 20 22 50 52 4F 2D 45 58 54 3A 20 77 72 6F 6E b "PRO-EXT: wron
Size : 512 (Real : 512)
000000: 6F 70 20 68 6C 3A 20 72 65 74 0D 0A 0D 0A 09 3B op hl: ret.....;
000010: 4F 6E 6C 69 6E 65 20 68 65 6C 70 20 73 79 73 74 Online help syst
000020: 65 6D 20 76 31 2E 30 0D 0A 09 3B 28 63 29 39 33 em v1.0...;(c)93
000030: 20 43 52 54 43 20 6F 66 20 44 69 73 63 6F 76 65 CRTC of Discove
000040: 72 79 0D 0A 0D 0A 2E 70 78 68 65 6C 70 09 6F 72 ry.....pxhelp.or
000050: 20 61 3A 20 6A 72 20 6E 7A 2C 73 70 65 63 0D 0A a: jr nz,spec..
000060: 09 6C 64 20 61 2C 33 31 3A 20 6A 72 20 67 73 70 .ld a,31: jr gsp
000070: 65 63 0D 0A 0D 0A 2E 73 70 65 63 09 6C 64 20 6C ec.....spec.ld l
000080: 2C 28 69 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B ,(ix): ld h,(ix+
000090: 31 29 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C 64 20 1)...inc hl: ld
0000A0: 65 2C 28 68 6C 29 0D 0A 09 69 6E 63 20 68 6C 3A e,(hl)...inc hl:
0000B0: 20 6C 64 20 64 2C 28 68 6C 29 0D 0A 09 6C 64 20 ld d,(hl)...ld
0000C0: 61 2C 28 64 65 29 0D 0A 0D 0A 2E 67 73 70 65 63 a,(de).....gspec
0000D0: 09 6C 64 20 62 63 2C 26 37 46 43 37 3A 20 6F 75 .ld bc,&7FC7: ou
0000E0: 74 20 28 63 29 2C 63 0D 0A 09 6C 64 20 68 6C 2C t (c),c...ld hl,
0000F0: 26 34 38 30 30 3A 20 6C 64 20 63 2C 61 0D 0A 2E &4800: ld c,a...
000100: 67 73 70 65 63 6C 09 6C 64 20 61 2C 28 68 6C 29 gspecl.ld a,(hl)
000110: 3A 20 69 6E 63 20 68 6C 0D 0A 09 63 70 20 39 3A : inc hl...cp 9:
000120: 20 6A 72 20 7A 2C 68 6E 66 6F 75 6E 0D 0A 09 63 jr z,hnfoun...c
000130: 70 20 36 3A 20 6A 72 20 6E 7A 2C 67 73 70 65 63 p 6: jr nz,gspec
000140: 6C 0D 0A 09 6C 64 20 61 2C 28 68 6C 29 3A 20 69 l...ld a,(hl): i
000150: 6E 63 20 68 6C 0D 0A 09 63 70 20 63 3A 20 6A 72 nc hl...cp c: jr
000160: 20 6E 7A 2C 67 73 70 65 63 6C 0D 0A 0D 0A 09 70 nz,gspecl.....p
000170: 75 73 68 20 68 6C 0D 0A 09 20 6C 64 20 68 6C 2C ush hl... ld hl,
000180: 68 65 6C 70 62 67 3A 20 63 61 6C 6C 20 73 74 72 helpbg: call str
000190: 69 6E 67 0D 0A 09 70 6F 70 20 68 6C 0D 0A 0D 0A ing...pop hl....
0001A0: 2E 70 68 65 6C 70 6C 09 6C 64 20 61 2C 28 68 6C .phelpl.ld a,(hl
0001B0: 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 63 70 20 37 ): inc hl...cp 7
0001C0: 3A 20 6A 72 20 7A 2C 71 6E 64 69 73 70 0D 0A 09 : jr z,qndisp...
0001D0: 63 70 20 38 3A 20 6A 72 20 7A 2C 71 79 64 69 73 cp 8: jr z,qydis
0001E0: 70 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 3A 20 p...call &BB5A:
0001F0: 6A 72 20 70 68 65 6C 70 6C 0D 0A 0D 0A 2E 71 79 jr phelpl.....qy
Size : 512 (Real : 512)
000000: 0A 09 6C 64 20 28 69 79 2B 31 33 29 2C 61 3A 20 ..ld (iy+13),a:
000010: 6C 64 20 28 69 79 2B 31 34 29 2C 61 3A 20 6C 64 ld (iy+14),a: ld
000020: 20 28 69 79 2B 31 35 29 2C 61 3A 20 6C 64 20 28 (iy+15),a: ld (
000030: 69 79 2B 31 36 29 2C 61 3A 20 6C 64 20 28 69 79 iy+16),a: ld (iy
000040: 2B 31 37 29 2C 61 0D 0A 09 6C 64 20 28 69 79 2B +17),a...ld (iy+
000050: 31 38 29 2C 61 3A 20 6C 64 20 28 69 79 2B 31 39 18),a: ld (iy+19
000060: 29 2C 61 3A 20 6C 64 20 28 69 79 2B 32 30 29 2C ),a: ld (iy+20),
000070: 61 3A 20 6C 64 20 28 69 79 2B 32 31 29 2C 61 3A a: ld (iy+21),a:
000080: 20 6C 64 20 28 69 79 2B 32 32 29 2C 61 0D 0A 09 ld (iy+22),a...
000090: 6C 64 20 28 69 79 2B 32 33 29 2C 61 0D 0A 09 72 ld (iy+23),a...r
0000A0: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 42 4F 50 45 et.....;>>> BOPE
0000B0: 4E 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 6F N command.....bo
0000C0: 70 6E 5F 69 09 6C 64 20 63 2C 32 0D 0A 09 63 70 pn_i.ld c,2...cp
0000D0: 20 31 0D 0A 09 6A 70 20 6E 7A 2C 65 72 72 6F 72 1...jp nz,error
0000E0: 09 09 09 3B 45 72 72 6F 72 20 69 66 20 3C 20 32 ...;Error if < 2
0000F0: 20 70 61 72 61 6D 65 74 65 72 73 0D 0A 0D 0A 09 parameters.....
000100: 6C 64 20 61 2C 28 69 79 2B 31 37 29 0D 0A 09 6C ld a,(iy+17)...l
000110: 64 20 63 2C 31 36 0D 0A 09 6F 72 20 61 0D 0A 09 d c,16...or a...
000120: 6A 70 20 6E 7A 2C 65 72 72 6F 72 09 09 09 3B 45 jp nz,error...;E
000130: 72 72 6F 72 20 69 66 20 61 6C 72 65 61 64 79 20 rror if already
000140: 6F 70 65 6E 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 69 open.....ld l,(i
000150: 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D x): ld h,(ix+1).
000160: 0A 09 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 ..push hl: pop i
000170: 78 09 09 09 3B 49 58 20 63 6F 6E 74 61 69 6E 73 x...;IX contains
000180: 20 61 64 64 72 65 73 73 20 6F 66 20 70 61 72 61 address of para
000190: 6D 65 74 65 72 0D 0A 0D 0A 09 63 61 6C 6C 20 66 meter.....call f
0001A0: 6C 61 73 74 72 09 09 09 3B 47 65 74 20 6C 61 73 lastr...;Get las
0001B0: 74 20 6C 6F 63 61 74 69 6F 6E 0D 0A 0D 0A 09 6C t location.....l
0001C0: 64 20 28 69 79 2B 32 30 29 2C 6C 3A 20 6C 64 20 d (iy+20),l: ld
0001D0: 28 69 79 2B 32 31 29 2C 68 09 3B 53 74 61 72 74 (iy+21),h.;Start
0001E0: 20 70 75 74 74 69 6E 67 20 74 68 69 6E 67 73 20 putting things
0001F0: 68 65 72 65 0D 0A 09 64 65 63 20 68 6C 3A 20 64 here...dec hl: d
Size : 512 (Real : 512)
000000: 20 63 2C 31 37 0D 0A 09 65 78 20 64 65 2C 68 6C c,17...ex de,hl
000010: 0D 0A 09 63 70 20 28 68 6C 29 0D 0A 09 6A 72 20 ...cp (hl)...jr
000020: 7A 2C 62 6C 69 73 6F 6B 09 09 3B 4F 6B 20 69 66 z,blisok..;Ok if
000030: 20 73 61 6D 65 20 6C 65 6E 67 74 68 0D 0A 09 6A same length...j
000040: 72 20 63 2C 62 6C 69 73 6F 6B 09 09 3B 6F 72 20 r c,blisok..;or
000050: 69 66 20 73 74 72 69 6E 67 20 69 73 20 6C 6F 6E if string is lon
000060: 67 65 72 0D 0A 09 6A 70 20 62 6E 6B 61 62 32 09 ger...jp bnkab2.
000070: 09 3B 6F 74 68 65 72 77 69 73 65 20 65 72 72 6F .;otherwise erro
000080: 72 20 31 37 0D 0A 0D 0A 2E 62 6C 69 73 6F 6B 09 r 17.....blisok.
000090: 6C 64 20 28 68 6C 29 2C 61 3A 20 6C 64 20 62 2C ld (hl),a: ld b,
0000A0: 61 09 3B 50 75 74 20 72 65 61 6C 20 6C 65 6E 67 a.;Put real leng
0000B0: 74 68 20 69 6E 74 6F 20 73 74 72 69 6E 67 0D 0A th into string..
0000C0: 09 69 6E 63 20 68 6C 3A 20 6C 64 20 65 2C 28 68 .inc hl: ld e,(h
0000D0: 6C 29 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C 64 20 l)...inc hl: ld
0000E0: 64 2C 28 68 6C 29 0D 0A 0D 0A 09 6C 64 20 61 2C d,(hl).....ld a,
0000F0: 62 3A 20 6F 72 20 61 3A 20 6A 72 20 7A 2C 65 78 b: or a: jr z,ex
000100: 62 67 74 73 0D 0A 0D 0A 2E 62 67 74 73 6C 70 09 bgts.....bgtslp.
000110: 70 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 62 6E push bc: call bn
000120: 6B 67 69 6E 3A 20 70 6F 70 20 62 63 0D 0A 09 6C kgin: pop bc...l
000130: 64 20 28 64 65 29 2C 61 3A 20 69 6E 63 20 64 65 d (de),a: inc de
000140: 0D 0A 09 64 6A 6E 7A 20 62 67 74 73 6C 70 0D 0A ...djnz bgtslp..
000150: 0D 0A 2E 65 78 62 67 74 73 09 72 65 74 0D 0A 0D ...exbgts.ret...
000160: 0A 09 3B 3E 3E 3E 20 42 47 45 54 49 20 63 6F 6D ..;>>> BGETI com
000170: 6D 61 6E 64 0D 0A 0D 0A 2E 62 67 74 69 5F 69 09 mand.....bgti_i.
000180: 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 0D 0A 09 ld c,2...cp 1...
000190: 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 jp nz,error.....
0001A0: 6C 64 20 65 2C 28 69 78 29 3A 20 6C 64 20 64 2C ld e,(ix): ld d,
0001B0: 28 69 78 2B 31 29 0D 0A 09 63 61 6C 6C 20 62 6E (ix+1)...call bn
0001C0: 6B 67 69 6E 09 09 3B 47 65 74 20 74 79 70 65 0D kgin..;Get type.
0001D0: 0A 0D 0A 09 6C 64 20 63 2C 31 35 0D 0A 09 63 70 ....ld c,15...cp
0001E0: 20 26 31 41 3A 20 6A 70 20 7A 2C 62 6E 6B 61 62 &1A: jp z,bnkab
0001F0: 6F 09 3B 45 6E 64 20 6F 66 20 44 61 74 61 3F 0D o.;End of Data?.
Size : 512 (Real : 512)
000000: 65 63 20 68 6C 0D 0A 09 6C 64 20 28 69 79 2B 32 ec hl...ld (iy+2
000010: 32 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 32 33 29 2),l: ld (iy+23)
000020: 2C 68 09 3B 41 64 64 72 65 73 73 20 74 6F 20 70 ,h.;Address to p
000030: 75 74 20 6C 65 6E 67 74 68 20 61 74 0D 0A 0D 0A ut length at....
000040: 09 6C 64 20 6C 2C 28 69 79 2B 31 38 29 3A 20 6C .ld l,(iy+18): l
000050: 64 20 68 2C 28 69 79 2B 31 39 29 0D 0A 09 69 6E d h,(iy+19)...in
000060: 63 20 68 6C 09 09 09 09 3B 49 6E 63 72 65 61 73 c hl....;Increas
000070: 65 20 22 6C 61 73 74 20 6D 73 67 22 20 63 6F 75 e "last msg" cou
000080: 6E 74 65 72 0D 0A 09 6C 64 20 28 69 79 2B 31 38 nter...ld (iy+18
000090: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 39 29 2C ),l: ld (iy+19),
0000A0: 68 0D 0A 09 6C 64 20 28 69 78 29 2C 6C 3A 20 6C h...ld (ix),l: l
0000B0: 64 20 28 69 78 2B 31 29 2C 68 09 09 3B 61 6E 64 d (ix+1),h..;and
0000C0: 20 70 75 74 20 69 74 20 69 6E 74 6F 20 70 61 73 put it into pas
0000D0: 73 65 64 20 76 61 72 69 61 62 6C 65 0D 0A 0D 0A sed variable....
0000E0: 09 6C 64 20 61 2C 26 46 46 0D 0A 09 6C 64 20 28 .ld a,&FF...ld (
0000F0: 69 79 2B 31 37 29 2C 61 09 09 09 3B 52 65 63 6F iy+17),a...;Reco
000100: 72 64 20 6E 6F 77 20 6F 70 65 6E 0D 0A 09 72 65 rd now open...re
000110: 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 42 43 4C 4F 53 t.....;>>> BCLOS
000120: 45 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 63 E command.....bc
000130: 73 65 5F 69 09 6C 64 20 63 2C 31 33 0D 0A 09 6C se_i.ld c,13...l
000140: 64 20 61 2C 28 69 79 2B 31 37 29 0D 0A 09 6F 72 d a,(iy+17)...or
000150: 20 61 0D 0A 09 6A 70 20 7A 2C 65 72 72 6F 72 0D a...jp z,error.
000160: 0A 0D 0A 09 6C 64 20 61 2C 26 31 41 0D 0A 09 63 ....ld a,&1A...c
000170: 61 6C 6C 20 62 6E 6B 70 69 6E 09 09 3B 50 75 74 all bnkpin..;Put
000180: 20 69 6E 20 22 45 6E 64 20 6F 66 20 44 61 74 61 in "End of Data
000190: 22 20 6D 61 72 6B 65 72 0D 0A 0D 0A 09 6C 64 20 " marker.....ld
0001A0: 6C 2C 28 69 79 2B 32 30 29 3A 20 6C 64 20 68 2C l,(iy+20): ld h,
0001B0: 28 69 79 2B 32 31 29 0D 0A 09 6C 64 20 65 2C 28 (iy+21)...ld e,(
0001C0: 69 79 2B 32 32 29 3A 20 6C 64 20 64 2C 28 69 79 iy+22): ld d,(iy
0001D0: 2B 32 33 29 0D 0A 09 73 62 63 20 68 6C 2C 64 65 +23)...sbc hl,de
0001E0: 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 20 68 ...dec hl: dec h
0001F0: 6C 0D 0A 09 65 78 20 68 6C 2C 64 65 0D 0A 09 6C l...ex hl,de...l
Size : 512 (Real : 512)
000000: 0A 09 6C 64 20 63 2C 31 34 0D 0A 09 63 70 20 26 ..ld c,14...cp &
000010: 32 35 3A 20 6A 70 20 6E 7A 2C 62 6E 6B 61 62 6F 25: jp nz,bnkabo
000020: 09 3B 49 6E 74 65 67 65 72 20 76 61 72 69 61 62 .;Integer variab
000030: 6C 65 20 74 79 70 65 3F 0D 0A 0D 0A 09 63 61 6C le type?.....cal
000040: 6C 20 62 6E 6B 67 69 6E 0D 0A 09 6C 64 20 28 64 l bnkgin...ld (d
000050: 65 29 2C 61 3A 20 69 6E 63 20 64 65 09 3B 47 65 e),a: inc de.;Ge
000060: 74 20 6C 6F 77 20 62 79 74 65 20 61 6E 64 20 73 t low byte and s
000070: 74 6F 72 65 0D 0A 0D 0A 09 63 61 6C 6C 20 62 6E tore.....call bn
000080: 6B 67 69 6E 0D 0A 09 6C 64 20 28 64 65 29 2C 61 kgin...ld (de),a
000090: 3A 20 69 6E 63 20 64 65 09 3B 47 65 74 20 68 69 : inc de.;Get hi
0000A0: 67 68 20 62 79 74 65 20 61 6E 64 20 73 74 6F 72 gh byte and stor
0000B0: 65 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E e...ret.....;>>>
0000C0: 20 42 44 45 4C 45 54 45 20 63 6F 6D 6D 61 6E 64 BDELETE command
0000D0: 0D 0A 0D 0A 2E 62 64 65 6C 5F 69 09 6C 64 20 63 .....bdel_i.ld c
0000E0: 2C 32 0D 0A 09 63 70 20 31 0D 0A 09 6A 70 20 6E ,2...cp 1...jp n
0000F0: 7A 2C 65 72 72 6F 72 09 09 3B 65 72 72 6F 72 20 z,error..;error
000100: 69 66 20 6E 6F 74 20 6F 6E 65 20 70 61 72 61 6D if not one param
000110: 65 74 65 72 0D 0A 0D 0A 09 6C 64 20 63 2C 31 38 eter.....ld c,18
000120: 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 37 29 0D ...ld a,(iy+17).
000130: 0A 09 6F 72 20 61 0D 0A 09 6A 70 20 6E 7A 2C 65 ..or a...jp nz,e
000140: 72 72 6F 72 09 09 3B 65 72 72 6F 72 20 69 66 20 rror..;error if
000150: 72 65 63 6F 72 64 20 63 75 72 72 65 6E 74 6C 79 record currently
000160: 20 6F 70 65 6E 0D 0A 0D 0A 09 6C 64 20 63 2C 28 open.....ld c,(
000170: 69 78 29 3A 20 6C 64 20 62 2C 28 69 78 2B 31 29 ix): ld b,(ix+1)
000180: 09 3B 67 65 74 20 70 61 72 61 6D 65 74 65 72 20 .;get parameter
000190: 69 6E 74 6F 20 42 43 0D 0A 0D 0A 09 6C 64 20 61 into BC.....ld a
0001A0: 2C 62 3A 20 6F 72 20 63 0D 0A 09 6A 72 20 7A 2C ,b: or c...jr z,
0001B0: 6E 6F 74 72 63 64 09 09 3B 65 72 72 6F 72 20 69 notrcd..;error i
0001C0: 66 20 6D 65 73 73 61 67 65 20 30 0D 0A 09 6C 64 f message 0...ld
0001D0: 20 6C 2C 28 69 79 2B 31 38 29 3A 20 6C 64 20 68 l,(iy+18): ld h
0001E0: 2C 28 69 79 2B 31 39 29 0D 0A 09 73 62 63 20 68 ,(iy+19)...sbc h
0001F0: 6C 2C 62 63 3A 20 6A 72 20 6E 63 2C 72 63 64 6F l,bc: jr nc,rcdo
Size : 512 (Real : 512)
000000: 64 20 6C 2C 28 69 79 2B 32 32 29 3A 20 6C 64 20 d l,(iy+22): ld
000010: 68 2C 28 69 79 2B 32 33 29 0D 0A 09 6C 64 20 61 h,(iy+23)...ld a
000020: 2C 65 3A 20 63 61 6C 6C 20 70 62 62 79 74 65 0D ,e: call pbbyte.
000030: 0A 09 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 61 2C ..inc hl...ld a,
000040: 64 3A 20 63 61 6C 6C 20 70 62 62 79 74 65 0D 0A d: call pbbyte..
000050: 09 63 61 6C 6C 20 72 73 74 62 6E 6B 0D 0A 0D 0A .call rstbnk....
000060: 09 78 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B 31 .xor a: ld (iy+1
000070: 37 29 2C 61 09 3B 52 65 63 6F 72 64 20 63 6C 6F 7),a.;Record clo
000080: 73 65 64 21 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B sed!...ret.....;
000090: 3E 3E 3E 20 42 47 4F 54 4F 20 63 6F 6D 6D 61 6E >>> BGOTO comman
0000A0: 64 0D 0A 0D 0A 2E 62 67 74 6F 5F 69 09 6C 64 20 d.....bgto_i.ld
0000B0: 63 2C 32 0D 0A 09 63 70 20 31 0D 0A 09 6A 70 20 c,2...cp 1...jp
0000C0: 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 nz,error.....ld
0000D0: 63 2C 28 69 78 29 3A 20 6C 64 20 62 2C 28 69 78 c,(ix): ld b,(ix
0000E0: 2B 31 29 0D 0A 0D 0A 09 6C 64 20 61 2C 62 3A 20 +1).....ld a,b:
0000F0: 6F 72 20 63 3A 20 6A 72 20 7A 2C 6E 6F 74 72 63 or c: jr z,notrc
000100: 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 31 38 29 3A ...ld l,(iy+18):
000110: 20 6C 64 20 68 2C 28 69 79 2B 31 39 29 3A 20 73 ld h,(iy+19): s
000120: 62 63 20 68 6C 2C 62 63 3A 20 6A 72 20 63 2C 6E bc hl,bc: jr c,n
000130: 6F 74 72 63 0D 0A 09 6A 72 20 72 63 6F 6B 0D 0A otrc...jr rcok..
000140: 2E 6E 6F 74 72 63 09 6C 64 20 63 2C 31 32 3A 20 .notrc.ld c,12:
000150: 6A 70 20 65 72 72 6F 72 0D 0A 0D 0A 2E 72 63 6F jp error.....rco
000160: 6B 09 63 61 6C 6C 20 67 72 65 63 62 63 0D 0A 09 k.call grecbc...
000170: 63 61 6C 6C 20 72 73 74 62 6E 6B 0D 0A 0D 0A 09 call rstbnk.....
000180: 6C 64 20 28 69 79 2B 31 35 29 2C 65 3A 20 6C 64 ld (iy+15),e: ld
000190: 20 28 69 79 2B 31 36 29 2C 64 0D 0A 09 6C 64 20 (iy+16),d...ld
0001A0: 28 69 79 2B 31 33 29 2C 6C 3A 20 6C 64 20 28 69 (iy+13),l: ld (i
0001B0: 79 2B 31 34 29 2C 68 0D 0A 09 72 65 74 0D 0A 0D y+14),h...ret...
0001C0: 0A 09 3B 3E 3E 3E 20 42 43 48 45 43 4B 20 63 6F ..;>>> BCHECK co
0001D0: 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 63 68 6B 5F 69 mmand.....bchk_i
0001E0: 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 63 0D 0A .ld c,2...cp c..
0001F0: 09 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A .jp nz,error....
Size : 512 (Real : 512)
000000: 6B 09 3B 6F 6B 20 69 66 20 3C 3D 20 6C 61 73 74 k.;ok if <= last
000010: 20 6D 65 73 73 61 67 65 0D 0A 2E 6E 6F 74 72 63 message...notrc
000020: 64 09 6C 64 20 63 2C 31 32 3A 20 6A 70 20 65 72 d.ld c,12: jp er
000030: 72 6F 72 09 3B 65 6C 73 65 20 65 72 72 6F 72 0D ror.;else error.
000040: 0A 0D 0A 2E 72 63 64 6F 6B 09 63 61 6C 6C 20 67 ....rcdok.call g
000050: 72 65 63 62 63 09 09 3B 66 69 6E 64 20 61 64 64 recbc..;find add
000060: 72 65 73 73 20 6F 66 20 72 65 63 6F 72 64 0D 0A ress of record..
000070: 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 09 61 64 64 ...push hl...add
000080: 20 68 6C 2C 64 65 0D 0A 09 70 6F 70 20 64 65 0D hl,de...pop de.
000090: 0A 09 64 65 63 20 64 65 3A 20 64 65 63 20 64 65 ..dec de: dec de
0000A0: 09 09 3B 44 45 20 63 6F 6E 74 61 69 6E 73 20 73 ..;DE contains s
0000B0: 74 61 72 74 2C 20 48 4C 20 63 6F 6E 74 61 69 6E tart, HL contain
0000C0: 73 20 73 74 61 72 74 20 6F 66 20 6E 65 78 74 0D s start of next.
0000D0: 0A 0D 0A 09 6C 64 20 61 2C 68 3A 20 63 70 6C 3A ....ld a,h: cpl:
0000E0: 20 6C 64 20 62 2C 61 0D 0A 09 6C 64 20 61 2C 6C ld b,a...ld a,l
0000F0: 3A 20 63 70 6C 3A 20 6C 64 20 63 2C 61 0D 0A 09 : cpl: ld c,a...
000100: 64 65 63 20 62 09 09 09 3B 42 43 20 63 6F 6E 74 dec b...;BC cont
000110: 61 69 6E 73 20 6C 65 6E 67 74 68 20 74 6F 20 74 ains length to t
000120: 72 61 6E 73 66 65 72 0D 0A 0D 0A 09 6C 64 20 61 ransfer.....ld a
000130: 2C 28 26 46 46 46 46 29 0D 0A 09 6C 64 20 69 78 ,(&FFFF)...ld ix
000140: 2C 28 26 46 46 46 33 29 09 09 3B 74 68 65 73 65 ,(&FFF3)..;these
000150: 20 62 69 74 73 20 6F 66 20 74 68 65 20 73 63 72 bits of the scr
000160: 65 65 6E 20 67 65 74 20 63 6F 72 72 75 70 74 65 een get corrupte
000170: 64 21 0D 0A 0D 0A 09 70 75 73 68 20 61 66 3A 20 d!.....push af:
000180: 70 75 73 68 20 69 78 0D 0A 0D 0A 09 70 75 73 68 push ix.....push
000190: 20 64 65 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 09 de...push hl...
0001A0: 70 75 73 68 20 62 63 09 09 09 3B 73 74 6F 72 65 push bc...;store
0001B0: 20 76 61 72 69 61 62 6C 65 73 20 66 6F 72 20 4C variables for L
0001C0: 44 49 52 0D 0A 0D 0A 09 6C 64 20 62 63 2C 26 37 DIR.....ld bc,&7
0001D0: 46 43 37 0D 0A 09 6F 75 74 20 28 63 29 2C 63 09 FC7...out (c),c.
0001E0: 09 3B 73 77 69 74 63 68 20 74 6F 70 20 31 36 6B .;switch top 16k
0001F0: 20 69 6E 74 6F 20 26 34 30 30 30 0D 0A 0D 0A 09 into &4000.....
Size : 512 (Real : 512)
000000: 09 6C 64 20 6C 2C 28 69 78 2B 32 29 3A 20 6C 64 .ld l,(ix+2): ld
000010: 20 68 2C 28 69 78 2B 33 29 0D 0A 09 6C 64 20 61 h,(ix+3)...ld a
000020: 2C 28 69 79 2B 32 30 29 3A 20 6C 64 20 28 68 6C ,(iy+20): ld (hl
000030: 29 2C 61 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 ),a: inc hl...ld
000040: 20 61 2C 28 69 79 2B 32 31 29 3A 20 6C 64 20 28 a,(iy+21): ld (
000050: 68 6C 29 2C 61 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 hl),a.....ld l,(
000060: 69 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 ix): ld h,(ix+1)
000070: 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 38 29 3A ...ld a,(iy+18):
000080: 20 6C 64 20 28 68 6C 29 2C 61 3A 20 69 6E 63 20 ld (hl),a: inc
000090: 68 6C 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 39 hl...ld a,(iy+19
0000A0: 29 3A 20 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 72 ): ld (hl),a...r
0000B0: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 42 50 55 54 et.....;>>> BPUT
0000C0: 53 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 70 S command.....bp
0000D0: 74 73 5F 69 09 6C 64 20 63 2C 32 0D 0A 09 63 70 ts_i.ld c,2...cp
0000E0: 20 31 0D 0A 09 6A 70 20 6E 7A 2C 65 72 72 6F 72 1...jp nz,error
0000F0: 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 .....ld l,(ix):
000100: 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 ld h,(ix+1)...ld
000110: 20 62 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D b,(hl): inc hl.
000120: 0A 09 6C 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 ..ld e,(hl): inc
000130: 20 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 0D hl...ld d,(hl).
000140: 0A 0D 0A 09 70 75 73 68 20 62 63 0D 0A 09 6C 64 ....push bc...ld
000150: 20 61 2C 26 32 34 3A 20 63 61 6C 6C 20 62 6E 6B a,&24: call bnk
000160: 70 69 6E 09 3B 53 74 72 69 6E 67 20 6D 61 72 6B pin.;String mark
000170: 65 72 0D 0A 09 70 6F 70 20 62 63 0D 0A 0D 0A 09 er...pop bc.....
000180: 70 75 73 68 20 62 63 0D 0A 09 6C 64 20 61 2C 62 push bc...ld a,b
000190: 3A 20 63 61 6C 6C 20 62 6E 6B 70 69 6E 09 3B 4C : call bnkpin.;L
0001A0: 65 6E 67 74 68 20 6F 66 20 73 74 72 69 6E 67 0D ength of string.
0001B0: 0A 09 70 6F 70 20 62 63 0D 0A 0D 0A 09 6C 64 20 ..pop bc.....ld
0001C0: 61 2C 62 3A 20 6F 72 20 61 3A 20 6A 72 20 7A 2C a,b: or a: jr z,
0001D0: 65 78 62 70 74 73 0D 0A 0D 0A 2E 62 70 74 73 6C exbpts.....bptsl
0001E0: 70 09 6C 64 20 61 2C 28 64 65 29 0D 0A 09 70 75 p.ld a,(de)...pu
0001F0: 73 68 20 62 63 3A 20 63 61 6C 6C 20 62 6E 6B 70 sh bc: call bnkp
Size : 512 (Real : 512)
000000: 6C 64 20 64 65 2C 26 37 46 46 35 0D 0A 09 6C 64 ld de,&7FF5...ld
000010: 20 68 6C 2C 6C 64 69 64 74 61 0D 0A 09 6C 64 20 hl,ldidta...ld
000020: 62 63 2C 31 30 0D 0A 09 6C 64 69 72 09 09 09 3B bc,10...ldir...;
000030: 63 6F 70 79 20 63 6F 64 65 20 66 6F 72 20 4C 44 copy code for LD
000040: 49 52 20 69 6E 74 6F 20 74 6F 70 20 6F 66 20 74 IR into top of t
000050: 6F 70 20 31 36 6B 0D 0A 0D 0A 09 70 6F 70 20 62 op 16k.....pop b
000060: 63 0D 0A 09 6C 64 20 28 26 37 46 46 36 29 2C 62 c...ld (&7FF6),b
000070: 63 09 09 3B 6C 6F 61 64 20 74 68 65 20 6C 65 6E c..;load the len
000080: 67 74 68 20 69 6E 74 6F 20 72 69 67 68 74 20 70 gth into right p
000090: 6C 61 63 65 20 69 6E 20 4C 44 49 52 20 63 6F 64 lace in LDIR cod
0000A0: 65 0D 0A 0D 0A 09 6C 64 20 61 2C 26 43 39 3A 20 e.....ld a,&C9:
0000B0: 6C 64 20 28 26 46 46 46 46 29 2C 61 09 3B 52 45 ld (&FFFF),a.;RE
0000C0: 54 20 69 6E 74 6F 20 6C 61 73 74 20 6C 6F 63 61 T into last loca
0000D0: 74 69 6F 6E 20 28 62 61 63 6B 20 69 6E 20 66 69 tion (back in fi
0000E0: 72 73 74 20 36 34 6B 29 0D 0A 09 6C 64 20 68 6C rst 64k)...ld hl
0000F0: 2C 26 34 39 45 44 0D 0A 09 6C 64 20 28 26 46 46 ,&49ED...ld (&FF
000100: 46 33 29 2C 68 6C 09 09 3B 61 6E 64 20 28 61 67 F3),hl..;and (ag
000110: 61 69 6E 20 69 6E 20 66 69 72 73 74 20 36 34 6B ain in first 64k
000120: 29 20 73 65 74 20 75 70 20 74 68 65 20 62 61 6E ) set up the ban
000130: 6B 73 0D 0A 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 ks.....pop hl: p
000140: 6F 70 20 64 65 09 09 3B 67 65 74 20 76 61 72 69 op de..;get vari
000150: 61 62 6C 65 73 20 66 6F 72 20 4C 44 49 52 20 62 ables for LDIR b
000160: 61 63 6B 20 61 67 61 69 6E 0D 0A 0D 0A 09 64 69 ack again.....di
000170: 09 09 09 3B 69 6E 74 65 72 72 75 70 74 73 20 6D ...;interrupts m
000180: 75 73 74 20 62 65 20 64 69 73 61 62 6C 65 64 20 ust be disabled
000190: 28 6E 6F 20 73 74 61 63 6B 20 65 74 63 2E 21 29 (no stack etc.!)
0001A0: 0D 0A 09 6C 64 20 62 63 2C 26 37 46 43 32 0D 0A ...ld bc,&7FC2..
0001B0: 09 63 61 6C 6C 20 26 46 46 46 33 09 09 3B 64 6F .call &FFF3..;do
0001C0: 20 74 68 65 20 42 61 72 74 6D 61 6E 2C 20 77 68 the Bartman, wh
0001D0: 6F 6F 70 73 2C 20 4C 44 49 52 0D 0A 09 65 69 0D oops, LDIR...ei.
0001E0: 0A 0D 0A 09 70 6F 70 20 69 78 3A 20 70 6F 70 20 ....pop ix: pop
0001F0: 61 66 0D 0A 09 6C 64 20 28 26 46 46 46 33 29 2C af...ld (&FFF3),
Size : 512 (Real : 512)
000000: 69 6E 3A 20 70 6F 70 20 62 63 0D 0A 09 69 6E 63 in: pop bc...inc
000010: 20 64 65 3A 20 64 6A 6E 7A 20 62 70 74 73 6C 70 de: djnz bptslp
000020: 0D 0A 0D 0A 2E 65 78 62 70 74 73 09 72 65 74 0D .....exbpts.ret.
000030: 0A 0D 0A 09 3B 3E 3E 3E 20 42 50 55 54 49 20 63 ....;>>> BPUTI c
000040: 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 70 74 69 5F ommand.....bpti_
000050: 69 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 0D i.ld c,2...cp 1.
000060: 0A 09 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D ..jp nz,error...
000070: 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 ..ld l,(ix): ld
000080: 68 2C 28 69 78 2B 31 29 0D 0A 09 65 78 20 64 65 h,(ix+1)...ex de
000090: 2C 68 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 26 32 35 ,hl.....ld a,&25
0000A0: 3A 20 63 61 6C 6C 20 62 6E 6B 70 69 6E 09 3B 49 : call bnkpin.;I
0000B0: 6E 74 65 67 65 72 20 6D 61 72 6B 65 72 0D 0A 09 nteger marker...
0000C0: 6C 64 20 61 2C 65 3A 20 63 61 6C 6C 20 62 6E 6B ld a,e: call bnk
0000D0: 70 69 6E 09 3B 4C 6F 77 20 62 79 74 65 0D 0A 09 pin.;Low byte...
0000E0: 6C 64 20 61 2C 64 3A 20 63 61 6C 6C 20 62 6E 6B ld a,d: call bnk
0000F0: 70 69 6E 09 3B 48 69 67 68 20 62 79 74 65 0D 0A pin.;High byte..
000100: 09 72 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 42 47 .ret.....;>>> BG
000110: 45 54 53 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E ETS command.....
000120: 62 67 74 73 5F 69 09 6C 64 20 63 2C 32 0D 0A 09 bgts_i.ld c,2...
000130: 63 70 20 31 0D 0A 09 6A 70 20 6E 7A 2C 65 72 72 cp 1...jp nz,err
000140: 6F 72 0D 0A 0D 0A 09 6C 64 20 65 2C 28 69 78 29 or.....ld e,(ix)
000150: 3A 20 6C 64 20 64 2C 28 69 78 2B 31 29 0D 0A 09 : ld d,(ix+1)...
000160: 63 61 6C 6C 20 62 6E 6B 67 69 6E 09 09 3B 47 65 call bnkgin..;Ge
000170: 74 20 74 79 70 65 0D 0A 0D 0A 09 6C 64 20 63 2C t type.....ld c,
000180: 31 35 0D 0A 09 63 70 20 26 31 41 3A 20 6A 70 20 15...cp &1A: jp
000190: 7A 2C 62 6E 6B 61 62 6F 09 3B 45 6E 64 20 6F 66 z,bnkabo.;End of
0001A0: 20 44 61 74 61 3F 0D 0A 09 6C 64 20 63 2C 31 34 Data?...ld c,14
0001B0: 0D 0A 09 63 70 20 26 32 34 3A 20 6A 70 20 6E 7A ...cp &24: jp nz
0001C0: 2C 62 6E 6B 61 62 6F 09 3B 53 74 72 69 6E 67 20 ,bnkabo.;String
0001D0: 76 61 72 69 61 62 6C 65 20 74 79 70 65 3F 0D 0A variable type?..
0001E0: 0D 0A 09 63 61 6C 6C 20 62 6E 6B 67 69 6E 09 09 ...call bnkgin..
0001F0: 3B 47 65 74 20 6C 65 6E 67 74 68 0D 0A 09 6C 64 ;Get length...ld
Size : 512 (Real : 512)
000000: 0D 0A 09 72 65 74 0D 0A 0D 0A 0D 0A 09 3B 2A 2A ...ret.......;**
000010: 2A 20 42 42 53 20 53 55 42 52 4F 55 54 49 4E 45 * BBS SUBROUTINE
000020: 53 20 2A 2A 2A 0D 0A 0D 0A 09 3B 47 65 74 20 62 S ***.....;Get b
000030: 79 74 65 20 66 72 6F 6D 20 48 4C 20 69 6E 20 73 yte from HL in s
000040: 65 63 6F 6E 64 20 36 34 6B 20 28 63 6F 72 72 75 econd 64k (corru
000050: 70 74 73 20 42 43 2C 20 64 6F 65 73 20 6E 6F 74 pts BC, does not
000060: 20 72 65 73 74 6F 72 65 20 62 61 6E 6B 73 29 0D restore banks).
000070: 0A 0D 0A 2E 67 62 62 79 74 65 09 70 75 73 68 20 ....gbbyte.push
000080: 68 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 68 0D 0A 09 hl.....ld a,h...
000090: 72 6C 63 61 3A 20 72 6C 63 61 0D 0A 09 61 6E 64 rlca: rlca...and
0000A0: 20 33 3A 20 61 64 64 20 26 43 34 0D 0A 0D 0A 09 3: add &C4.....
0000B0: 6C 64 20 62 2C 26 37 46 0D 0A 09 6F 75 74 20 28 ld b,&7F...out (
0000C0: 63 29 2C 61 0D 0A 0D 0A 09 72 65 73 20 37 2C 68 c),a.....res 7,h
0000D0: 3A 20 73 65 74 20 36 2C 68 0D 0A 09 6C 64 20 61 : set 6,h...ld a
0000E0: 2C 28 68 6C 29 0D 0A 0D 0A 09 70 6F 70 20 68 6C ,(hl).....pop hl
0000F0: 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 50 75 74 20 ...ret.....;Put
000100: 62 79 74 65 20 74 6F 20 48 4C 20 69 6E 20 73 65 byte to HL in se
000110: 63 6F 6E 64 20 36 34 6B 20 28 63 6F 72 72 75 70 cond 64k (corrup
000120: 74 73 20 42 43 2C 20 64 6F 65 73 20 6E 6F 74 20 ts BC, does not
000130: 72 65 73 74 6F 72 65 20 62 61 6E 6B 73 29 0D 0A restore banks)..
000140: 0D 0A 2E 70 62 62 79 74 65 09 70 75 73 68 20 68 ...pbbyte.push h
000150: 6C 0D 0A 09 70 75 73 68 20 61 66 0D 0A 0D 0A 09 l...push af.....
000160: 6C 64 20 61 2C 68 0D 0A 09 72 6C 63 61 3A 20 72 ld a,h...rlca: r
000170: 6C 63 61 0D 0A 09 61 6E 64 20 33 3A 20 61 64 64 lca...and 3: add
000180: 20 26 43 34 0D 0A 0D 0A 09 6C 64 20 62 2C 26 37 &C4.....ld b,&7
000190: 46 0D 0A 09 6F 75 74 20 28 63 29 2C 61 0D 0A 0D F...out (c),a...
0001A0: 0A 09 72 65 73 20 37 2C 68 3A 20 73 65 74 20 36 ..res 7,h: set 6
0001B0: 2C 68 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 6C 64 ,h...pop af...ld
0001C0: 20 28 68 6C 29 2C 61 0D 0A 0D 0A 09 70 6F 70 20 (hl),a.....pop
0001D0: 68 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 52 65 hl...ret.....;Re
0001E0: 73 74 6F 72 65 20 62 61 6E 6B 73 20 28 63 6F 72 store banks (cor
0001F0: 72 75 70 74 73 20 42 43 29 0D 0A 0D 0A 2E 72 73 rupts BC).....rs
Size : 512 (Real : 512)
000000: 09 6E 6F 6C 69 73 74 0D 0A 09 70 72 69 6E 74 3A .nolist...print:
000010: 20 69 66 31 3A 20 70 72 69 6E 74 20 22 50 61 73 if1: print "Pas
000020: 73 20 31 22 3A 20 65 6C 73 65 3A 20 70 72 69 6E s 1": else: prin
000030: 74 20 22 50 61 73 73 20 32 22 3A 20 65 6E 64 69 t "Pass 2": endi
000040: 66 3A 20 70 72 69 6E 74 0D 0A 0D 0A 09 3B 43 68 f: print.....;Ch
000050: 61 72 6C 65 79 27 73 20 43 6F 6D 6D 73 20 52 4F arley's Comms RO
000060: 4D 0D 0A 09 3B 64 65 76 65 6C 6F 70 6D 65 6E 74 M...;development
000070: 20 76 65 72 73 69 6F 6E 0D 0A 0D 0A 09 6F 72 67 version.....org
000080: 20 26 43 30 30 30 0D 0A 09 77 72 69 74 65 20 22 &C000...write "
000090: 63 6F 6D 6D 73 2E 62 69 6E 22 0D 0A 0D 0A 6B 64 comms.bin"....kd
0000A0: 73 09 65 71 75 20 31 0D 0A 0D 0A 69 66 20 6B 64 s.equ 1....if kd
0000B0: 73 0D 0A 20 64 61 74 6F 75 74 09 65 71 75 20 26 s.. datout.equ &
0000C0: 46 42 45 44 0D 0A 20 64 61 74 69 6E 09 65 71 75 FBED.. datin.equ
0000D0: 20 26 46 42 45 46 0D 0A 20 63 6F 6E 6F 75 74 09 &FBEF.. conout.
0000E0: 65 71 75 20 26 46 42 45 43 0D 0A 20 63 6F 6E 69 equ &FBEC.. coni
0000F0: 6E 09 65 71 75 20 26 46 42 45 45 0D 0A 20 73 70 n.equ &FBEE.. sp
000100: 65 64 30 09 65 71 75 20 26 46 42 45 38 0D 0A 20 ed0.equ &FBE8..
000110: 73 70 65 64 31 09 65 71 75 20 26 46 42 45 39 0D sped1.equ &FBE9.
000120: 0A 20 77 6D 6F 64 09 65 71 75 20 26 46 42 45 42 . wmod.equ &FBEB
000130: 0D 0A 65 6C 73 65 0D 0A 20 64 61 74 70 6F 72 74 ..else.. datport
000140: 20 65 71 75 20 26 46 41 44 43 0D 0A 20 63 6F 6E equ &FADC.. con
000150: 70 6F 72 74 20 65 71 75 20 26 46 41 44 44 0D 0A port equ &FADD..
000160: 20 73 70 65 64 30 09 65 71 75 20 26 46 42 44 43 sped0.equ &FBDC
000170: 0D 0A 20 73 70 65 64 31 09 65 71 75 20 26 46 42 .. sped1.equ &FB
000180: 44 44 0D 0A 20 77 6D 6F 64 09 65 71 75 20 26 46 DD.. wmod.equ &F
000190: 42 44 46 0D 0A 65 6E 64 69 66 0D 0A 0D 0A 09 64 BDF..endif.....d
0001A0: 62 20 31 09 09 09 09 3B 42 61 63 6B 67 72 6F 75 b 1....;Backgrou
0001B0: 6E 64 20 52 4F 4D 0D 0A 09 64 62 20 31 2C 30 2C nd ROM...db 1,0,
0001C0: 30 09 09 09 3B 76 31 2E 30 30 0D 0A 0D 0A 2E 63 0...;v1.00.....c
0001D0: 6F 6D 5F 74 09 64 77 20 6E 61 6D 65 5F 74 0D 0A om_t.dw name_t..
0001E0: 0D 0A 09 6A 70 20 69 6E 69 74 5F 69 0D 0A 09 6A ...jp init_i...j
0001F0: 70 20 62 61 75 64 5F 69 3A 20 6A 70 20 77 6F 72 p baud_i: jp wor
Size : 512 (Real : 512)
000000: 74 62 6E 6B 09 6C 64 20 62 63 2C 26 37 46 43 30 tbnk.ld bc,&7FC0
000010: 0D 0A 09 6F 75 74 20 28 63 29 2C 63 3A 20 72 65 ...out (c),c: re
000020: 74 0D 0A 0D 0A 09 3B 50 75 74 20 62 79 74 65 20 t.....;Put byte
000030: 41 20 69 6E 74 6F 20 65 78 74 72 61 20 36 34 6B A into extra 64k
000040: 20 28 63 6F 72 72 75 70 74 73 20 48 4C 2C 20 42 (corrupts HL, B
000050: 43 29 0D 0A 0D 0A 2E 62 6E 6B 70 69 6E 09 6C 64 C).....bnkpin.ld
000060: 20 6C 2C 28 69 79 2B 32 30 29 3A 20 6C 64 20 68 l,(iy+20): ld h
000070: 2C 28 69 79 2B 32 31 29 0D 0A 09 63 61 6C 6C 20 ,(iy+21)...call
000080: 70 62 62 79 74 65 0D 0A 09 69 6E 63 20 68 6C 3A pbbyte...inc hl:
000090: 20 6C 64 20 28 69 79 2B 32 30 29 2C 6C 3A 20 6C ld (iy+20),l: l
0000A0: 64 20 28 69 79 2B 32 31 29 2C 68 0D 0A 09 6A 70 d (iy+21),h...jp
0000B0: 20 72 73 74 62 6E 6B 0D 0A 0D 0A 09 3B 47 65 74 rstbnk.....;Get
0000C0: 20 62 79 74 65 20 41 20 66 72 6F 6D 20 65 78 74 byte A from ext
0000D0: 72 61 20 36 34 6B 20 28 63 6F 72 72 75 70 74 73 ra 64k (corrupts
0000E0: 20 48 4C 2C 42 43 29 0D 0A 0D 0A 2E 62 6E 6B 67 HL,BC).....bnkg
0000F0: 69 6E 09 6C 64 20 6C 2C 28 69 79 2B 31 33 29 3A in.ld l,(iy+13):
000100: 20 6C 64 20 68 2C 28 69 79 2B 31 34 29 0D 0A 09 ld h,(iy+14)...
000110: 63 61 6C 6C 20 67 62 62 79 74 65 0D 0A 09 69 6E call gbbyte...in
000120: 63 20 68 6C 3A 20 6C 64 20 28 69 79 2B 31 33 29 c hl: ld (iy+13)
000130: 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 34 29 2C 68 ,l: ld (iy+14),h
000140: 0D 0A 09 6A 70 20 72 73 74 62 6E 6B 0D 0A 0D 0A ...jp rstbnk....
000150: 09 3B 52 65 74 75 72 6E 20 74 77 6F 20 62 79 74 .;Return two byt
000160: 65 73 20 61 6E 64 20 6A 75 6D 70 20 74 6F 20 65 es and jump to e
000170: 72 72 6F 72 0D 0A 0D 0A 2E 62 6E 6B 61 62 32 09 rror.....bnkab2.
000180: 6C 64 20 6C 2C 28 69 79 2B 31 33 29 3A 20 6C 64 ld l,(iy+13): ld
000190: 20 68 2C 28 69 79 2B 31 34 29 0D 0A 09 64 65 63 h,(iy+14)...dec
0001A0: 20 68 6C 3A 20 6C 64 20 28 69 79 2B 31 33 29 2C hl: ld (iy+13),
0001B0: 6C 3A 20 6C 64 20 28 69 79 2B 31 34 29 2C 6C 0D l: ld (iy+14),l.
0001C0: 0A 0D 0A 09 3B 52 65 74 75 72 6E 20 6F 6E 65 20 ....;Return one
0001D0: 62 79 74 65 20 61 6E 64 20 6A 75 6D 70 20 74 6F byte and jump to
0001E0: 20 65 72 72 6F 72 0D 0A 0D 0A 2E 62 6E 6B 61 62 error.....bnkab
0001F0: 6F 09 6C 64 20 6C 2C 28 69 79 2B 31 33 29 3A 20 o.ld l,(iy+13):
Size : 512 (Real : 512)
000000: 69 78 0D 0A 09 6C 64 20 28 26 46 46 46 46 29 2C ix...ld (&FFFF),
000010: 61 09 09 09 3B 72 65 73 74 6F 72 65 20 63 6F 72 a...;restore cor
000020: 72 75 70 74 65 64 20 62 79 74 65 73 20 6F 6E 20 rupted bytes on
000030: 73 63 72 65 65 6E 0D 0A 0D 0A 09 6C 64 20 6C 2C screen.....ld l,
000040: 28 69 79 2B 31 38 29 3A 20 6C 64 20 68 2C 28 69 (iy+18): ld h,(i
000050: 79 2B 31 39 29 0D 0A 09 64 65 63 20 68 6C 0D 0A y+19)...dec hl..
000060: 09 6C 64 20 28 69 79 2B 31 38 29 2C 6C 3A 20 6C .ld (iy+18),l: l
000070: 64 20 28 69 79 2B 31 39 29 2C 68 09 3B 64 65 63 d (iy+19),h.;dec
000080: 72 65 61 73 65 20 22 6C 61 73 74 20 72 65 63 6F rease "last reco
000090: 72 64 22 20 63 6F 75 6E 74 65 72 0D 0A 0D 0A 09 rd" counter.....
0000A0: 6C 64 20 68 6C 2C 30 0D 0A 09 6C 64 20 28 69 79 ld hl,0...ld (iy
0000B0: 2B 31 33 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 +13),l: ld (iy+1
0000C0: 34 29 2C 68 0D 0A 09 6C 64 20 28 69 79 2B 31 35 4),h...ld (iy+15
0000D0: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 36 29 2C ),l: ld (iy+16),
0000E0: 68 09 3B 70 72 65 76 65 6E 74 20 72 65 61 64 69 h.;prevent readi
0000F0: 6E 67 20 75 6E 74 69 6C 20 6E 65 77 20 7C 42 47 ng until new |BG
000100: 4F 54 4F 0D 0A 0D 0A 09 72 65 74 0D 0A 0D 0A 2E OTO.....ret.....
000110: 6C 64 69 64 74 61 09 6C 64 20 62 63 2C 26 30 30 ldidta.ld bc,&00
000120: 30 30 09 09 3B 74 68 69 73 20 63 6F 64 65 20 67 00..;this code g
000130: 6F 65 73 20 69 6E 20 74 6F 70 20 31 36 6B 20 6F oes in top 16k o
000140: 66 20 65 78 74 72 61 20 62 61 6E 6B 73 0D 0A 09 f extra banks...
000150: 6C 64 69 72 0D 0A 09 6C 64 20 62 63 2C 26 37 46 ldir...ld bc,&7F
000160: 43 30 0D 0A 09 6F 75 74 20 28 63 29 2C 63 0D 0A C0...out (c),c..
000170: 0D 0A 09 3B 3E 3E 3E 20 42 53 41 56 45 20 63 6F ...;>>> BSAVE co
000180: 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 73 76 65 5F 69 mmand.....bsve_i
000190: 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 0D 0A .ld c,2...cp 1..
0001A0: 09 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A .jp nz,error....
0001B0: 09 63 61 6C 6C 20 62 75 66 66 5F 63 0D 0A 0D 0A .call buff_c....
0001C0: 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 .ld l,(ix): ld h
0001D0: 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 62 2C 28 ,(ix+1)...ld b,(
0001E0: 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 hl): inc hl...ld
0001F0: 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D e,(hl): inc hl.
Size : 512 (Real : 512)
000000: 6C 64 20 68 2C 28 69 79 2B 31 34 29 0D 0A 09 64 ld h,(iy+14)...d
000010: 65 63 20 68 6C 3A 20 6C 64 20 28 69 79 2B 31 33 ec hl: ld (iy+13
000020: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 34 29 2C ),l: ld (iy+14),
000030: 6C 0D 0A 09 6A 70 20 65 72 72 6F 72 0D 0A 0D 0A l...jp error....
000040: 09 3B 47 6F 20 74 6F 20 72 65 63 6F 72 64 20 68 .;Go to record h
000050: 65 6C 64 20 69 6E 20 42 43 20 28 6F 6E 20 65 78 eld in BC (on ex
000060: 69 74 2C 20 48 4C 3D 61 64 64 72 65 73 73 20 6F it, HL=address o
000070: 66 20 72 65 63 6F 72 64 20 44 41 54 41 2C 20 44 f record DATA, D
000080: 45 3D 73 69 7A 65 29 0D 0A 09 3B 44 6F 65 73 20 E=size)...;Does
000090: 6E 6F 74 20 72 65 73 65 74 20 62 61 6E 6B 73 21 not reset banks!
0000A0: 0D 0A 0D 0A 2E 67 72 65 63 62 63 09 6C 64 20 68 .....grecbc.ld h
0000B0: 6C 2C 30 3A 20 6C 64 20 64 65 2C 30 0D 0A 0D 0A l,0: ld de,0....
0000C0: 2E 67 62 63 6C 6F 70 09 61 64 64 20 68 6C 2C 64 .gbclop.add hl,d
0000D0: 65 0D 0A 09 70 75 73 68 20 62 63 0D 0A 09 63 61 e...push bc...ca
0000E0: 6C 6C 20 67 62 62 79 74 65 3A 20 6C 64 20 65 2C ll gbbyte: ld e,
0000F0: 61 3A 20 69 6E 63 20 68 6C 0D 0A 09 63 61 6C 6C a: inc hl...call
000100: 20 67 62 62 79 74 65 3A 20 6C 64 20 64 2C 61 3A gbbyte: ld d,a:
000110: 20 69 6E 63 20 68 6C 0D 0A 09 70 6F 70 20 62 63 inc hl...pop bc
000120: 0D 0A 0D 0A 09 64 65 63 20 62 63 0D 0A 09 6C 64 .....dec bc...ld
000130: 20 61 2C 62 3A 20 6F 72 20 63 3A 20 6A 72 20 6E a,b: or c: jr n
000140: 7A 2C 67 62 63 6C 6F 70 0D 0A 09 72 65 74 0D 0A z,gbclop...ret..
000150: 0D 0A 09 3B 46 69 6E 64 20 6C 61 73 74 20 72 65 ...;Find last re
000160: 63 6F 72 64 0D 0A 0D 0A 2E 66 6C 61 73 74 72 09 cord.....flastr.
000170: 6C 64 20 68 6C 2C 30 09 09 09 3B 43 75 72 72 65 ld hl,0...;Curre
000180: 6E 74 20 6D 65 6D 6F 72 79 20 6C 6F 63 61 74 69 nt memory locati
000190: 6F 6E 20 69 6E 20 65 78 74 72 61 20 36 34 6B 0D on in extra 64k.
0001A0: 0A 0D 0A 2E 67 74 62 6C 65 6E 09 63 61 6C 6C 20 ....gtblen.call
0001B0: 67 62 62 79 74 65 3A 20 6C 64 20 65 2C 61 3A 20 gbbyte: ld e,a:
0001C0: 69 6E 63 20 68 6C 0D 0A 09 63 61 6C 6C 20 67 62 inc hl...call gb
0001D0: 62 79 74 65 3A 20 6C 64 20 64 2C 61 3A 20 69 6E byte: ld d,a: in
0001E0: 63 20 68 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 64 3A c hl.....ld a,d:
0001F0: 20 6F 72 20 65 0D 0A 09 6A 72 20 7A 2C 66 73 70 or e...jr z,fsp
Size : 512 (Real : 512)
000000: 0A 09 6C 64 20 64 2C 28 68 6C 29 3A 20 65 78 20 ..ld d,(hl): ex
000010: 64 65 2C 68 6C 0D 0A 0D 0A 09 6C 64 20 65 2C 28 de,hl.....ld e,(
000020: 69 79 2B 37 29 3A 20 6C 64 20 64 2C 28 69 79 2B iy+7): ld d,(iy+
000030: 38 29 0D 0A 09 69 6E 63 20 64 3A 20 69 6E 63 20 8)...inc d: inc
000040: 64 3A 20 69 6E 63 20 64 3A 20 69 6E 63 20 64 0D d: inc d: inc d.
000050: 0A 0D 0A 09 63 61 6C 6C 20 26 42 43 38 43 0D 0A ....call &BC8C..
000060: 09 6C 64 20 63 2C 39 3A 20 6A 70 20 6E 63 2C 65 .ld c,9: jp nc,e
000070: 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 69 rror.....ld l,(i
000080: 79 2B 31 38 29 3A 20 6C 64 20 68 2C 28 69 79 2B y+18): ld h,(iy+
000090: 31 39 29 0D 0A 09 6C 64 20 61 2C 6C 3A 20 63 61 19)...ld a,l: ca
0000A0: 6C 6C 20 26 42 43 39 35 0D 0A 09 6C 64 20 61 2C ll &BC95...ld a,
0000B0: 68 3A 20 63 61 6C 6C 20 26 42 43 39 35 09 3B 57 h: call &BC95.;W
0000C0: 72 69 74 65 20 6C 61 73 74 20 72 65 63 6F 72 64 rite last record
0000D0: 20 6E 75 6D 62 65 72 0D 0A 09 63 61 6C 6C 20 66 number...call f
0000E0: 6C 61 73 74 72 0D 0A 09 6C 64 20 61 2C 6C 3A 20 lastr...ld a,l:
0000F0: 63 61 6C 6C 20 26 42 43 39 35 0D 0A 09 6C 64 20 call &BC95...ld
000100: 61 2C 68 3A 20 63 61 6C 6C 20 26 42 43 39 35 09 a,h: call &BC95.
000110: 3B 57 72 69 74 65 20 6C 65 6E 67 74 68 20 6F 66 ;Write length of
000120: 20 72 65 63 6F 72 64 73 0D 0A 0D 0A 2E 62 73 76 records.....bsv
000130: 65 6C 70 09 64 65 63 20 68 6C 0D 0A 0D 0A 09 63 elp.dec hl.....c
000140: 61 6C 6C 20 67 62 62 79 74 65 09 09 3B 47 65 74 all gbbyte..;Get
000150: 20 63 68 61 72 61 63 74 65 72 2E 2E 2E 0D 0A 09 character......
000160: 63 61 6C 6C 20 72 73 74 62 6E 6B 0D 0A 09 63 61 call rstbnk...ca
000170: 6C 6C 20 26 42 43 39 35 09 09 3B 61 6E 64 20 77 ll &BC95..;and w
000180: 72 69 74 65 20 74 6F 20 64 69 73 63 0D 0A 0D 0A rite to disc....
000190: 09 6C 64 20 61 2C 68 3A 20 6F 72 20 6C 0D 0A 09 .ld a,h: or l...
0001A0: 6A 72 20 6E 7A 2C 62 73 76 65 6C 70 0D 0A 09 63 jr nz,bsvelp...c
0001B0: 61 6C 6C 20 26 42 43 38 46 09 09 3B 43 6C 6F 73 all &BC8F..;Clos
0001C0: 65 20 66 69 6C 65 0D 0A 09 72 65 74 0D 0A 0D 0A e file...ret....
0001D0: 09 3B 3E 3E 3E 20 42 4C 4F 41 44 20 63 6F 6D 6D .;>>> BLOAD comm
0001E0: 61 6E 64 0D 0A 0D 0A 2E 62 6C 6F 64 5F 69 09 6C and.....blod_i.l
0001F0: 64 20 63 2C 32 0D 0A 09 63 70 20 31 0D 0A 09 6A d c,2...cp 1...j
Size : 512 (Real : 512)
000000: 61 63 65 09 09 3B 49 66 20 72 65 61 63 68 65 64 ace..;If reached
000010: 20 74 68 65 20 65 6E 64 2C 20 71 75 69 74 0D 0A the end, quit..
000020: 09 61 64 64 20 68 6C 2C 64 65 3A 20 6A 72 20 67 .add hl,de: jr g
000030: 74 62 6C 65 6E 09 3B 47 6F 20 74 6F 20 6E 65 78 tblen.;Go to nex
000040: 74 20 61 64 64 72 65 73 73 0D 0A 0D 0A 2E 66 73 t address.....fs
000050: 70 61 63 65 09 63 61 6C 6C 20 72 73 74 62 6E 6B pace.call rstbnk
000060: 09 09 3B 42 61 63 6B 20 74 6F 20 6E 6F 72 6D 61 ..;Back to norma
000070: 6C 20 6D 65 6D 6F 72 79 0D 0A 09 72 65 74 0D 0A l memory...ret..
000080: 45 3D 73 69 7A 65 29 0D 0A 09 3B 44 6F 65 73 20 E=size)...;Does
000090: 6E 6F 74 20 72 65 73 65 74 20 62 61 6E 6B 73 21 not reset banks!
0000A0: 0D 0A 0D 0A 2E 67 72 65 63 62 63 09 6C 64 20 68 .....grecbc.ld h
0000B0: 6C 2C 30 3A 20 6C 64 20 64 65 2C 30 0D 0A 0D 0A l,0: ld de,0....
0000C0: 2E 67 62 63 6C 6F 70 09 61 64 64 20 68 6C 2C 64 .gbclop.add hl,d
0000D0: 65 0D 0A 09 70 75 73 68 20 62 63 0D 0A 09 63 61 e...push bc...ca
0000E0: 6C 6C 20 67 62 62 79 74 65 3A 20 6C 64 20 65 2C ll gbbyte: ld e,
0000F0: 61 3A 20 69 6E 63 20 68 6C 0D 0A 09 63 61 6C 6C a: inc hl...call
000100: 20 67 62 62 79 74 65 3A 20 6C 64 20 64 2C 61 3A gbbyte: ld d,a:
000110: 20 69 6E 63 20 68 6C 0D 0A 09 70 6F 70 20 62 63 inc hl...pop bc
000120: 0D 0A 0D 0A 09 64 65 63 20 62 63 0D 0A 09 6C 64 .....dec bc...ld
000130: 20 61 2C 62 3A 20 6F 72 20 63 3A 20 6A 72 20 6E a,b: or c: jr n
000140: 7A 2C 67 62 63 6C 6F 70 0D 0A 09 72 65 74 0D 0A z,gbclop...ret..
000150: 0D 0A 09 3B 46 69 6E 64 20 6C 61 73 74 20 72 65 ...;Find last re
000160: 63 6F 72 64 0D 0A 0D 0A 2E 66 6C 61 73 74 72 09 cord.....flastr.
000170: 6C 64 20 68 6C 2C 30 09 09 09 3B 43 75 72 72 65 ld hl,0...;Curre
000180: 6E 74 20 6D 65 6D 6F 72 79 20 6C 6F 63 61 74 69 nt memory locati
000190: 6F 6E 20 69 6E 20 65 78 74 72 61 20 36 34 6B 0D on in extra 64k.
0001A0: 0A 0D 0A 2E 67 74 62 6C 65 6E 09 63 61 6C 6C 20 ....gtblen.call
0001B0: 67 62 62 79 74 65 3A 20 6C 64 20 65 2C 61 3A 20 gbbyte: ld e,a:
0001C0: 69 6E 63 20 68 6C 0D 0A 09 63 61 6C 6C 20 67 62 inc hl...call gb
0001D0: 62 79 74 65 3A 20 6C 64 20 64 2C 61 3A 20 69 6E byte: ld d,a: in
0001E0: 63 20 68 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 64 3A c hl.....ld a,d:
0001F0: 20 6F 72 20 65 0D 0A 09 6A 72 20 7A 2C 66 73 70 or e...jr z,fsp
Size : 512 (Real : 512)
000000: 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 63 p nz,error.....c
000010: 61 6C 6C 20 62 75 66 66 5F 63 0D 0A 0D 0A 09 6C all buff_c.....l
000020: 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C 28 d l,(ix): ld h,(
000030: 69 78 2B 31 29 0D 0A 09 6C 64 20 62 2C 28 68 6C ix+1)...ld b,(hl
000040: 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 65 ): inc hl...ld e
000050: 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 ,(hl): inc hl...
000060: 6C 64 20 64 2C 28 68 6C 29 3A 20 65 78 20 64 65 ld d,(hl): ex de
000070: 2C 68 6C 0D 0A 0D 0A 09 6C 64 20 65 2C 28 69 79 ,hl.....ld e,(iy
000080: 2B 37 29 3A 20 6C 64 20 64 2C 28 69 79 2B 38 29 +7): ld d,(iy+8)
000090: 0D 0A 09 69 6E 63 20 64 3A 20 69 6E 63 20 64 3A ...inc d: inc d:
0000A0: 20 69 6E 63 20 64 3A 20 69 6E 63 20 64 0D 0A 0D inc d: inc d...
0000B0: 0A 09 63 61 6C 6C 20 26 42 43 37 37 0D 0A 09 6C ..call &BC77...l
0000C0: 64 20 63 2C 39 3A 20 6A 70 20 6E 63 2C 65 72 72 d c,9: jp nc,err
0000D0: 6F 72 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 43 38 or.....call &BC8
0000E0: 30 3A 20 6C 64 20 28 69 79 2B 31 38 29 2C 61 0D 0: ld (iy+18),a.
0000F0: 0A 09 63 61 6C 6C 20 26 42 43 38 30 3A 20 6C 64 ..call &BC80: ld
000100: 20 28 69 79 2B 31 39 29 2C 61 09 3B 4C 61 73 74 (iy+19),a.;Last
000110: 20 72 65 63 6F 72 64 20 6E 75 6D 62 65 72 0D 0A record number..
000120: 09 63 61 6C 6C 20 26 42 43 38 30 3A 20 6C 64 20 .call &BC80: ld
000130: 6C 2C 61 0D 0A 09 63 61 6C 6C 20 26 42 43 38 30 l,a...call &BC80
000140: 3A 20 6C 64 20 68 2C 61 09 09 3B 54 6F 74 61 6C : ld h,a..;Total
000150: 20 6C 65 6E 67 74 68 20 6F 66 20 72 65 63 6F 72 length of recor
000160: 64 73 0D 0A 0D 0A 2E 62 6C 6F 64 6C 70 09 64 65 ds.....blodlp.de
000170: 63 20 68 6C 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 c hl.....call &B
000180: 43 38 30 09 09 3B 47 65 74 20 63 68 61 72 61 63 C80..;Get charac
000190: 74 65 72 2E 2E 2E 0D 0A 09 63 61 6C 6C 20 70 62 ter......call pb
0001A0: 62 79 74 65 09 09 3B 61 6E 64 20 70 75 74 20 69 byte..;and put i
0001B0: 6E 20 6D 65 6D 6F 72 79 0D 0A 09 63 61 6C 6C 20 n memory...call
0001C0: 72 73 74 62 6E 6B 0D 0A 0D 0A 09 6C 64 20 61 2C rstbnk.....ld a,
0001D0: 68 3A 20 6F 72 20 6C 0D 0A 09 6A 72 20 6E 7A 2C h: or l...jr nz,
0001E0: 62 6C 6F 64 6C 70 0D 0A 09 63 61 6C 6C 20 26 42 blodlp...call &B
0001F0: 43 37 41 09 09 3B 43 6C 6F 73 65 20 66 69 6C 65 C7A..;Close file
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 65 6E 22 2C 31 33 2C 31 30 2C 31 30 2C 30 09 09 en",13,10,10,0..
000010: 3B 31 33 0D 0A 09 64 62 20 22 3A 20 64 61 74 61 ;13...db ": data
000020: 20 77 72 6F 6E 67 20 74 79 70 65 22 2C 31 33 2C wrong type",13,
000030: 31 30 2C 31 30 2C 30 09 09 3B 31 34 0D 0A 09 64 10,10,0..;14...d
000040: 62 20 22 3A 20 65 6E 64 20 6F 66 20 64 61 74 61 b ": end of data
000050: 20 6D 65 74 22 2C 31 33 2C 31 30 2C 31 30 2C 30 met",13,10,10,0
000060: 09 09 3B 31 35 0D 0A 09 64 62 20 22 3A 20 72 65 ..;15...db ": re
000070: 63 6F 72 64 20 61 6C 72 65 61 64 79 20 6F 70 65 cord already ope
000080: 6E 22 2C 31 33 2C 31 30 2C 31 30 2C 30 09 09 3B n",13,10,10,0..;
000090: 31 36 0D 0A 09 64 62 20 22 3A 20 73 74 72 69 6E 16...db ": strin
0000A0: 67 20 74 6F 6F 20 6C 6F 6E 67 22 2C 31 33 2C 31 g too long",13,1
0000B0: 30 2C 31 30 2C 30 09 09 3B 31 37 0D 0A 09 64 62 0,10,0..;17...db
0000C0: 20 22 3A 20 72 65 63 6F 72 64 20 6E 6F 74 20 63 ": record not c
0000D0: 6C 6F 73 65 64 22 2C 31 33 2C 31 30 2C 31 30 2C losed",13,10,10,
0000E0: 30 09 09 3B 31 38 0D 0A 09 64 62 20 22 3A 20 69 0..;18...db ": i
0000F0: 6E 63 6F 6D 70 61 74 69 62 6C 65 20 76 65 72 73 ncompatible vers
000100: 69 6F 6E 22 2C 31 33 2C 31 30 2C 31 30 2C 30 09 ion",13,10,10,0.
000110: 09 3B 31 39 0D 0A 0D 0A 09 3B 4D 65 73 73 61 67 .;19.....;Messag
000120: 65 20 74 65 78 74 0D 0A 0D 0A 2E 79 6D 74 65 78 e text.....ymtex
000130: 74 09 64 62 20 31 33 2C 31 30 2C 22 59 4D 6F 64 t.db 13,10,"YMod
000140: 65 6D 3A 20 22 2C 30 0D 0A 2E 63 6C 74 65 78 74 em: ",0...cltext
000150: 09 64 62 20 22 63 6C 6F 73 69 6E 67 22 2C 30 0D .db "closing",0.
000160: 0A 2E 61 62 72 74 78 74 09 64 62 20 22 61 62 6F ..abrtxt.db "abo
000170: 72 74 69 6E 67 22 2C 30 0D 0A 2E 63 72 63 74 78 rting",0...crctx
000180: 74 09 64 62 20 31 33 2C 31 30 2C 22 58 4D 6F 64 t.db 13,10,"XMod
000190: 65 6D 2D 43 52 43 3A 22 2C 30 0D 0A 2E 63 68 6B em-CRC:",0...chk
0001A0: 74 78 74 09 64 62 20 31 33 2C 31 30 2C 22 58 4D txt.db 13,10,"XM
0001B0: 6F 64 65 6D 3A 20 22 2C 30 0D 0A 2E 6F 6E 65 74 odem: ",0...onet
0001C0: 78 74 09 64 62 20 31 33 2C 31 30 2C 22 58 4D 6F xt.db 13,10,"XMo
0001D0: 64 65 6D 2D 31 6B 3A 20 22 2C 30 0D 0A 2E 6C 62 dem-1k: ",0...lb
0001E0: 72 74 78 74 09 64 62 20 31 30 2C 31 33 2C 22 4C rtxt.db 10,13,"L
0001F0: 69 62 72 61 72 79 3A 20 22 2C 30 0D 0A 2E 6C 61 ibrary: ",0...la
Size : 512 (Real : 512)
000000: 43 4C 4F 53 45 22 0D 0A 09 73 74 72 20 22 42 43 CLOSE"...str "BC
000010: 48 45 43 4B 22 2C 22 42 47 4F 54 4F 22 2C 22 42 HECK","BGOTO","B
000020: 47 45 54 53 22 2C 22 42 47 45 54 49 22 0D 0A 09 GETS","BGETI"...
000030: 73 74 72 20 22 42 50 55 54 53 22 2C 22 42 50 55 str "BPUTS","BPU
000040: 54 49 22 2C 22 42 44 45 4C 45 54 45 22 2C 22 42 TI","BDELETE","B
000050: 53 41 56 45 22 0D 0A 09 73 74 72 20 22 42 4C 4F SAVE"...str "BLO
000060: 41 44 22 0D 0A 09 6E 6F 70 0D 0A 0D 0A 2E 69 6E AD"...nop.....in
000070: 69 74 5F 69 09 70 75 73 68 20 64 65 0D 0A 09 6C it_i.push de...l
000080: 64 20 62 2C 30 0D 0A 2E 69 6E 69 74 5F 6C 09 6C d b,0...init_l.l
000090: 64 20 28 68 6C 29 2C 30 3A 20 64 65 63 20 68 6C d (hl),0: dec hl
0000A0: 3A 20 6C 64 20 28 68 6C 29 2C 30 3A 20 64 65 63 : ld (hl),0: dec
0000B0: 20 68 6C 3A 20 64 6A 6E 7A 20 69 6E 69 74 5F 6C hl: djnz init_l
0000C0: 0D 0A 09 70 75 73 68 20 68 6C 3A 20 70 75 73 68 ...push hl: push
0000D0: 20 69 78 3A 20 70 75 73 68 20 69 79 0D 0A 0D 0A ix: push iy....
0000E0: 09 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 79 .push hl: pop iy
0000F0: 3A 20 69 6E 63 20 69 79 09 09 09 3B 49 59 20 3D : inc iy...;IY =
000100: 20 77 6F 72 6B 73 70 61 63 65 0D 0A 0D 0A 09 6C workspace.....l
000110: 64 20 68 6C 2C 73 69 67 6E 6F 6E 3A 20 63 61 6C d hl,signon: cal
000120: 6C 20 73 74 72 69 6E 67 09 09 3B 70 72 69 6E 74 l string..;print
000130: 20 63 6F 70 79 72 69 67 68 74 20 6D 65 73 73 61 copyright messa
000140: 67 65 0D 0A 0D 0A 09 70 75 73 68 20 69 79 3A 20 ge.....push iy:
000150: 70 6F 70 20 68 6C 3A 20 6C 64 20 64 65 2C 33 33 pop hl: ld de,33
000160: 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 65 78 : add hl,de...ex
000170: 20 64 65 2C 68 6C 3A 20 6C 64 20 68 6C 2C 26 42 de,hl: ld hl,&B
000180: 44 46 31 3A 20 6C 64 69 3A 20 6C 64 69 3A 20 6C DF1: ldi: ldi: l
000190: 64 69 09 3B 70 72 65 73 65 72 76 65 20 26 42 44 di.;preserve &BD
0001A0: 46 31 0D 0A 0D 0A 09 70 75 73 68 20 69 79 3A 20 F1.....push iy:
0001B0: 70 6F 70 20 68 6C 3A 20 6C 64 20 64 65 2C 33 37 pop hl: ld de,37
0001C0: 32 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 65 2: add hl,de...e
0001D0: 78 20 64 65 2C 68 6C 3A 20 6C 64 20 68 6C 2C 72 x de,hl: ld hl,r
0001E0: 65 64 69 72 3A 20 6C 64 20 62 63 2C 31 34 3A 20 edir: ld bc,14:
0001F0: 6C 64 69 72 09 3B 63 6F 70 79 20 72 65 64 69 72 ldir.;copy redir
Size : 512 (Real : 512)
000000: 73 74 63 72 09 64 62 20 31 30 2C 31 30 2C 31 33 stcr.db 10,10,13
000010: 2C 30 0D 0A 2E 74 74 73 65 6E 64 09 64 62 20 31 ,0...ttsend.db 1
000020: 33 2C 31 30 2C 22 4E 6F 2E 20 6F 66 20 66 69 6C 3,10,"No. of fil
000030: 65 73 20 74 6F 20 73 65 6E 64 3A 20 22 2C 30 0D es to send: ",0.
000040: 0A 2E 74 74 6B 6D 65 73 09 64 62 20 22 20 28 22 ..ttkmes.db " ("
000050: 2C 30 0D 0A 2E 74 74 6B 63 6C 6F 09 64 62 20 22 ,0...ttkclo.db "
000060: 6B 29 22 2C 31 30 2C 31 33 2C 30 0D 0A 2E 61 62 k)",10,13,0...ab
000070: 72 72 65 71 09 64 62 20 22 61 62 6F 72 74 22 2C rreq.db "abort",
000080: 31 30 2C 31 30 2C 31 33 2C 30 0D 0A 2E 73 69 67 10,10,13,0...sig
000090: 6E 6F 6E 09 64 62 20 22 20 43 48 41 52 4C 45 59 non.db " CHARLEY
0000A0: 27 53 20 43 4F 4D 4D 53 20 22 2C 31 36 34 2C 22 'S COMMS ",164,"
0000B0: 31 39 39 32 20 52 69 63 68 61 72 64 20 46 61 69 1992 Richard Fai
0000C0: 72 68 75 72 73 74 22 2C 31 30 2C 30 0D 0A 0D 0A rhurst",10,0....
0000D0: 09 3B 42 61 75 64 20 72 61 74 65 2F 38 32 35 33 .;Baud rate/8253
0000E0: 20 63 6F 6E 76 65 72 73 69 6F 6E 20 64 61 74 61 conversion data
0000F0: 0D 0A 0D 0A 2E 74 62 38 32 35 33 09 64 77 20 33 .....tb8253.dw 3
000100: 31 32 35 30 2C 26 34 2C 31 39 32 30 30 2C 26 37 1250,&4,19200,&7
000110: 2C 39 36 30 30 2C 26 44 2C 37 32 30 30 2C 26 31 ,9600,&D,7200,&1
000120: 31 2C 34 38 30 30 2C 26 31 41 0D 0A 09 64 77 20 1,4800,&1A...dw
000130: 33 36 30 30 2C 26 32 33 2C 32 34 30 30 2C 26 33 3600,&23,2400,&3
000140: 34 2C 32 30 30 30 2C 26 33 46 2C 31 38 30 30 2C 4,2000,&3F,1800,
000150: 26 34 35 2C 31 32 30 30 2C 26 36 38 0D 0A 09 64 &45,1200,&68...d
000160: 77 20 36 30 30 2C 26 44 30 2C 33 30 30 2C 26 31 w 600,&D0,300,&1
000170: 41 30 2C 32 30 30 2C 26 32 37 31 2C 31 35 30 2C A0,200,&271,150,
000180: 26 33 34 31 2C 31 31 30 2C 26 34 37 30 0D 0A 09 &341,110,&470...
000190: 64 77 20 37 35 2C 26 36 38 33 2C 35 30 2C 26 39 dw 75,&683,50,&9
0001A0: 43 34 2C 34 35 2C 26 41 44 39 2C 30 2C 30 0D 0A C4,45,&AD9,0,0..
0001B0: 0D 0A 0D 0A 0D 0A 20 20 20 20 20 20 20 20 3B 2A ...... ;*
0001C0: 2A 2A 20 56 61 72 69 61 62 6C 65 73 20 2A 2A 2A ** Variables ***
0001D0: 0D 0A 0D 0A 3B 64 6F 5F 65 72 72 09 64 62 20 31 ....;do_err.db 1
0001E0: 09 09 3B 2B 30 09 72 65 70 6F 72 74 20 65 72 72 ..;+0.report err
0001F0: 6F 72 73 20 6F 6E 2F 6F 66 66 0D 0A 3B 6C 65 63 ors on/off..;lec
Size : 512 (Real : 512)
000000: 65 63 74 69 6F 6E 20 74 6F 20 49 59 2B 33 37 32 ection to IY+372
000010: 0D 0A 0D 0A 09 70 75 73 68 20 69 79 3A 20 70 6F .....push iy: po
000020: 70 20 68 6C 3A 20 6C 64 20 64 65 2C 33 37 35 3A p hl: ld de,375:
000030: 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 63 61 6C add hl,de...cal
000040: 6C 20 26 42 39 31 32 3A 20 6C 64 20 28 68 6C 29 l &B912: ld (hl)
000050: 2C 61 09 09 09 3B 69 6E 73 65 72 74 20 52 4F 4D ,a...;insert ROM
000060: 20 6E 6F 2E 20 66 6F 72 20 46 41 52 20 50 43 48 no. for FAR PCH
000070: 4C 0D 0A 0D 0A 09 6C 64 20 28 26 42 41 46 44 29 L.....ld (&BAFD)
000080: 2C 69 79 09 09 09 09 3B 26 42 41 46 44 3D 70 61 ,iy....;&BAFD=pa
000090: 72 61 6D 65 74 65 72 73 0D 0A 09 70 75 73 68 20 rameters...push
0000A0: 69 79 3A 20 70 6F 70 20 68 6C 3A 20 6C 64 20 64 iy: pop hl: ld d
0000B0: 65 2C 39 30 3A 20 61 64 64 20 68 6C 2C 64 65 09 e,90: add hl,de.
0000C0: 3B 65 76 65 6E 74 20 62 6C 6F 63 6B 0D 0A 09 63 ;event block...c
0000D0: 61 6C 6C 20 26 42 39 31 32 3A 20 6C 64 20 63 2C all &B912: ld c,
0000E0: 61 3A 20 6C 64 20 62 2C 26 31 31 0D 0A 09 6C 64 a: ld b,&11...ld
0000F0: 20 64 65 2C 66 63 6F 75 6E 74 3A 20 63 61 6C 6C de,fcount: call
000100: 20 26 42 43 44 37 0D 0A 09 70 75 73 68 20 69 79 &BCD7...push iy
000110: 3A 20 70 6F 70 20 68 6C 3A 20 63 61 6C 6C 20 72 : pop hl: call r
000120: 65 73 65 74 0D 0A 0D 0A 09 70 6F 70 20 69 79 3A eset.....pop iy:
000130: 20 70 6F 70 20 69 78 3A 20 70 6F 70 20 68 6C 3A pop ix: pop hl:
000140: 20 70 6F 70 20 64 65 0D 0A 09 73 63 66 3A 20 72 pop de...scf: r
000150: 65 74 0D 0A 0D 0A 09 70 72 69 6E 74 20 22 20 52 et.....print " R
000160: 65 61 64 69 6E 67 20 69 6E 20 43 4F 4E 54 52 4F eading in CONTRO
000170: 4C 20 2E 4D 4F 44 22 3A 20 72 65 61 64 20 22 43 L .MOD": read "C
000180: 4F 4E 54 52 4F 4C 20 2E 4D 4F 44 22 0D 0A 09 70 ONTROL .MOD"...p
000190: 72 69 6E 74 20 22 20 52 65 61 64 69 6E 67 20 69 rint " Reading i
0001A0: 6E 20 53 49 4F 20 20 20 20 20 2E 4D 4F 44 22 3A n SIO .MOD":
0001B0: 20 72 65 61 64 20 22 53 49 4F 20 20 20 20 20 2E read "SIO .
0001C0: 4D 4F 44 22 0D 0A 09 70 72 69 6E 74 20 22 20 52 MOD"...print " R
0001D0: 65 61 64 69 6E 67 20 69 6E 20 46 49 4C 45 20 20 eading in FILE
0001E0: 20 20 2E 4D 4F 44 22 3A 20 72 65 61 64 20 22 46 .MOD": read "F
0001F0: 49 4C 45 20 20 20 20 2E 4D 4F 44 22 0D 0A 09 70 ILE .MOD"...p
Size : 512 (Real : 512)
000000: 68 6F 09 64 62 20 30 09 09 3B 2B 31 09 6C 6F 63 ho.db 0..;+1.loc
000010: 61 6C 20 65 63 68 6F 20 6F 6E 2F 6F 66 66 0D 0A al echo on/off..
000020: 3B 63 75 72 73 74 09 64 62 20 30 09 09 3B 2B 32 ;curst.db 0..;+2
000030: 09 63 75 72 73 6F 72 20 6F 6E 2F 6F 66 66 0D 0A .cursor on/off..
000040: 3B 63 72 09 64 62 20 31 09 09 3B 2B 33 09 43 52 ;cr.db 1..;+3.CR
000050: 20 6F 6E 2F 6F 66 66 0D 0A 3B 78 6F 6E 63 09 64 on/off..;xonc.d
000060: 62 20 30 09 09 3B 2B 34 09 58 4F 4E 20 66 6C 6F b 0..;+4.XON flo
000070: 77 20 63 6F 6E 74 72 6F 6C 20 6F 6E 2F 6F 66 66 w control on/off
000080: 0D 0A 3B 66 63 6D 6F 64 65 09 64 62 20 30 09 09 ..;fcmode.db 0..
000090: 3B 2B 35 09 66 69 6C 65 20 63 61 70 74 75 72 65 ;+5.file capture
0000A0: 20 6D 6F 64 65 0D 0A 3B 72 65 64 72 63 74 09 64 mode..;redrct.d
0000B0: 62 20 30 09 09 3B 2B 36 09 72 65 64 69 72 65 63 b 0..;+6.redirec
0000C0: 74 20 64 6F 77 6E 2D 6C 69 6E 65 20 66 6F 72 20 t down-line for
0000D0: 73 6F 6D 65 20 63 6F 6D 6D 61 6E 64 73 3F 0D 0A some commands?..
0000E0: 3B 66 62 61 64 64 72 09 64 77 20 30 09 09 3B 2B ;fbaddr.dw 0..;+
0000F0: 37 09 66 69 6C 65 20 62 75 66 66 65 72 20 61 64 7.file buffer ad
000100: 64 72 65 73 73 0D 0A 3B 74 69 6D 65 73 74 09 64 dress..;timest.d
000110: 77 20 30 09 09 3B 2B 39 09 74 69 6D 65 2D 6F 75 w 0..;+9.time-ou
000120: 74 20 6C 65 6E 67 74 68 0D 0A 0D 0A 69 66 20 6B t length....if k
000130: 64 73 0D 0A 20 3B 63 72 65 67 09 64 62 20 25 31 ds.. ;creg.db %1
000140: 30 31 30 31 30 31 30 09 3B 2B 31 31 09 63 6F 6E 0101010.;+11.con
000150: 74 72 6F 6C 20 72 65 67 69 73 74 65 72 20 64 65 trol register de
000160: 66 61 75 6C 74 0D 0A 09 64 73 20 31 0D 0A 65 6C fault...ds 1..el
000170: 73 65 0D 0A 20 3B 72 65 67 33 09 64 62 20 25 31 se.. ;reg3.db %1
000180: 31 31 30 30 30 30 31 09 3B 2B 31 31 09 72 65 67 1100001.;+11.reg
000190: 69 73 74 65 72 20 33 20 64 65 66 61 75 6C 74 0D ister 3 default.
0001A0: 0A 20 3B 72 65 67 35 09 64 62 20 25 31 31 31 30 . ;reg5.db %1110
0001B0: 31 30 31 30 09 3B 2B 31 32 09 72 65 67 69 73 74 1010.;+12.regist
0001C0: 65 72 20 35 20 64 65 66 61 75 6C 74 0D 0A 65 6E er 5 default..en
0001D0: 64 69 66 0D 0A 0D 0A 3B 62 6E 6B 67 65 74 09 64 dif....;bnkget.d
0001E0: 77 20 30 09 09 3B 2B 31 33 09 77 68 65 72 65 20 w 0..;+13.where
0001F0: 74 6F 20 67 65 74 20 66 72 6F 6D 0D 0A 3B 62 6E to get from..;bn
Size : 512 (Real : 512)
000000: 72 69 6E 74 20 22 20 52 65 61 64 69 6E 67 20 69 rint " Reading i
000010: 6E 20 54 45 52 4D 49 4E 41 4C 2E 4D 4F 44 22 3A n TERMINAL.MOD":
000020: 20 72 65 61 64 20 22 54 45 52 4D 49 4E 41 4C 2E read "TERMINAL.
000030: 4D 4F 44 22 0D 0A 09 70 72 69 6E 74 20 22 20 52 MOD"...print " R
000040: 65 61 64 69 6E 67 20 69 6E 20 4C 49 42 52 41 52 eading in LIBRAR
000050: 59 20 2E 4D 4F 44 22 3A 20 72 65 61 64 20 22 4C Y .MOD": read "L
000060: 49 42 52 41 52 59 20 2E 4D 4F 44 22 0D 0A 09 70 IBRARY .MOD"...p
000070: 72 69 6E 74 20 22 20 52 65 61 64 69 6E 67 20 69 rint " Reading i
000080: 6E 20 42 42 53 20 20 20 20 20 2E 4D 4F 44 22 3A n BBS .MOD":
000090: 20 72 65 61 64 20 22 42 42 53 20 20 20 20 20 2E read "BBS .
0000A0: 4D 4F 44 22 0D 0A 09 70 72 69 6E 74 20 22 20 52 MOD"...print " R
0000B0: 65 61 64 69 6E 67 20 69 6E 20 53 55 42 52 4F 55 eading in SUBROU
0000C0: 54 20 2E 4D 4F 44 22 3A 20 72 65 61 64 20 22 53 T .MOD": read "S
0000D0: 55 42 52 4F 55 54 20 2E 4D 4F 44 22 0D 0A 09 70 UBROUT .MOD"...p
0000E0: 72 69 6E 74 20 22 20 41 73 73 65 6D 62 6C 69 6E rint " Assemblin
0000F0: 67 20 63 6F 6D 6D 6F 6E 20 64 61 74 61 22 0D 0A g common data"..
000100: 0D 0A 09 3B 2A 2A 2A 20 44 61 74 61 20 2A 2A 2A ...;*** Data ***
000110: 0D 0A 0D 0A 2E 6F 6B 63 68 61 72 09 64 62 20 22 .....okchar.db "
000120: 41 42 43 44 45 46 47 48 49 4A 4B 4C 4D 4E 4F 50 ABCDEFGHIJKLMNOP
000130: 51 52 53 54 55 56 57 58 59 5A 30 31 32 33 34 35 QRSTUVWXYZ012345
000140: 36 37 38 39 21 22 2C 33 34 2C 22 23 24 25 26 2B 6789!",34,"#$%&+
000150: 2D 40 5E 2A 3F 2E 60 7B 7D 7E 20 22 2C 30 0D 0A -@^*?.`{}~ ",0..
000160: 2E 66 66 66 66 09 64 62 20 30 2C 36 2C 35 2C 35 .ffff.db 0,6,5,5
000170: 2C 33 2C 36 0D 0A 0D 0A 2E 76 74 35 32 73 74 09 ,3,6.....vt52st.
000180: 64 62 20 22 33 22 2C 34 2C 22 48 22 2C 33 30 2C db "3",4,"H",30,
000190: 22 49 22 2C 31 31 2C 22 4A 22 2C 32 30 2C 22 4B "I",11,"J",20,"K
0001A0: 22 2C 31 38 2C 22 64 22 2C 31 39 2C 22 65 22 2C ",18,"d",19,"e",
0001B0: 33 2C 22 66 22 2C 32 2C 22 6F 22 2C 31 37 2C 30 3,"f",2,"o",17,0
0001C0: 0D 0A 0D 0A 09 3B 45 72 72 6F 72 20 74 65 78 74 .....;Error text
0001D0: 0D 0A 0D 0A 2E 63 65 5F 74 78 74 09 64 62 20 31 .....ce_txt.db 1
0001E0: 33 2C 31 30 2C 22 43 6F 6D 6D 73 20 65 72 72 6F 3,10,"Comms erro
0001F0: 72 20 22 2C 30 0D 0A 0D 0A 2E 65 72 72 5F 74 78 r ",0.....err_tx
Size : 512 (Real : 512)
000000: 64 5F 69 3A 20 6A 70 20 73 65 6E 64 5F 69 3A 20 d_i: jp send_i:
000010: 6A 70 20 67 65 74 5F 69 0D 0A 09 6A 70 20 67 72 jp get_i...jp gr
000020: 61 62 5F 69 3A 20 6A 70 20 77 72 74 5F 69 20 3A ab_i: jp wrt_i :
000030: 20 6A 70 20 70 72 6F 67 5F 69 3A 20 6A 70 20 72 jp prog_i: jp r
000040: 65 61 64 5F 69 0D 0A 09 6A 70 20 63 6F 6D 5F 69 ead_i...jp com_i
000050: 20 3A 20 6A 70 20 77 61 69 74 5F 69 3A 20 6A 70 : jp wait_i: jp
000060: 20 69 6E 70 5F 69 20 3A 20 6A 70 20 73 65 72 5F inp_i : jp ser_
000070: 69 0D 0A 09 6A 70 20 6D 61 5F 5F 69 20 0A 2E 6A i...jp ma__i ..j
000080: 70 20 63 75 72 73 5F 69 3A 20 6A 70 20 73 64 63 p curs_i: jp sdc
000090: 72 5F 69 3A 20 6A 70 20 73 68 6B 65 5F 69 0D 0A r_i: jp shke_i..
0000A0: 09 6A 70 20 62 72 6B 5F 69 20 3A 20 6A 70 20 65 .jp brk_i : jp e
0000B0: 72 72 73 5F 69 3A 20 6A 70 20 63 61 70 74 5F 69 rrs_i: jp capt_i
0000C0: 3A 20 6A 70 20 63 6C 6F 73 5F 69 0D 0A 09 6A 70 : jp clos_i...jp
0000D0: 20 78 6F 6E 5F 69 20 3A 20 6A 70 20 65 63 68 6F xon_i : jp echo
0000E0: 5F 69 3A 20 6A 70 20 75 70 6C 64 5F 69 3A 20 6A _i: jp upld_i: j
0000F0: 70 20 64 6E 6C 64 5F 69 0D 0A 09 6A 70 20 70 72 p dnld_i...jp pr
000100: 6F 74 5F 69 3A 20 6A 70 20 62 75 66 66 5F 69 3A ot_i: jp buff_i:
000110: 20 6A 70 20 74 79 70 65 5F 69 3A 20 6A 70 20 74 jp type_i: jp t
000120: 6F 75 74 5F 69 0D 0A 09 6A 70 20 74 65 72 6D 5F out_i...jp term_
000130: 69 3A 20 6A 70 20 74 6D 33 5F 69 20 3A 20 6A 70 i: jp tm3_i : jp
000140: 20 74 6D 37 35 5F 69 3A 20 6A 70 20 74 6D 31 32 tm75_i: jp tm12
000150: 5F 69 0D 0A 09 6A 70 20 74 6D 32 34 5F 69 3A 20 _i...jp tm24_i:
000160: 6A 70 20 74 6D 34 38 5F 69 3A 20 6A 70 20 6C 6F jp tm48_i: jp lo
000170: 63 6C 5F 69 3A 20 6A 70 20 72 74 73 5F 69 0D 0A cl_i: jp rts_i..
000180: 09 6A 70 20 64 63 64 5F 69 20 3A 20 6A 70 20 63 .jp dcd_i : jp c
000190: 74 73 5F 69 20 3A 20 6A 70 20 64 74 72 5F 69 20 ts_i : jp dtr_i
0001A0: 3A 20 6A 70 20 6C 64 69 72 5F 69 0D 0A 09 6A 70 : jp ldir_i...jp
0001B0: 20 73 63 61 6E 5F 69 3A 20 6A 70 20 62 63 6C 72 scan_i: jp bclr
0001C0: 5F 69 3A 20 6A 70 20 62 6F 70 6E 5F 69 3A 20 6A _i: jp bopn_i: j
0001D0: 70 20 62 63 73 65 5F 69 0D 0A 09 6A 70 20 62 63 p bcse_i...jp bc
0001E0: 68 6B 5F 69 3A 20 6A 70 20 62 67 74 6F 5F 69 3A hk_i: jp bgto_i:
0001F0: 20 6A 70 20 62 67 74 73 5F 69 3A 20 6A 70 20 62 jp bgts_i: jp b
Size : 512 (Real : 512)
000000: 74 20 64 62 20 22 3A 20 69 6C 6C 65 67 61 6C 20 t db ": illegal
000010: 70 61 72 61 6D 65 74 65 72 22 2C 31 33 2C 31 30 parameter",13,10
000020: 2C 31 30 2C 30 09 09 3B 31 0D 0A 09 64 62 20 22 ,10,0..;1...db "
000030: 3A 20 62 61 64 20 61 72 67 75 6D 65 6E 74 20 63 : bad argument c
000040: 6F 75 6E 74 22 2C 31 33 2C 31 30 2C 31 30 2C 30 ount",13,10,10,0
000050: 09 09 3B 32 0D 0A 09 64 62 20 22 3A 20 69 6C 6C ..;2...db ": ill
000060: 65 67 61 6C 20 66 69 6C 65 6E 61 6D 65 22 2C 31 egal filename",1
000070: 33 2C 31 30 2C 31 30 2C 30 09 09 3B 33 0D 0A 09 3,10,10,0..;3...
000080: 64 62 20 22 3A 20 6E 6F 20 66 69 6C 65 73 20 74 db ": no files t
000090: 6F 20 73 65 6E 64 22 2C 31 33 2C 31 30 2C 31 30 o send",13,10,10
0000A0: 2C 30 09 09 3B 34 0D 0A 09 64 62 20 22 3A 20 74 ,0..;4...db ": t
0000B0: 6F 6F 20 6D 61 6E 79 20 66 69 6C 65 73 22 2C 31 oo many files",1
0000C0: 33 2C 31 30 2C 31 30 2C 30 09 09 3B 35 0D 0A 09 3,10,10,0..;5...
0000D0: 64 62 20 22 3A 20 6E 6F 20 66 69 6C 65 20 62 75 db ": no file bu
0000E0: 66 66 65 72 22 2C 31 33 2C 31 30 2C 31 30 2C 30 ffer",13,10,10,0
0000F0: 09 09 3B 36 0D 0A 09 64 62 20 22 3A 20 58 4D 6F ..;6...db ": XMo
000100: 64 65 6D 20 6F 6E 65 20 66 69 6C 65 20 6F 6E 6C dem one file onl
000110: 79 22 2C 31 33 2C 31 30 2C 31 30 2C 30 09 09 3B y",13,10,10,0..;
000120: 37 0D 0A 09 64 62 20 22 3A 20 66 69 6C 65 20 62 7...db ": file b
000130: 75 66 66 65 72 20 69 6E 20 75 73 65 22 2C 31 33 uffer in use",13
000140: 2C 31 30 2C 31 30 2C 30 09 09 3B 38 0D 0A 09 64 ,10,10,0..;8...d
000150: 62 20 22 3A 20 64 69 73 63 20 65 72 72 6F 72 22 b ": disc error"
000160: 2C 31 33 2C 31 30 2C 31 30 2C 30 09 09 09 3B 39 ,13,10,10,0...;9
000170: 0D 0A 09 64 62 20 22 3A 20 63 61 70 74 75 72 65 ...db ": capture
000180: 20 6E 6F 74 20 61 63 74 69 76 65 22 2C 31 33 2C not active",13,
000190: 31 30 2C 31 30 2C 30 09 09 3B 31 30 0D 0A 09 64 10,10,0..;10...d
0001A0: 62 20 22 3A 20 74 69 6D 65 64 20 6F 75 74 22 2C b ": timed out",
0001B0: 31 33 2C 31 30 2C 31 30 2C 30 09 09 09 3B 31 31 13,10,10,0...;11
0001C0: 0D 0A 09 64 62 20 22 3A 20 72 65 63 6F 72 64 20 ...db ": record
0001D0: 6E 6F 74 20 66 6F 75 6E 64 22 2C 31 33 2C 31 30 not found",13,10
0001E0: 2C 31 30 2C 30 09 09 3B 31 32 0D 0A 09 64 62 20 ,10,0..;12...db
0001F0: 22 3A 20 72 65 63 6F 72 64 20 6E 6F 74 20 6F 70 ": record not op
Size : 512 (Real : 512)
000000: 67 74 69 5F 69 0D 0A 09 6A 70 20 62 70 74 73 5F gti_i...jp bpts_
000010: 69 3A 20 6A 70 20 62 70 74 69 5F 69 3A 20 6A 70 i: jp bpti_i: jp
000020: 20 62 64 65 6C 5F 69 3A 20 6A 70 20 62 73 76 65 bdel_i: jp bsve
000030: 5F 69 0D 0A 09 6A 70 20 62 6C 6F 64 5F 69 0D 0A _i...jp blod_i..
000040: 0D 0A 2E 6E 61 6D 65 5F 74 09 73 74 72 20 22 43 ...name_t.str "C
000050: 48 41 52 4C 45 59 27 53 20 43 4F 4D 4D 53 22 0D HARLEY'S COMMS".
000060: 0A 09 73 74 72 20 22 42 41 55 44 22 2C 22 57 4F ..str "BAUD","WO
000070: 52 44 22 2C 22 53 45 4E 44 22 2C 22 47 45 54 22 RD","SEND","GET"
000080: 0D 0A 09 73 74 72 20 22 47 52 41 42 22 2C 22 57 ...str "GRAB","W
000090: 52 49 54 45 22 2C 22 50 52 4F 47 52 41 4D 22 2C RITE","PROGRAM",
0000A0: 22 52 45 41 44 22 0D 0A 09 73 74 72 20 22 43 4F "READ"...str "CO
0000B0: 4D 22 2C 22 57 41 49 54 22 2C 22 49 4E 50 55 54 M","WAIT","INPUT
0000C0: 22 2C 22 53 45 52 49 41 4C 22 0D 0A 09 73 74 72 ","SERIAL"...str
0000D0: 20 22 50 41 52 41 4C 4C 45 4C 22 2C 22 43 55 52 "PARALLEL","CUR
0000E0: 53 4F 52 22 2C 22 43 52 22 2C 22 48 57 53 48 41 SOR","CR","HWSHA
0000F0: 4B 45 22 0D 0A 09 73 74 72 20 22 42 52 45 41 4B KE"...str "BREAK
000100: 22 2C 22 45 52 52 4F 52 22 2C 22 43 41 50 54 55 ","ERROR","CAPTU
000110: 52 45 22 2C 22 43 4C 4F 53 45 22 0D 0A 09 73 74 RE","CLOSE"...st
000120: 72 20 22 58 4F 4E 22 2C 22 45 43 48 4F 22 2C 22 r "XON","ECHO","
000130: 55 50 4C 4F 41 44 22 2C 22 44 4F 57 4E 4C 4F 41 UPLOAD","DOWNLOA
000140: 44 22 0D 0A 09 73 74 72 20 22 50 52 4F 54 4F 43 D"...str "PROTOC
000150: 4F 4C 22 2C 22 42 55 46 46 45 52 22 2C 22 54 59 OL","BUFFER","TY
000160: 50 45 22 2C 22 54 49 4D 45 4F 55 54 22 0D 0A 09 PE","TIMEOUT"...
000170: 73 74 72 20 22 54 45 52 4D 49 4E 41 4C 22 2C 22 str "TERMINAL","
000180: 54 45 52 4D 33 22 2C 22 54 45 52 4D 31 32 37 35 TERM3","TERM1275
000190: 22 2C 22 54 45 52 4D 31 32 22 0D 0A 09 73 74 72 ","TERM12"...str
0001A0: 20 22 54 45 52 4D 32 34 22 2C 22 54 45 52 4D 34 "TERM24","TERM4
0001B0: 38 22 2C 22 4C 4F 43 41 4C 22 2C 22 52 54 53 22 8","LOCAL","RTS"
0001C0: 0D 0A 09 73 74 72 20 22 44 43 44 22 2C 22 43 54 ...str "DCD","CT
0001D0: 53 22 2C 22 44 54 52 22 2C 22 4C 44 49 52 22 0D S","DTR","LDIR".
0001E0: 0A 09 73 74 72 20 22 53 43 41 4E 22 2C 22 42 43 ..str "SCAN","BC
0001F0: 4C 45 41 52 22 2C 22 42 4F 50 45 4E 22 2C 22 42 LEAR","BOPEN","B
Size : 512 (Real : 512)
000000: 6B 73 69 7A 09 64 77 20 30 09 09 3B 2B 31 35 09 ksiz.dw 0..;+15.
000010: 61 6E 64 20 73 69 7A 65 20 6F 66 20 74 68 61 74 and size of that
000020: 20 72 65 63 6F 72 64 0D 0A 3B 62 6E 6B 6F 70 6E record..;bnkopn
000030: 09 64 62 20 30 09 09 3B 2B 31 37 09 72 65 63 6F .db 0..;+17.reco
000040: 72 64 20 6F 70 65 6E 3F 0D 0A 3B 62 6E 6B 6C 73 rd open?..;bnkls
000050: 74 09 64 77 20 30 09 09 3B 2B 31 38 09 6C 61 73 t.dw 0..;+18.las
000060: 74 20 72 65 63 6F 72 64 0D 0A 3B 62 6E 6B 70 6F t record..;bnkpo
000070: 73 09 64 77 20 30 09 09 3B 2B 32 30 09 70 6F 73 s.dw 0..;+20.pos
000080: 69 74 69 6F 6E 20 69 6E 20 62 61 6E 6B 73 0D 0A ition in banks..
000090: 3B 62 6E 6B 6F 72 67 09 64 77 20 30 09 09 3B 2B ;bnkorg.dw 0..;+
0000A0: 32 32 09 70 6F 73 69 74 69 6F 6E 20 74 6F 20 77 22.position to w
0000B0: 72 69 74 65 20 74 6F 0D 0A 0D 0A 3B 62 6C 6F 63 rite to....;bloc
0000C0: 6B 09 64 73 20 39 09 09 3B 2B 32 34 09 73 70 61 k.ds 9..;+24.spa
0000D0: 63 65 20 66 6F 72 20 66 61 73 74 20 74 69 63 6B ce for fast tick
0000E0: 65 72 20 62 6C 6F 63 6B 0D 0A 3B 70 73 74 6F 72 er block..;pstor
0000F0: 65 09 64 73 20 33 09 09 3B 2B 33 33 09 73 74 6F e.ds 3..;+33.sto
000100: 72 65 20 66 6F 72 20 4D 43 20 57 41 49 54 20 50 re for MC WAIT P
000110: 52 49 4E 54 45 52 20 72 65 64 69 72 65 63 74 69 RINTER redirecti
000120: 6F 6E 0D 0A 0D 0A 3B 62 73 74 6F 66 66 09 64 77 on....;bstoff.dw
000130: 20 30 09 09 3B 2B 33 36 09 62 75 66 66 65 72 20 0..;+36.buffer
000140: 73 74 6F 72 65 20 6F 66 66 73 65 74 0D 0A 3B 62 store offset..;b
000150: 67 74 6F 66 66 09 64 77 20 30 09 09 3B 2B 33 38 gtoff.dw 0..;+38
000160: 09 62 75 66 66 65 72 20 67 65 74 20 6F 66 66 73 .buffer get offs
000170: 65 74 0D 0A 0D 0A 3B 66 62 73 63 6E 74 09 64 77 et....;fbscnt.dw
000180: 20 30 09 09 3B 2B 34 30 09 66 69 6C 65 20 62 79 0..;+40.file by
000190: 74 65 73 20 63 6F 75 6E 74 0D 0A 0D 0A 3B 6E 70 tes count....;np
0001A0: 61 72 61 6D 09 64 62 20 30 09 09 3B 2B 34 32 09 aram.db 0..;+42.
0001B0: 6E 75 6D 62 65 72 20 6F 66 20 70 61 72 61 6D 65 number of parame
0001C0: 74 65 72 73 0D 0A 3B 70 62 6C 6F 63 6B 09 64 77 ters..;pblock.dw
0001D0: 20 30 09 09 3B 2B 34 33 09 61 64 64 72 65 73 73 0..;+43.address
0001E0: 20 6F 66 20 70 61 72 61 6D 65 74 65 72 73 0D 0A of parameters..
0001F0: 3B 66 6E 61 6D 65 09 64 62 20 22 44 4F 57 4E 4C ;fname.db "DOWNL
Size : 512 (Real : 512)
000000: 20 20 20 20 4E 20 4F 20 45 0D 0A 0D 0A 2E 77 6F N O E.....wo
000010: 72 64 5F 69 09 69 66 20 6B 64 73 0D 0A 0D 0A 09 rd_i.if kds.....
000020: 6C 64 20 63 2C 32 3A 20 63 70 20 33 3A 20 6A 70 ld c,2: cp 3: jp
000030: 20 6E 7A 2C 65 72 72 6F 72 0D 0A 09 70 75 73 68 nz,error...push
000040: 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 iy: pop hl...ld
000050: 20 64 65 2C 31 31 3A 20 61 64 64 20 68 6C 2C 64 de,11: add hl,d
000060: 65 09 09 3B 48 4C 20 3D 20 49 59 2B 31 31 20 28 e..;HL = IY+11 (
000070: 4B 44 53 20 63 6F 6E 74 72 6F 6C 20 72 65 67 69 KDS control regi
000080: 73 74 65 72 29 0D 0A 0D 0A 09 6C 64 20 69 79 2C ster).....ld iy,
000090: 6B 77 74 62 6C 3A 20 6C 64 20 62 2C 38 0D 0A 0D kwtbl: ld b,8...
0000A0: 0A 2E 6B 77 73 5F 6C 70 09 6C 64 20 61 2C 28 69 ..kws_lp.ld a,(i
0000B0: 78 2B 34 29 3A 20 63 70 20 28 69 79 2B 30 29 3A x+4): cp (iy+0):
0000C0: 20 6A 72 20 6E 7A 2C 6E 6F 74 73 6D 0D 0A 09 6C jr nz,notsm...l
0000D0: 64 20 61 2C 28 69 78 2B 32 29 3A 20 63 70 20 28 d a,(ix+2): cp (
0000E0: 69 79 2B 31 29 3A 20 6A 72 20 6E 7A 2C 6E 6F 74 iy+1): jr nz,not
0000F0: 73 6D 0D 0A 09 6C 64 20 61 2C 28 69 78 2B 30 29 sm...ld a,(ix+0)
000100: 3A 20 63 70 20 28 69 79 2B 32 29 3A 20 6A 72 20 : cp (iy+2): jr
000110: 6E 7A 2C 6E 6F 74 73 6D 0D 0A 09 6C 64 20 63 2C nz,notsm...ld c,
000120: 28 69 79 2B 33 29 3A 20 6C 64 20 61 2C 28 68 6C (iy+3): ld a,(hl
000130: 29 0D 0A 09 61 6E 64 20 31 39 39 3A 20 6F 72 20 )...and 199: or
000140: 63 3A 20 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 6A c: ld (hl),a...j
000150: 70 20 70 72 65 67 0D 0A 0D 0A 2E 6E 6F 74 73 6D p preg.....notsm
000160: 09 69 6E 63 20 69 79 3A 20 69 6E 63 20 69 79 3A .inc iy: inc iy:
000170: 20 69 6E 63 20 69 79 3A 20 69 6E 63 20 69 79 0D inc iy: inc iy.
000180: 0A 09 64 6A 6E 7A 20 6B 77 73 5F 6C 70 0D 0A 0D ..djnz kws_lp...
000190: 0A 09 6C 64 20 63 2C 31 3A 20 6A 70 20 65 72 72 ..ld c,1: jp err
0001A0: 6F 72 09 09 3B 6C 65 67 61 6C 20 76 61 6C 75 65 or..;legal value
0001B0: 20 6E 6F 74 20 66 6F 75 6E 64 21 0D 0A 0D 0A 2E not found!.....
0001C0: 6B 77 74 62 6C 09 64 62 20 37 2C 32 2C 32 2C 25 kwtbl.db 7,2,2,%
0001D0: 30 30 30 30 30 30 0D 0A 09 64 62 20 37 2C 31 2C 000000...db 7,1,
0001E0: 32 2C 25 31 30 30 30 30 30 0D 0A 09 64 62 20 37 2,%100000...db 7
0001F0: 2C 32 2C 31 2C 25 30 31 30 30 30 30 0D 0A 09 64 ,2,1,%010000...d
Size : 512 (Real : 512)
000000: 4F 41 44 3B 40 22 2C 30 20 3B 2B 34 34 09 66 69 OAD;@",0 ;+44.fi
000010: 6C 65 6E 61 6D 65 20 28 72 65 63 65 69 76 65 29 lename (receive)
000020: 0D 0A 0D 0A 3B 74 6E 61 6D 65 09 64 62 20 22 20 ....;tname.db "
000030: 20 20 20 20 20 20 20 20 20 20 20 22 2C 30 3B 2B ",0;+
000040: 35 35 09 66 69 6C 65 6E 61 6D 65 20 28 73 65 6E 55.filename (sen
000050: 64 29 0D 0A 3B 63 63 68 61 72 09 64 62 20 30 09 d)..;cchar.db 0.
000060: 09 3B 2B 36 38 09 63 75 72 72 65 6E 74 20 63 68 .;+68.current ch
000070: 61 72 61 63 74 65 72 20 70 6F 73 69 74 69 6F 6E aracter position
000080: 0D 0A 3B 73 74 6D 6F 64 65 09 64 62 20 22 20 22 ..;stmode.db " "
000090: 09 09 3B 2B 36 39 09 66 69 6C 6C 65 72 20 63 68 ..;+69.filler ch
0000A0: 61 72 61 63 74 65 72 0D 0A 3B 63 6E 61 64 64 72 aracter..;cnaddr
0000B0: 09 64 77 20 30 09 09 3B 2B 37 30 09 63 75 72 72 .dw 0..;+70.curr
0000C0: 65 6E 74 20 6E 61 6D 65 20 61 64 64 72 65 73 73 ent name address
0000D0: 0D 0A 3B 66 74 73 65 6E 64 09 64 62 20 30 09 09 ..;ftsend.db 0..
0000E0: 3B 2B 37 32 09 66 69 6C 65 73 20 74 6F 20 73 65 ;+72.files to se
0000F0: 6E 64 0D 0A 3B 6B 74 73 65 6E 64 09 64 77 20 30 nd..;ktsend.dw 0
000100: 09 09 3B 2B 37 33 09 6B 69 6C 6F 62 79 74 65 73 ..;+73.kilobytes
000110: 20 74 6F 20 73 65 6E 64 0D 0A 3B 66 6C 6F 6E 67 to send..;flong
000120: 09 64 73 20 33 09 09 3B 2B 37 35 09 66 69 6C 65 .ds 3..;+75.file
000130: 20 6C 65 6E 67 74 68 20 28 33 2D 62 79 74 65 29 length (3-byte)
000140: 0D 0A 3B 66 64 65 63 09 64 73 20 36 09 09 3B 2B ..;fdec.ds 6..;+
000150: 37 38 09 64 65 63 69 6D 61 6C 20 6F 66 20 22 66 78.decimal of "f
000160: 6C 6F 6E 67 22 0D 0A 3B 72 65 61 64 69 6E 09 64 long"..;readin.d
000170: 77 20 30 09 09 3B 2B 38 34 09 62 79 74 65 73 20 w 0..;+84.bytes
000180: 72 65 61 64 20 69 6E 0D 0A 0D 0A 3B 63 75 72 64 read in....;curd
000190: 69 72 09 64 62 20 30 09 09 3B 2B 38 36 09 63 75 ir.db 0..;+86.cu
0001A0: 72 72 65 6E 74 20 66 69 6C 65 20 64 69 72 65 63 rrent file direc
0001B0: 74 6F 72 79 0D 0A 0D 0A 3B 63 6F 75 6E 74 09 64 tory....;count.d
0001C0: 77 20 30 09 09 3B 2B 38 37 09 35 30 2F 73 65 63 w 0..;+87.50/sec
0001D0: 20 63 6F 75 6E 74 0D 0A 3B 64 6F 6E 65 09 64 62 count..;done.db
0001E0: 20 30 09 09 3B 2B 38 39 09 35 30 2F 73 65 63 20 0..;+89.50/sec
0001F0: 2D 20 64 6F 6E 65 20 6F 72 20 6E 6F 74 3F 0D 0A - done or not?..
Size : 512 (Real : 512)
000000: 62 20 37 2C 31 2C 31 2C 25 31 31 30 30 30 30 0D b 7,1,1,%110000.
000010: 0A 09 64 62 20 38 2C 30 2C 32 2C 25 30 30 31 30 ..db 8,0,2,%0010
000020: 30 30 0D 0A 09 64 62 20 38 2C 30 2C 31 2C 25 31 00...db 8,0,1,%1
000030: 30 31 30 30 30 0D 0A 09 64 62 20 38 2C 32 2C 31 01000...db 8,2,1
000040: 2C 25 30 31 31 30 30 30 0D 0A 09 64 62 20 38 2C ,%011000...db 8,
000050: 31 2C 31 2C 25 31 31 31 30 30 30 0D 0A 0D 0A 09 1,1,%111000.....
000060: 65 6C 73 65 0D 0A 0D 0A 09 6C 64 20 63 2C 32 3A else.....ld c,2:
000070: 20 63 70 20 33 3A 20 6A 70 20 6E 7A 2C 65 72 72 cp 3: jp nz,err
000080: 6F 72 09 3B 33 20 70 61 72 61 6D 65 74 65 72 73 or.;3 parameters
000090: 3F 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 78 2B 34 ?.....ld a,(ix+4
0000A0: 29 3A 20 6C 64 20 63 2C 31 3A 20 73 75 62 20 35 ): ld c,1: sub 5
0000B0: 09 3B 64 61 74 61 20 62 69 74 73 20 35 2D 38 3F .;data bits 5-8?
0000C0: 0D 0A 09 6C 64 20 62 2C 61 3A 20 61 6E 64 20 33 ...ld b,a: and 3
0000D0: 3A 20 63 70 20 62 3A 20 6A 70 20 6E 7A 2C 65 72 : cp b: jp nz,er
0000E0: 72 6F 72 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 78 ror.....ld a,(ix
0000F0: 29 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 65 72 ): or a: jp z,er
000100: 72 6F 72 09 3B 73 74 6F 70 20 62 69 74 73 20 31 ror.;stop bits 1
000110: 2D 33 3F 0D 0A 09 63 70 20 34 3A 20 6A 70 20 6E -3?...cp 4: jp n
000120: 63 2C 65 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 61 c,error.....ld a
000130: 2C 28 69 78 2B 32 29 3A 20 6C 64 20 65 2C 61 3A ,(ix+2): ld e,a:
000140: 20 61 6E 64 20 33 0D 0A 09 63 70 20 65 3A 20 6A and 3...cp e: j
000150: 70 20 6E 7A 2C 65 72 72 6F 72 09 09 3B 70 61 72 p nz,error..;par
000160: 69 74 79 20 30 2D 33 3F 0D 0A 0D 0A 09 6C 64 20 ity 0-3?.....ld
000170: 61 2C 28 69 78 2B 34 29 3A 20 73 75 62 20 35 09 a,(ix+4): sub 5.
000180: 09 3B 64 61 74 61 20 62 69 74 73 20 3D 20 30 2D .;data bits = 0-
000190: 33 0D 0A 09 72 6C 63 61 3A 20 72 6C 63 61 3A 20 3...rlca: rlca:
0001A0: 72 6C 63 61 3A 20 72 6C 63 61 3A 20 72 6C 63 61 rlca: rlca: rlca
0001B0: 09 3B 70 6F 73 69 74 69 6F 6E 20 62 69 74 73 20 .;position bits
0001C0: 35 2F 36 0D 0A 09 6C 64 20 65 2C 61 0D 0A 09 6C 5/6...ld e,a...l
0001D0: 64 20 68 6C 2C 72 65 67 35 3A 20 6C 64 20 61 2C d hl,reg5: ld a,
0001E0: 26 39 46 3A 20 61 6E 64 20 28 68 6C 29 09 3B 67 &9F: and (hl).;g
0001F0: 65 74 20 72 65 67 69 73 74 65 72 20 35 20 61 6E et register 5 an
Size : 512 (Real : 512)
000000: 3B 66 63 65 62 6C 09 64 73 20 31 30 09 09 3B 2B ;fcebl.ds 10..;+
000010: 39 30 09 65 76 65 6E 74 20 62 6C 6F 63 6B 0D 0A 90.event block..
000020: 0D 0A 3B 66 65 72 72 09 64 62 20 30 09 09 3B 2B ..;ferr.db 0..;+
000030: 31 30 30 09 66 69 6C 65 20 65 72 72 6F 72 3F 0D 100.file error?.
000040: 0A 3B 66 62 6C 6F 63 6B 09 64 62 20 30 09 09 3B .;fblock.db 0..;
000050: 2B 31 30 31 09 65 78 70 65 63 74 65 64 20 62 6C +101.expected bl
000060: 6F 63 6B 0D 0A 3B 62 6C 6F 63 6B 6C 09 64 77 20 ock..;blockl.dw
000070: 30 09 09 3B 2B 31 30 32 09 62 6C 6F 63 6B 20 6C 0..;+102.block l
000080: 65 6E 67 74 68 20 28 31 32 38 2F 31 30 32 34 29 ength (128/1024)
000090: 0D 0A 3B 6E 63 72 09 64 62 20 26 31 35 09 09 3B ..;ncr.db &15..;
0000A0: 2B 31 30 34 09 4E 41 4B 20 6F 72 20 22 43 22 0D +104.NAK or "C".
0000B0: 0A 3B 70 73 74 61 74 09 64 62 20 30 09 09 3B 2B .;pstat.db 0..;+
0000C0: 31 30 35 09 70 72 69 6E 74 65 64 20 43 52 43 2F 105.printed CRC/
0000D0: 63 68 65 63 6B 73 75 6D 3F 0D 0A 3B 79 6D 6F 64 checksum?..;ymod
0000E0: 65 6D 09 64 62 20 30 09 09 3B 2B 31 30 36 09 75 em.db 0..;+106.u
0000F0: 73 69 6E 67 20 59 4D 6F 64 65 6D 2D 62 61 74 63 sing YModem-batc
000100: 68 3F 0D 0A 3B 73 70 65 63 70 09 64 62 20 30 09 h?..;specp.db 0.
000110: 09 3B 2B 31 30 37 09 73 70 65 63 69 66 69 65 64 .;+107.specified
000120: 20 70 72 6F 74 6F 63 6F 6C 20 28 30 20 58 4D 6F protocol (0 XMo
000130: 64 65 6D 2C 20 31 20 58 2D 31 6B 2C 20 32 20 59 dem, 1 X-1k, 2 Y
000140: 4D 6F 64 65 6D 29 0D 0A 0D 0A 3B 76 74 35 32 69 Modem)....;vt52i
000150: 09 64 62 20 30 09 09 3B 2B 31 30 38 09 56 54 35 .db 0..;+108.VT5
000160: 32 20 63 6F 6E 74 72 6F 6C 20 63 6F 64 65 73 20 2 control codes
000170: 6C 65 66 74 20 74 6F 20 72 65 63 65 69 76 65 0D left to receive.
000180: 0A 3B 76 74 6D 6F 64 65 09 64 62 20 30 09 09 3B .;vtmode.db 0..;
000190: 2B 31 30 39 09 77 2D 69 6E 64 6F 77 2F 63 2D 75 +109.w-indow/c-u
0001A0: 72 73 6F 72 20 74 6F 20 62 65 20 73 65 74 3F 0D rsor to be set?.
0001B0: 0A 3B 76 74 63 73 74 09 64 77 20 26 31 30 31 09 .;vtcst.dw &101.
0001C0: 09 3B 2B 31 31 30 09 63 75 72 73 6F 72 20 73 61 .;+110.cursor sa
0001D0: 76 69 6E 67 20 70 6F 73 69 74 69 6F 6E 0D 0A 3B ving position..;
0001E0: 76 74 74 6D 70 09 64 73 20 34 09 09 3B 2B 31 31 vttmp.ds 4..;+11
0001F0: 32 09 74 65 6D 70 6F 72 61 72 79 20 76 61 72 69 2.temporary vari
Size : 512 (Real : 512)
000000: 64 20 73 74 72 69 70 20 6F 75 74 20 64 61 74 61 d strip out data
000010: 20 62 69 74 73 0D 0A 09 6F 72 20 65 3A 20 6C 64 bits...or e: ld
000020: 20 28 68 6C 29 2C 61 09 09 09 3B 70 75 74 20 69 (hl),a...;put i
000030: 6E 20 6E 65 77 20 64 61 74 61 20 62 69 74 73 0D n new data bits.
000040: 0A 09 6C 64 20 64 2C 35 3A 20 63 61 6C 6C 20 70 ..ld d,5: call p
000050: 72 65 67 09 09 3B 61 6E 64 20 70 72 6F 67 72 61 reg..;and progra
000060: 6D 0D 0A 0D 0A 09 6C 64 20 61 2C 65 3A 20 72 6C m.....ld a,e: rl
000070: 63 61 09 09 09 3B 70 6F 73 69 74 69 6F 6E 20 62 ca...;position b
000080: 69 74 73 20 36 2F 37 0D 0A 09 6C 64 20 65 2C 61 its 6/7...ld e,a
000090: 0D 0A 09 6C 64 20 68 6C 2C 72 65 67 33 3A 20 6C ...ld hl,reg3: l
0000A0: 64 20 61 2C 26 33 46 3A 20 61 6E 64 20 28 68 6C d a,&3F: and (hl
0000B0: 29 09 3B 67 65 74 20 72 65 67 69 73 74 65 72 20 ).;get register
0000C0: 33 20 61 6E 64 20 73 74 72 69 70 20 6F 75 74 20 3 and strip out
0000D0: 64 61 74 61 20 62 69 74 73 0D 0A 09 6F 72 20 65 data bits...or e
0000E0: 3A 20 6C 64 20 28 68 6C 29 2C 61 09 09 09 3B 70 : ld (hl),a...;p
0000F0: 75 74 20 69 6E 20 6E 65 77 20 64 61 74 61 20 62 ut in new data b
000100: 69 74 73 0D 0A 09 6C 64 20 64 2C 33 3A 20 63 61 its...ld d,3: ca
000110: 6C 6C 20 70 72 65 67 09 09 3B 61 6E 64 20 70 72 ll preg..;and pr
000120: 6F 67 72 61 6D 0D 0A 0D 0A 09 6C 64 20 61 2C 28 ogram.....ld a,(
000130: 69 78 29 3A 20 72 6C 63 61 3A 20 72 6C 63 61 09 ix): rlca: rlca.
000140: 09 3B 62 69 74 73 20 32 2F 33 20 6E 6F 77 20 73 .;bits 2/3 now s
000150: 74 6F 70 20 62 69 74 73 0D 0A 09 6F 72 20 28 69 top bits...or (i
000160: 78 2B 32 29 09 09 09 3B 62 69 74 73 20 30 2F 31 x+2)...;bits 0/1
000170: 20 6E 6F 77 20 70 61 72 69 74 79 0D 0A 09 73 65 now parity...se
000180: 74 20 36 2C 61 09 09 09 09 3B 73 65 74 20 62 69 t 6,a....;set bi
000190: 74 20 36 20 28 22 63 6C 6F 63 6B 20 6D 6F 64 65 t 6 ("clock mode
0001A0: 22 21 29 0D 0A 09 6C 64 20 64 2C 34 3A 20 6A 70 "!)...ld d,4: jp
0001B0: 20 70 72 65 67 09 09 09 3B 70 72 6F 67 72 61 6D preg...;program
0001C0: 20 72 65 67 69 73 74 65 72 20 34 0D 0A 0D 0A 09 register 4.....
0001D0: 65 6E 64 69 66 0D 0A 0D 0A 09 3B 3E 3E 3E 20 50 endif.....;>>> P
0001E0: 52 4F 47 52 41 4D 20 63 6F 6D 6D 61 6E 64 0D 0A ROGRAM command..
0001F0: 0D 0A 2E 70 72 6F 67 5F 69 09 69 66 20 6B 64 73 ...prog_i.if kds
Size : 512 (Real : 512)
000000: 61 62 6C 65 20 73 70 61 63 65 0D 0A 0D 0A 3B 62 able space....;b
000010: 75 66 66 65 72 09 64 73 20 32 35 36 09 09 3B 2B uffer.ds 256..;+
000020: 31 31 36 09 69 6E 74 65 72 72 75 70 74 20 62 75 116.interrupt bu
000030: 66 66 65 72 0D 0A 0D 0A 3B 61 63 72 65 64 09 64 ffer....;acred.d
000040: 73 20 36 09 09 3B 2B 33 37 32 09 61 63 74 75 61 s 6..;+372.actua
000050: 6C 20 72 65 64 69 72 65 63 74 69 6F 6E 20 63 6F l redirection co
000060: 64 65 0D 0A 09 09 09 3B 2B 33 38 36 09 65 6E 64 de.....;+386.end
000070: 20 6F 66 20 76 61 72 69 61 62 6C 65 20 73 70 61 of variable spa
000080: 63 65 0D 0A 1A 4D 53 20 20 20 24 24 24 FF 00 FF ce...MS $$$...
000090: 20 69 66 31 3A 20 70 72 69 6E 74 20 22 50 61 73 if1: print "Pas
0000A0: 73 20 31 22 3A 20 65 6C 73 65 3A 20 70 72 69 6E s 1": else: prin
0000B0: 74 20 22 50 61 73 73 20 32 22 3A 20 65 6E 64 69 t "Pass 2": endi
0000C0: 66 3A 20 70 72 69 6E 74 0D 0A 0D 0A 09 3B 43 68 f: print.....;Ch
0000D0: 61 72 6C 65 79 27 73 20 43 6F 6D 6D 73 20 52 4F arley's Comms RO
0000E0: 4D 0D 0A 09 3B 64 65 76 65 6C 6F 70 6D 65 6E 74 M...;development
0000F0: 20 76 65 72 73 69 6F 6E 0D 0A 0D 0A 09 6F 72 67 version.....org
000100: 68 3F 0D 0A 3B 73 70 65 63 70 09 64 62 20 30 09 h?..;specp.db 0.
000110: 09 3B 2B 31 30 37 09 73 70 65 63 69 66 69 65 64 .;+107.specified
000120: 20 70 72 6F 74 6F 63 6F 6C 20 28 30 20 58 4D 6F protocol (0 XMo
000130: 64 65 6D 2C 20 31 20 58 2D 31 6B 2C 20 32 20 59 dem, 1 X-1k, 2 Y
000140: 4D 6F 64 65 6D 29 0D 0A 0D 0A 3B 76 74 35 32 69 Modem)....;vt52i
000150: 09 64 62 20 30 09 09 3B 2B 31 30 38 09 56 54 35 .db 0..;+108.VT5
000160: 32 20 63 6F 6E 74 72 6F 6C 20 63 6F 64 65 73 20 2 control codes
000170: 6C 65 66 74 20 74 6F 20 72 65 63 65 69 76 65 0D left to receive.
000180: 0A 3B 76 74 6D 6F 64 65 09 64 62 20 30 09 09 3B .;vtmode.db 0..;
000190: 2B 31 30 39 09 77 2D 69 6E 64 6F 77 2F 63 2D 75 +109.w-indow/c-u
0001A0: 72 73 6F 72 20 74 6F 20 62 65 20 73 65 74 3F 0D rsor to be set?.
0001B0: 0A 3B 76 74 63 73 74 09 64 77 20 26 31 30 31 09 .;vtcst.dw &101.
0001C0: 09 3B 2B 31 31 30 09 63 75 72 73 6F 72 20 73 61 .;+110.cursor sa
0001D0: 76 69 6E 67 20 70 6F 73 69 74 69 6F 6E 0D 0A 3B ving position..;
0001E0: 76 74 74 6D 70 09 64 73 20 34 09 09 3B 2B 31 31 vttmp.ds 4..;+11
0001F0: 32 09 74 65 6D 70 6F 72 61 72 79 20 76 61 72 69 2.temporary vari
Size : 512 (Real : 512)
000000: 3A 09 6C 64 20 63 2C 32 3A 20 63 70 20 31 3A 20 :.ld c,2: cp 1:
000010: 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 09 65 6C jp nz,error...el
000020: 73 65 3A 09 6C 64 20 63 2C 32 3A 20 63 70 20 32 se:.ld c,2: cp 2
000030: 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 20 3B 65 : jp nz,error ;e
000040: 72 72 6F 72 20 32 20 69 66 20 77 72 6F 6E 67 20 rror 2 if wrong
000050: 6E 6F 2E 20 6F 66 20 70 61 72 61 6D 65 74 65 72 no. of parameter
000060: 73 0D 0A 09 09 64 65 63 20 63 3A 20 6C 64 20 64 s....dec c: ld d
000070: 2C 28 69 78 2B 32 29 0D 0A 09 09 6C 64 20 61 2C ,(ix+2)....ld a,
000080: 35 3A 20 63 70 20 64 3A 20 6A 70 20 6D 2C 65 72 5: cp d: jp m,er
000090: 72 6F 72 20 20 3B 65 72 72 6F 72 20 31 20 69 66 ror ;error 1 if
0000A0: 20 6E 6F 74 20 30 2D 35 20 28 41 6D 73 74 72 61 not 0-5 (Amstra
0000B0: 64 29 0D 0A 09 65 6E 64 69 66 3A 09 6C 64 20 61 d)...endif:.ld a
0000C0: 2C 28 69 78 29 3A 20 6A 70 20 70 72 65 67 0D 0A ,(ix): jp preg..
0000D0: 0D 0A 09 3B 3E 3E 3E 20 52 45 41 44 20 63 6F 6D ...;>>> READ com
0000E0: 6D 61 6E 64 0D 0A 0D 0A 2E 72 65 61 64 5F 69 09 mand.....read_i.
0000F0: 69 66 20 6B 64 73 3A 09 6C 64 20 63 2C 32 3A 20 if kds:.ld c,2:
000100: 63 70 20 31 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F cp 1: jp nz,erro
000110: 72 0D 0A 09 65 6C 73 65 3A 09 6C 64 20 63 2C 32 r...else:.ld c,2
000120: 3A 20 63 70 20 32 3A 20 6A 70 20 6E 7A 2C 65 72 : cp 2: jp nz,er
000130: 72 6F 72 20 3B 65 72 72 6F 72 20 32 20 69 66 20 ror ;error 2 if
000140: 77 72 6F 6E 67 20 6E 6F 2E 20 6F 66 20 70 61 72 wrong no. of par
000150: 61 6D 65 74 65 72 73 0D 0A 09 09 64 65 63 20 63 ameters....dec c
000160: 3A 20 6C 64 20 64 2C 28 69 78 2B 32 29 0D 0A 09 : ld d,(ix+2)...
000170: 09 6C 64 20 61 2C 32 3A 20 63 70 20 64 3A 20 6A .ld a,2: cp d: j
000180: 70 20 6D 2C 65 72 72 6F 72 20 20 3B 65 72 72 6F p m,error ;erro
000190: 72 20 31 20 69 66 20 6E 6F 74 20 30 2D 32 20 28 r 1 if not 0-2 (
0001A0: 41 6D 73 74 72 61 64 29 0D 0A 09 65 6E 64 69 66 Amstrad)...endif
0001B0: 0D 0A 0D 0A 09 63 61 6C 6C 20 72 72 65 67 0D 0A .....call rreg..
0001C0: 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 .ld l,(ix): ld h
0001D0: 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 28 68 6C ,(ix+1)...ld (hl
0001E0: 29 2C 61 3A 20 72 65 74 0D 0A 0D 0A 09 3B 3E 3E ),a: ret.....;>>
0001F0: 3E 20 53 45 52 49 41 4C 20 63 6F 6D 6D 61 6E 64 > SERIAL command
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 43 4F 4E 54 52 4F 4C 2E ...;*** CONTROL.
000010: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
000020: 20 42 41 55 44 20 63 6F 6D 6D 61 6E 64 0D 0A 0D BAUD command...
000030: 0A 2E 62 61 75 64 5F 69 09 6C 64 20 6C 2C 28 69 ..baud_i.ld l,(i
000040: 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D x): ld h,(ix+1).
000050: 0A 09 6C 64 20 63 2C 32 3A 20 63 70 20 63 3A 20 ..ld c,2: cp c:
000060: 6A 70 20 7A 2C 67 65 74 72 78 0D 0A 09 63 70 20 jp z,getrx...cp
000070: 31 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 1: jp nz,error..
000080: 09 6C 64 20 65 2C 6C 3A 20 6C 64 20 64 2C 68 3A .ld e,l: ld d,h:
000090: 20 6A 70 20 67 6F 74 62 70 0D 0A 2E 67 65 74 72 jp gotbp...getr
0000A0: 78 09 6C 64 20 65 2C 28 69 78 2B 32 29 3A 20 6C x.ld e,(ix+2): l
0000B0: 64 20 64 2C 28 69 78 2B 33 29 0D 0A 2E 67 6F 74 d d,(ix+3)...got
0000C0: 62 70 09 63 61 6C 6C 20 62 63 6F 6E 76 3A 20 65 bp.call bconv: e
0000D0: 78 20 64 65 2C 68 6C 3A 20 63 61 6C 6C 20 62 63 x de,hl: call bc
0000E0: 6F 6E 76 0D 0A 09 64 69 3A 20 6C 64 20 62 63 2C onv...di: ld bc,
0000F0: 77 6D 6F 64 3A 20 6C 64 20 61 2C 26 37 36 3A 20 wmod: ld a,&76:
000100: 6F 75 74 20 28 63 29 2C 61 0D 0A 09 6C 64 20 62 out (c),a...ld b
000110: 63 2C 73 70 65 64 31 3A 20 6F 75 74 20 28 63 29 c,sped1: out (c)
000120: 2C 65 3A 20 6F 75 74 20 28 63 29 2C 64 0D 0A 09 ,e: out (c),d...
000130: 6C 64 20 62 63 2C 77 6D 6F 64 3A 20 6C 64 20 61 ld bc,wmod: ld a
000140: 2C 26 33 36 3A 20 6F 75 74 20 28 63 29 2C 61 0D ,&36: out (c),a.
000150: 0A 09 6C 64 20 62 63 2C 73 70 65 64 30 3A 20 6F ..ld bc,sped0: o
000160: 75 74 20 28 63 29 2C 6C 3A 20 6F 75 74 20 28 63 ut (c),l: out (c
000170: 29 2C 68 0D 0A 09 65 69 3A 20 72 65 74 0D 0A 0D ),h...ei: ret...
000180: 0A 0D 0A 09 3B 3E 3E 3E 20 57 4F 52 44 20 63 6F ....;>>> WORD co
000190: 6D 6D 61 6E 64 0D 0A 09 3B 20 20 20 20 28 7C 57 mmand...; (|W
0001A0: 4F 52 44 2C 64 61 74 61 2C 70 61 72 69 74 79 2C ORD,data,parity,
0001B0: 73 74 6F 70 29 0D 0A 09 3B 20 20 20 20 20 20 20 stop)...;
0001C0: 20 20 20 20 20 7C 20 20 20 20 7C 20 20 20 20 20 | |
0001D0: 20 7C 0D 0A 09 3B 20 20 20 20 20 20 20 20 20 20 |...;
0001E0: 20 37 2F 38 20 20 30 2F 31 2F 32 20 20 31 2F 32 7/8 0/1/2 1/2
0001F0: 0D 0A 09 3B 20 20 20 20 20 20 20 20 20 20 20 20 ...;
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 46 49 4C 45 2E 4D 4F 44 ...;*** FILE.MOD
000010: 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 44 4F ***.....;>>> DO
000020: 57 4E 4C 4F 41 44 20 63 6F 6D 6D 61 6E 64 0D 0A WNLOAD command..
000030: 0D 0A 2E 64 6E 6C 64 5F 69 09 63 61 6C 6C 20 62 ...dnld_i.call b
000040: 75 66 66 5F 63 0D 0A 09 6C 64 20 28 69 79 2B 34 uff_c...ld (iy+4
000050: 32 29 2C 61 09 09 09 3B 6E 75 6D 62 65 72 20 6F 2),a...;number o
000060: 66 20 70 61 72 61 6D 65 74 65 72 73 0D 0A 09 6C f parameters...l
000070: 64 20 6C 2C 61 3A 20 6C 64 20 68 2C 30 3A 20 61 d l,a: ld h,0: a
000080: 64 64 20 68 6C 2C 68 6C 3A 20 65 78 20 64 65 2C dd hl,hl: ex de,
000090: 68 6C 0D 0A 09 61 64 64 20 69 78 2C 64 65 09 09 hl...add ix,de..
0000A0: 09 3B 49 58 20 70 6F 69 6E 74 73 20 74 6F 20 31 .;IX points to 1
0000B0: 73 74 20 70 61 72 61 6D 65 74 65 72 0D 0A 09 70 st parameter...p
0000C0: 75 73 68 20 69 78 3A 20 70 6F 70 20 68 6C 0D 0A ush ix: pop hl..
0000D0: 09 6C 64 20 28 69 79 2B 34 33 29 2C 6C 3A 20 6C .ld (iy+43),l: l
0000E0: 64 20 28 69 79 2B 34 34 29 2C 68 09 3B 49 58 20 d (iy+44),h.;IX
0000F0: 3D 3E 20 61 64 64 72 65 73 73 20 6F 66 20 70 61 => address of pa
000100: 72 61 6D 65 74 65 72 73 0D 0A 0D 0A 09 63 61 6C rameters.....cal
000110: 6C 20 67 66 6E 61 6D 65 0D 0A 09 6A 72 20 6E 7A l gfname...jr nz
000120: 2C 69 6E 69 74 09 09 09 3B 69 66 20 66 69 6C 65 ,init...;if file
000130: 6E 61 6D 65 20 73 70 65 63 69 66 69 65 64 20 75 name specified u
000140: 73 65 20 74 68 61 74 0D 0A 0D 0A 09 70 75 73 68 se that.....push
000150: 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 iy: pop hl...ld
000160: 20 64 65 2C 34 35 3A 20 61 64 64 20 68 6C 2C 64 de,45: add hl,d
000170: 65 09 09 3B 65 6C 73 65 20 75 73 65 20 22 44 4F e..;else use "DO
000180: 57 4E 4C 4F 41 44 2E 22 0D 0A 09 6C 64 20 62 2C WNLOAD."...ld b,
000190: 39 0D 0A 0D 0A 2E 69 6E 69 74 09 78 6F 72 20 61 9.....init.xor a
0001A0: 0D 0A 09 6C 64 20 28 69 79 2B 31 30 36 29 2C 61 ...ld (iy+106),a
0001B0: 09 09 09 3B 59 4D 6F 64 65 6D 20 6F 66 66 20 61 ...;YModem off a
0001C0: 73 20 64 65 66 61 75 6C 74 0D 0A 09 6C 64 20 28 s default...ld (
0001D0: 69 79 2B 31 30 35 29 2C 61 09 09 09 3B 43 52 43 iy+105),a...;CRC
0001E0: 2F 63 68 65 63 6B 73 75 6D 20 6E 6F 74 20 70 72 /checksum not pr
0001F0: 69 6E 74 65 64 20 79 65 74 0D 0A 0D 0A 2E 6F 70 inted yet.....op
Size : 512 (Real : 512)
000000: 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 30 34 ....ld a,(iy+104
000010: 29 3A 20 63 70 20 26 31 35 3A 20 6A 72 20 7A 2C ): cp &15: jr z,
000020: 63 68 6B 63 68 6B 09 3B 43 52 43 2F 63 68 6B 3F chkchk.;CRC/chk?
000030: 0D 0A 0D 0A 09 63 61 6C 6C 20 67 65 74 62 74 09 .....call getbt.
000040: 09 09 3B 67 65 74 20 43 52 43 0D 0A 09 6C 64 20 ..;get CRC...ld
000050: 65 2C 61 3A 20 63 61 6C 6C 20 63 72 63 0D 0A 0D e,a: call crc...
000060: 0A 09 63 61 6C 6C 20 67 65 74 62 74 09 09 09 3B ..call getbt...;
000070: 61 6E 64 20 63 68 65 63 6B 20 61 67 61 69 6E 73 and check agains
000080: 74 20 6F 75 72 20 76 61 6C 75 65 0D 0A 09 6C 64 t our value...ld
000090: 20 65 2C 61 3A 20 63 61 6C 6C 20 63 72 63 0D 0A e,a: call crc..
0000A0: 0D 0A 09 6C 64 20 61 2C 68 3A 20 6F 72 20 6C 3A ...ld a,h: or l:
0000B0: 20 63 61 6C 6C 20 6E 7A 2C 73 66 65 72 72 09 3B call nz,sferr.;
0000C0: 65 72 72 6F 72 3F 0D 0A 09 6A 72 20 61 63 74 6F error?...jr acto
0000D0: 6E 0D 0A 0D 0A 2E 63 68 6B 63 68 6B 09 63 61 6C n.....chkchk.cal
0000E0: 6C 20 67 65 74 62 74 09 09 09 3B 63 68 65 63 6B l getbt...;check
0000F0: 20 63 68 65 63 6B 73 75 6D 21 0D 0A 09 63 70 20 checksum!...cp
000100: 68 3A 20 63 61 6C 6C 20 6E 7A 2C 73 66 65 72 72 h: call nz,sferr
000110: 0D 0A 0D 0A 2E 61 63 74 6F 6E 09 6C 64 20 61 2C .....acton.ld a,
000120: 28 69 79 2B 31 30 35 29 09 09 09 3B 2A 2A 2A 20 (iy+105)...;***
000130: 70 72 69 6E 74 20 62 6C 6F 63 6B 20 6E 75 6D 62 print block numb
000140: 65 72 2C 20 64 65 74 61 69 6C 73 0D 0A 09 6F 72 er, details...or
000150: 20 28 69 79 2B 31 30 36 29 3A 20 6A 72 20 6E 7A (iy+106): jr nz
000160: 2C 6E 70 73 74 61 74 20 09 3B 64 6F 20 77 65 20 ,npstat .;do we
000170: 6E 65 65 64 20 74 6F 20 70 72 69 6E 74 20 74 65 need to print te
000180: 78 74 3F 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 xt?...ld a,(iy+1
000190: 30 34 29 0D 0A 09 6C 64 20 68 6C 2C 63 68 6B 74 04)...ld hl,chkt
0001A0: 78 74 0D 0A 09 63 70 20 22 43 22 3A 20 6A 72 20 xt...cp "C": jr
0001B0: 6E 7A 2C 70 70 73 74 72 0D 0A 09 6C 64 20 68 6C nz,ppstr...ld hl
0001C0: 2C 63 72 63 74 78 74 0D 0A 2E 70 70 73 74 72 09 ,crctxt...ppstr.
0001D0: 63 61 6C 6C 20 73 74 72 69 6E 67 09 09 09 3B 69 call string...;i
0001E0: 66 20 73 6F 2C 20 74 68 65 6E 20 70 72 69 6E 74 f so, then print
0001F0: 20 43 52 43 2F 63 68 65 63 6B 73 75 6D 20 74 65 CRC/checksum te
Size : 512 (Real : 512)
000000: 5F 6F 75 74 09 6C 64 20 65 2C 28 69 79 2B 37 29 _out.ld e,(iy+7)
000010: 3A 20 6C 64 20 64 2C 28 69 79 2B 38 29 09 3B 2A : ld d,(iy+8).;*
000020: 2A 2A 20 6F 70 65 6E 20 66 69 72 73 74 20 6F 75 ** open first ou
000030: 74 70 75 74 20 66 69 6C 65 0D 0A 09 70 75 73 68 tput file...push
000040: 20 68 6C 3A 20 6C 64 20 68 6C 2C 31 30 32 34 3A hl: ld hl,1024:
000050: 20 61 64 64 20 68 6C 2C 64 65 3A 20 65 78 20 64 add hl,de: ex d
000060: 65 2C 68 6C 0D 0A 09 70 6F 70 20 68 6C 09 09 09 e,hl...pop hl...
000070: 09 3B 44 45 20 63 6F 6E 74 61 69 6E 73 20 62 75 .;DE contains bu
000080: 66 66 65 72 20 61 64 64 72 65 73 73 2C 20 48 4C ffer address, HL
000090: 20 66 69 6C 65 6E 61 6D 65 20 61 64 64 72 65 73 filename addres
0000A0: 73 0D 0A 09 63 61 6C 6C 20 26 42 43 38 43 09 09 s...call &BC8C..
0000B0: 09 3B 43 41 53 20 4F 55 54 20 4F 50 45 4E 0D 0A .;CAS OUT OPEN..
0000C0: 09 63 61 6C 6C 20 6E 63 2C 63 61 6E 79 65 73 09 .call nc,canyes.
0000D0: 09 09 3B 61 62 6F 72 74 20 69 66 20 65 72 72 6F ..;abort if erro
0000E0: 72 0D 0A 0D 0A 2E 72 62 6C 6F 63 6B 20 6C 64 20 r.....rblock ld
0000F0: 61 2C 31 3A 20 6C 64 20 28 69 79 2B 31 30 31 29 a,1: ld (iy+101)
000100: 2C 61 09 09 3B 73 65 74 20 62 6C 6F 63 6B 20 74 ,a..;set block t
000110: 6F 20 31 0D 0A 0D 0A 2E 73 74 72 61 6E 73 20 78 o 1.....strans x
000120: 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B 31 30 30 or a: ld (iy+100
000130: 29 2C 61 09 09 3B 6E 6F 20 66 69 6C 65 20 65 72 ),a..;no file er
000140: 72 6F 72 0D 0A 0D 0A 09 6C 64 20 6C 2C 37 09 09 ror.....ld l,7..
000150: 09 09 3B 37 20 72 65 74 72 69 65 73 20 62 65 66 ..;7 retries bef
000160: 6F 72 65 20 73 77 69 74 63 68 69 6E 67 20 74 6F ore switching to
000170: 20 4E 41 4B 0D 0A 0D 0A 09 6C 64 20 61 2C 22 43 NAK.....ld a,"C
000180: 22 3A 20 6C 64 20 28 69 79 2B 31 30 34 29 2C 61 ": ld (iy+104),a
000190: 09 09 3B 64 65 66 61 75 6C 74 20 69 73 20 43 20 ..;default is C
0001A0: 5B 43 52 43 5D 0D 0A 0D 0A 2E 73 6E 64 6E 61 6B [CRC].....sndnak
0001B0: 09 64 65 63 20 6C 3A 20 6A 72 20 6E 7A 2C 6E 6F .dec l: jr nz,no
0001C0: 73 6E 61 6B 0D 0A 09 6C 64 20 61 2C 26 31 35 3A snak...ld a,&15:
0001D0: 20 6C 64 20 28 69 79 2B 31 30 34 29 2C 61 0D 0A ld (iy+104),a..
0001E0: 0D 0A 2E 6E 6F 73 6E 61 6B 09 6C 64 20 61 2C 28 ...nosnak.ld a,(
0001F0: 69 79 2B 31 30 34 29 3A 20 63 61 6C 6C 20 73 65 iy+104): call se
Size : 512 (Real : 512)
000000: 0D 0A 0D 0A 2E 73 65 72 5F 69 09 70 75 73 68 20 .....ser_i.push
000010: 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 iy: pop hl...ld
000020: 64 65 2C 33 37 32 3A 20 61 64 64 20 68 6C 2C 64 de,372: add hl,d
000030: 65 0D 0A 0D 0A 09 6C 64 20 69 78 2C 26 42 44 46 e.....ld ix,&BDF
000040: 31 0D 0A 09 6C 64 20 28 69 78 29 2C 26 43 33 0D 1...ld (ix),&C3.
000050: 0A 09 6C 64 20 28 69 78 2B 31 29 2C 6C 0D 0A 09 ..ld (ix+1),l...
000060: 6C 64 20 28 69 78 2B 32 29 2C 68 0D 0A 09 72 65 ld (ix+2),h...re
000070: 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 50 41 52 41 4C t.....;>>> PARAL
000080: 4C 45 4C 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E LEL command.....
000090: 70 61 72 5F 69 09 70 75 73 68 20 69 79 3A 20 70 par_i.push iy: p
0000A0: 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 2C 33 33 op hl...ld de,33
0000B0: 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 : add hl,de...ld
0000C0: 20 64 65 2C 26 42 44 46 31 0D 0A 09 6C 64 69 3A de,&BDF1...ldi:
0000D0: 20 6C 64 69 3A 20 6C 64 69 0D 0A 09 72 65 74 0D ldi: ldi...ret.
0000E0: 0A 0D 0A 09 3B 3E 3E 3E 20 43 55 52 53 4F 52 20 ....;>>> CURSOR
0000F0: 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 63 75 72 73 command.....curs
000100: 5F 69 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 _i.push iy: pop
000110: 68 6C 0D 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 hl...inc hl: inc
000120: 20 68 6C 09 09 09 3B 48 4C 20 3D 20 49 59 2B 32 hl...;HL = IY+2
000130: 20 3D 20 63 75 72 73 74 0D 0A 2E 6F 6E 5F 6F 66 = curst...on_of
000140: 66 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 3A f.ld c,2...cp 1:
000150: 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 09 64 jp nz,error...d
000160: 65 63 20 63 0D 0A 09 6C 64 20 61 2C 28 69 78 29 ec c...ld a,(ix)
000170: 0D 0A 09 6F 72 20 61 3A 20 6A 70 20 7A 2C 63 73 ...or a: jp z,cs
000180: 6F 6B 0D 0A 09 63 70 20 31 3A 20 6A 70 20 6E 7A ok...cp 1: jp nz
000190: 2C 65 72 72 6F 72 0D 0A 2E 63 73 6F 6B 09 6C 64 ,error...csok.ld
0001A0: 20 28 68 6C 29 2C 61 0D 0A 09 72 65 74 0D 0A 0D (hl),a...ret...
0001B0: 0A 09 3B 3E 3E 3E 20 43 52 20 63 6F 6D 6D 61 6E ..;>>> CR comman
0001C0: 64 0D 0A 0D 0A 2E 73 64 63 72 5F 69 09 70 75 73 d.....sdcr_i.pus
0001D0: 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 69 h iy: pop hl...i
0001E0: 6E 63 20 68 6C 3A 20 69 6E 63 20 68 6C 3A 20 69 nc hl: inc hl: i
0001F0: 6E 63 20 68 6C 09 09 3B 48 4C 20 3D 20 49 59 2B nc hl..;HL = IY+
Size : 512 (Real : 512)
000000: 6E 64 62 74 09 3B 4E 41 4B 20 5B 63 68 65 63 6B ndbt.;NAK [check
000010: 73 75 6D 5D 20 2F 20 43 20 5B 43 52 43 5D 0D 0A sum] / C [CRC]..
000020: 0D 0A 09 6C 64 20 64 65 2C 31 35 30 3A 20 63 61 ...ld de,150: ca
000030: 6C 6C 20 77 61 69 74 62 74 09 09 3B 2A 2A 2A 20 ll waitbt..;***
000040: 77 61 69 74 20 66 6F 72 20 72 65 73 70 6F 6E 73 wait for respons
000050: 65 0D 0A 0D 0A 09 63 70 20 32 3A 20 6A 72 20 7A e.....cp 2: jr z
000060: 2C 73 62 6C 6F 63 6B 09 09 3B 53 54 58 3F 20 5B ,sblock..;STX? [
000070: 58 4D 6F 64 65 6D 2D 31 6B 5D 0D 0A 09 63 70 20 XModem-1k]...cp
000080: 31 3A 20 6A 72 20 7A 2C 73 62 6C 6F 63 6B 09 09 1: jr z,sblock..
000090: 3B 53 4F 48 3F 20 5B 58 4D 6F 64 65 6D 2D 31 32 ;SOH? [XModem-12
0000A0: 38 5D 0D 0A 09 63 70 20 26 31 38 3A 20 63 61 6C 8]...cp &18: cal
0000B0: 6C 20 7A 2C 63 61 6E 79 65 73 09 09 3B 43 41 4E l z,canyes..;CAN
0000C0: 3F 20 5B 61 62 6F 72 74 5D 0D 0A 09 65 78 20 64 ? [abort]...ex d
0000D0: 65 2C 68 6C 3A 20 63 61 6C 6C 20 63 68 6B 63 61 e,hl: call chkca
0000E0: 6E 3A 20 65 78 20 64 65 2C 68 6C 09 3B 45 53 43 n: ex de,hl.;ESC
0000F0: 20 70 72 65 73 73 65 64 3F 20 5B 61 62 6F 72 74 pressed? [abort
000100: 5D 0D 0A 0D 0A 09 6A 72 20 73 6E 64 6E 61 6B 0D ].....jr sndnak.
000110: 0A 0D 0A 2E 73 62 6C 6F 63 6B 09 6C 64 20 62 63 ....sblock.ld bc
000120: 2C 31 30 32 34 09 09 09 3B 2A 2A 2A 20 73 74 61 ,1024...;*** sta
000130: 72 74 20 6F 66 20 72 65 63 65 69 76 69 6E 67 20 rt of receiving
000140: 62 6C 6F 63 6B 0D 0A 09 63 70 20 31 3A 20 6A 72 block...cp 1: jr
000150: 20 6E 7A 2C 6E 6F 74 31 32 38 0D 0A 09 6C 64 20 nz,not128...ld
000160: 62 63 2C 31 32 38 09 09 09 3B 63 61 6C 63 75 6C bc,128...;calcul
000170: 61 74 65 20 6C 65 6E 67 74 68 20 6F 66 20 62 6C ate length of bl
000180: 6F 63 6B 0D 0A 2E 6E 6F 74 31 32 38 09 6C 64 20 ock...not128.ld
000190: 28 69 79 2B 31 30 32 29 2C 63 3A 20 6C 64 20 28 (iy+102),c: ld (
0001A0: 69 79 2B 31 30 33 29 2C 62 09 3B 73 74 6F 72 65 iy+103),b.;store
0001B0: 20 62 6C 6F 63 6B 20 6C 65 6E 67 74 68 0D 0A 0D block length...
0001C0: 0A 09 63 61 6C 6C 20 67 65 74 62 74 09 09 09 3B ..call getbt...;
0001D0: 67 65 74 20 62 6C 6F 63 6B 20 6E 75 6D 62 65 72 get block number
0001E0: 0D 0A 0D 0A 09 6C 64 20 63 2C 61 3A 20 6C 64 20 .....ld c,a: ld
0001F0: 61 2C 28 69 79 2B 31 30 31 29 09 09 3B 41 20 3D a,(iy+101)..;A =
Size : 512 (Real : 512)
000000: 33 20 3D 20 63 72 0D 0A 09 6A 70 20 6F 6E 5F 6F 3 = cr...jp on_o
000010: 66 66 0D 0A 0D 0A 09 3B 3E 3E 3E 20 45 52 52 4F ff.....;>>> ERRO
000020: 52 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 65 72 R command.....er
000030: 72 73 5F 69 09 70 75 73 68 20 69 79 3A 20 70 6F rs_i.push iy: po
000040: 70 20 68 6C 09 09 09 3B 48 4C 20 3D 20 49 59 2B p hl...;HL = IY+
000050: 30 20 3D 20 64 6F 5F 65 72 72 0D 0A 09 6A 70 20 0 = do_err...jp
000060: 6F 6E 5F 6F 66 66 0D 0A 0D 0A 09 3B 3E 3E 3E 20 on_off.....;>>>
000070: 48 57 53 48 41 4B 45 20 63 6F 6D 6D 61 6E 64 0D HWSHAKE command.
000080: 0A 0D 0A 2E 73 68 6B 65 5F 69 09 69 66 20 6B 64 ....shke_i.if kd
000090: 73 3A 09 6C 64 20 63 2C 31 39 3A 20 6A 70 20 65 s:.ld c,19: jp e
0000A0: 72 72 6F 72 0D 0A 09 65 6C 73 65 3A 09 6C 64 20 rror...else:.ld
0000B0: 63 2C 32 3A 20 63 70 20 31 3A 20 6A 70 20 6E 7A c,2: cp 1: jp nz
0000C0: 2C 65 72 72 6F 72 0D 0A 09 09 64 65 63 20 63 0D ,error....dec c.
0000D0: 0A 09 09 6C 64 20 61 2C 28 69 78 29 3A 20 6F 72 ...ld a,(ix): or
0000E0: 20 61 3A 20 6A 72 20 7A 2C 68 77 6F 6B 0D 0A 09 a: jr z,hwok...
0000F0: 09 63 70 20 63 3A 20 6A 70 20 6E 7A 2C 65 72 72 .cp c: jp nz,err
000100: 6F 72 0D 0A 2E 68 77 6F 6B 09 09 72 6C 63 61 3A or...hwok..rlca:
000110: 20 72 6C 63 61 3A 20 72 6C 63 61 3A 20 72 6C 63 rlca: rlca: rlc
000120: 61 3A 20 72 6C 63 61 0D 0A 09 09 6C 64 20 63 2C a: rlca....ld c,
000130: 28 69 79 2B 31 31 29 09 09 3B 72 65 67 33 0D 0A (iy+11)..;reg3..
000140: 09 09 72 65 73 20 35 2C 63 0D 0A 09 09 6F 72 20 ..res 5,c....or
000150: 63 0D 0A 09 09 6C 64 20 28 69 79 2B 31 31 29 2C c....ld (iy+11),
000160: 61 0D 0A 09 09 6C 64 20 64 2C 33 3A 20 6A 70 20 a....ld d,3: jp
000170: 70 72 65 67 0D 0A 09 65 6E 64 69 66 0D 0A 0D 0A preg...endif....
000180: 09 3B 3E 3E 3E 20 42 52 45 41 4B 20 63 6F 6D 6D .;>>> BREAK comm
000190: 61 6E 64 0D 0A 0D 0A 2E 62 72 6B 5F 69 09 63 61 and.....brk_i.ca
0001A0: 6C 6C 20 26 42 44 31 39 0D 0A 09 69 66 20 6B 64 ll &BD19...if kd
0001B0: 73 3A 09 6C 64 20 61 2C 28 69 79 2B 31 31 29 3A s:.ld a,(iy+11):
0001C0: 20 6F 72 20 36 0D 0A 09 65 6C 73 65 3A 09 6C 64 or 6...else:.ld
0001D0: 20 61 2C 28 69 79 2B 31 32 29 3A 20 73 65 74 20 a,(iy+12): set
0001E0: 34 2C 61 3A 20 6C 64 20 64 2C 35 0D 0A 09 65 6E 4,a: ld d,5...en
0001F0: 64 69 66 3A 09 63 61 6C 6C 20 70 72 65 67 0D 0A dif:.call preg..
Size : 512 (Real : 512)
000000: 20 65 78 70 65 63 74 65 64 20 62 6C 6F 63 6B 0D expected block.
000010: 0A 09 63 70 20 63 09 09 09 09 3B 72 69 67 68 74 ..cp c....;right
000020: 20 62 6C 6F 63 6B 3F 0D 0A 09 6A 72 20 7A 2C 62 block?...jr z,b
000030: 6C 5F 6F 6B 0D 0A 0D 0A 09 63 70 20 31 09 09 09 l_ok.....cp 1...
000040: 09 3B 6F 74 68 65 72 77 69 73 65 2C 20 62 6C 6F .;otherwise, blo
000050: 63 6B 20 31 20 65 78 70 65 63 74 65 64 3F 0D 0A ck 1 expected?..
000060: 09 63 61 6C 6C 20 6E 7A 2C 73 66 65 72 72 3A 20 .call nz,sferr:
000070: 6A 72 20 6E 7A 2C 62 6C 5F 6F 6B 09 3B 69 66 20 jr nz,bl_ok.;if
000080: 6E 6F 74 2C 20 74 68 65 6E 20 74 68 65 72 65 27 not, then there'
000090: 73 20 61 6E 20 65 72 72 6F 72 0D 0A 0D 0A 09 6C s an error.....l
0000A0: 64 20 61 2C 63 3A 20 6F 72 20 61 09 09 09 3B 62 d a,c: or a...;b
0000B0: 6C 6F 63 6B 20 30 20 72 65 63 65 69 76 65 64 3F lock 0 received?
0000C0: 0D 0A 09 63 61 6C 6C 20 6E 7A 2C 73 66 65 72 72 ...call nz,sferr
0000D0: 3A 20 6A 72 20 6E 7A 2C 62 6C 5F 6F 6B 09 3B 69 : jr nz,bl_ok.;i
0000E0: 66 20 6E 6F 74 2C 20 74 68 65 6E 20 74 68 65 72 f not, then ther
0000F0: 65 27 73 20 61 6E 20 65 72 72 6F 72 0D 0A 0D 0A e's an error....
000100: 09 6C 64 20 28 69 79 2B 31 30 31 29 2C 61 09 09 .ld (iy+101),a..
000110: 09 3B 59 4D 6F 64 65 6D 20 62 6C 6F 63 6B 20 30 .;YModem block 0
000120: 0D 0A 09 6C 64 20 61 2C 31 3A 20 6C 64 20 28 69 ...ld a,1: ld (i
000130: 79 2B 31 30 36 29 2C 61 09 09 3B 73 65 74 20 59 y+106),a..;set Y
000140: 4D 6F 64 65 6D 20 74 6F 20 62 65 20 75 73 65 64 Modem to be used
000150: 0D 0A 0D 0A 2E 62 6C 5F 6F 6B 09 63 61 6C 6C 20 .....bl_ok.call
000160: 67 65 74 62 74 09 09 09 3B 67 65 74 20 63 6F 6D getbt...;get com
000170: 70 6C 65 6D 65 6E 74 20 6F 66 20 62 6C 6F 63 6B plement of block
000180: 20 6E 75 6D 62 65 72 0D 0A 0D 0A 09 63 70 6C 3A number.....cpl:
000190: 20 6C 64 20 63 2C 61 3A 20 6C 64 20 61 2C 28 69 ld c,a: ld a,(i
0001A0: 79 2B 31 30 31 29 09 3B 63 6F 6D 70 6C 65 6D 65 y+101).;compleme
0001B0: 6E 74 20 77 68 61 74 20 77 65 27 76 65 20 67 6F nt what we've go
0001C0: 74 0D 0A 09 63 70 20 63 3A 20 63 61 6C 6C 20 6E t...cp c: call n
0001D0: 7A 2C 73 66 65 72 72 09 09 3B 69 66 20 64 69 66 z,sferr..;if dif
0001E0: 66 65 72 65 6E 74 2C 20 74 68 65 72 65 27 73 20 ferent, there's
0001F0: 61 6E 20 65 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 an error.....ld
Size : 512 (Real : 512)
000000: 09 63 61 6C 6C 20 26 42 44 31 39 0D 0A 09 69 66 .call &BD19...if
000010: 20 6B 64 73 3A 09 6C 64 20 61 2C 28 69 79 2B 31 kds:.ld a,(iy+1
000020: 31 29 0D 0A 09 65 6C 73 65 3A 09 72 65 73 20 34 1)...else:.res 4
000030: 2C 61 0D 0A 09 65 6E 64 69 66 3A 09 6A 70 20 70 ,a...endif:.jp p
000040: 72 65 67 0D 0A 0D 0A 09 3B 3E 3E 3E 20 58 4F 4E reg.....;>>> XON
000050: 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 78 6F 6E command.....xon
000060: 5F 69 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 _i.push iy: pop
000070: 68 6C 0D 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 hl...inc hl: inc
000080: 20 68 6C 3A 20 69 6E 63 20 68 6C 3A 20 69 6E 63 hl: inc hl: inc
000090: 20 68 6C 09 3B 48 4C 20 3D 20 49 59 2B 34 20 3D hl.;HL = IY+4 =
0000A0: 20 78 6F 6E 63 0D 0A 09 6A 70 20 6F 6E 5F 6F 66 xonc...jp on_of
0000B0: 66 0D 0A 0D 0A 09 3B 3E 3E 3E 20 4C 4F 43 41 4C f.....;>>> LOCAL
0000C0: 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 6C 6F 63 command.....loc
0000D0: 6C 5F 69 09 70 75 73 68 20 69 79 3A 20 70 6F 70 l_i.push iy: pop
0000E0: 20 68 6C 0D 0A 09 69 6E 63 20 68 6C 09 09 09 09 hl...inc hl....
0000F0: 3B 48 4C 20 3D 20 49 59 2B 31 20 3D 20 6C 65 63 ;HL = IY+1 = lec
000100: 68 6F 0D 0A 09 6A 70 20 6F 6E 5F 6F 66 66 0D 0A ho...jp on_off..
000110: 0D 0A 09 3B 3E 3E 3E 20 54 49 4D 45 4F 55 54 20 ...;>>> TIMEOUT
000120: 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 74 6F 75 74 command.....tout
000130: 5F 69 09 6C 64 20 63 2C 32 3A 20 63 70 20 31 3A _i.ld c,2: cp 1:
000140: 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 09 6C jp nz,error...l
000150: 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C 28 d l,(ix): ld h,(
000160: 69 78 2B 31 29 0D 0A 09 6C 64 20 28 69 79 2B 39 ix+1)...ld (iy+9
000170: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 30 29 2C ),l: ld (iy+10),
000180: 68 3A 20 72 65 74 09 3B 74 69 6D 65 73 74 1A FF h: ret.;timest..
000190: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
0001A0: 20 42 41 55 44 20 63 6F 6D 6D 61 6E 64 0D 0A 0D BAUD command...
0001B0: 0A 2E 62 61 75 64 5F 69 09 6C 64 20 6C 2C 28 69 ..baud_i.ld l,(i
0001C0: 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D x): ld h,(ix+1).
0001D0: 0A 09 6C 64 20 63 2C 32 3A 20 63 70 20 63 3A 20 ..ld c,2: cp c:
0001E0: 6A 70 20 7A 2C 67 65 74 72 78 0D 0A 09 63 70 20 jp z,getrx...cp
0001F0: 31 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 1: jp nz,error..
Size : 512 (Real : 512)
000000: 6C 2C 28 69 79 2B 37 29 3A 20 6C 64 20 68 2C 28 l,(iy+7): ld h,(
000010: 69 79 2B 38 29 0D 0A 09 70 75 73 68 20 68 6C 3A iy+8)...push hl:
000020: 20 70 6F 70 20 69 78 09 09 09 3B 49 58 20 3D 20 pop ix...;IX =
000030: 62 75 66 66 65 72 20 61 64 64 72 65 73 73 0D 0A buffer address..
000040: 09 6C 64 20 63 2C 28 69 79 2B 31 30 32 29 3A 20 .ld c,(iy+102):
000050: 6C 64 20 62 2C 28 69 79 2B 31 30 33 29 09 3B 42 ld b,(iy+103).;B
000060: 43 20 3D 20 6E 75 6D 62 65 72 20 6F 66 20 62 79 C = number of by
000070: 74 65 73 0D 0A 09 6C 64 20 68 6C 2C 30 09 09 09 tes...ld hl,0...
000080: 09 3B 48 4C 20 3D 20 43 52 43 2D 31 36 20 2F 20 .;HL = CRC-16 /
000090: 63 68 65 63 6B 73 75 6D 20 64 61 74 61 0D 0A 0D checksum data...
0000A0: 0A 2E 72 63 6C 6F 6F 70 09 70 75 73 68 20 62 63 ..rcloop.push bc
0000B0: 09 09 09 09 3B 2A 2A 2A 20 72 65 63 65 69 76 65 ....;*** receive
0000C0: 20 6D 61 69 6E 20 64 61 74 61 20 62 6C 6F 63 6B main data block
0000D0: 0D 0A 09 63 61 6C 6C 20 67 65 74 62 74 09 09 09 ...call getbt...
0000E0: 3B 67 65 74 20 64 61 74 61 20 62 79 74 65 0D 0A ;get data byte..
0000F0: 09 6C 64 20 28 69 78 29 2C 61 3A 20 69 6E 63 20 .ld (ix),a: inc
000100: 69 78 09 09 3B 61 6E 64 20 73 74 6F 72 65 20 69 ix..;and store i
000110: 74 0D 0A 09 6C 64 20 65 2C 61 3A 20 6C 64 20 61 t...ld e,a: ld a
000120: 2C 28 69 79 2B 31 30 34 29 0D 0A 09 63 70 20 26 ,(iy+104)...cp &
000130: 31 35 3A 20 6A 72 20 7A 2C 63 68 6B 73 75 6D 09 15: jr z,chksum.
000140: 09 3B 43 52 43 20 6F 72 20 63 68 65 63 6B 73 75 .;CRC or checksu
000150: 6D 3F 0D 0A 0D 0A 09 63 61 6C 6C 20 63 72 63 3A m?.....call crc:
000160: 20 6A 72 20 6D 67 6C 6F 6F 70 09 09 3B 63 61 6C jr mgloop..;cal
000170: 63 75 6C 61 74 65 20 43 52 43 0D 0A 0D 0A 2E 63 culate CRC.....c
000180: 68 6B 73 75 6D 09 6C 64 20 61 2C 65 3A 20 61 64 hksum.ld a,e: ad
000190: 64 20 61 2C 68 3A 20 6C 64 20 68 2C 61 09 09 3B d a,h: ld h,a..;
0001A0: 63 61 6C 63 75 6C 61 74 65 20 63 68 65 63 6B 73 calculate checks
0001B0: 75 6D 0D 0A 0D 0A 2E 6D 67 6C 6F 6F 70 09 70 6F um.....mgloop.po
0001C0: 70 20 62 63 3A 20 64 65 63 20 62 63 0D 0A 09 6C p bc: dec bc...l
0001D0: 64 20 61 2C 62 3A 20 6F 72 20 63 3A 20 6A 72 20 d a,b: or c: jr
0001E0: 6E 7A 2C 72 63 6C 6F 6F 70 09 3B 6C 6F 6F 70 20 nz,rcloop.;loop
0001F0: 69 66 20 6E 6F 74 20 66 69 6E 69 73 68 65 64 0D if not finished.
Size : 512 (Real : 512)
000000: 63 70 20 26 46 43 3A 20 72 65 74 20 6E 7A 09 09 cp &FC: ret nz..
000010: 09 3B 45 53 43 3F 0D 0A 2E 63 61 6E 79 65 73 09 .;ESC?...canyes.
000020: 70 6F 70 20 68 6C 09 09 09 09 3B 72 65 6D 6F 76 pop hl....;remov
000030: 65 20 43 41 4C 4C 0D 0A 0D 0A 09 63 61 6C 6C 20 e CALL.....call
000040: 73 38 63 61 6E 73 09 09 09 3B 73 65 6E 64 20 38 s8cans...;send 8
000050: 2A 43 41 4E 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 79 *CAN.....ld hl,y
000060: 6D 74 65 78 74 0D 0A 09 6C 64 20 61 2C 28 69 79 mtext...ld a,(iy
000070: 2B 31 30 36 29 3A 20 6F 72 20 61 3A 20 20 6A 72 +106): or a: jr
000080: 20 6E 7A 2C 67 6F 74 6D 73 67 09 3B 59 4D 6F 64 nz,gotmsg.;YMod
000090: 65 6D 3F 0D 0A 09 6C 64 20 68 6C 2C 63 72 63 74 em?...ld hl,crct
0000A0: 78 74 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 30 xt...ld a,(iy+10
0000B0: 34 29 3A 20 63 70 20 22 43 22 3A 20 6A 72 20 7A 4): cp "C": jr z
0000C0: 2C 67 6F 74 6D 73 67 09 3B 58 4D 6F 64 65 6D 2D ,gotmsg.;XModem-
0000D0: 43 52 43 3F 0D 0A 09 6C 64 20 68 6C 2C 63 68 6B CRC?...ld hl,chk
0000E0: 74 78 74 0D 0A 0D 0A 2E 67 6F 74 6D 73 67 09 63 txt.....gotmsg.c
0000F0: 61 6C 6C 20 73 74 72 69 6E 67 09 09 09 3B 50 72 all string...;Pr
000100: 69 6E 74 20 61 70 70 72 6F 70 72 69 61 74 65 20 int appropriate
000110: 74 65 78 74 0D 0A 09 6C 64 20 61 2C 32 32 3A 20 text...ld a,22:
000120: 63 61 6C 6C 20 26 42 42 36 46 0D 0A 09 6C 64 20 call &BB6F...ld
000130: 68 6C 2C 61 62 72 74 78 74 3A 20 63 61 6C 6C 20 hl,abrtxt: call
000140: 73 74 72 69 6E 67 09 3B 66 6F 6C 6C 6F 77 65 64 string.;followed
000150: 20 62 79 20 22 61 62 6F 72 74 65 64 22 0D 0A 09 by "aborted"...
000160: 6C 64 20 68 6C 2C 6C 61 73 74 63 72 3A 20 63 61 ld hl,lastcr: ca
000170: 6C 6C 20 73 74 72 69 6E 67 0D 0A 09 63 61 6C 6C ll string...call
000180: 20 26 42 42 34 38 3A 20 63 61 6C 6C 20 26 42 42 &BB48: call &BB
000190: 31 42 09 09 3B 72 65 6D 6F 76 65 20 62 72 65 61 1B..;remove brea
0001A0: 6B 3F 0D 0A 09 63 61 6C 6C 20 26 42 43 37 44 3A k?...call &BC7D:
0001B0: 20 6A 70 20 26 42 43 39 32 09 09 3B 61 62 61 6E jp &BC92..;aban
0001C0: 64 6F 6E 20 66 69 6C 65 73 0D 0A 0D 0A 0D 0A 0D don files.......
0001D0: 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D 0A 0D ................
0001E0: 0A 0D 0A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 55 50 4C ........;>>> UPL
0001F0: 4F 41 44 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E OAD command.....
Size : 512 (Real : 512)
000000: 72 20 7A 2C 6D 65 74 30 09 3B 66 69 6E 64 20 6C r z,met0.;find l
000010: 65 6E 67 74 68 20 6F 66 20 66 69 6C 65 6E 61 6D ength of filenam
000020: 65 0D 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 20 e...inc hl: inc
000030: 62 3A 20 6A 72 20 66 6C 6C 0D 0A 0D 0A 2E 6D 65 b: jr fll.....me
000040: 74 30 09 64 65 63 20 68 6C 3A 20 65 78 20 64 65 t0.dec hl: ex de
000050: 2C 68 6C 3A 20 70 6F 70 20 68 6C 09 3B 66 69 6C ,hl: pop hl.;fil
000060: 65 6E 61 6D 65 20 65 78 74 65 6E 64 73 20 66 72 ename extends fr
000070: 6F 6D 20 48 4C 20 74 6F 20 44 45 0D 0A 09 6C 64 om HL to DE...ld
000080: 20 61 2C 31 32 3A 20 63 70 20 62 3A 20 63 61 6C a,12: cp b: cal
000090: 6C 20 63 2C 63 6F 6E 76 09 3B 63 6F 6E 76 65 72 l c,conv.;conver
0000A0: 74 20 74 6F 20 43 50 43 20 66 69 6C 65 6E 61 6D t to CPC filenam
0000B0: 65 20 69 66 20 74 6F 6F 20 6C 6F 6E 67 65 72 0D e if too longer.
0000C0: 0A 0D 0A 09 78 6F 72 20 61 3A 20 63 70 20 62 3A ....xor a: cp b:
0000D0: 20 6A 72 20 7A 2C 65 79 6D 09 09 3B 59 4D 6F 64 jr z,eym..;YMod
0000E0: 65 6D 20 6E 75 6C 6C 20 62 6C 6F 63 6B 20 28 3D em null block (=
0000F0: 45 4F 54 29 3F 0D 0A 09 6C 64 20 61 2C 28 69 79 EOT)?...ld a,(iy
000100: 2B 34 32 29 09 09 09 3B 41 20 3D 20 6E 75 6D 62 +42)...;A = numb
000110: 65 72 20 6F 66 20 70 61 72 61 6D 65 74 65 72 73 er of parameters
000120: 0D 0A 09 6F 72 20 61 3A 20 63 61 6C 6C 20 6E 7A ...or a: call nz
000130: 2C 67 66 6E 61 6D 65 09 09 3B 67 65 74 20 66 69 ,gfname..;get fi
000140: 6C 65 6E 61 6D 65 20 69 66 20 70 72 6F 76 69 64 lename if provid
000150: 65 64 20 62 79 20 52 53 58 0D 0A 0D 0A 09 70 75 ed by RSX.....pu
000160: 73 68 20 62 63 3A 20 70 75 73 68 20 68 6C 0D 0A sh bc: push hl..
000170: 2E 70 66 6C 6F 6F 70 09 6C 64 20 61 2C 28 68 6C .pfloop.ld a,(hl
000180: 29 3A 20 63 61 6C 6C 20 26 42 42 35 41 09 09 3B ): call &BB5A..;
000190: 70 72 69 6E 74 20 66 69 6C 65 6E 61 6D 65 20 74 print filename t
0001A0: 6F 20 73 63 72 65 65 6E 0D 0A 09 69 6E 63 20 68 o screen...inc h
0001B0: 6C 3A 20 64 6A 6E 7A 20 70 66 6C 6F 6F 70 0D 0A l: djnz pfloop..
0001C0: 09 70 6F 70 20 68 6C 0D 0A 0D 0A 09 6C 64 20 61 .pop hl.....ld a
0001D0: 2C 36 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 ,6: call sendbt.
0001E0: 09 3B 41 43 4B 20 74 6F 20 73 61 79 20 22 6F 6B .;ACK to say "ok
0001F0: 22 0D 0A 09 70 6F 70 20 62 63 3A 20 6A 70 20 6F "...pop bc: jp o
Size : 512 (Real : 512)
000000: 75 70 6C 64 5F 69 20 63 61 6C 6C 20 62 75 66 66 upld_i call buff
000010: 5F 63 0D 0A 09 6C 64 20 63 2C 32 0D 0A 09 6F 72 _c...ld c,2...or
000020: 20 61 3A 20 6A 70 20 7A 2C 65 72 72 6F 72 0D 0A a: jp z,error..
000030: 0D 0A 09 63 61 6C 6C 20 72 66 6E 61 6D 65 0D 0A ...call rfname..
000040: 20 20 20 20 20 20 20 20 0D 0A 09 6C 64 20 63 2C ...ld c,
000050: 34 3A 20 6C 64 20 61 2C 28 69 79 2B 37 32 29 09 4: ld a,(iy+72).
000060: 09 3B 41 20 3D 20 66 69 6C 65 73 20 74 6F 20 73 .;A = files to s
000070: 65 6E 64 0D 0A 09 6F 72 20 61 3A 20 6A 70 20 7A end...or a: jp z
000080: 2C 65 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 6C 2C ,error.....ld l,
000090: 28 69 79 2B 37 30 29 3A 20 6C 64 20 68 2C 28 69 (iy+70): ld h,(i
0000A0: 79 2B 37 31 29 09 3B 48 4C 20 3D 20 63 75 72 72 y+71).;HL = curr
0000B0: 65 6E 74 20 6E 61 6D 65 20 61 64 64 72 65 73 73 ent name address
0000C0: 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 0D 0A 0D 0A ...ld (hl),0....
0000D0: 09 6C 64 20 61 2C 28 69 79 2B 31 30 37 29 3A 20 .ld a,(iy+107):
0000E0: 63 70 20 32 3A 20 6A 72 20 7A 2C 6E 78 71 75 65 cp 2: jr z,nxque
0000F0: 72 3B 41 20 3D 20 73 70 65 63 69 66 69 65 64 20 r;A = specified
000100: 70 72 6F 74 6F 63 6F 6C 20 28 30 2F 31 2F 32 29 protocol (0/1/2)
000110: 0D 0A 09 6C 64 20 63 2C 37 0D 0A 09 6C 64 20 61 ...ld c,7...ld a
000120: 2C 28 69 79 2B 37 32 29 3A 20 63 70 20 31 3A 20 ,(iy+72): cp 1:
000130: 6A 70 20 6E 7A 2C 65 72 72 6F 72 09 3B 58 4D 6F jp nz,error.;XMo
000140: 64 65 6D 20 73 69 6E 67 6C 65 20 66 69 6C 65 20 dem single file
000150: 6F 6E 6C 79 20 28 69 74 27 73 20 43 52 41 50 29 only (it's CRAP)
000160: 0D 0A 0D 0A 2E 6E 78 71 75 65 72 09 6C 64 20 68 .....nxquer.ld h
000170: 6C 2C 74 74 73 65 6E 64 3A 20 20 63 61 6C 6C 20 l,ttsend: call
000180: 73 74 72 69 6E 67 09 3B 66 75 63 6B 20 79 6F 75 string.;fuck you
000190: 2C 20 50 69 63 74 21 20 28 77 65 20 70 69 73 73 , Pict! (we piss
0001A0: 20 6F 6E 20 4C 6F 67 6F 6E 29 0D 0A 09 6C 64 20 on Logon)...ld
0001B0: 61 2C 28 69 79 2B 37 32 29 3A 20 20 63 61 6C 6C a,(iy+72): call
0001C0: 20 70 72 5F 64 65 63 09 3B 6E 75 6D 62 65 72 20 pr_dec.;number
0001D0: 6F 66 20 66 69 6C 65 73 20 74 6F 20 73 65 6E 64 of files to send
0001E0: 0D 0A 09 6C 64 20 68 6C 2C 74 74 6B 6D 65 73 3A ...ld hl,ttkmes:
0001F0: 20 20 63 61 6C 6C 20 73 74 72 69 6E 67 09 3B 66 call string.;f
Size : 512 (Real : 512)
000000: 70 5F 6F 75 74 0D 0A 0D 0A 2E 65 79 6D 09 6C 64 p_out.....eym.ld
000010: 20 68 6C 2C 63 6C 74 65 78 74 3A 20 63 61 6C 6C hl,cltext: call
000020: 20 73 74 72 69 6E 67 09 3B 2A 2A 2A 20 45 6E 64 string.;*** End
000030: 20 6F 66 20 59 4D 6F 64 65 6D 20 74 72 61 6E 73 of YModem trans
000040: 6D 69 73 73 69 6F 6E 0D 0A 09 78 6F 72 20 61 3A mission...xor a:
000050: 20 6C 64 20 28 69 79 2B 31 30 36 29 2C 61 09 09 ld (iy+106),a..
000060: 3B 63 61 6E 63 65 6C 20 59 4D 6F 64 65 6D 0D 0A ;cancel YModem..
000070: 09 6A 72 20 65 74 72 61 6E 73 09 09 09 3B 65 6E .jr etrans...;en
000080: 64 20 74 72 61 6E 73 6D 69 73 73 69 6F 6E 0D 0A d transmission..
000090: 0D 0A 2E 6F 63 74 72 6C 09 6C 64 20 61 2C 33 32 ...octrl.ld a,32
0000A0: 3A 20 63 61 6C 6C 20 26 42 42 35 41 09 09 3B 2A : call &BB5A..;*
0000B0: 2A 2A 20 53 65 6E 64 20 62 6C 6F 63 6B 20 74 6F ** Send block to
0000C0: 20 64 69 73 63 0D 0A 0D 0A 2E 6F 6C 6F 6F 70 09 disc.....oloop.
0000D0: 6C 64 20 61 2C 28 68 6C 29 3A 20 63 61 6C 6C 20 ld a,(hl): call
0000E0: 26 42 43 39 35 09 09 3B 43 41 53 20 4F 55 54 20 &BC95..;CAS OUT
0000F0: 43 48 41 52 0D 0A 09 63 61 6C 6C 20 6E 63 2C 63 CHAR...call nc,c
000100: 61 6E 79 65 73 09 09 09 3B 69 66 20 64 69 73 63 anyes...;if disc
000110: 20 65 72 72 6F 72 0D 0A 09 69 6E 63 20 68 6C 3A error...inc hl:
000120: 20 64 65 63 20 62 63 0D 0A 09 6C 64 20 61 2C 62 dec bc...ld a,b
000130: 3A 20 6F 72 20 63 3A 20 6A 72 20 6E 7A 2C 6F 6C : or c: jr nz,ol
000140: 6F 6F 70 0D 0A 0D 0A 2E 69 62 6C 6F 63 6B 09 6C oop.....iblock.l
000150: 64 20 61 2C 28 69 79 2B 31 30 31 29 3A 20 69 6E d a,(iy+101): in
000160: 63 20 61 09 09 3B 49 6E 63 72 65 61 73 65 20 62 c a..;Increase b
000170: 6C 6F 63 6B 20 6E 75 6D 62 65 72 0D 0A 09 6C 64 lock number...ld
000180: 20 28 69 79 2B 31 30 31 29 2C 61 0D 0A 0D 0A 2E (iy+101),a.....
000190: 77 74 73 6F 68 62 09 63 61 6C 6C 20 63 68 6B 63 wtsohb.call chkc
0001A0: 61 6E 09 09 09 3B 43 68 65 63 6B 20 66 6F 72 20 an...;Check for
0001B0: 61 62 6F 72 74 0D 0A 0D 0A 09 6C 64 20 61 2C 36 abort.....ld a,6
0001C0: 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 09 3B : call sendbt..;
0001D0: 41 43 4B 6E 6F 77 6C 65 64 67 65 20 73 75 63 63 ACKnowledge succ
0001E0: 65 73 73 66 75 6C 20 72 65 63 65 69 70 74 0D 0A essful receipt..
0001F0: 09 6C 64 20 64 65 2C 35 30 30 3A 20 63 61 6C 6C .ld de,500: call
Size : 512 (Real : 512)
000000: 75 63 6B 20 79 6F 75 2C 20 4F 62 69 21 20 28 77 uck you, Obi! (w
000010: 65 20 70 69 73 73 20 6F 6E 20 74 68 65 20 67 6F e piss on the go
000020: 6F 6E 73 29 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B ons)...ld l,(iy+
000030: 37 33 29 3A 20 6C 64 20 68 2C 28 69 79 2B 37 34 73): ld h,(iy+74
000040: 29 0D 0A 09 09 20 20 20 20 20 20 20 63 61 6C 6C ).... call
000050: 20 70 72 5F 68 6C 09 3B 6E 75 6D 62 65 72 20 6F pr_hl.;number o
000060: 66 20 6B 20 74 6F 20 73 65 6E 64 0D 0A 09 6C 64 f k to send...ld
000070: 20 68 6C 2C 74 74 6B 63 6C 6F 3A 20 20 63 61 6C hl,ttkclo: cal
000080: 6C 20 73 74 72 69 6E 67 0D 0A 0D 0A 09 78 6F 72 l string.....xor
000090: 20 61 3A 20 6C 64 20 28 69 79 2B 31 30 34 29 2C a: ld (iy+104),
0000A0: 61 09 09 3B 4E 41 4B 20 6F 72 20 43 20 6E 6F 74 a..;NAK or C not
0000B0: 20 72 65 63 65 69 76 65 64 0D 0A 0D 0A 09 6C 64 received.....ld
0000C0: 20 6C 2C 28 69 79 2B 37 29 3A 20 6C 64 20 68 2C l,(iy+7): ld h,
0000D0: 28 69 79 2B 38 29 09 3B 48 4C 20 3D 20 66 69 6C (iy+8).;HL = fil
0000E0: 65 20 62 75 66 66 65 72 20 61 64 64 72 65 73 73 e buffer address
0000F0: 0D 0A 09 6C 64 20 28 69 79 2B 37 30 29 2C 6C 3A ...ld (iy+70),l:
000100: 20 6C 64 20 28 69 79 2B 37 31 29 2C 68 09 3B 70 ld (iy+71),h.;p
000110: 75 74 20 69 6E 74 6F 20 63 75 72 72 65 6E 74 20 ut into current
000120: 6E 61 6D 65 20 61 64 64 72 65 73 73 0D 0A 0D 0A name address....
000130: 2E 67 6E 78 74 79 75 09 70 75 73 68 20 69 79 3A .gnxtyu.push iy:
000140: 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 2C pop hl...ld de,
000150: 31 31 36 2B 31 32 39 3A 20 61 64 64 20 68 6C 2C 116+129: add hl,
000160: 64 65 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 09 09 de...ld (hl),0..
000170: 09 3B 6E 6F 20 68 65 61 64 65 72 0D 0A 0D 0A 09 .;no header.....
000180: 6C 64 20 6C 2C 28 69 79 2B 37 30 29 3A 20 6C 64 ld l,(iy+70): ld
000190: 20 68 2C 28 69 79 2B 37 31 29 09 3B 63 75 72 72 h,(iy+71).;curr
0001A0: 65 6E 74 20 6E 61 6D 65 20 61 64 64 72 65 73 73 ent name address
0001B0: 0D 0A 09 6C 64 20 61 2C 28 68 6C 29 0D 0A 09 6F ...ld a,(hl)...o
0001C0: 72 20 61 3A 20 6A 70 20 7A 2C 65 78 75 70 6C 09 r a: jp z,exupl.
0001D0: 09 3B 65 6E 64 20 6F 66 20 75 70 6C 6F 61 64 73 .;end of uploads
0001E0: 0D 0A 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 09 20 .....push hl...
0001F0: 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D push iy: pop hl.
Size : 512 (Real : 512)
000000: 20 77 61 69 74 62 74 0D 0A 0D 0A 09 63 70 20 31 waitbt.....cp 1
000010: 3A 20 6A 70 20 7A 2C 73 62 6C 6F 63 6B 09 09 3B : jp z,sblock..;
000020: 53 4F 48 3F 20 5B 58 4D 6F 64 65 6D 2D 31 32 38 SOH? [XModem-128
000030: 5D 0D 0A 09 63 70 20 32 3A 20 6A 70 20 7A 2C 73 ]...cp 2: jp z,s
000040: 62 6C 6F 63 6B 09 09 3B 53 54 58 3F 20 5B 58 4D block..;STX? [XM
000050: 6F 64 65 6D 2D 31 6B 5D 0D 0A 09 63 70 20 26 31 odem-1k]...cp &1
000060: 38 3A 20 63 61 6C 6C 20 7A 2C 63 61 6E 79 65 73 8: call z,canyes
000070: 09 09 3B 43 41 4E 3F 20 5B 41 62 6F 72 74 5D 0D ..;CAN? [Abort].
000080: 0A 09 63 70 20 34 3A 20 6A 70 20 6E 7A 2C 77 74 ..cp 4: jp nz,wt
000090: 73 6F 68 62 09 09 3B 45 4F 54 3F 20 5B 45 6E 64 sohb..;EOT? [End
0000A0: 20 6F 66 20 74 72 61 6E 73 6D 69 73 73 69 6F 6E of transmission
0000B0: 5D 0D 0A 0D 0A 2E 65 74 72 61 6E 73 09 6C 64 20 ].....etrans.ld
0000C0: 61 2C 36 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 a,6: call sendbt
0000D0: 09 09 3B 69 66 20 45 4F 54 2C 20 74 68 65 6E 20 ..;if EOT, then
0000E0: 41 43 4B 6E 6F 77 6C 65 64 67 65 20 69 74 0D 0A ACKnowledge it..
0000F0: 09 63 61 6C 6C 20 26 42 43 38 46 09 09 09 3B 61 .call &BC8F...;a
000100: 6E 64 20 63 6C 6F 73 65 20 64 69 73 63 20 66 69 nd close disc fi
000110: 6C 65 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B le.....ld a,(iy+
000120: 31 30 36 29 3A 20 6F 72 20 61 3A 20 6A 70 20 6E 106): or a: jp n
000130: 7A 2C 72 62 6C 6F 63 6B 20 3B 69 66 20 59 4D 6F z,rblock ;if YMo
000140: 64 65 6D 2C 20 6E 65 78 74 20 66 69 6C 65 20 70 dem, next file p
000150: 6C 65 61 73 65 0D 0A 09 6C 64 20 68 6C 2C 6C 61 lease...ld hl,la
000160: 73 74 63 72 3A 20 6A 70 20 73 74 72 69 6E 67 09 stcr: jp string.
000170: 09 3B 6F 74 68 65 72 77 69 73 65 20 43 52 2F 4C .;otherwise CR/L
000180: 46 20 6F 75 74 20 61 6E 64 20 72 65 74 75 72 6E F out and return
000190: 21 0D 0A 0D 0A 2E 73 66 65 72 72 09 6C 64 20 28 !.....sferr.ld (
0001A0: 69 79 2B 31 30 30 29 2C 31 3A 20 72 65 74 09 09 iy+100),1: ret..
0001B0: 3B 2A 2A 2A 20 53 75 62 72 6F 75 74 69 6E 65 20 ;*** Subroutine
0001C0: 2D 20 73 65 74 20 66 69 6C 65 20 65 72 72 6F 72 - set file error
0001D0: 0D 0A 0D 0A 2E 67 66 6E 61 6D 65 09 6C 64 20 61 .....gfname.ld a
0001E0: 2C 28 69 79 2B 34 32 29 09 09 09 3B 2A 2A 2A 20 ,(iy+42)...;***
0001F0: 53 75 62 72 6F 75 74 69 6E 65 20 2D 20 67 65 74 Subroutine - get
Size : 512 (Real : 512)
000000: 78 74 0D 0A 09 6C 64 20 61 2C 31 3A 20 6C 64 20 xt...ld a,1: ld
000010: 28 69 79 2B 31 30 35 29 2C 61 09 09 3B 61 6E 64 (iy+105),a..;and
000020: 20 73 65 74 20 69 74 20 74 6F 20 22 70 72 69 6E set it to "prin
000030: 74 65 64 20 61 6C 72 65 61 64 79 22 0D 0A 0D 0A ted already"....
000040: 2E 6E 70 73 74 61 74 09 6C 64 20 61 2C 32 32 3A .npstat.ld a,22:
000050: 20 63 61 6C 6C 20 26 42 42 36 46 0D 0A 09 6C 64 call &BB6F...ld
000060: 20 61 2C 28 69 79 2B 31 30 31 29 3A 20 6F 72 20 a,(iy+101): or
000070: 61 0D 0A 09 6A 72 20 7A 2C 63 68 6B 65 72 72 09 a...jr z,chkerr.
000080: 09 09 3B 64 6F 6E 27 74 20 70 72 69 6E 74 20 62 ..;don't print b
000090: 6C 6F 63 6B 20 30 0D 0A 09 63 61 6C 6C 20 70 72 lock 0...call pr
0000A0: 5F 64 65 63 09 09 09 3B 6F 74 68 65 72 77 69 73 _dec...;otherwis
0000B0: 65 2C 20 70 72 69 6E 74 20 62 6C 6F 63 6B 20 6E e, print block n
0000C0: 75 6D 62 65 72 0D 0A 0D 0A 2E 63 68 6B 65 72 72 umber.....chkerr
0000D0: 09 6C 64 20 61 2C 28 69 79 2B 31 30 30 29 3A 20 .ld a,(iy+100):
0000E0: 6F 72 20 61 3A 20 6A 70 20 7A 2C 6E 6F 65 72 72 or a: jp z,noerr
0000F0: 09 3B 62 6C 6F 63 6B 20 72 65 63 65 69 76 65 64 .;block received
000100: 20 6F 6B 3F 0D 0A 0D 0A 09 6C 64 20 61 2C 22 3F ok?.....ld a,"?
000110: 22 3A 20 63 61 6C 6C 20 26 42 42 35 41 09 09 3B ": call &BB5A..;
000120: 65 6C 73 65 20 70 72 69 6E 74 20 22 3F 22 20 66 else print "?" f
000130: 6F 72 20 65 72 72 6F 72 0D 0A 09 78 6F 72 20 61 or error...xor a
000140: 3A 20 6C 64 20 28 69 79 2B 31 30 30 29 2C 61 09 : ld (iy+100),a.
000150: 09 3B 61 6E 64 20 63 61 6E 63 65 6C 20 74 68 65 .;and cancel the
000160: 20 65 72 72 6F 72 0D 0A 09 6C 64 20 61 2C 26 31 error...ld a,&1
000170: 35 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 09 5: call sendbt..
000180: 3B 4E 41 4B 20 66 6F 72 20 65 72 72 6F 72 0D 0A ;NAK for error..
000190: 2E 63 65 72 5F 6C 70 09 6C 64 20 64 65 2C 31 35 .cer_lp.ld de,15
0001A0: 30 3A 20 63 61 6C 6C 20 77 61 69 74 62 74 09 09 0: call waitbt..
0001B0: 3B 77 61 69 74 20 66 6F 72 20 72 65 73 70 6F 6E ;wait for respon
0001C0: 73 65 0D 0A 09 63 70 20 32 3A 20 6A 70 20 7A 2C se...cp 2: jp z,
0001D0: 73 62 6C 6F 63 6B 09 09 3B 53 54 58 3F 20 5B 58 sblock..;STX? [X
0001E0: 4D 6F 64 65 6D 2D 31 6B 2C 20 67 65 74 20 62 6C Modem-1k, get bl
0001F0: 6F 63 6B 20 61 67 61 69 6E 5D 0D 0A 09 63 70 20 ock again]...cp
Size : 512 (Real : 512)
000000: 20 66 69 6C 65 6E 61 6D 65 0D 0A 09 6F 72 20 61 filename...or a
000010: 3A 20 72 65 74 20 7A 09 09 09 3B 41 20 3D 20 6E : ret z...;A = n
000020: 75 6D 62 65 72 20 6F 66 20 70 61 72 61 6D 65 74 umber of paramet
000030: 65 72 73 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 69 79 ers.....ld l,(iy
000040: 2B 34 33 29 3A 20 6C 64 20 68 2C 28 69 79 2B 34 +43): ld h,(iy+4
000050: 34 29 09 3B 48 4C 20 3D 20 70 61 72 61 6D 65 74 4).;HL = paramet
000060: 65 72 20 62 6C 6F 63 6B 20 61 64 64 72 65 73 73 er block address
000070: 0D 0A 09 64 65 63 20 68 6C 3A 20 64 65 63 20 68 ...dec hl: dec h
000080: 6C 09 09 09 3B 67 65 74 20 70 72 6F 76 69 64 65 l...;get provide
000090: 64 20 66 69 6C 65 6E 61 6D 65 0D 0A 09 6C 64 20 d filename...ld
0000A0: 28 69 79 2B 34 33 29 2C 6C 3A 20 6C 64 20 28 69 (iy+43),l: ld (i
0000B0: 79 2B 34 34 29 2C 68 0D 0A 09 70 75 73 68 20 68 y+44),h...push h
0000C0: 6C 3A 20 70 6F 70 20 69 78 0D 0A 0D 0A 09 6C 64 l: pop ix.....ld
0000D0: 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C 28 69 l,(ix): ld h,(i
0000E0: 78 2B 31 29 0D 0A 09 6C 64 20 62 2C 28 68 6C 29 x+1)...ld b,(hl)
0000F0: 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 65 2C : inc hl...ld e,
000100: 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C (hl): inc hl...l
000110: 64 20 64 2C 28 68 6C 29 3A 20 65 78 20 64 65 2C d d,(hl): ex de,
000120: 68 6C 0D 0A 09 64 65 63 20 61 3A 20 6C 64 20 28 hl...dec a: ld (
000130: 69 79 2B 34 32 29 2C 61 09 09 3B 41 20 3D 3E 20 iy+42),a..;A =>
000140: 6E 75 6D 62 65 72 20 6F 66 20 70 61 72 61 6D 65 number of parame
000150: 74 65 72 73 0D 0A 09 6C 64 20 61 2C 31 3A 20 6F ters...ld a,1: o
000160: 72 20 61 09 09 09 3B 73 65 74 20 6E 7A 20 28 69 r a...;set nz (i
000170: 2E 65 2E 20 66 6F 75 6E 64 20 66 69 6C 65 6E 61 .e. found filena
000180: 6D 65 29 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 53 me)...ret.....;S
000190: 75 62 72 6F 75 74 69 6E 65 20 2D 20 43 68 65 63 ubroutine - Chec
0001A0: 6B 20 66 6F 72 20 45 53 43 2F 43 54 52 4C 2D 58 k for ESC/CTRL-X
0001B0: 0D 0A 0D 0A 2E 63 68 6B 63 61 6E 09 63 61 6C 6C .....chkcan.call
0001C0: 20 26 42 42 31 42 3A 20 72 65 74 20 6E 63 09 09 &BB1B: ret nc..
0001D0: 3B 6B 65 79 20 70 72 65 73 73 65 64 3F 0D 0A 09 ;key pressed?...
0001E0: 63 70 20 26 31 38 3A 20 6A 72 20 7A 2C 63 61 6E cp &18: jr z,can
0001F0: 79 65 73 09 09 3B 43 54 52 4C 2D 58 3F 0D 0A 09 yes..;CTRL-X?...
Size : 512 (Real : 512)
000000: 31 3A 20 6A 70 20 7A 2C 73 62 6C 6F 63 6B 09 09 1: jp z,sblock..
000010: 3B 53 4F 48 3F 20 5B 58 6D 6F 64 65 6D 2D 31 32 ;SOH? [Xmodem-12
000020: 38 2C 20 67 65 74 20 62 6C 6F 63 6B 20 61 67 61 8, get block aga
000030: 69 6E 5D 0D 0A 09 63 70 20 26 31 38 3A 20 63 61 in]...cp &18: ca
000040: 6C 6C 20 7A 2C 63 61 6E 79 65 73 09 09 3B 43 41 ll z,canyes..;CA
000050: 4E 3F 20 5B 61 62 6F 72 74 5D 0D 0A 09 63 61 6C N? [abort]...cal
000060: 6C 20 63 68 6B 63 61 6E 3A 20 6A 72 20 63 65 72 l chkcan: jr cer
000070: 5F 6C 70 09 09 3B 45 53 43 20 70 72 65 73 73 65 _lp..;ESC presse
000080: 64 3F 20 5B 61 62 6F 72 74 5D 0D 0A 0D 0A 2E 6E d? [abort].....n
000090: 6F 65 72 72 09 6C 64 20 6C 2C 28 69 79 2B 37 29 oerr.ld l,(iy+7)
0000A0: 3A 20 6C 64 20 68 2C 28 69 79 2B 38 29 09 3B 2A : ld h,(iy+8).;*
0000B0: 2A 2A 20 62 6C 6F 63 6B 20 72 65 63 65 69 76 65 ** block receive
0000C0: 64 20 6F 6B 0D 0A 09 6C 64 20 63 2C 28 69 79 2B d ok...ld c,(iy+
0000D0: 31 30 32 29 3A 20 6C 64 20 62 2C 28 69 79 2B 31 102): ld b,(iy+1
0000E0: 30 33 29 09 3B 48 4C 20 3D 20 66 69 6C 65 20 62 03).;HL = file b
0000F0: 75 66 66 65 72 20 61 64 64 72 2C 20 42 43 20 3D uffer addr, BC =
000100: 20 62 6C 6F 63 6B 20 6C 65 6E 0D 0A 0D 0A 09 6C block len.....l
000110: 64 20 61 2C 28 69 79 2B 31 30 31 29 3A 20 6F 72 d a,(iy+101): or
000120: 20 61 3A 20 6A 72 20 6E 7A 2C 6F 63 74 72 6C 3B a: jr nz,octrl;
000130: 77 72 69 74 65 20 74 6F 20 64 69 73 63 20 69 66 write to disc if
000140: 20 6E 6F 74 20 62 6C 6F 63 6B 20 30 0D 0A 0D 0A not block 0....
000150: 09 70 75 73 68 20 68 6C 09 09 09 09 3B 2A 2A 2A .push hl....;***
000160: 20 59 4D 6F 64 65 6D 20 68 65 61 64 65 72 0D 0A YModem header..
000170: 09 63 61 6C 6C 20 26 42 43 39 32 09 09 09 3B 61 .call &BC92...;a
000180: 62 61 6E 64 6F 6E 20 63 75 72 72 65 6E 74 20 66 bandon current f
000190: 69 6C 65 0D 0A 09 6C 64 20 68 6C 2C 79 6D 74 65 ile...ld hl,ymte
0001A0: 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 09 xt: call string.
0001B0: 3B 61 6E 64 20 70 72 69 6E 74 20 22 59 4D 6F 64 ;and print "YMod
0001C0: 65 6D 22 20 6F 6E 20 73 63 72 65 65 6E 0D 0A 09 em" on screen...
0001D0: 70 6F 70 20 68 6C 3A 20 70 75 73 68 20 68 6C 3A pop hl: push hl:
0001E0: 20 6C 64 20 62 2C 30 0D 0A 2E 66 6C 6C 09 6C 64 ld b,0...fll.ld
0001F0: 20 61 2C 28 68 6C 29 3A 20 6F 72 20 61 3A 20 6A a,(hl): or a: j
Size : 512 (Real : 512)
000000: 0A 09 20 6C 64 20 64 65 2C 35 35 3A 20 61 64 64 .. ld de,55: add
000010: 20 68 6C 2C 64 65 0D 0A 09 20 65 78 20 64 65 2C hl,de... ex de,
000020: 68 6C 3A 20 70 6F 70 20 68 6C 09 09 3B 44 45 20 hl: pop hl..;DE
000030: 3D 20 73 65 6E 64 20 66 69 6C 65 6E 61 6D 65 20 = send filename
000040: 28 64 65 73 74 69 6E 61 74 69 6F 6E 29 0D 0A 09 (destination)...
000050: 70 75 73 68 20 64 65 09 09 09 09 3B 50 55 53 48 push de....;PUSH
000060: 20 66 69 6C 65 6E 61 6D 65 20 66 6F 72 20 72 65 filename for re
000070: 74 72 69 65 76 61 6C 20 6C 61 74 65 72 0D 0A 09 trieval later...
000080: 6C 64 20 62 63 2C 38 3A 20 6C 64 69 72 0D 0A 09 ld bc,8: ldir...
000090: 6C 64 20 61 2C 22 2E 22 0D 0A 09 6C 64 20 28 64 ld a,"."...ld (d
0000A0: 65 29 2C 61 3A 20 69 6E 63 20 64 65 0D 0A 09 6C e),a: inc de...l
0000B0: 64 20 62 63 2C 33 3A 20 6C 64 69 72 0D 0A 09 70 d bc,3: ldir...p
0000C0: 75 73 68 20 68 6C 0D 0A 09 20 70 75 73 68 20 69 ush hl... push i
0000D0: 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 20 6C 64 20 y: pop hl... ld
0000E0: 64 65 2C 37 35 3A 20 61 64 64 20 68 6C 2C 64 65 de,75: add hl,de
0000F0: 0D 0A 09 20 65 78 20 64 65 2C 68 6C 3A 20 70 6F ... ex de,hl: po
000100: 70 20 68 6C 09 09 3B 44 45 20 3D 20 66 69 6C 65 p hl..;DE = file
000110: 20 6C 65 6E 67 74 68 20 62 79 74 65 73 20 28 64 length bytes (d
000120: 65 73 74 69 6E 61 74 69 6F 6E 29 0D 0A 09 6C 64 estination)...ld
000130: 69 3A 20 6C 64 69 0D 0A 09 6C 64 20 28 69 79 2B i: ldi...ld (iy+
000140: 37 30 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 37 31 70),l: ld (iy+71
000150: 29 2C 68 09 3B 48 4C 20 3D 3E 20 63 75 72 72 65 ),h.;HL => curre
000160: 6E 74 20 6E 61 6D 65 20 61 64 64 72 65 73 73 0D nt name address.
000170: 0A 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A ....ld l,(iy+7):
000180: 20 6C 64 20 68 2C 28 69 79 2B 38 29 09 3B 48 4C ld h,(iy+8).;HL
000190: 20 3D 20 66 69 6C 65 20 62 75 66 66 65 72 0D 0A = file buffer..
0001A0: 09 6C 64 20 64 65 2C 31 30 32 34 3A 20 61 64 64 .ld de,1024: add
0001B0: 20 68 6C 2C 64 65 0D 0A 09 65 78 20 64 65 2C 68 hl,de...ex de,h
0001C0: 6C 0D 0A 09 70 6F 70 20 68 6C 3A 20 6C 64 20 62 l...pop hl: ld b
0001D0: 2C 31 32 09 09 09 3B 50 4F 50 20 66 69 6C 65 6E ,12...;POP filen
0001E0: 61 6D 65 20 66 72 6F 6D 20 61 62 6F 76 65 0D 0A ame from above..
0001F0: 09 63 61 6C 6C 20 26 42 43 37 37 09 09 09 3B 43 .call &BC77...;C
Size : 512 (Real : 512)
000000: 64 20 64 65 2C 31 31 36 2B 31 32 38 3A 20 61 64 d de,116+128: ad
000010: 64 20 68 6C 2C 64 65 0D 0A 09 20 6C 64 20 61 2C d hl,de... ld a,
000020: 28 68 6C 29 20 09 09 09 3B 6C 64 20 61 2C 28 62 (hl) ...;ld a,(b
000030: 75 66 66 65 72 2B 31 32 39 29 0D 0A 09 70 6F 70 uffer+129)...pop
000040: 20 68 6C 09 09 09 09 3B 61 6E 64 20 67 65 74 20 hl....;and get
000050: 48 4C 20 62 61 63 6B 20 61 67 61 69 6E 0D 0A 09 HL back again...
000060: 6C 64 20 28 69 79 2B 31 30 32 29 2C 6C 3A 20 6C ld (iy+102),l: l
000070: 64 20 28 69 79 2B 31 30 33 29 2C 68 09 3B 62 6C d (iy+103),h.;bl
000080: 6F 63 6B 20 6C 65 6E 67 74 68 0D 0A 09 6F 72 20 ock length...or
000090: 61 3A 20 6A 72 20 6E 7A 2C 6E 72 69 09 09 09 3B a: jr nz,nri...;
0000A0: 44 6F 20 77 65 20 6E 65 65 64 20 74 6F 20 74 72 Do we need to tr
0000B0: 61 6E 73 6D 69 74 20 74 68 65 20 68 65 61 64 65 ansmit the heade
0000C0: 72 3F 0D 0A 0D 0A 09 6C 64 20 65 2C 28 69 79 2B r?.....ld e,(iy+
0000D0: 38 34 29 3A 20 6C 64 20 64 2C 28 69 79 2B 38 35 84): ld d,(iy+85
0000E0: 29 09 3B 44 45 20 3D 20 62 79 74 65 73 20 72 65 ).;DE = bytes re
0000F0: 61 64 20 69 6E 0D 0A 09 73 63 66 3A 20 63 63 66 ad in...scf: ccf
000100: 3A 20 73 62 63 20 68 6C 2C 64 65 0D 0A 09 6A 72 : sbc hl,de...jr
000110: 20 7A 2C 6E 72 69 09 09 09 3B 53 6B 69 70 20 69 z,nri...;Skip i
000120: 66 20 61 6C 6C 20 72 65 61 64 20 69 6E 20 61 6C f all read in al
000130: 72 65 61 64 79 0D 0A 0D 0A 2E 72 69 5F 6C 70 09 ready.....ri_lp.
000140: 63 61 6C 6C 20 26 42 43 38 30 0D 0A 09 64 65 63 call &BC80...dec
000150: 20 68 6C 3A 20 6C 64 20 61 2C 68 3A 20 6F 72 20 hl: ld a,h: or
000160: 6C 0D 0A 09 6A 72 20 6E 7A 2C 72 69 5F 6C 70 09 l...jr nz,ri_lp.
000170: 09 09 3B 52 65 61 64 20 74 68 65 20 62 79 74 65 ..;Read the byte
000180: 73 20 69 6E 21 0D 0A 0D 0A 2E 6E 72 69 09 6C 64 s in!.....nri.ld
000190: 20 61 2C 63 3A 20 63 61 6C 6C 20 73 65 6E 64 62 a,c: call sendb
0001A0: 74 09 09 3B 3C 3C 3C 20 42 79 74 65 73 20 61 72 t..;<<< Bytes ar
0001B0: 65 20 6E 6F 77 20 69 6E 20 70 6C 61 63 65 0D 0A e now in place..
0001C0: 09 6C 64 20 61 2C 28 69 79 2B 31 30 31 29 3A 20 .ld a,(iy+101):
0001D0: 63 61 6C 6C 20 73 65 6E 64 62 74 09 3B 41 20 3D call sendbt.;A =
0001E0: 20 62 6C 6F 63 6B 0D 0A 09 6C 64 20 61 2C 28 69 block...ld a,(i
0001F0: 79 2B 31 30 31 29 3A 20 63 70 6C 3A 20 63 61 6C y+101): cpl: cal
Size : 512 (Real : 512)
000000: 41 53 20 49 4E 20 4F 50 45 4E 0D 0A 0D 0A 09 63 AS IN OPEN.....c
000010: 70 20 26 31 36 3A 20 6A 72 20 7A 2C 6E 6F 68 65 p &16: jr z,nohe
000020: 61 64 09 09 3B 53 6B 69 70 20 69 66 20 74 68 65 ad..;Skip if the
000030: 72 65 20 69 73 20 6E 6F 20 68 65 61 64 65 72 0D re is no header.
000040: 0A 0D 0A 09 70 75 73 68 20 62 63 3A 20 70 75 73 ....push bc: pus
000050: 68 20 64 65 3A 20 70 75 73 68 20 68 6C 0D 0A 09 h de: push hl...
000060: 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D push iy: pop hl.
000070: 0A 09 6C 64 20 64 65 2C 31 31 36 3A 20 61 64 64 ..ld de,116: add
000080: 20 68 6C 2C 64 65 3A 20 65 78 20 64 65 2C 68 6C hl,de: ex de,hl
000090: 09 3B 44 45 20 3D 20 62 75 66 66 65 72 20 61 64 .;DE = buffer ad
0000A0: 64 72 65 73 73 0D 0A 09 70 6F 70 20 68 6C 3A 20 dress...pop hl:
0000B0: 70 75 73 68 20 68 6C 0D 0A 09 6C 64 20 62 63 2C push hl...ld bc,
0000C0: 31 32 38 3A 20 6C 64 69 72 09 09 09 3B 43 6F 70 128: ldir...;Cop
0000D0: 79 20 68 65 61 64 65 72 20 74 6F 20 73 74 6F 72 y header to stor
0000E0: 65 0D 0A 09 6C 64 20 61 2C 31 0D 0A 09 6C 64 20 e...ld a,1...ld
0000F0: 28 64 65 29 2C 61 09 09 09 3B 61 6E 64 20 73 74 (de),a...;and st
000100: 6F 72 65 20 74 68 61 74 20 74 68 65 72 65 20 69 ore that there i
000110: 73 20 61 20 68 65 61 64 65 72 0D 0A 09 70 6F 70 s a header...pop
000120: 20 68 6C 3A 20 70 6F 70 20 64 65 3A 20 70 6F 70 hl: pop de: pop
000130: 20 62 63 0D 0A 0D 0A 09 6C 64 20 61 2C 62 3A 20 bc.....ld a,b:
000140: 6F 72 20 63 0D 0A 09 6A 72 20 7A 2C 6E 6F 68 65 or c...jr z,nohe
000150: 61 64 09 09 09 3B 69 66 20 66 69 6C 65 20 6C 65 ad...;if file le
000160: 6E 67 74 68 20 30 2C 20 63 61 6C 63 75 6C 61 74 ngth 0, calculat
000170: 65 20 69 74 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 31 e it.....ld hl,1
000180: 32 38 3A 20 61 64 64 20 68 6C 2C 62 63 09 09 3B 28: add hl,bc..;
000190: 61 64 64 20 68 65 61 64 65 72 0D 0A 09 6C 64 20 add header...ld
0001A0: 28 69 79 2B 37 35 29 2C 6C 3A 20 6C 64 20 28 69 (iy+75),l: ld (i
0001B0: 79 2B 37 36 29 2C 68 0D 0A 09 6C 64 20 28 69 79 y+76),h...ld (iy
0001C0: 2B 37 37 29 2C 30 09 09 09 3B 73 74 6F 72 65 20 +77),0...;store
0001D0: 66 69 6C 65 20 6C 65 6E 67 74 68 0D 0A 09 6A 72 file length...jr
0001E0: 20 63 6C 63 64 75 6E 0D 0A 0D 0A 2E 6E 6F 68 65 clcdun.....nohe
0001F0: 61 64 09 6C 64 20 6C 2C 28 69 79 2B 37 35 29 3A ad.ld l,(iy+75):
Size : 512 (Real : 512)
000000: 6C 20 73 65 6E 64 62 74 0D 0A 09 6C 64 20 63 2C l sendbt...ld c,
000010: 28 69 79 2B 31 30 32 29 3A 20 6C 64 20 62 2C 28 (iy+102): ld b,(
000020: 69 79 2B 31 30 33 29 09 3B 42 43 20 3D 20 62 6C iy+103).;BC = bl
000030: 6F 63 6B 20 6C 65 6E 67 74 68 0D 0A 0D 0A 09 70 ock length.....p
000040: 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A ush iy: pop hl..
000050: 09 6C 64 20 64 65 2C 31 31 36 2B 31 32 38 3A 20 .ld de,116+128:
000060: 61 64 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 20 61 add hl,de...ld a
000070: 2C 28 68 6C 29 09 09 09 3B 6C 64 20 61 2C 28 62 ,(hl)...;ld a,(b
000080: 75 66 66 65 72 2B 31 32 38 29 0D 0A 09 6F 72 20 uffer+128)...or
000090: 61 3A 20 6A 72 20 6E 7A 2C 68 65 61 64 72 65 0D a: jr nz,headre.
0000A0: 0A 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 34 33 29 ....ld l,(iy+43)
0000B0: 3A 20 6C 64 20 68 2C 28 69 79 2B 34 34 29 0D 0A : ld h,(iy+44)..
0000C0: 09 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 .push hl: pop ix
0000D0: 09 09 09 3B 6C 64 20 69 78 2C 28 70 62 6C 6F 63 ...;ld ix,(pbloc
0000E0: 6B 29 20 2D 20 6E 6F 20 68 65 61 64 65 72 0D 0A k) - no header..
0000F0: 09 6C 64 20 68 6C 2C 30 0D 0A 09 6A 72 20 73 6E .ld hl,0...jr sn
000100: 64 6C 62 74 0D 0A 0D 0A 2E 68 65 61 64 72 65 09 dlbt.....headre.
000110: 70 75 73 68 20 69 79 3A 20 70 6F 70 20 69 78 09 push iy: pop ix.
000120: 09 09 3B 3C 3C 3C 20 53 65 74 20 75 70 20 74 6F ..;<<< Set up to
000130: 20 72 65 61 64 20 68 65 61 64 65 72 0D 0A 09 6C read header...l
000140: 64 20 64 65 2C 31 31 36 3A 20 61 64 64 20 69 78 d de,116: add ix
000150: 2C 64 65 09 09 3B 49 58 20 3D 20 62 75 66 66 65 ,de..;IX = buffe
000160: 72 20 28 68 65 61 64 65 72 20 61 64 64 72 65 73 r (header addres
000170: 73 21 29 0D 0A 09 6C 64 20 68 6C 2C 30 0D 0A 0D s!)...ld hl,0...
000180: 0A 2E 73 6E 64 6C 62 74 09 70 75 73 68 20 62 63 ..sndlbt.push bc
000190: 3A 20 6C 64 20 61 2C 28 69 78 29 0D 0A 09 6C 64 : ld a,(ix)...ld
0001A0: 20 65 2C 61 3A 20 63 61 6C 6C 20 73 65 6E 64 62 e,a: call sendb
0001B0: 74 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 t.....ld a,(iy+1
0001C0: 30 34 29 3A 20 63 70 20 26 31 35 3A 20 6A 72 20 04): cp &15: jr
0001D0: 6E 7A 2C 73 6E 64 63 72 63 0D 0A 09 6C 64 20 61 nz,sndcrc...ld a
0001E0: 2C 65 3A 20 61 64 64 20 61 2C 6C 3A 20 6C 64 20 ,e: add a,l: ld
0001F0: 6C 2C 61 3A 20 6A 72 20 73 6E 64 6D 6C 70 0D 0A l,a: jr sndmlp..
Size : 512 (Real : 512)
000000: 20 6C 64 20 68 2C 28 69 79 2B 37 36 29 09 3B 48 ld h,(iy+76).;H
000010: 4C 20 3D 20 66 69 6C 65 20 6C 65 6E 67 74 68 0D L = file length.
000020: 0A 09 78 6F 72 20 61 3A 20 6C 64 20 62 2C 31 30 ..xor a: ld b,10
000030: 0D 0A 2E 61 64 31 30 32 34 09 73 6C 61 20 6C 3A ...ad1024.sla l:
000040: 20 72 6C 20 68 3A 20 72 6C 20 61 0D 0A 09 64 6A rl h: rl a...dj
000050: 6E 7A 20 61 64 31 30 32 34 0D 0A 09 6C 64 20 28 nz ad1024...ld (
000060: 69 79 2B 37 35 29 2C 6C 3A 20 6C 64 20 28 69 79 iy+75),l: ld (iy
000070: 2B 37 36 29 2C 68 09 3B 73 74 6F 72 65 20 66 69 +76),h.;store fi
000080: 6C 65 20 6C 65 6E 67 74 68 0D 0A 09 6C 64 20 28 le length...ld (
000090: 69 79 2B 37 37 29 2C 30 0D 0A 0D 0A 2E 63 6C 63 iy+77),0.....clc
0000A0: 64 75 6E 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A dun.ld l,(iy+7):
0000B0: 20 6C 64 20 68 2C 28 69 79 2B 38 29 0D 0A 09 6C ld h,(iy+8)...l
0000C0: 64 20 64 65 2C 31 30 32 34 3A 20 61 64 64 20 68 d de,1024: add h
0000D0: 6C 2C 64 65 0D 0A 09 6C 64 20 28 69 79 2B 34 33 l,de...ld (iy+43
0000E0: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 34 34 29 2C ),l: ld (iy+44),
0000F0: 68 09 3B 48 4C 20 3D 3E 20 70 62 6C 6F 63 6B 0D h.;HL => pblock.
000100: 0A 09 6C 64 20 62 63 2C 30 0D 0A 09 6C 64 20 28 ..ld bc,0...ld (
000110: 69 79 2B 38 34 29 2C 63 3A 20 6C 64 20 28 69 79 iy+84),c: ld (iy
000120: 2B 38 35 29 2C 62 09 3B 42 43 20 3D 3E 20 62 79 +85),b.;BC => by
000130: 74 65 73 20 72 65 61 64 20 69 6E 0D 0A 0D 0A 2E tes read in.....
000140: 63 66 62 6C 6B 09 6C 64 20 63 2C 31 3A 20 6C 64 cfblk.ld c,1: ld
000150: 20 61 2C 28 69 79 2B 31 30 37 29 3A 20 63 70 20 a,(iy+107): cp
000160: 32 3A 20 6A 72 20 6E 7A 2C 78 6D 73 65 6E 64 09 2: jr nz,xmsend.
000170: 3B 41 20 3D 20 73 70 65 63 2E 70 72 6F 74 6F 63 ;A = spec.protoc
000180: 6F 6C 0D 0A 09 6C 64 20 63 2C 30 0D 0A 2E 78 6D ol...ld c,0...xm
000190: 73 65 6E 64 09 6C 64 20 61 2C 63 3A 20 6C 64 20 send.ld a,c: ld
0001A0: 28 69 79 2B 31 30 31 29 2C 61 09 09 3B 62 6C 6F (iy+101),a..;blo
0001B0: 63 6B 20 6E 6F 2E 0D 0A 0D 0A 09 6C 64 20 61 2C ck no......ld a,
0001C0: 28 69 79 2B 31 30 37 29 3A 20 6F 72 20 61 3A 20 (iy+107): or a:
0001D0: 6A 72 20 6E 7A 2C 6E 6F 74 62 78 6D 0D 0A 09 6C jr nz,notbxm...l
0001E0: 64 20 68 6C 2C 63 68 6B 74 78 74 3A 20 6A 72 20 d hl,chktxt: jr
0001F0: 70 74 79 70 65 0D 0A 2E 6E 6F 74 62 78 6D 09 63 ptype...notbxm.c
Size : 512 (Real : 512)
000000: 2E 73 6E 64 63 72 63 09 63 61 6C 6C 20 63 72 63 .sndcrc.call crc
000010: 0D 0A 2E 73 6E 64 6D 6C 70 09 69 6E 63 20 69 78 ...sndmlp.inc ix
000020: 3A 20 70 6F 70 20 62 63 3A 20 64 65 63 20 62 63 : pop bc: dec bc
000030: 3A 20 6C 64 20 61 2C 62 3A 20 6F 72 20 63 0D 0A : ld a,b: or c..
000040: 09 6A 72 20 6E 7A 2C 73 6E 64 6C 62 74 0D 0A 09 .jr nz,sndlbt...
000050: 6A 72 20 73 63 66 76 65 72 0D 0A 0D 0A 2E 79 6D jr scfver.....ym
000060: 68 65 61 64 09 6C 64 20 61 2C 31 3A 09 63 61 6C head.ld a,1:.cal
000070: 6C 20 73 65 6E 64 62 74 09 09 09 3B 73 65 6E 64 l sendbt...;send
000080: 20 53 4F 48 0D 0A 09 78 6F 72 20 61 3A 09 63 61 SOH...xor a:.ca
000090: 6C 6C 20 73 65 6E 64 62 74 09 09 09 3B 73 65 6E ll sendbt...;sen
0000A0: 64 20 62 6C 6F 63 6B 20 6E 6F 2E 0D 0A 09 78 6F d block no....xo
0000B0: 72 20 61 3A 20 20 63 70 6C 3A 20 63 61 6C 6C 20 r a: cpl: call
0000C0: 73 65 6E 64 62 74 09 09 3B 63 6F 6D 70 6C 65 6D sendbt..;complem
0000D0: 65 6E 74 65 64 0D 0A 0D 0A 09 70 75 73 68 20 69 ented.....push i
0000E0: 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 62 y: pop hl...ld b
0000F0: 63 2C 35 35 3A 20 61 64 64 20 68 6C 2C 62 63 3A c,55: add hl,bc:
000100: 20 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 push hl: pop ix
000110: 09 3B 49 58 20 3D 20 66 69 6C 65 6E 61 6D 65 0D .;IX = filename.
000120: 0A 09 6C 64 20 68 6C 2C 30 3A 20 6C 64 20 63 2C ..ld hl,0: ld c,
000130: 31 32 38 3A 20 6C 64 20 62 2C 31 32 0D 0A 2E 79 128: ld b,12...y
000140: 6D 68 5F 6C 70 09 6C 64 20 61 2C 28 69 78 29 3A mh_lp.ld a,(ix):
000150: 20 63 70 20 26 32 30 3A 20 63 61 6C 6C 20 6E 7A cp &20: call nz
000160: 2C 79 6D 68 5F 73 63 0D 0A 09 69 6E 63 20 69 78 ,ymh_sc...inc ix
000170: 3A 20 64 6A 6E 7A 20 79 6D 68 5F 6C 70 0D 0A 0D : djnz ymh_lp...
000180: 0A 09 78 6F 72 20 61 3A 20 63 61 6C 6C 20 79 6D ..xor a: call ym
000190: 68 5F 73 63 0D 0A 0D 0A 09 63 61 6C 6C 20 73 6E h_sc.....call sn
0001A0: 64 5F 74 62 0D 0A 0D 0A 2E 79 6D 68 5F 30 73 09 d_tb.....ymh_0s.
0001B0: 78 6F 72 20 61 3A 20 63 61 6C 6C 20 79 6D 68 5F xor a: call ymh_
0001C0: 73 63 0D 0A 09 6A 72 20 6E 7A 2C 79 6D 68 5F 30 sc...jr nz,ymh_0
0001D0: 73 0D 0A 09 6A 72 20 73 63 66 76 65 72 0D 0A 0D s...jr scfver...
0001E0: 0A 2E 79 6D 68 5F 73 63 09 70 75 73 68 20 62 63 ..ymh_sc.push bc
0001F0: 3A 20 6C 64 20 65 2C 61 3A 20 63 61 6C 6C 20 73 : ld e,a: call s
Size : 512 (Real : 512)
000000: 70 20 31 3A 20 6A 72 20 6E 7A 2C 6E 6F 74 6F 6E p 1: jr nz,noton
000010: 65 0D 0A 09 6C 64 20 68 6C 2C 6F 6E 65 74 78 74 e...ld hl,onetxt
000020: 3A 20 6A 72 20 70 74 79 70 65 0D 0A 2E 6E 6F 74 : jr ptype...not
000030: 6F 6E 65 09 6C 64 20 68 6C 2C 79 6D 74 65 78 74 one.ld hl,ymtext
000040: 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A 09 : call string...
000050: 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 3A push iy: pop hl:
000060: 20 6C 64 20 64 65 2C 35 35 3A 20 61 64 64 20 68 ld de,55: add h
000070: 6C 2C 64 65 09 09 3B 66 69 6C 65 6E 61 6D 65 0D l,de..;filename.
000080: 0A 2E 70 74 79 70 65 09 63 61 6C 6C 20 73 74 72 ..ptype.call str
000090: 69 6E 67 0D 0A 0D 0A 2E 77 63 68 6D 74 64 09 6C ing.....wchmtd.l
0000A0: 64 20 64 65 2C 35 30 3A 20 63 61 6C 6C 20 77 61 d de,50: call wa
0000B0: 69 74 62 74 0D 0A 09 63 70 20 22 43 22 3A 20 6A itbt...cp "C": j
0000C0: 72 20 7A 2C 73 73 65 6E 64 62 0D 0A 09 63 70 20 r z,ssendb...cp
0000D0: 26 31 35 3A 20 6A 72 20 7A 2C 73 73 65 6E 64 62 &15: jr z,ssendb
0000E0: 0D 0A 09 63 70 20 26 31 38 3A 20 6A 70 20 7A 2C ...cp &18: jp z,
0000F0: 61 62 6F 72 74 0D 0A 09 63 61 6C 6C 20 63 68 6B abort...call chk
000100: 63 6E 75 0D 0A 09 6A 72 20 77 63 68 6D 74 64 0D cnu...jr wchmtd.
000110: 0A 0D 0A 2E 73 73 65 6E 64 62 09 6C 64 20 28 69 ....ssendb.ld (i
000120: 79 2B 31 30 34 29 2C 61 3A 20 78 6F 72 20 61 09 y+104),a: xor a.
000130: 09 3B 4E 41 4B 2F 43 20 73 65 6E 74 3F 0D 0A 0D .;NAK/C sent?...
000140: 0A 2E 73 74 73 62 6C 6B 09 6C 64 20 61 2C 28 69 ..stsblk.ld a,(i
000150: 79 2B 31 30 31 29 3A 20 6F 72 20 61 3A 20 6A 72 y+101): or a: jr
000160: 20 7A 2C 74 72 6E 62 6C 6B 20 20 3B 62 6C 6F 63 z,trnblk ;bloc
000170: 6B 20 6E 6F 2E 0D 0A 09 6C 64 20 61 2C 31 33 3A k no....ld a,13:
000180: 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 6C 64 call &BB5A...ld
000190: 20 61 2C 32 32 3A 20 63 61 6C 6C 20 26 42 42 36 a,22: call &BB6
0001A0: 46 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 31 30 31 F...ld a,(iy+101
0001B0: 29 3A 20 63 61 6C 6C 20 70 72 5F 64 65 63 0D 0A ): call pr_dec..
0001C0: 09 6C 64 20 61 2C 33 32 3A 20 63 61 6C 6C 20 26 .ld a,32: call &
0001D0: 42 42 35 41 0D 0A 09 6C 64 20 61 2C 38 3A 20 63 BB5A...ld a,8: c
0001E0: 61 6C 6C 20 26 42 42 35 41 0D 0A 0D 0A 2E 74 72 all &BB5A.....tr
0001F0: 6E 62 6C 6B 09 6C 64 20 61 2C 28 69 79 2B 31 30 nblk.ld a,(iy+10
Size : 512 (Real : 512)
000000: 65 6E 64 62 74 09 3B 59 4D 6F 64 65 6D 20 68 65 endbt.;YModem he
000010: 61 64 65 72 2C 20 73 65 6E 64 20 63 68 61 72 61 ader, send chara
000020: 63 74 65 72 0D 0A 09 6C 64 20 61 2C 28 69 79 2B cter...ld a,(iy+
000030: 31 30 34 29 3A 20 63 70 20 26 31 35 0D 0A 09 6A 104): cp &15...j
000040: 72 20 6E 7A 2C 79 73 63 5F 63 63 0D 0A 09 6C 64 r nz,ysc_cc...ld
000050: 20 61 2C 65 3A 20 61 64 64 20 61 2C 6C 3A 20 6C a,e: add a,l: l
000060: 64 20 6C 2C 61 3A 20 6A 72 20 79 73 63 5F 70 6C d l,a: jr ysc_pl
000070: 0D 0A 2E 79 73 63 5F 63 63 09 63 61 6C 6C 20 63 ...ysc_cc.call c
000080: 72 63 0D 0A 2E 79 73 63 5F 70 6C 09 70 6F 70 20 rc...ysc_pl.pop
000090: 62 63 3A 20 64 65 63 20 63 3A 20 72 65 74 0D 0A bc: dec c: ret..
0000A0: 0D 0A 2E 73 63 66 76 65 72 09 6C 64 20 61 2C 28 ...scfver.ld a,(
0000B0: 69 79 2B 31 30 34 29 3A 20 63 70 20 26 31 35 3A iy+104): cp &15:
0000C0: 20 6A 72 20 7A 2C 73 63 6F 6C 0D 0A 09 6C 64 20 jr z,scol...ld
0000D0: 65 2C 30 3A 20 63 61 6C 6C 20 63 72 63 3A 20 63 e,0: call crc: c
0000E0: 61 6C 6C 20 63 72 63 0D 0A 09 6C 64 20 61 2C 68 all crc...ld a,h
0000F0: 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 0D 0A 2E : call sendbt...
000100: 73 63 6F 6C 09 6C 64 20 61 2C 6C 3A 20 63 61 6C scol.ld a,l: cal
000110: 6C 20 73 65 6E 64 62 74 0D 0A 0D 0A 2E 77 34 72 l sendbt.....w4r
000120: 73 6C 74 09 6C 64 20 64 65 2C 35 30 3A 20 63 61 slt.ld de,50: ca
000130: 6C 6C 20 77 61 69 74 62 74 0D 0A 09 63 70 20 36 ll waitbt...cp 6
000140: 3A 20 6A 72 20 7A 2C 62 6C 73 6F 6B 0D 0A 09 63 : jr z,blsok...c
000150: 70 20 26 31 38 3A 20 6A 70 20 7A 2C 61 62 6F 72 p &18: jp z,abor
000160: 74 0D 0A 09 63 70 20 26 31 35 3A 20 6A 72 20 7A t...cp &15: jr z
000170: 2C 65 72 69 6E 75 70 0D 0A 09 63 61 6C 6C 20 63 ,erinup...call c
000180: 68 6B 63 6E 75 3A 20 6A 72 20 77 34 72 73 6C 74 hkcnu: jr w4rslt
000190: 0D 0A 2E 65 72 69 6E 75 70 09 6C 64 20 61 2C 22 ...erinup.ld a,"
0001A0: 3F 22 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A ?": call &BB5A..
0001B0: 09 6C 64 20 61 2C 38 3A 20 20 20 63 61 6C 6C 20 .ld a,8: call
0001C0: 26 42 42 35 41 0D 0A 09 6C 64 20 6C 2C 28 69 79 &BB5A...ld l,(iy
0001D0: 2B 31 30 32 29 3A 20 6C 64 20 68 2C 28 69 79 2B +102): ld h,(iy+
0001E0: 31 30 33 29 09 09 3B 48 4C 20 3D 20 62 6C 6F 63 103)..;HL = bloc
0001F0: 6B 20 6C 65 6E 67 74 68 0D 0A 09 6C 64 20 28 69 k length...ld (i
Size : 512 (Real : 512)
000000: 31 29 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 79 1): or a: jp z,y
000010: 6D 68 65 61 64 20 20 3B 62 6C 6F 63 6B 20 30 3F mhead ;block 0?
000020: 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 31 30 32 34 3A .....ld hl,1024:
000030: 20 6C 64 20 63 2C 32 09 09 3B 44 65 66 61 75 6C ld c,2..;Defaul
000040: 74 20 31 6B 2E 2E 2E 0D 0A 0D 0A 09 6C 64 20 61 t 1k........ld a
000050: 2C 28 69 79 2B 31 30 37 29 09 09 09 3B 31 32 38 ,(iy+107)...;128
000060: 2D 62 79 74 65 20 70 72 6F 74 6F 63 6F 6C 3F 0D -byte protocol?.
000070: 0A 09 6F 72 20 61 3A 20 6A 72 20 7A 2C 62 6C 31 ..or a: jr z,bl1
000080: 32 38 0D 0A 0D 0A 09 70 75 73 68 20 68 6C 0D 0A 28.....push hl..
000090: 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C .push iy: pop hl
0000A0: 0D 0A 09 6C 64 20 64 65 2C 31 31 36 2B 31 32 38 ...ld de,116+128
0000B0: 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 : add hl,de...ld
0000C0: 20 61 2C 28 68 6C 29 3A 20 70 6F 70 20 68 6C 09 a,(hl): pop hl.
0000D0: 09 3B 6C 64 20 61 2C 28 62 75 66 66 65 72 2B 31 .;ld a,(buffer+1
0000E0: 32 38 29 0D 0A 09 6F 72 20 61 3A 20 6A 72 20 6E 28)...or a: jr n
0000F0: 7A 2C 62 6C 31 32 38 09 09 3B 4E 65 65 64 20 74 z,bl128..;Need t
000100: 6F 20 74 72 61 6E 73 6D 69 74 20 68 65 61 64 65 o transmit heade
000110: 72 3F 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B r?.....ld a,(iy+
000120: 37 37 29 09 09 09 3B 4D 6F 72 65 20 74 68 61 6E 77)...;More than
000130: 20 31 6B 20 6C 65 66 74 3F 20 5B 66 69 6C 65 20 1k left? [file
000140: 6C 65 6E 67 74 68 5D 0D 0A 09 6F 72 20 61 3A 20 length]...or a:
000150: 6A 72 20 6E 7A 2C 62 6C 64 65 63 0D 0A 0D 0A 09 jr nz,bldec.....
000160: 6C 64 20 61 2C 28 69 79 2B 37 36 29 0D 0A 09 63 ld a,(iy+76)...c
000170: 70 20 34 3A 20 6A 72 20 6E 63 2C 62 6C 64 65 63 p 4: jr nc,bldec
000180: 09 09 3B 4D 6F 72 65 20 74 68 61 6E 20 35 31 32 ..;More than 512
000190: 20 62 79 74 65 73 20 6C 65 66 74 3F 0D 0A 0D 0A bytes left?....
0001A0: 2E 62 6C 31 32 38 09 6C 64 20 68 6C 2C 31 32 38 .bl128.ld hl,128
0001B0: 3A 20 6C 64 20 63 2C 31 0D 0A 0D 0A 2E 62 6C 64 : ld c,1.....bld
0001C0: 65 63 09 70 75 73 68 20 68 6C 09 09 09 09 3B 53 ec.push hl....;S
0001D0: 74 6F 72 65 20 48 4C 20 61 67 61 69 6E 73 74 20 tore HL against
0001E0: 49 59 20 63 61 6C 63 73 0D 0A 09 20 70 75 73 68 IY calcs... push
0001F0: 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 20 6C iy: pop hl... l
Size : 512 (Real : 512)
000000: 62 6C 09 78 6F 72 20 61 3A 20 63 61 6C 6C 20 79 bl.xor a: call y
000010: 6D 68 5F 73 63 0D 0A 09 6A 72 20 6E 7A 2C 6E 75 mh_sc...jr nz,nu
000020: 6C 62 6C 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 lbl.....ld a,(iy
000030: 2B 31 30 34 29 3A 20 63 70 20 26 31 35 3A 20 6A +104): cp &15: j
000040: 72 20 7A 2C 6E 63 6F 6C 0D 0A 09 78 6F 72 20 61 r z,ncol...xor a
000050: 3A 20 63 61 6C 6C 20 63 72 63 3A 20 63 61 6C 6C : call crc: call
000060: 20 63 72 63 0D 0A 09 6C 64 20 61 2C 68 3A 20 63 crc...ld a,h: c
000070: 61 6C 6C 20 73 65 6E 64 62 74 0D 0A 2E 6E 63 6F all sendbt...nco
000080: 6C 09 6C 64 20 61 2C 6C 3A 20 63 61 6C 6C 20 73 l.ld a,l: call s
000090: 65 6E 64 62 74 0D 0A 0D 0A 2E 61 66 6C 63 70 20 endbt.....aflcp
0000A0: 09 6C 64 20 64 65 2C 35 30 3A 20 63 61 6C 6C 20 .ld de,50: call
0000B0: 77 61 69 74 62 74 0D 0A 09 63 70 20 26 31 35 3A waitbt...cp &15:
0000C0: 20 6A 72 20 7A 2C 72 73 78 62 0D 0A 09 63 70 20 jr z,rsxb...cp
0000D0: 36 3A 20 6A 72 20 7A 2C 62 79 65 62 79 65 0D 0A 6: jr z,byebye..
0000E0: 09 63 61 6C 6C 20 63 68 6B 63 6E 75 3A 20 6A 72 .call chkcnu: jr
0000F0: 20 61 66 6C 63 70 0D 0A 2E 62 79 65 62 79 65 09 aflcp...byebye.
000100: 6C 64 20 68 6C 2C 6C 61 73 74 63 72 3A 20 6A 70 ld hl,lastcr: jp
000110: 20 73 74 72 69 6E 67 0D 0A 0D 0A 2E 61 62 6F 72 string.....abor
000120: 74 09 6C 64 20 61 2C 31 33 3A 20 63 61 6C 6C 20 t.ld a,13: call
000130: 26 42 42 35 41 0D 0A 09 6C 64 20 61 2C 32 32 3A &BB5A...ld a,22:
000140: 20 63 61 6C 6C 20 26 42 42 36 46 0D 0A 09 6C 64 call &BB6F...ld
000150: 20 68 6C 2C 61 62 72 72 65 71 3A 20 63 61 6C 6C hl,abrreq: call
000160: 20 73 74 72 69 6E 67 0D 0A 09 6A 70 20 26 42 43 string...jp &BC
000170: 37 44 0D 0A 0D 0A 2E 73 6E 64 5F 74 62 09 70 75 7D.....snd_tb.pu
000180: 73 68 20 62 63 3A 20 70 75 73 68 20 68 6C 09 09 sh bc: push hl..
000190: 3B 53 65 6E 64 20 33 20 62 79 74 65 20 6C 65 6E ;Send 3 byte len
0001A0: 67 74 68 20 61 73 20 64 65 63 69 6D 61 6C 0D 0A gth as decimal..
0001B0: 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 69 78 .push iy: pop ix
0001C0: 0D 0A 09 6C 64 20 62 63 2C 37 39 3A 20 61 64 64 ...ld bc,79: add
0001D0: 20 69 78 2C 62 63 0D 0A 09 78 6F 72 20 61 3A 20 ix,bc...xor a:
0001E0: 6C 64 20 28 69 79 2B 37 38 29 2C 61 3A 20 6C 64 ld (iy+78),a: ld
0001F0: 20 6C 2C 28 69 79 2B 37 35 29 3A 20 6C 64 20 68 l,(iy+75): ld h
Size : 512 (Real : 512)
000000: 31 42 09 09 3B 72 65 6D 6F 76 65 20 62 72 65 61 1B..;remove brea
000010: 6B 3F 0D 0A 09 63 61 6C 6C 20 26 42 43 37 44 3A k?...call &BC7D:
000020: 20 6A 70 20 26 42 43 39 32 09 09 3B 61 62 61 6E jp &BC92..;aban
000030: 64 6F 6E 20 66 69 6C 65 73 0D 0A 0D 0A 0D 0A 0D don files.......
000040: 0A 09 3B 3E 3E 3E 20 42 55 46 46 45 52 20 63 6F ..;>>> BUFFER co
000050: 6D 6D 61 6E 64 0D 0A 0D 0A 2E 62 75 66 66 5F 69 mmand.....buff_i
000060: 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 3A 20 .ld c,2...cp 1:
000070: 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 jp nz,error.....
000080: 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C ld l,(ix): ld h,
000090: 28 69 78 2B 31 29 0D 0A 09 6C 64 20 28 69 79 2B (ix+1)...ld (iy+
0000A0: 37 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 38 29 2C 7),l: ld (iy+8),
0000B0: 68 0D 0A 09 72 65 74 0D 0A 0D 0A 0D 0A 0D 0A 09 h...ret.........
0000C0: 3B 3E 3E 3E 20 50 52 4F 54 4F 43 4F 4C 20 63 6F ;>>> PROTOCOL co
0000D0: 6D 6D 61 6E 64 0D 0A 0D 0A 2E 70 72 6F 74 5F 69 mmand.....prot_i
0000E0: 09 6C 64 20 63 2C 32 0D 0A 09 63 70 20 31 3A 20 .ld c,2...cp 1:
0000F0: 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 jp nz,error.....
000100: 64 65 63 20 63 0D 0A 09 6C 64 20 61 2C 28 69 78 dec c...ld a,(ix
000110: 29 3A 20 63 70 20 33 3A 20 6A 70 20 6E 63 2C 65 ): cp 3: jp nc,e
000120: 72 72 6F 72 0D 0A 09 6C 64 20 28 69 79 2B 31 30 rror...ld (iy+10
000130: 37 29 2C 61 3A 20 72 65 74 0D 0A 0D 0A 0D 0A 0D 7),a: ret.......
000140: 0A 09 3B 2A 2A 2A 20 46 49 4C 45 20 53 55 42 52 ..;*** FILE SUBR
000150: 4F 55 54 49 4E 45 53 20 2A 2A 2A 0D 0A 0D 0A 09 OUTINES ***.....
000160: 3B 3E 3E 3E 20 52 65 61 64 20 66 69 6C 65 6E 61 ;>>> Read filena
000170: 6D 65 73 20 69 6E 74 6F 20 62 75 66 66 65 72 0D mes into buffer.
000180: 0A 0D 0A 2E 72 66 6E 61 6D 65 09 6C 64 20 28 69 ....rfname.ld (i
000190: 79 2B 34 32 29 2C 61 09 09 09 3B 6E 75 6D 62 65 y+42),a...;numbe
0001A0: 72 20 6F 66 20 70 61 72 61 6D 65 74 65 72 73 0D r of parameters.
0001B0: 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A 20 6C ..ld l,(iy+7): l
0001C0: 64 20 68 2C 28 69 79 2B 38 29 09 3B 66 69 6C 65 d h,(iy+8).;file
0001D0: 20 62 75 66 66 65 72 20 61 64 64 72 65 73 73 0D buffer address.
0001E0: 0A 09 6C 64 20 28 69 79 2B 37 30 29 2C 6C 3A 20 ..ld (iy+70),l:
0001F0: 6C 64 20 28 69 79 2B 37 31 29 2C 68 09 3B 63 75 ld (iy+71),h.;cu
Size : 512 (Real : 512)
000000: 2C 28 69 79 2B 37 36 29 0D 0A 09 6C 64 20 64 65 ,(iy+76)...ld de
000010: 2C 31 30 30 30 30 3A 20 63 61 6C 6C 20 73 74 68 ,10000: call sth
000020: 6C 72 0D 0A 09 6C 64 20 64 65 2C 31 30 30 30 3A lr...ld de,1000:
000030: 20 63 61 6C 6C 20 73 74 68 6C 72 0D 0A 09 6C 64 call sthlr...ld
000040: 20 64 65 2C 31 30 30 3A 20 63 61 6C 6C 20 73 74 de,100: call st
000050: 68 6C 72 0D 0A 09 6C 64 20 64 65 2C 31 30 3A 20 hlr...ld de,10:
000060: 63 61 6C 6C 20 73 74 68 6C 72 0D 0A 09 6C 64 20 call sthlr...ld
000070: 64 65 2C 31 3A 20 63 61 6C 6C 20 73 74 68 6C 72 de,1: call sthlr
000080: 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 37 37 .....ld a,(iy+77
000090: 29 3A 20 6C 64 20 65 2C 61 0D 0A 2E 63 63 61 5F ): ld e,a...cca_
0000A0: 6F 6C 09 20 70 75 73 68 20 69 79 3A 20 70 6F 70 ol. push iy: pop
0000B0: 20 69 78 0D 0A 09 20 6C 64 20 62 63 2C 38 33 3A ix... ld bc,83:
0000C0: 20 61 64 64 20 69 78 2C 62 63 09 09 3B 49 58 20 add ix,bc..;IX
0000D0: 3D 20 66 64 65 63 2B 35 0D 0A 09 6C 64 20 68 6C = fdec+5...ld hl
0000E0: 2C 66 66 66 66 2B 35 0D 0A 09 78 6F 72 20 61 3A ,ffff+5...xor a:
0000F0: 20 63 70 20 65 3A 20 6A 72 20 7A 2C 6E 6F 76 68 cp e: jr z,novh
000100: 62 3A 20 6C 64 20 62 63 2C 26 36 30 30 0D 0A 2E b: ld bc,&600...
000110: 63 63 61 5F 6C 70 09 6C 64 20 61 2C 63 3A 20 61 cca_lp.ld a,c: a
000120: 64 64 20 61 2C 28 69 78 29 3A 20 61 64 64 20 61 dd a,(ix): add a
000130: 2C 28 68 6C 29 0D 0A 09 6C 64 20 63 2C 30 3A 20 ,(hl)...ld c,0:
000140: 63 70 20 31 30 3A 20 6A 72 20 63 2C 65 78 63 63 cp 10: jr c,excc
000150: 0D 0A 2E 63 63 61 72 72 79 09 73 75 62 20 31 30 ...ccarry.sub 10
000160: 3A 20 69 6E 63 20 63 3A 20 63 70 20 31 30 3A 20 : inc c: cp 10:
000170: 6A 72 20 6E 63 2C 63 63 61 72 72 79 0D 0A 2E 65 jr nc,ccarry...e
000180: 78 63 63 09 6C 64 20 28 69 78 29 2C 61 3A 20 64 xcc.ld (ix),a: d
000190: 65 63 20 69 78 3A 20 64 65 63 20 68 6C 3A 20 64 ec ix: dec hl: d
0001A0: 6A 6E 7A 20 63 63 61 5F 6C 70 0D 0A 09 64 65 63 jnz cca_lp...dec
0001B0: 20 65 3A 20 6A 72 20 6E 7A 2C 63 63 61 5F 6F 6C e: jr nz,cca_ol
0001C0: 0D 0A 0D 0A 2E 6E 6F 76 68 62 09 70 75 73 68 20 .....novhb.push
0001D0: 69 79 3A 20 70 6F 70 20 69 78 0D 0A 09 6C 64 20 iy: pop ix...ld
0001E0: 62 63 2C 37 38 3A 20 61 64 64 20 69 78 2C 62 63 bc,78: add ix,bc
0001F0: 09 09 3B 49 58 20 3D 20 66 64 65 63 0D 0A 09 70 ..;IX = fdec...p
Size : 512 (Real : 512)
000000: 79 2B 38 34 29 2C 6C 3A 20 6C 64 20 28 69 79 2B y+84),l: ld (iy+
000010: 38 35 29 2C 68 09 09 3B 48 4C 20 3D 3E 20 62 79 85),h..;HL => by
000020: 74 65 73 20 72 65 61 64 20 69 6E 0D 0A 09 6A 70 tes read in...jp
000030: 20 74 72 6E 62 6C 6B 0D 0A 0D 0A 2E 62 6C 73 6F trnblk.....blso
000040: 6B 09 6C 64 20 61 2C 28 69 79 2B 31 30 31 29 3A k.ld a,(iy+101):
000050: 20 69 6E 63 20 61 3A 20 6C 64 20 28 69 79 2B 31 inc a: ld (iy+1
000060: 30 31 29 2C 61 09 3B 69 6E 63 72 65 61 73 65 20 01),a.;increase
000070: 62 6C 6F 63 6B 20 6E 6F 2E 0D 0A 09 63 70 20 31 block no....cp 1
000080: 3A 20 6A 70 20 7A 2C 77 63 68 6D 74 64 0D 0A 0D : jp z,wchmtd...
000090: 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 35 29 3A 20 ..ld l,(iy+75):
0000A0: 6C 64 20 68 2C 28 69 79 2B 37 36 29 3A 20 6C 64 ld h,(iy+76): ld
0000B0: 20 61 2C 28 69 79 2B 37 37 29 20 3B 66 69 6C 65 a,(iy+77) ;file
0000C0: 20 6C 65 6E 67 74 68 0D 0A 09 6C 64 20 65 2C 28 length...ld e,(
0000D0: 69 79 2B 31 30 32 29 3A 20 6C 64 20 64 2C 28 69 iy+102): ld d,(i
0000E0: 79 2B 31 30 33 29 0D 0A 09 73 63 66 3A 20 63 63 y+103)...scf: cc
0000F0: 66 3A 20 73 62 63 20 68 6C 2C 64 65 3A 20 6A 72 f: sbc hl,de: jr
000100: 20 6E 63 2C 6E 64 68 62 6C 09 3B 73 75 62 74 72 nc,ndhbl.;subtr
000110: 61 63 74 20 62 6C 6F 63 6B 20 6C 65 6E 67 74 68 act block length
000120: 0D 0A 09 64 65 63 20 61 0D 0A 2E 6E 64 68 62 6C ...dec a...ndhbl
000130: 09 6C 64 20 28 69 79 2B 37 35 29 2C 6C 3A 20 6C .ld (iy+75),l: l
000140: 64 20 28 69 79 2B 37 36 29 2C 68 3A 20 6C 64 20 d (iy+76),h: ld
000150: 28 69 79 2B 37 37 29 2C 61 0D 0A 0D 0A 09 63 70 (iy+77),a.....cp
000160: 20 26 45 30 3A 20 6A 70 20 6E 63 2C 65 6F 66 75 &E0: jp nc,eofu
000170: 74 0D 0A 0D 0A 09 70 75 73 68 20 69 78 3A 20 63 t.....push ix: c
000180: 61 6C 6C 20 26 42 43 38 39 3A 20 70 6F 70 20 69 all &BC89: pop i
000190: 78 0D 0A 09 6A 72 20 63 2C 65 6F 66 6F 6B 3A 20 x...jr c,eofok:
0001A0: 6A 72 20 7A 2C 65 6F 66 6F 6B 0D 0A 09 63 70 20 jr z,eofok...cp
0001B0: 26 30 46 3A 20 6A 70 20 7A 2C 65 6F 66 75 74 0D &0F: jp z,eofut.
0001C0: 0A 0D 0A 2E 65 6F 66 6F 6B 09 70 75 73 68 20 69 ....eofok.push i
0001D0: 78 0D 0A 09 20 70 75 73 68 20 69 79 3A 20 70 6F x... push iy: po
0001E0: 70 20 68 6C 0D 0A 09 20 6C 64 20 64 65 2C 31 31 p hl... ld de,11
0001F0: 36 2B 31 32 38 3A 20 61 64 64 20 68 6C 2C 64 65 6+128: add hl,de
Size : 512 (Real : 512)
000000: 6F 70 20 68 6C 3A 20 70 6F 70 20 62 63 3A 20 6C op hl: pop bc: l
000010: 64 20 62 2C 36 3A 20 6C 64 20 65 2C 30 0D 0A 2E d b,6: ld e,0...
000020: 70 6E 6D 5F 6C 70 09 6C 64 20 61 2C 28 69 78 29 pnm_lp.ld a,(ix)
000030: 3A 20 6C 64 20 64 2C 61 3A 20 6F 72 20 65 3A 20 : ld d,a: or e:
000040: 6C 64 20 61 2C 64 3A 20 6A 72 20 7A 2C 69 61 6C ld a,d: jr z,ial
000050: 30 0D 0A 09 6C 64 20 65 2C 32 35 35 3A 20 61 64 0...ld e,255: ad
000060: 64 20 26 33 30 3A 20 63 61 6C 6C 20 79 6D 68 5F d &30: call ymh_
000070: 73 63 0D 0A 2E 69 61 6C 30 09 69 6E 63 20 69 78 sc...ial0.inc ix
000080: 3A 20 64 6A 6E 7A 20 70 6E 6D 5F 6C 70 3A 20 72 : djnz pnm_lp: r
000090: 65 74 0D 0A 0D 0A 2E 73 74 68 6C 72 09 78 6F 72 et.....sthlr.xor
0000A0: 20 61 0D 0A 2E 73 74 68 6C 6C 70 09 73 63 66 3A a...sthllp.scf:
0000B0: 20 63 63 66 3A 20 73 62 63 20 68 6C 2C 64 65 3A ccf: sbc hl,de:
0000C0: 20 6A 72 20 63 2C 73 74 68 6C 6F 3A 20 69 6E 63 jr c,sthlo: inc
0000D0: 20 61 3A 20 6A 72 20 73 74 68 6C 6C 70 0D 0A 2E a: jr sthllp...
0000E0: 73 74 68 6C 6F 09 61 64 64 20 68 6C 2C 64 65 3A sthlo.add hl,de:
0000F0: 20 6C 64 20 28 69 78 29 2C 61 3A 20 69 6E 63 20 ld (ix),a: inc
000100: 69 78 3A 20 72 65 74 0D 0A 0D 0A 2E 63 68 72 63 ix: ret.....chrc
000110: 68 6B 09 63 70 20 39 37 3A 20 6A 72 20 63 2C 6E hk.cp 97: jr c,n
000120: 6F 74 6C 6F 77 0D 0A 09 63 70 20 31 32 33 3A 20 otlow...cp 123:
000130: 6A 72 20 6E 63 2C 6E 6F 74 6C 6F 77 0D 0A 09 72 jr nc,notlow...r
000140: 65 73 20 35 2C 61 0D 0A 2E 6E 6F 74 6C 6F 77 09 es 5,a...notlow.
000150: 6C 64 20 68 6C 2C 6F 6B 63 68 61 72 0D 0A 09 6C ld hl,okchar...l
000160: 64 20 63 2C 61 0D 0A 2E 63 7A 6C 6F 6F 70 09 6C d c,a...czloop.l
000170: 64 20 61 2C 28 68 6C 29 0D 0A 09 6F 72 20 61 0D d a,(hl)...or a.
000180: 0A 09 6A 72 20 7A 2C 65 78 69 74 63 6B 0D 0A 09 ..jr z,exitck...
000190: 63 70 20 63 0D 0A 09 72 65 74 20 7A 0D 0A 09 69 cp c...ret z...i
0001A0: 6E 63 20 68 6C 0D 0A 09 6A 72 20 63 7A 6C 6F 6F nc hl...jr czloo
0001B0: 70 0D 0A 0D 0A 2E 65 78 69 74 63 6B 09 6C 64 20 p.....exitck.ld
0001C0: 63 2C 33 0D 0A 09 70 6F 70 20 68 6C 09 09 09 09 c,3...pop hl....
0001D0: 3B 43 41 4C 4C 69 6E 67 20 61 64 64 72 65 73 73 ;CALLing address
0001E0: 0D 0A 09 70 6F 70 20 68 6C 09 09 09 09 3B 48 4C ...pop hl....;HL
0001F0: 20 73 61 76 65 64 0D 0A 09 6A 70 20 65 72 72 6F saved...jp erro
Size : 512 (Real : 512)
000000: 0D 0A 09 20 6C 64 20 61 2C 28 68 6C 29 09 09 09 ... ld a,(hl)...
000010: 3B 57 61 73 20 69 74 20 61 20 68 65 61 64 65 72 ;Was it a header
000020: 3F 0D 0A 09 20 6C 64 20 65 2C 28 69 79 2B 37 29 ?... ld e,(iy+7)
000030: 3A 20 6C 64 20 64 2C 28 69 79 2B 38 29 09 3B 44 : ld d,(iy+8).;D
000040: 45 20 3D 20 66 69 6C 65 20 62 75 66 66 65 72 20 E = file buffer
000050: 61 64 64 72 65 73 73 0D 0A 09 20 70 6F 70 20 68 address... pop h
000060: 6C 0D 0A 09 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C l...or a: jr nz,
000070: 77 61 73 68 65 64 09 09 3B 49 66 20 73 6F 2C 20 washed..;If so,
000080: 6F 6B 2C 20 67 65 74 20 62 6C 6F 63 6B 20 61 64 ok, get block ad
000090: 64 72 65 73 73 0D 0A 09 70 75 73 68 20 68 6C 0D dress...push hl.
0000A0: 0A 09 73 63 66 3A 20 63 63 66 3A 20 73 62 63 20 ..scf: ccf: sbc
0000B0: 68 6C 2C 64 65 0D 0A 09 6C 64 20 61 2C 26 43 3A hl,de...ld a,&C:
0000C0: 20 63 70 20 68 09 09 09 3B 33 6B 20 61 62 6F 76 cp h...;3k abov
0000D0: 65 20 66 62 61 64 64 72 20 79 65 74 3F 0D 0A 09 e fbaddr yet?...
0000E0: 70 6F 70 20 68 6C 0D 0A 09 6A 72 20 6E 7A 2C 6E pop hl...jr nz,n
0000F0: 6F 76 65 72 09 09 09 3B 4E 6F 2C 20 77 65 27 72 over...;No, we'r
000100: 65 20 6F 6B 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B e ok...ld l,(iy+
000110: 37 29 3A 20 6C 64 20 68 2C 28 69 79 2B 38 29 0D 7): ld h,(iy+8).
000120: 0A 09 6C 64 20 64 65 2C 31 30 32 34 3A 20 61 64 ..ld de,1024: ad
000130: 64 20 68 6C 2C 64 65 09 09 3B 6F 74 68 65 72 77 d hl,de..;otherw
000140: 69 73 65 20 72 65 73 65 74 20 74 6F 20 31 6B 20 ise reset to 1k
000150: 61 62 6F 76 65 0D 0A 09 6A 72 20 6E 6F 76 65 72 above...jr nover
000160: 0D 0A 2E 77 61 73 68 65 64 09 70 75 73 68 20 69 ...washed.push i
000170: 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 y: pop hl...ld d
000180: 65 2C 31 31 36 2B 31 32 38 3A 20 61 64 64 20 68 e,116+128: add h
000190: 6C 2C 64 65 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 l,de...ld (hl),0
0001A0: 09 09 09 3B 4E 6F 74 20 61 20 68 65 61 64 65 72 ...;Not a header
0001B0: 20 61 6E 79 20 6D 6F 72 65 21 0D 0A 09 6C 64 20 any more!...ld
0001C0: 6C 2C 28 69 79 2B 34 33 29 3A 20 6C 64 20 68 2C l,(iy+43): ld h,
0001D0: 28 69 79 2B 34 34 29 0D 0A 2E 6E 6F 76 65 72 09 (iy+44)...nover.
0001E0: 6C 64 20 28 69 79 2B 34 33 29 2C 6C 3A 20 6C 64 ld (iy+43),l: ld
0001F0: 20 28 69 79 2B 34 34 29 2C 68 09 3B 48 4C 20 3D (iy+44),h.;HL =
Size : 512 (Real : 512)
000000: 72 0D 0A 0D 0A 2E 69 6E 73 65 72 74 09 63 70 20 r.....insert.cp
000010: 22 2E 22 3A 20 6A 72 20 6E 7A 2C 6E 6F 74 64 6F ".": jr nz,notdo
000020: 74 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 36 t.....ld a,(iy+6
000030: 38 29 09 09 09 3B 41 20 3D 20 63 75 72 72 65 6E 8)...;A = curren
000040: 74 20 63 68 61 72 61 63 74 65 72 20 70 6F 73 69 t character posi
000050: 74 69 6F 6E 0D 0A 09 63 70 20 30 3A 20 6A 70 20 tion...cp 0: jp
000060: 7A 2C 65 78 69 74 63 62 0D 0A 0D 0A 2E 64 74 6C z,exitcb.....dtl
000070: 6F 6F 70 09 63 70 20 38 3A 20 6A 72 20 7A 2C 65 oop.cp 8: jr z,e
000080: 78 64 74 6C 3A 20 6A 70 20 6E 63 2C 65 78 69 74 xdtl: jp nc,exit
000090: 63 62 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 2B cb.....ld a,(iy+
0000A0: 36 39 29 3A 20 6C 64 20 28 68 6C 29 2C 61 3A 20 69): ld (hl),a:
0000B0: 69 6E 63 20 68 6C 09 3B 41 20 3D 20 66 69 6C 6C inc hl.;A = fill
0000C0: 65 72 20 63 68 61 72 61 63 74 65 72 0D 0A 0D 0A er character....
0000D0: 09 6C 64 20 61 2C 28 69 79 2B 36 38 29 3A 20 69 .ld a,(iy+68): i
0000E0: 6E 63 20 61 3A 20 6C 64 20 28 69 79 2B 36 38 29 nc a: ld (iy+68)
0000F0: 2C 61 0D 0A 09 6A 72 20 64 74 6C 6F 6F 70 0D 0A ,a...jr dtloop..
000100: 0D 0A 2E 65 78 64 74 6C 09 6C 64 20 61 2C 22 20 ...exdtl.ld a,"
000110: 22 3A 20 6C 64 20 28 69 79 2B 36 39 29 2C 61 3A ": ld (iy+69),a:
000120: 20 72 65 74 0D 0A 0D 0A 2E 6E 6F 74 64 6F 74 09 ret.....notdot.
000130: 63 70 20 22 20 22 3A 20 72 65 74 20 7A 0D 0A 09 cp " ": ret z...
000140: 63 70 20 22 2A 22 3A 20 6A 72 20 6E 7A 2C 6E 6F cp "*": jr nz,no
000150: 74 73 74 61 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 tsta.....ld a,(i
000160: 79 2B 36 39 29 3A 20 63 70 20 22 3F 22 3A 20 6A y+69): cp "?": j
000170: 70 20 7A 2C 65 78 69 74 63 62 0D 0A 09 6C 64 20 p z,exitcb...ld
000180: 61 2C 22 3F 22 3A 20 6C 64 20 28 69 79 2B 36 39 a,"?": ld (iy+69
000190: 29 2C 61 3A 20 6A 72 20 70 75 74 63 68 72 0D 0A ),a: jr putchr..
0001A0: 0D 0A 2E 6E 6F 74 73 74 61 09 6C 64 20 63 2C 61 ...notsta.ld c,a
0001B0: 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 36 39 29 3A ...ld a,(iy+69):
0001C0: 20 63 70 20 22 3F 22 3A 20 6C 64 20 61 2C 63 3A cp "?": ld a,c:
0001D0: 20 6A 70 20 7A 2C 65 78 69 74 63 62 0D 0A 2E 70 jp z,exitcb...p
0001E0: 75 74 63 68 72 09 6C 64 20 28 68 6C 29 2C 61 3A utchr.ld (hl),a:
0001F0: 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 61 2C 28 inc hl...ld a,(
Size : 512 (Real : 512)
000000: 3E 20 70 61 72 61 6D 65 74 65 72 20 62 6C 6F 63 > parameter bloc
000010: 6B 0D 0A 09 6C 64 20 68 6C 2C 30 0D 0A 09 6C 64 k...ld hl,0...ld
000020: 20 28 69 79 2B 38 34 29 2C 6C 3A 20 6C 64 20 28 (iy+84),l: ld (
000030: 69 79 2B 38 35 29 2C 68 09 3B 30 20 62 79 74 65 iy+85),h.;0 byte
000040: 73 20 72 65 61 64 20 69 6E 0D 0A 09 6A 70 20 73 s read in...jp s
000050: 74 73 62 6C 6B 0D 0A 0D 0A 2E 65 6F 66 75 74 09 tsblk.....eofut.
000060: 63 61 6C 6C 20 26 42 43 37 41 0D 0A 09 6C 64 20 call &BC7A...ld
000070: 61 2C 34 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 a,4: call sendbt
000080: 0D 0A 09 6C 64 20 64 65 2C 31 30 30 3A 20 63 61 ...ld de,100: ca
000090: 6C 6C 20 77 61 69 74 62 74 0D 0A 09 63 70 20 36 ll waitbt...cp 6
0000A0: 3A 20 6A 72 20 6E 7A 2C 65 6F 66 75 74 0D 0A 0D : jr nz,eofut...
0000B0: 0A 09 6C 64 20 61 2C 28 69 79 2B 31 30 37 29 09 ..ld a,(iy+107).
0000C0: 09 09 3B 53 70 65 63 69 66 69 65 64 20 70 72 6F ..;Specified pro
0000D0: 74 6F 63 6F 6C 0D 0A 09 63 70 20 32 3A 20 6A 72 tocol...cp 2: jr
0000E0: 20 6E 7A 2C 62 79 65 62 79 65 0D 0A 0D 0A 09 6A nz,byebye.....j
0000F0: 70 20 67 6E 78 74 79 75 0D 0A 0D 0A 2E 65 78 75 p gnxtyu.....exu
000100: 70 6C 09 6C 64 20 64 65 2C 35 30 3A 20 63 61 6C pl.ld de,50: cal
000110: 6C 20 77 61 69 74 62 74 09 09 3B 59 4D 6F 64 65 l waitbt..;YMode
000120: 6D 20 62 6C 61 6E 6B 20 62 6C 6F 63 6B 21 0D 0A m blank block!..
000130: 09 63 70 20 22 43 22 3A 20 6A 72 20 7A 2C 67 65 .cp "C": jr z,ge
000140: 75 66 63 0D 0A 09 63 70 20 26 31 35 3A 20 6A 72 ufc...cp &15: jr
000150: 20 7A 2C 67 65 75 66 63 0D 0A 09 63 61 6C 6C 20 z,geufc...call
000160: 63 68 6B 63 6E 75 0D 0A 09 6A 72 20 65 78 75 70 chkcnu...jr exup
000170: 6C 0D 0A 0D 0A 2E 67 65 75 66 63 09 6C 64 20 28 l.....geufc.ld (
000180: 69 79 2B 31 30 34 29 2C 61 09 09 09 3B 4E 41 4B iy+104),a...;NAK
000190: 2F 43 20 73 74 6F 72 65 0D 0A 0D 0A 2E 72 73 78 /C store.....rsx
0001A0: 62 09 6C 64 20 61 2C 31 3A 20 63 61 6C 6C 20 73 b.ld a,1: call s
0001B0: 65 6E 64 62 74 0D 0A 09 78 6F 72 20 61 3A 20 63 endbt...xor a: c
0001C0: 61 6C 6C 20 73 65 6E 64 62 74 0D 0A 09 78 6F 72 all sendbt...xor
0001D0: 20 61 3A 20 63 70 6C 3A 20 63 61 6C 6C 20 73 65 a: cpl: call se
0001E0: 6E 64 62 74 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 30 ndbt.....ld hl,0
0001F0: 3A 20 6C 64 20 63 2C 31 32 38 0D 0A 2E 6E 75 6C : ld c,128...nul
Size : 512 (Real : 512)
000000: 69 79 2B 36 38 29 3A 20 69 6E 63 20 61 3A 20 6C iy+68): inc a: l
000010: 64 20 28 69 79 2B 36 38 29 2C 61 3A 20 72 65 74 d (iy+68),a: ret
000020: 0D 0A 0D 0A 2E 65 78 69 74 63 62 09 6C 64 20 63 .....exitcb.ld c
000030: 2C 33 0D 0A 09 70 6F 70 20 68 6C 0D 0A 2E 65 78 ,3...pop hl...ex
000040: 69 74 70 31 09 70 6F 70 20 68 6C 0D 0A 09 6A 70 itp1.pop hl...jp
000050: 20 65 72 72 6F 72 0D 0A 0D 0A 09 3B 43 68 65 63 error.....;Chec
000060: 6B 20 66 6F 72 20 45 53 43 2F 43 54 52 4C 2D 58 k for ESC/CTRL-X
000070: 0D 0A 0D 0A 2E 63 68 6B 63 6E 75 09 63 61 6C 6C .....chkcnu.call
000080: 20 26 42 42 31 42 3A 20 72 65 74 20 6E 63 09 09 &BB1B: ret nc..
000090: 3B 6B 65 79 20 70 72 65 73 73 65 64 3F 0D 0A 09 ;key pressed?...
0000A0: 63 70 20 26 31 38 3A 20 6A 72 20 7A 2C 63 6E 75 cp &18: jr z,cnu
0000B0: 79 65 73 09 09 3B 43 54 52 4C 2D 58 3F 0D 0A 09 yes..;CTRL-X?...
0000C0: 63 70 20 26 46 43 3A 20 72 65 74 20 6E 7A 09 09 cp &FC: ret nz..
0000D0: 09 3B 45 53 43 3F 0D 0A 2E 63 6E 75 79 65 73 09 .;ESC?...cnuyes.
0000E0: 70 6F 70 20 68 6C 09 09 09 09 3B 72 65 6D 6F 76 pop hl....;remov
0000F0: 65 20 43 41 4C 4C 0D 0A 0D 0A 09 63 61 6C 6C 20 e CALL.....call
000100: 73 38 63 61 6E 73 0D 0A 0D 0A 09 6C 64 20 61 2C s8cans.....ld a,
000110: 28 69 79 2B 31 30 37 29 0D 0A 09 6C 64 20 68 6C (iy+107)...ld hl
000120: 2C 79 6D 74 65 78 74 0D 0A 09 63 70 20 32 3A 20 ,ymtext...cp 2:
000130: 6A 72 20 7A 2C 67 6F 74 6D 73 75 09 09 3B 59 4D jr z,gotmsu..;YM
000140: 6F 64 65 6D 3F 0D 0A 09 6C 64 20 68 6C 2C 6F 6E odem?...ld hl,on
000150: 65 74 78 74 0D 0A 09 63 70 20 31 3A 20 6A 72 20 etxt...cp 1: jr
000160: 7A 2C 67 6F 74 6D 73 75 09 09 3B 58 4D 6F 64 65 z,gotmsu..;XMode
000170: 6D 2D 31 6B 3F 0D 0A 09 6C 64 20 68 6C 2C 63 68 m-1k?...ld hl,ch
000180: 6B 74 78 74 0D 0A 0D 0A 2E 67 6F 74 6D 73 75 09 ktxt.....gotmsu.
000190: 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A 09 6C 64 call string...ld
0001A0: 20 68 6C 2C 61 62 72 74 78 74 3A 20 63 61 6C 6C hl,abrtxt: call
0001B0: 20 73 74 72 69 6E 67 0D 0A 09 6C 64 20 68 6C 2C string...ld hl,
0001C0: 6C 61 73 74 63 72 3A 20 63 61 6C 6C 20 73 74 72 lastcr: call str
0001D0: 69 6E 67 0D 0A 09 6C 64 20 61 2C 31 30 3A 20 63 ing...ld a,10: c
0001E0: 61 6C 6C 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C all &BB5A...call
0001F0: 20 26 42 42 34 38 3A 20 63 61 6C 6C 20 26 42 42 &BB48: call &BB
Size : 512 (Real : 512)
000000: 29 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 ): call &BB5A...
000010: 69 6E 63 20 68 6C 3A 20 64 6A 6E 7A 20 6C 66 6E inc hl: djnz lfn
000020: 70 72 74 09 3B 70 72 69 6E 74 20 66 69 6C 65 6E prt.;print filen
000030: 61 6D 65 0D 0A 0D 0A 09 6C 64 20 61 2C 31 33 3A ame.....ld a,13:
000040: 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 6C 64 call &BB5A...ld
000050: 20 61 2C 31 30 3A 20 63 61 6C 6C 20 26 42 42 35 a,10: call &BB5
000060: 41 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 0D A: call &BB5A...
000070: 0A 09 63 61 6C 6C 20 26 42 42 36 39 0D 0A 09 6C ..call &BB69...l
000080: 64 20 61 2C 64 3A 20 73 75 62 20 68 0D 0A 09 69 d a,d: sub h...i
000090: 6E 63 20 61 3A 20 69 6E 63 20 61 3A 20 69 6E 63 nc a: inc a: inc
0000A0: 20 61 0D 0A 09 6C 64 20 62 2C 30 0D 0A 2E 66 63 a...ld b,0...fc
0000B0: 77 5F 6C 70 09 69 6E 63 20 62 3A 20 73 75 62 20 w_lp.inc b: sub
0000C0: 32 35 3A 20 6A 72 20 6E 63 2C 66 63 77 5F 6C 70 25: jr nc,fcw_lp
0000D0: 0D 0A 09 64 65 63 20 62 0D 0A 09 6C 64 20 61 2C ...dec b...ld a,
0000E0: 62 3A 20 6C 64 20 28 69 79 2B 36 38 29 2C 61 09 b: ld (iy+68),a.
0000F0: 09 3B 63 63 68 61 72 20 20 3D 20 6E 75 6D 62 65 .;cchar = numbe
000100: 72 20 6F 66 20 63 6F 6C 75 6D 6E 73 0D 0A 0D 0A r of columns....
000110: 09 6C 64 20 61 2C 31 3A 20 6C 64 20 28 69 79 2B .ld a,1: ld (iy+
000120: 36 39 29 2C 61 09 09 3B 73 74 6D 6F 64 65 20 3D 69),a..;stmode =
000130: 20 63 75 72 72 65 6E 74 20 63 6F 6C 75 6D 6E 0D current column.
000140: 0A 09 6C 64 20 61 2C 30 3A 20 6C 64 20 28 69 79 ..ld a,0: ld (iy
000150: 2B 34 32 29 2C 61 09 09 3B 6E 70 61 72 61 6D 20 +42),a..;nparam
000160: 3D 20 6E 75 6D 62 65 72 20 6F 66 20 64 69 72 65 = number of dire
000170: 63 74 6F 72 79 20 62 6C 6F 63 6B 73 0D 0A 09 70 ctory blocks...p
000180: 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A ush iy: pop hl..
000190: 09 70 75 73 68 20 64 65 3A 20 6C 64 20 64 65 2C .push de: ld de,
0001A0: 37 32 0D 0A 09 61 64 64 20 68 6C 2C 64 65 3A 20 72...add hl,de:
0001B0: 70 6F 70 20 64 65 3A 20 6C 64 20 28 68 6C 29 2C pop de: ld (hl),
0001C0: 61 09 3B 66 74 73 65 6E 64 20 3D 20 6E 75 6D 62 a.;ftsend = numb
0001D0: 65 72 20 6F 66 20 64 69 72 65 63 74 6F 72 79 20 er of directory
0001E0: 62 6C 6F 63 6B 73 20 64 6F 6E 65 0D 0A 0D 0A 2E blocks done.....
0001F0: 67 31 32 38 6C 70 09 69 6E 63 20 28 68 6C 29 0D g128lp.inc (hl).
Size : 512 (Real : 512)
000000: 6F 70 20 68 6C 09 09 09 09 3B 44 45 20 3D 20 66 op hl....;DE = f
000010: 69 6C 65 6E 61 6D 65 0D 0A 09 6C 64 20 62 2C 31 ilename...ld b,1
000020: 31 0D 0A 2E 63 66 6C 6F 6F 70 09 6C 64 20 63 2C 1...cfloop.ld c,
000030: 28 68 6C 29 3A 20 78 6F 72 20 61 3A 20 63 70 20 (hl): xor a: cp
000040: 63 3A 20 6A 72 20 7A 2C 65 78 74 66 6E 0D 0A 09 c: jr z,extfn...
000050: 6C 64 20 61 2C 28 64 65 29 3A 20 63 70 20 22 3F ld a,(de): cp "?
000060: 22 3A 20 6A 72 20 7A 2C 77 63 61 72 64 0D 0A 09 ": jr z,wcard...
000070: 72 65 73 20 37 2C 63 3A 20 63 70 20 63 3A 20 6A res 7,c: cp c: j
000080: 72 20 6E 7A 2C 65 78 74 66 6E 0D 0A 2E 77 63 61 r nz,extfn...wca
000090: 72 64 09 69 6E 63 20 68 6C 3A 20 69 6E 63 20 64 rd.inc hl: inc d
0000A0: 65 0D 0A 09 64 6A 6E 7A 20 63 66 6C 6F 6F 70 0D e...djnz cfloop.
0000B0: 0A 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 75 73 68 ....pop hl: push
0000C0: 20 68 6C 0D 0A 09 69 6E 63 20 68 6C 0D 0A 09 6C hl...inc hl...l
0000D0: 64 20 65 2C 28 69 79 2B 37 30 29 3A 20 6C 64 20 d e,(iy+70): ld
0000E0: 64 2C 28 69 79 2B 37 31 29 09 3B 6E 61 6D 65 20 d,(iy+71).;name
0000F0: 61 64 64 72 65 73 73 0D 0A 09 6C 64 20 62 63 2C address...ld bc,
000100: 31 33 0D 0A 09 6C 64 69 72 0D 0A 09 64 65 63 20 13...ldir...dec
000110: 68 6C 3A 20 64 65 63 20 68 6C 3A 20 64 65 63 20 hl: dec hl: dec
000120: 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 63 3A 20 69 hl: ld (hl),c: i
000130: 6E 63 20 68 6C 0D 0A 09 6C 64 20 28 69 79 2B 37 nc hl...ld (iy+7
000140: 30 29 2C 65 3A 20 6C 64 20 28 69 79 2B 37 31 29 0),e: ld (iy+71)
000150: 2C 64 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 37 32 ,d...ld a,(iy+72
000160: 29 3A 20 69 6E 63 20 61 3A 20 6C 64 20 28 69 79 ): inc a: ld (iy
000170: 2B 37 32 29 2C 61 09 3B 66 69 6C 65 73 20 74 6F +72),a.;files to
000180: 20 73 65 6E 64 0D 0A 09 6C 64 20 63 2C 35 3A 20 send...ld c,5:
000190: 63 70 20 36 34 3A 20 6A 70 20 7A 2C 65 78 69 74 cp 64: jp z,exit
0001A0: 70 31 0D 0A 09 6C 64 20 63 2C 28 68 6C 29 3A 20 p1...ld c,(hl):
0001B0: 69 6E 63 20 68 6C 3A 20 6C 64 20 62 2C 28 68 6C inc hl: ld b,(hl
0001C0: 29 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 33 29 )...ld l,(iy+73)
0001D0: 3A 20 6C 64 20 68 2C 28 69 79 2B 37 34 29 3A 20 : ld h,(iy+74):
0001E0: 61 64 64 20 68 6C 2C 62 63 0D 0A 09 6C 64 20 28 add hl,bc...ld (
0001F0: 69 79 2B 37 33 29 2C 6C 3A 20 6C 64 20 28 69 79 iy+73),l: ld (iy
Size : 512 (Real : 512)
000000: 0A 09 70 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 ..push hl: call
000010: 6C 64 72 31 32 38 3A 20 70 6F 70 20 68 6C 0D 0A ldr128: pop hl..
000020: 09 6C 64 20 61 2C 28 69 79 2B 34 32 29 3A 20 63 .ld a,(iy+42): c
000030: 70 20 28 68 6C 29 0D 0A 09 6A 72 20 6E 7A 2C 67 p (hl)...jr nz,g
000040: 31 32 38 6C 70 0D 0A 0D 0A 09 6C 64 20 61 2C 28 128lp.....ld a,(
000050: 69 79 2B 36 39 29 3A 20 63 70 20 31 0D 0A 09 6C iy+69): cp 1...l
000060: 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 6E 7A 2C d a,10: call nz,
000070: 26 42 42 35 41 0D 0A 09 63 61 6C 6C 20 26 42 42 &BB5A...call &BB
000080: 35 41 0D 0A 09 6C 64 20 61 2C 31 33 3A 20 63 61 5A...ld a,13: ca
000090: 6C 6C 20 26 42 42 35 41 0D 0A 0D 0A 09 63 61 6C ll &BB5A.....cal
0000A0: 6C 20 26 42 43 37 41 0D 0A 09 72 65 74 0D 0A 0D l &BC7A...ret...
0000B0: 0A 2E 6C 64 72 31 32 38 09 63 61 6C 6C 20 67 64 ..ldr128.call gd
0000C0: 6C 62 72 6E 0D 0A 09 63 61 6C 6C 20 67 64 6C 62 lbrn...call gdlb
0000D0: 72 6E 0D 0A 09 63 61 6C 6C 20 67 64 6C 62 72 6E rn...call gdlbrn
0000E0: 0D 0A 09 63 61 6C 6C 20 67 64 6C 62 72 6E 0D 0A ...call gdlbrn..
0000F0: 09 72 65 74 0D 0A 0D 0A 2E 67 64 6C 62 72 6E 09 .ret.....gdlbrn.
000100: 63 61 6C 6C 20 26 42 43 38 30 0D 0A 09 6C 64 20 call &BC80...ld
000110: 62 2C 33 31 0D 0A 09 63 70 20 26 46 46 3A 20 6A b,31...cp &FF: j
000120: 70 20 7A 2C 73 6B 69 70 30 0D 0A 09 63 70 20 26 p z,skip0...cp &
000130: 46 45 3A 20 6A 70 20 7A 2C 73 6B 69 70 30 0D 0A FE: jp z,skip0..
000140: 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 32 29 3A ...ld a,(iy+42):
000150: 20 6F 72 20 61 09 3B 68 61 73 20 64 69 72 65 63 or a.;has direc
000160: 74 6F 72 79 20 62 6C 6F 63 6B 20 73 69 7A 65 20 tory block size
000170: 62 65 65 6E 20 66 6F 75 6E 64 20 79 65 74 3F 0D been found yet?.
000180: 0A 09 6A 72 20 6E 7A 2C 6D 70 66 6E 70 74 09 09 ..jr nz,mpfnpt..
000190: 3B 69 66 20 73 6F 2C 20 74 68 65 6E 20 64 6F 6E ;if so, then don
0001A0: 27 74 20 62 6F 74 68 65 72 20 66 69 6E 64 69 6E 't bother findin
0001B0: 67 20 69 74 21 0D 0A 0D 0A 09 6C 64 20 62 2C 31 g it!.....ld b,1
0001C0: 33 0D 0A 2E 73 6B 69 70 66 6E 09 70 75 73 68 20 3...skipfn.push
0001D0: 62 63 3A 20 63 61 6C 6C 20 26 42 43 38 30 3A 20 bc: call &BC80:
0001E0: 70 6F 70 20 62 63 0D 0A 09 64 6A 6E 7A 20 73 6B pop bc...djnz sk
0001F0: 69 70 66 6E 09 09 3B 73 6B 69 70 20 28 62 6C 61 ipfn..;skip (bla
Size : 512 (Real : 512)
000000: 2B 37 34 29 2C 68 09 09 3B 6B 20 74 6F 20 73 65 +74),h..;k to se
000010: 6E 64 0D 0A 0D 0A 2E 65 78 74 66 6E 09 70 6F 70 nd.....extfn.pop
000020: 20 68 6C 0D 0A 09 6C 64 20 64 65 2C 31 34 3A 20 hl...ld de,14:
000030: 61 64 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 20 28 add hl,de...ld (
000040: 69 79 2B 34 33 29 2C 6C 3A 20 6C 64 20 28 69 79 iy+43),l: ld (iy
000050: 2B 34 34 29 2C 68 09 09 3B 70 62 6C 6F 63 6B 0D +44),h..;pblock.
000060: 0A 09 6A 72 20 65 78 63 6D 6C 0D 0A 0D 0A 2E 65 ..jr excml.....e
000070: 78 73 72 6C 09 69 6E 63 20 69 78 3A 20 69 6E 63 xsrl.inc ix: inc
000080: 20 69 78 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 ix...ld a,(iy+4
000090: 32 29 3A 20 64 65 63 20 61 3A 20 6C 64 20 28 69 2): dec a: ld (i
0000A0: 79 2B 34 32 29 2C 61 3A 20 6A 70 20 6E 7A 2C 6D y+42),a: jp nz,m
0000B0: 78 6C 6F 6F 70 09 3B 6E 75 6D 62 65 72 20 6F 66 xloop.;number of
0000C0: 20 70 61 72 61 6D 65 74 65 72 73 0D 0A 09 72 65 parameters...re
0000D0: 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 55 70 64 61 74 t.....;>>> Updat
0000E0: 65 20 43 52 43 20 69 6E 20 48 4C 20 77 69 74 68 e CRC in HL with
0000F0: 20 69 6E 70 75 74 20 69 6E 20 45 0D 0A 0D 0A 2E input in E.....
000100: 63 72 63 20 20 20 20 6C 64 20 62 2C 38 09 09 09 crc ld b,8...
000110: 09 3B 73 68 69 66 74 20 38 20 74 69 6D 65 73 0D .;shift 8 times.
000120: 0A 2E 75 70 64 6C 70 20 20 72 6C 63 20 65 09 09 ..updlp rlc e..
000130: 09 09 3B 73 68 69 66 74 20 69 6E 70 75 74 0D 0A ..;shift input..
000140: 09 61 64 63 20 68 6C 2C 68 6C 09 09 09 3B 73 68 .adc hl,hl...;sh
000150: 69 66 74 20 63 72 63 0D 0A 09 6A 72 20 6E 63 2C ift crc...jr nc,
000160: 73 6B 69 70 69 74 09 09 09 3B 6A 75 6D 70 20 69 skipit...;jump i
000170: 66 20 6E 6F 20 63 61 72 72 79 0D 0A 09 6C 64 20 f no carry...ld
000180: 61 2C 68 3A 20 78 6F 72 20 26 31 30 3A 20 6C 64 a,h: xor &10: ld
000190: 20 68 2C 61 09 09 3B 78 6F 72 20 77 69 74 68 20 h,a..;xor with
0001A0: 26 31 30 32 31 0D 0A 09 6C 64 20 61 2C 6C 3A 20 &1021...ld a,l:
0001B0: 78 6F 72 20 26 32 31 3A 20 6C 64 20 6C 2C 61 0D xor &21: ld l,a.
0001C0: 0A 2E 73 6B 69 70 69 74 20 64 6A 6E 7A 20 75 70 ..skipit djnz up
0001D0: 64 6C 70 09 09 09 3B 64 6F 6E 65 3F 0D 0A 09 72 dlp...;done?...r
0001E0: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 43 6F 6E 76 et.....;>>> Conv
0001F0: 65 72 74 20 66 69 6C 65 6E 61 6D 65 20 69 66 20 ert filename if
Size : 512 (Real : 512)
000000: 6E 6B 29 20 66 69 6C 65 6E 61 6D 65 20 61 6E 64 nk) filename and
000010: 20 69 6E 64 65 78 0D 0A 09 63 61 6C 6C 20 26 42 index...call &B
000020: 43 38 30 3A 20 6C 64 20 28 69 79 2B 34 32 29 2C C80: ld (iy+42),
000030: 61 0D 0A 09 6C 64 20 62 2C 31 37 3A 20 6A 70 20 a...ld b,17: jp
000040: 73 6B 69 70 30 0D 0A 0D 0A 2E 6D 70 66 6E 70 74 skip0.....mpfnpt
000050: 09 6C 64 20 62 2C 38 0D 0A 2E 6D 70 66 6E 6C 70 .ld b,8...mpfnlp
000060: 09 70 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 26 .push bc: call &
000070: 42 43 38 30 3A 20 70 6F 70 20 62 63 0D 0A 09 63 BC80: pop bc...c
000080: 61 6C 6C 20 26 42 42 35 41 3A 20 64 6A 6E 7A 20 all &BB5A: djnz
000090: 6D 70 66 6E 6C 70 09 3B 70 72 69 6E 74 20 66 69 mpfnlp.;print fi
0000A0: 72 73 74 20 70 61 72 74 20 6F 66 20 66 69 6C 65 rst part of file
0000B0: 6E 61 6D 65 0D 0A 0D 0A 09 6C 64 20 61 2C 22 2E name.....ld a,".
0000C0: 22 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 ": call &BB5A...
0000D0: 63 61 6C 6C 20 26 42 43 38 30 3A 20 63 61 6C 6C call &BC80: call
0000E0: 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C 20 26 42 &BB5A...call &B
0000F0: 43 38 30 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D C80: call &BB5A.
000100: 0A 09 63 61 6C 6C 20 26 42 43 38 30 3A 20 63 61 ..call &BC80: ca
000110: 6C 6C 20 26 42 42 35 41 09 3B 70 72 69 6E 74 20 ll &BB5A.;print
000120: 65 78 74 65 6E 73 69 6F 6E 0D 0A 0D 0A 09 63 61 extension.....ca
000130: 6C 6C 20 26 42 43 38 30 3A 20 63 61 6C 6C 20 26 ll &BC80: call &
000140: 42 43 38 30 09 3B 73 6B 69 70 20 22 69 6E 64 65 BC80.;skip "inde
000150: 78 22 0D 0A 0D 0A 09 6C 64 20 61 2C 22 20 22 3A x".....ld a," ":
000160: 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 63 61 call &BB5A...ca
000170: 6C 6C 20 26 42 43 38 30 3A 20 6C 64 20 6C 2C 61 ll &BC80: ld l,a
000180: 3A 20 70 75 73 68 20 68 6C 0D 0A 09 63 61 6C 6C : push hl...call
000190: 20 26 42 43 38 30 3A 20 70 6F 70 20 68 6C 3A 20 &BC80: pop hl:
0001A0: 6C 64 20 68 2C 61 0D 0A 0D 0A 09 6C 64 20 62 2C ld h,a.....ld b,
0001B0: 33 0D 0A 2E 63 74 6F 6B 09 78 6F 72 20 61 3A 20 3...ctok.xor a:
0001C0: 72 72 20 68 3A 20 72 72 20 6C 3A 20 64 6A 6E 7A rr h: rr l: djnz
0001D0: 20 63 74 6F 6B 0D 0A 0D 0A 09 6C 64 20 61 2C 6C ctok.....ld a,l
0001E0: 3A 20 63 61 6C 6C 20 70 72 5F 61 73 70 0D 0A 09 : call pr_asp...
0001F0: 6C 64 20 61 2C 22 6B 22 3A 20 63 61 6C 6C 20 26 ld a,"k": call &
Size : 512 (Real : 512)
000000: 73 75 62 2D 64 69 72 65 63 74 6F 72 69 65 73 20 sub-directories
000010: 69 6E 63 6C 75 64 65 64 0D 0A 0D 0A 2E 63 6F 6E included.....con
000020: 76 09 6C 64 20 62 2C 30 0D 0A 09 65 78 20 64 65 v.ld b,0...ex de
000030: 2C 68 6C 0D 0A 2E 63 6F 6C 6F 6F 70 09 6C 64 20 ,hl...coloop.ld
000040: 61 2C 28 68 6C 29 0D 0A 09 63 70 20 22 2F 22 3A a,(hl)...cp "/":
000050: 20 6A 72 20 7A 2C 65 78 63 6F 6E 76 0D 0A 09 63 jr z,exconv...c
000060: 70 20 22 5C 22 3A 20 6A 72 20 7A 2C 65 78 63 6F p "\": jr z,exco
000070: 6E 76 0D 0A 09 64 65 63 20 68 6C 0D 0A 09 69 6E nv...dec hl...in
000080: 63 20 62 0D 0A 09 6C 64 20 61 2C 31 32 3A 20 63 c b...ld a,12: c
000090: 70 20 62 0D 0A 09 6A 72 20 6E 7A 2C 63 6F 6C 6F p b...jr nz,colo
0000A0: 6F 70 0D 0A 2E 65 78 63 6F 6E 76 09 69 6E 63 20 op...exconv.inc
0000B0: 68 6C 0D 0A 09 78 6F 72 20 61 0D 0A 09 63 70 20 hl...xor a...cp
0000C0: 62 0D 0A 09 72 65 74 20 6E 7A 0D 0A 0D 0A 09 70 b...ret nz.....p
0000D0: 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 09 09 ush iy: pop hl..
0000E0: 09 3B 65 6C 73 65 20 61 75 74 6F 6D 61 74 69 63 .;else automatic
0000F0: 20 22 44 4F 57 4E 4C 4F 41 44 22 0D 0A 09 70 75 "DOWNLOAD"...pu
000100: 73 68 20 64 65 3A 20 6C 64 20 64 65 2C 34 35 3A sh de: ld de,45:
000110: 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 70 6F 70 add hl,de...pop
000120: 20 64 65 3A 20 6C 64 20 62 2C 31 30 3A 20 72 65 de: ld b,10: re
000130: 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 53 65 6E 64 20 t.....;>>> Send
000140: 38 2A 43 41 4E 2C 20 38 2A 62 61 63 6B 73 70 61 8*CAN, 8*backspa
000150: 63 65 0D 0A 0D 0A 2E 73 38 63 61 6E 73 09 6C 64 ce.....s8cans.ld
000160: 20 62 2C 38 3A 20 6C 64 20 61 2C 26 31 38 0D 0A b,8: ld a,&18..
000170: 2E 63 61 6E 5F 6C 70 09 70 75 73 68 20 62 63 3A .can_lp.push bc:
000180: 20 63 61 6C 6C 20 73 65 6E 64 62 74 3A 20 70 6F call sendbt: po
000190: 70 20 62 63 0D 0A 09 64 6A 6E 7A 20 63 61 6E 5F p bc...djnz can_
0001A0: 6C 70 0D 0A 0D 0A 09 6C 64 20 62 2C 38 3A 20 6C lp.....ld b,8: l
0001B0: 64 20 61 2C 38 0D 0A 2E 62 73 70 5F 6C 70 09 70 d a,8...bsp_lp.p
0001C0: 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 73 65 6E ush bc: call sen
0001D0: 64 62 74 3A 20 70 6F 70 20 62 63 0D 0A 09 64 6A dbt: pop bc...dj
0001E0: 6E 7A 20 62 73 70 5F 6C 70 0D 0A 09 72 65 74 1A nz bsp_lp...ret.
0001F0: 64 20 6C 2C 61 3A 20 6C 64 20 68 2C 30 3A 20 61 d l,a: ld h,0: a
Size : 512 (Real : 512)
000000: 72 72 65 6E 74 20 6E 61 6D 65 20 61 64 64 72 65 rrent name addre
000010: 73 73 0D 0A 0D 0A 09 78 6F 72 20 61 0D 0A 09 6C ss.....xor a...l
000020: 64 20 28 69 79 2B 37 32 29 2C 61 0D 0A 09 6C 64 d (iy+72),a...ld
000030: 20 28 69 79 2B 37 33 29 2C 61 3A 20 6C 64 20 28 (iy+73),a: ld (
000040: 69 79 2B 37 34 29 2C 61 09 3B 66 69 6C 65 73 2F iy+74),a.;files/
000050: 6B 20 74 6F 20 73 65 6E 64 0D 0A 0D 0A 09 70 75 k to send.....pu
000060: 73 68 20 69 78 0D 0A 09 6C 64 20 64 65 2C 31 30 sh ix...ld de,10
000070: 32 34 0D 0A 09 61 64 64 20 68 6C 2C 64 65 3A 20 24...add hl,de:
000080: 65 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 68 6C ex de,hl...ld hl
000090: 2C 26 42 42 35 41 0D 0A 09 6C 64 20 61 2C 28 68 ,&BB5A...ld a,(h
0000A0: 6C 29 3A 20 6C 64 20 28 68 6C 29 2C 32 30 31 0D l): ld (hl),201.
0000B0: 0A 09 70 75 73 68 20 68 6C 3A 20 70 75 73 68 20 ..push hl: push
0000C0: 61 66 0D 0A 09 63 61 6C 6C 20 26 42 43 39 42 09 af...call &BC9B.
0000D0: 09 09 3B 43 61 74 61 6C 6F 67 75 65 20 69 6E 20 ..;Catalogue in
0000E0: 66 62 75 66 66 2B 31 30 32 34 2C 20 73 63 72 65 fbuff+1024, scre
0000F0: 65 6E 20 6F 66 66 0D 0A 09 70 6F 70 20 61 66 3A en off...pop af:
000100: 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 28 68 6C pop hl...ld (hl
000110: 29 2C 61 0D 0A 09 70 6F 70 20 69 78 0D 0A 0D 0A ),a...pop ix....
000120: 2E 6D 78 6C 6F 6F 70 09 6C 64 20 64 65 2C 31 30 .mxloop.ld de,10
000130: 32 34 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 29 24...ld l,(iy+7)
000140: 3A 20 6C 64 20 68 2C 28 69 79 2B 38 29 09 3B 66 : ld h,(iy+8).;f
000150: 62 61 64 64 72 0D 0A 09 61 64 64 20 68 6C 2C 64 baddr...add hl,d
000160: 65 0D 0A 09 6C 64 20 28 69 79 2B 34 33 29 2C 6C e...ld (iy+43),l
000170: 3A 20 6C 64 20 28 69 79 2B 34 34 29 2C 68 09 3B : ld (iy+44),h.;
000180: 70 62 6C 6F 63 6B 0D 0A 0D 0A 09 6C 64 20 6C 2C pblock.....ld l,
000190: 28 69 78 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 (ix): ld h,(ix+1
0001A0: 29 0D 0A 09 6C 64 20 62 2C 28 68 6C 29 3A 20 69 )...ld b,(hl): i
0001B0: 6E 63 20 68 6C 0D 0A 09 6C 64 20 65 2C 28 68 6C nc hl...ld e,(hl
0001C0: 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 64 ): inc hl...ld d
0001D0: 2C 28 68 6C 29 0D 0A 0D 0A 09 78 6F 72 20 61 3A ,(hl).....xor a:
0001E0: 20 6C 64 20 28 69 79 2B 36 38 29 2C 61 09 09 3B ld (iy+68),a..;
0001F0: 63 68 61 72 20 70 6F 73 0D 0A 09 6C 64 20 61 2C char pos...ld a,
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 4C 49 42 52 41 52 59 2E ...;*** LIBRARY.
000010: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
000020: 20 4C 44 49 52 20 63 6F 6D 6D 61 6E 64 0D 0A 0D LDIR command...
000030: 0A 2E 6C 64 69 72 5F 69 09 63 61 6C 6C 20 62 75 ..ldir_i.call bu
000040: 66 66 5F 63 0D 0A 0D 0A 09 6C 64 20 63 2C 32 3A ff_c.....ld c,2:
000050: 20 63 70 20 31 0D 0A 09 6A 70 20 6E 7A 2C 65 72 cp 1...jp nz,er
000060: 72 6F 72 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 43 ror.....call &BC
000070: 37 44 09 09 09 3B 61 62 61 6E 64 6F 6E 20 69 6E 7D...;abandon in
000080: 70 75 74 20 66 69 6C 65 0D 0A 0D 0A 09 6C 64 20 put file.....ld
000090: 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C 28 69 78 l,(ix): ld h,(ix
0000A0: 2B 31 29 0D 0A 09 6C 64 20 62 2C 28 68 6C 29 3A +1)...ld b,(hl):
0000B0: 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 65 2C 28 inc hl...ld e,(
0000C0: 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 hl): inc hl...ld
0000D0: 20 64 2C 28 68 6C 29 3A 20 65 78 20 64 65 2C 68 d,(hl): ex de,h
0000E0: 6C 0D 0A 09 6C 64 20 65 2C 28 69 79 2B 37 29 3A l...ld e,(iy+7):
0000F0: 20 6C 64 20 64 2C 28 69 79 2B 38 29 09 3B 66 69 ld d,(iy+8).;fi
000100: 6C 65 20 62 75 66 66 65 72 20 61 64 64 72 65 73 le buffer addres
000110: 73 0D 0A 0D 0A 09 70 75 73 68 20 62 63 3A 20 70 s.....push bc: p
000120: 75 73 68 20 68 6C 0D 0A 09 63 61 6C 6C 20 26 42 ush hl...call &B
000130: 43 37 37 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 6F C77...pop hl: po
000140: 70 20 62 63 0D 0A 09 6A 72 20 63 2C 6C 62 72 69 p bc...jr c,lbri
000150: 6F 6B 0D 0A 0D 0A 09 62 69 74 20 36 2C 61 3A 20 ok.....bit 6,a:
000160: 72 65 74 20 6E 7A 0D 0A 09 62 69 74 20 37 2C 61 ret nz...bit 7,a
000170: 3A 20 72 65 74 20 6E 7A 0D 0A 09 6C 64 20 63 2C : ret nz...ld c,
000180: 39 3A 20 6A 70 20 65 72 72 6F 72 09 3B 69 66 20 9: jp error.;if
000190: 6E 6F 74 20 61 6C 72 65 61 64 79 20 72 65 70 6F not already repo
0001A0: 72 74 65 64 2C 20 63 6F 6D 6D 73 20 65 72 72 6F rted, comms erro
0001B0: 72 20 39 0D 0A 0D 0A 2E 6C 62 72 69 6F 6B 09 70 r 9.....lbriok.p
0001C0: 75 73 68 20 68 6C 0D 0A 09 6C 64 20 68 6C 2C 6C ush hl...ld hl,l
0001D0: 62 72 74 78 74 0D 0A 09 63 61 6C 6C 20 73 74 72 brtxt...call str
0001E0: 69 6E 67 0D 0A 09 70 6F 70 20 68 6C 0D 0A 0D 0A ing...pop hl....
0001F0: 2E 6C 66 6E 70 72 74 09 6C 64 20 61 2C 28 68 6C .lfnprt.ld a,(hl
Size : 512 (Real : 512)
000000: 22 20 22 3A 20 6C 64 20 28 69 79 2B 36 39 29 2C " ": ld (iy+69),
000010: 61 09 09 3B 66 69 6C 6C 65 72 20 62 79 74 65 0D a..;filler byte.
000020: 0A 0D 0A 09 70 75 73 68 20 64 65 0D 0A 09 20 70 ....push de... p
000030: 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A ush iy: pop hl..
000040: 09 20 6C 64 20 64 65 2C 35 35 3A 20 61 64 64 20 . ld de,55: add
000050: 68 6C 2C 64 65 0D 0A 09 70 6F 70 20 64 65 09 09 hl,de...pop de..
000060: 09 09 3B 48 4C 20 3D 20 66 69 6C 65 6E 61 6D 65 ..;HL = filename
000070: 0D 0A 0D 0A 2E 63 70 6C 6F 6F 70 09 6C 64 20 61 .....cploop.ld a
000080: 2C 28 64 65 29 0D 0A 09 70 75 73 68 20 68 6C 3A ,(de)...push hl:
000090: 20 63 61 6C 6C 20 63 68 72 63 68 6B 3A 20 70 6F call chrchk: po
0000A0: 70 20 68 6C 0D 0A 09 63 61 6C 6C 20 69 6E 73 65 p hl...call inse
0000B0: 72 74 0D 0A 09 69 6E 63 20 64 65 3A 20 64 6A 6E rt...inc de: djn
0000C0: 7A 20 63 70 6C 6F 6F 70 0D 0A 0D 0A 2E 63 6D 6C z cploop.....cml
0000D0: 6F 6F 70 09 6C 64 20 61 2C 28 69 79 2B 36 38 29 oop.ld a,(iy+68)
0000E0: 0D 0A 09 63 70 20 31 31 3A 20 6A 72 20 7A 2C 65 ...cp 11: jr z,e
0000F0: 78 63 6D 6C 0D 0A 09 6A 70 20 6E 63 2C 65 78 69 xcml...jp nc,exi
000100: 74 63 6B 0D 0A 0D 0A 09 6C 64 20 61 2C 28 69 79 tck.....ld a,(iy
000110: 2B 36 39 29 3A 20 6C 64 20 28 68 6C 29 2C 61 3A +69): ld (hl),a:
000120: 20 69 6E 63 20 68 6C 0D 0A 0D 0A 09 6C 64 20 61 inc hl.....ld a
000130: 2C 28 69 79 2B 36 38 29 3A 20 69 6E 63 20 61 3A ,(iy+68): inc a:
000140: 20 6C 64 20 28 69 79 2B 36 38 29 2C 61 0D 0A 09 ld (iy+68),a...
000150: 6A 72 20 63 6D 6C 6F 6F 70 0D 0A 0D 0A 2E 65 78 jr cmloop.....ex
000160: 63 6D 6C 09 6C 64 20 6C 2C 28 69 79 2B 34 33 29 cml.ld l,(iy+43)
000170: 3A 20 6C 64 20 68 2C 28 69 79 2B 34 34 29 09 3B : ld h,(iy+44).;
000180: 70 62 6C 6F 63 6B 0D 0A 09 6C 64 20 61 2C 28 68 pblock...ld a,(h
000190: 6C 29 3A 20 63 70 20 32 35 35 3A 20 6A 72 20 6E l): cp 255: jr n
0001A0: 7A 2C 65 78 73 72 6C 0D 0A 09 70 75 73 68 20 68 z,exsrl...push h
0001B0: 6C 0D 0A 0D 0A 09 69 6E 63 20 68 6C 0D 0A 09 70 l.....inc hl...p
0001C0: 75 73 68 20 68 6C 0D 0A 09 20 70 75 73 68 20 69 ush hl... push i
0001D0: 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 20 6C 64 20 y: pop hl... ld
0001E0: 64 65 2C 35 35 3A 20 61 64 64 20 68 6C 2C 64 65 de,55: add hl,de
0001F0: 0D 0A 09 20 65 78 20 64 65 2C 68 6C 0D 0A 09 70 ... ex de,hl...p
Size : 512 (Real : 512)
000000: 42 42 35 41 0D 0A 0D 0A 09 6C 64 20 61 2C 22 20 BB5A.....ld a,"
000010: 22 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 ": call &BB5A...
000020: 63 61 6C 6C 20 26 42 43 38 30 3A 20 6C 64 20 6C call &BC80: ld l
000030: 2C 61 3A 20 70 75 73 68 20 68 6C 0D 0A 09 63 61 ,a: push hl...ca
000040: 6C 6C 20 26 42 43 38 30 3A 20 70 6F 70 20 68 6C ll &BC80: pop hl
000050: 3A 20 6C 64 20 68 2C 61 0D 0A 09 63 61 6C 6C 20 : ld h,a...call
000060: 70 72 5F 68 6C 68 0D 0A 0D 0A 09 6C 64 20 61 2C pr_hlh.....ld a,
000070: 28 69 79 2B 36 38 29 3A 20 6C 64 20 63 2C 61 0D (iy+68): ld c,a.
000080: 0A 09 6C 64 20 61 2C 28 69 79 2B 36 39 29 0D 0A ..ld a,(iy+69)..
000090: 09 63 70 20 63 3A 20 6A 72 20 6E 7A 2C 74 68 73 .cp c: jr nz,ths
0000A0: 70 63 73 0D 0A 0D 0A 09 6C 64 20 61 2C 31 3A 20 pcs.....ld a,1:
0000B0: 6C 64 20 28 69 79 2B 36 39 29 2C 61 0D 0A 09 6C ld (iy+69),a...l
0000C0: 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 26 42 42 d a,10: call &BB
0000D0: 35 41 0D 0A 09 6C 64 20 61 2C 31 33 3A 20 63 61 5A...ld a,13: ca
0000E0: 6C 6C 20 26 42 42 35 41 0D 0A 09 6A 72 20 61 66 ll &BB5A...jr af
0000F0: 74 65 72 33 0D 0A 0D 0A 2E 74 68 73 70 63 73 09 ter3.....thspcs.
000100: 69 6E 63 20 61 3A 20 6C 64 20 28 69 79 2B 36 39 inc a: ld (iy+69
000110: 29 2C 61 0D 0A 09 6C 64 20 61 2C 33 32 3A 20 63 ),a...ld a,32: c
000120: 61 6C 6C 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C all &BB5A...call
000130: 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C 20 26 42 &BB5A...call &B
000140: 42 35 41 0D 0A 0D 0A 2E 61 66 74 65 72 33 09 6C B5A.....after3.l
000150: 64 20 62 2C 31 34 0D 0A 2E 73 6B 69 70 30 09 70 d b,14...skip0.p
000160: 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 26 42 43 ush bc: call &BC
000170: 38 30 3A 20 70 6F 70 20 62 63 0D 0A 09 64 6A 6E 80: pop bc...djn
000180: 7A 20 73 6B 69 70 30 0D 0A 09 72 65 74 0D 0A 1A z skip0...ret...
000190: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
0001A0: 20 4C 44 49 52 20 63 6F 6D 6D 61 6E 64 0D 0A 0D LDIR command...
0001B0: 0A 2E 6C 64 69 72 5F 69 09 63 61 6C 6C 20 62 75 ..ldir_i.call bu
0001C0: 66 66 5F 63 0D 0A 0D 0A 09 6C 64 20 63 2C 32 3A ff_c.....ld c,2:
0001D0: 20 63 70 20 31 0D 0A 09 6A 70 20 6E 7A 2C 65 72 cp 1...jp nz,er
0001E0: 72 6F 72 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 43 ror.....call &BC
0001F0: 37 44 09 09 09 3B 61 62 61 6E 64 6F 6E 20 69 6E 7D...;abandon in
Size : 512 (Real : 512)
000000: 73 65 6E 64 20 62 79 74 65 0D 0A 09 6C 64 20 61 send byte...ld a
000010: 2C 28 69 79 2B 31 29 09 09 09 3B 6C 6F 63 61 6C ,(iy+1)...;local
000020: 20 65 63 68 6F 3F 0D 0A 09 6F 72 20 61 3A 20 6A echo?...or a: j
000030: 72 20 7A 2C 6E 6F 5F 6B 65 79 0D 0A 09 6C 64 20 r z,no_key...ld
000040: 61 2C 65 0D 0A 09 70 75 73 68 20 61 66 3A 20 63 a,e...push af: c
000050: 61 6C 6C 20 76 74 35 32 63 3A 20 70 6F 70 20 61 all vt52c: pop a
000060: 66 09 3B 69 66 20 73 6F 2C 20 70 72 69 6E 74 20 f.;if so, print
000070: 63 68 61 72 61 63 74 65 72 0D 0A 09 63 70 20 31 character...cp 1
000080: 33 3A 20 6A 72 20 6E 7A 2C 6E 6F 5F 6B 65 79 09 3: jr nz,no_key.
000090: 09 3B 43 52 3F 0D 0A 09 6C 64 20 61 2C 31 30 3A .;CR?...ld a,10:
0000A0: 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 09 3B 69 call sendbt..;i
0000B0: 66 20 73 6F 2C 20 61 64 64 20 4C 46 0D 0A 09 6C f so, add LF...l
0000C0: 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 76 74 35 d a,10: call vt5
0000D0: 32 63 0D 0A 0D 0A 09 3B 47 65 74 20 63 68 61 72 2c.....;Get char
0000E0: 61 63 74 65 72 73 20 66 72 6F 6D 20 69 6E 70 75 acters from inpu
0000F0: 74 20 62 75 66 66 65 72 20 61 6E 64 20 70 72 69 t buffer and pri
000100: 6E 74 0D 0A 0D 0A 2E 6E 6F 5F 6B 65 79 09 63 61 nt.....no_key.ca
000110: 6C 6C 20 26 42 44 31 39 0D 0A 09 63 61 6C 6C 20 ll &BD19...call
000120: 26 42 42 38 34 09 09 09 3B 63 75 72 73 6F 72 20 &BB84...;cursor
000130: 6F 66 66 0D 0A 09 69 66 20 6B 64 73 3A 20 6C 64 off...if kds: ld
000140: 20 62 2C 38 09 3B 36 0D 0A 09 65 6C 73 65 3A 20 b,8.;6...else:
000150: 20 20 6C 64 20 62 2C 38 0D 0A 09 65 6E 64 69 66 ld b,8...endif
000160: 0D 0A 09 6C 64 20 65 2C 28 69 79 2B 33 38 29 3A ...ld e,(iy+38):
000170: 20 6C 64 20 64 2C 30 09 09 3B 44 45 20 3D 20 28 ld d,0..;DE = (
000180: 62 75 66 66 65 72 20 67 65 74 20 6F 66 66 73 65 buffer get offse
000190: 74 29 0D 0A 0D 0A 2E 67 63 6C 6F 6F 70 09 70 75 t).....gcloop.pu
0001A0: 73 68 20 62 63 0D 0A 0D 0A 09 70 75 73 68 20 69 sh bc.....push i
0001B0: 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 62 y: pop hl...ld b
0001C0: 63 2C 31 31 36 3A 20 61 64 64 20 68 6C 2C 62 63 c,116: add hl,bc
0001D0: 0D 0A 09 61 64 64 20 68 6C 2C 64 65 09 09 09 3B ...add hl,de...;
0001E0: 48 4C 20 3D 20 61 64 64 72 65 73 73 20 69 6E 20 HL = address in
0001F0: 62 75 66 66 65 72 20 74 6F 20 67 65 74 0D 0A 09 buffer to get...
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 64 69 3A 20 6C 64 20 61 2C 28 68 6C 29 3A 20 6F di: ld a,(hl): o
000010: 72 20 61 3A 20 6A 70 20 7A 2C 6E 6F 5F 69 6E 70 r a: jp z,no_inp
000020: 0D 0A 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 3A 20 .....ld (hl),0:
000030: 65 69 3A 20 6C 64 20 63 2C 61 0D 0A 09 6C 64 20 ei: ld c,a...ld
000040: 61 2C 28 69 79 2B 35 29 3A 20 63 70 20 31 3A 20 a,(iy+5): cp 1:
000050: 63 61 6C 6C 20 7A 2C 63 61 70 70 72 6E 09 3B 66 call z,capprn.;f
000060: 69 6C 65 20 63 61 70 74 75 72 65 20 6D 6F 64 65 ile capture mode
000070: 0D 0A 2E 70 63 63 68 61 72 09 6C 64 20 61 2C 63 ...pcchar.ld a,c
000080: 3A 20 70 75 73 68 20 64 65 3A 20 63 61 6C 6C 20 : push de: call
000090: 76 74 35 32 63 0D 0A 0D 0A 09 69 66 20 6B 64 73 vt52c.....if kds
0000A0: 3A 20 64 69 3A 20 63 61 6C 6C 20 66 61 73 74 5F : di: call fast_
0000B0: 72 3A 20 70 6F 70 20 64 65 09 3B 70 6F 70 20 64 r: pop de.;pop d
0000C0: 65 0D 0A 09 65 6C 73 65 3A 20 20 20 64 69 3A 20 e...else: di:
0000D0: 63 61 6C 6C 20 66 61 73 74 5F 72 3A 20 70 6F 70 call fast_r: pop
0000E0: 20 64 65 0D 0A 09 65 6E 64 69 66 0D 0A 09 69 6E de...endif...in
0000F0: 63 20 65 0D 0A 0D 0A 2E 6E 6F 5F 69 6E 70 09 65 c e.....no_inp.e
000100: 69 3A 20 70 6F 70 20 62 63 3A 20 64 6A 6E 7A 20 i: pop bc: djnz
000110: 67 63 6C 6F 6F 70 0D 0A 09 6C 64 20 28 69 79 2B gcloop...ld (iy+
000120: 33 38 29 2C 65 09 09 09 3B 28 62 75 66 66 65 72 38),e...;(buffer
000130: 20 67 65 74 20 6F 66 66 73 65 74 29 20 3D 20 44 get offset) = D
000140: 45 0D 0A 09 6A 70 20 63 6F 6D 5F 6C 70 0D 0A 0D E...jp com_lp...
000150: 0A 09 3B 46 69 6C 65 20 63 61 70 74 75 72 65 20 ..;File capture
000160: 6D 6F 64 65 0D 0A 0D 0A 2E 63 61 70 70 72 6E 09 mode.....capprn.
000170: 6C 64 20 61 2C 63 3A 20 70 75 73 68 20 64 65 3A ld a,c: push de:
000180: 20 70 75 73 68 20 68 6C 0D 0A 09 6C 64 20 65 2C push hl...ld e,
000190: 28 69 79 2B 34 30 29 3A 20 6C 64 20 64 2C 28 69 (iy+40): ld d,(i
0001A0: 79 2B 34 31 29 09 3B 44 45 20 3D 20 28 66 69 6C y+41).;DE = (fil
0001B0: 65 20 62 79 74 65 73 20 63 6F 75 6E 74 29 0D 0A e bytes count)..
0001C0: 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A 20 6C 64 .ld l,(iy+7): ld
0001D0: 20 68 2C 28 69 79 2B 38 29 09 3B 48 4C 20 3D 20 h,(iy+8).;HL =
0001E0: 28 66 69 6C 65 20 62 75 66 66 65 72 20 61 64 64 (file buffer add
0001F0: 72 65 73 73 29 0D 0A 09 61 64 64 20 68 6C 2C 64 ress)...add hl,d
Size : 512 (Real : 512)
000000: 20 0D 0A 09 3B 2A 2A 2A 20 53 49 4F 2E 4D 4F 44 ...;*** SIO.MOD
000010: 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 53 45 ***.....;>>> SE
000020: 4E 44 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 73 ND command.....s
000030: 65 6E 64 5F 69 09 6C 64 20 63 2C 32 3A 20 6F 72 end_i.ld c,2: or
000040: 20 61 3A 20 6A 70 20 7A 2C 65 72 72 6F 72 0D 0A a: jp z,error..
000050: 0D 0A 09 6C 64 20 65 2C 61 3A 20 64 65 63 20 61 ...ld e,a: dec a
000060: 3A 20 72 6C 63 61 0D 0A 09 6C 64 20 62 2C 30 3A : rlca...ld b,0:
000070: 20 6C 64 20 63 2C 61 0D 0A 09 64 62 20 26 44 44 ld c,a...db &DD
000080: 3A 20 73 62 63 20 68 6C 2C 62 63 0D 0A 0D 0A 2E : sbc hl,bc.....
000090: 73 6C 6F 6F 70 09 6C 64 20 61 2C 28 69 78 29 3A sloop.ld a,(ix):
0000A0: 20 63 61 6C 6C 20 73 65 6E 64 62 74 0D 0A 09 64 call sendbt...d
0000B0: 65 63 20 65 3A 20 72 65 74 20 7A 0D 0A 09 69 6E ec e: ret z...in
0000C0: 63 20 69 78 3A 20 69 6E 63 20 69 78 3A 20 6A 72 c ix: inc ix: jr
0000D0: 20 73 6C 6F 6F 70 0D 0A 0D 0A 09 3B 3E 3E 3E 20 sloop.....;>>>
0000E0: 47 45 54 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E GET command.....
0000F0: 67 65 74 5F 69 09 6C 64 20 63 2C 32 3A 20 63 70 get_i.ld c,2: cp
000100: 20 31 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 1: jp nz,error.
000110: 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 ..ld l,(ix): ld
000120: 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 65 2C h,(ix+1)...ld e,
000130: 28 69 79 2B 39 29 3A 20 6C 64 20 64 2C 28 69 79 (iy+9): ld d,(iy
000140: 2B 31 30 29 09 09 3B 6C 64 20 64 65 2C 28 74 69 +10)..;ld de,(ti
000150: 6D 65 73 74 29 0D 0A 09 63 61 6C 6C 20 77 61 69 mest)...call wai
000160: 74 62 74 3A 20 6A 70 20 6E 63 2C 74 69 6D 6F 75 tbt: jp nc,timou
000170: 74 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 3A 20 72 t...ld (hl),a: r
000180: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 47 52 41 42 et.....;>>> GRAB
000190: 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 67 72 61 command.....gra
0001A0: 62 5F 69 09 6C 64 20 63 2C 32 3A 20 63 70 20 31 b_i.ld c,2: cp 1
0001B0: 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 09 : jp nz,error...
0001C0: 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 68 2C ld l,(ix): ld h,
0001D0: 28 69 78 2B 31 29 0D 0A 09 63 61 6C 6C 20 67 72 (ix+1)...call gr
0001E0: 61 62 62 74 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 abbt...ld (hl),a
0001F0: 3A 20 72 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 57 : ret.....;>>> W
Size : 512 (Real : 512)
000000: 65 3A 20 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 69 e: ld (hl),a...i
000010: 6E 63 20 64 65 0D 0A 09 6C 64 20 28 69 79 2B 34 nc de...ld (iy+4
000020: 30 29 2C 65 3A 20 6C 64 20 28 69 79 2B 34 31 29 0),e: ld (iy+41)
000030: 2C 64 09 3B 28 66 69 6C 65 20 62 79 74 65 73 20 ,d.;(file bytes
000040: 63 6F 75 6E 74 29 20 3D 20 44 45 0D 0A 09 6C 64 count) = DE...ld
000050: 20 61 2C 64 3A 20 63 70 20 31 32 3A 20 6A 72 20 a,d: cp 12: jr
000060: 7A 2C 62 66 69 6C 6C 09 3B 42 75 66 66 65 72 20 z,bfill.;Buffer
000070: 66 75 6C 6C 3F 0D 0A 09 70 6F 70 20 68 6C 3A 20 full?...pop hl:
000080: 70 6F 70 20 64 65 3A 20 72 65 74 09 09 3B 49 66 pop de: ret..;If
000090: 20 6E 6F 74 2C 20 72 65 74 75 72 6E 0D 0A 0D 0A not, return....
0000A0: 2E 62 66 69 6C 6C 09 70 75 73 68 20 62 63 3A 20 .bfill.push bc:
0000B0: 63 61 6C 6C 20 73 74 6F 70 09 09 3B 65 6C 73 65 call stop..;else
0000C0: 20 79 65 6C 6C 20 22 73 74 6F 70 21 21 21 22 0D yell "stop!!!".
0000D0: 0A 0D 0A 09 70 75 73 68 20 69 79 3A 20 70 6F 70 ....push iy: pop
0000E0: 20 68 6C 0D 0A 09 6C 64 20 64 65 2C 32 34 3A 20 hl...ld de,24:
0000F0: 61 64 64 20 68 6C 2C 64 65 0D 0A 09 63 61 6C 6C add hl,de...call
000100: 20 26 42 43 45 36 09 09 09 3B 74 65 6D 70 6F 72 &BCE6...;tempor
000110: 61 72 69 6C 79 20 72 65 6D 6F 76 65 20 66 61 73 arily remove fas
000120: 74 20 74 69 63 6B 65 72 20 62 6C 6F 63 6B 20 0D t ticker block .
000130: 0A 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A ....ld l,(iy+7):
000140: 20 6C 64 20 68 2C 28 69 79 2B 38 29 09 3B 48 4C ld h,(iy+8).;HL
000150: 20 3D 20 28 66 69 6C 65 20 62 75 66 66 65 72 20 = (file buffer
000160: 61 64 64 72 65 73 73 29 0D 0A 09 6C 64 20 64 65 address)...ld de
000170: 2C 31 30 32 34 3A 20 61 64 64 20 68 6C 2C 64 65 ,1024: add hl,de
000180: 0D 0A 09 6C 64 20 62 63 2C 32 30 34 38 0D 0A 2E ...ld bc,2048...
000190: 62 66 6C 6F 6F 70 09 6C 64 20 61 2C 28 68 6C 29 bfloop.ld a,(hl)
0001A0: 3A 20 63 61 6C 6C 20 26 42 43 39 35 09 09 3B 77 : call &BC95..;w
0001B0: 72 69 74 65 20 74 6F 20 74 68 65 20 64 69 73 63 rite to the disc
0001C0: 0D 0A 09 6A 72 20 6E 63 2C 63 6D 65 72 72 09 09 ...jr nc,cmerr..
0001D0: 09 3B 6A 75 6D 70 20 6F 75 74 20 69 66 20 65 72 .;jump out if er
0001E0: 72 6F 72 0D 0A 09 69 6E 63 20 68 6C 3A 20 64 65 ror...inc hl: de
0001F0: 63 20 62 63 3A 20 6C 64 20 61 2C 62 3A 20 6F 72 c bc: ld a,b: or
Size : 512 (Real : 512)
000000: 52 49 54 45 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A RITE command....
000010: 2E 77 72 74 5F 69 09 6C 64 20 63 2C 32 0D 0A 09 .wrt_i.ld c,2...
000020: 6F 72 20 61 3A 20 6A 72 20 7A 2C 73 6E 64 63 72 or a: jr z,sndcr
000030: 09 3B 69 66 20 6E 6F 20 70 61 72 61 6D 65 74 65 .;if no paramete
000040: 72 73 2C 20 73 65 6E 64 20 43 52 20 6F 6E 6C 79 rs, send CR only
000050: 0D 0A 09 63 70 20 31 3A 20 6A 70 20 6E 7A 2C 65 ...cp 1: jp nz,e
000060: 72 72 6F 72 09 3B 65 72 72 6F 72 20 32 20 69 66 rror.;error 2 if
000070: 20 6E 6F 74 20 31 20 70 61 72 61 6D 65 74 65 72 not 1 parameter
000080: 0D 0A 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 0D 0A .....ld l,(ix)..
000090: 09 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A 0D 0A .ld h,(ix+1)....
0000A0: 09 6C 64 20 61 2C 28 68 6C 29 3A 20 69 6E 63 20 .ld a,(hl): inc
0000B0: 68 6C 0D 0A 09 6C 64 20 65 2C 28 68 6C 29 3A 20 hl...ld e,(hl):
0000C0: 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 64 2C 28 68 inc hl...ld d,(h
0000D0: 6C 29 0D 0A 09 65 78 20 64 65 2C 68 6C 0D 0A 09 l)...ex de,hl...
0000E0: 6F 72 20 61 3A 20 6A 72 20 7A 2C 65 78 69 74 77 or a: jr z,exitw
0000F0: 72 0D 0A 09 6C 64 20 65 2C 61 0D 0A 0D 0A 2E 77 r...ld e,a.....w
000100: 72 6C 6F 6F 70 09 6C 64 20 61 2C 28 68 6C 29 3A rloop.ld a,(hl):
000110: 20 63 61 6C 6C 20 73 65 6E 64 62 74 0D 0A 09 69 call sendbt...i
000120: 6E 63 20 68 6C 3A 20 64 65 63 20 65 3A 20 6A 72 nc hl: dec e: jr
000130: 20 6E 7A 2C 77 72 6C 6F 6F 70 0D 0A 0D 0A 2E 65 nz,wrloop.....e
000140: 78 69 74 77 72 09 6C 64 20 61 2C 28 69 79 2B 33 xitwr.ld a,(iy+3
000150: 29 3A 20 6F 72 20 61 3A 20 72 65 74 20 7A 09 3B ): or a: ret z.;
000160: 43 52 20 6F 6E 2F 6F 66 66 0D 0A 0D 0A 2E 73 6E CR on/off.....sn
000170: 64 63 72 09 6C 64 20 61 2C 31 33 3A 20 6A 70 20 dcr.ld a,13: jp
000180: 73 65 6E 64 62 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 sendbt.....;>>>
000190: 43 4F 4D 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E COM command.....
0001A0: 63 6F 6D 5F 69 09 63 61 6C 6C 20 63 62 75 66 66 com_i.call cbuff
0001B0: 72 09 09 09 3B 43 6C 65 61 72 20 74 65 78 74 20 r...;Clear text
0001C0: 62 75 66 66 65 72 0D 0A 09 63 61 6C 6C 20 63 6B buffer...call ck
0001D0: 65 79 6F 6E 0D 0A 0D 0A 2E 77 74 63 63 62 09 6C eyon.....wtccb.l
0001E0: 64 20 62 63 2C 63 6F 6E 69 6E 3A 20 69 6E 20 61 d bc,conin: in a
0001F0: 2C 28 63 29 3A 20 62 69 74 20 37 2C 61 09 3B 43 ,(c): bit 7,a.;C
Size : 512 (Real : 512)
000000: 20 63 3A 20 6A 72 20 6E 7A 2C 62 66 6C 6F 6F 70 c: jr nz,bfloop
000010: 0D 0A 09 6C 64 20 28 69 79 2B 34 30 29 2C 65 3A ...ld (iy+40),e:
000020: 20 6C 64 20 28 69 79 2B 34 31 29 2C 64 09 3B 66 ld (iy+41),d.;f
000030: 69 6C 65 20 62 75 66 66 65 72 20 61 64 64 72 65 ile buffer addre
000040: 73 73 20 62 61 63 6B 20 74 6F 20 6E 6F 72 6D 61 ss back to norma
000050: 6C 0D 0A 0D 0A 2E 72 65 73 63 6F 6D 09 70 75 73 l.....rescom.pus
000060: 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C h iy: pop hl...l
000070: 64 20 64 65 2C 32 34 3A 20 61 64 64 20 68 6C 2C d de,24: add hl,
000080: 64 65 0D 0A 09 63 61 6C 6C 20 26 42 43 45 33 09 de...call &BCE3.
000090: 09 09 3B 72 65 70 6C 61 63 65 20 66 61 73 74 20 ..;replace fast
0000A0: 74 69 63 6B 65 72 20 62 6C 6F 63 6B 0D 0A 0D 0A ticker block....
0000B0: 09 63 61 6C 6C 20 72 65 73 75 6D 65 09 09 09 3B .call resume...;
0000C0: 22 63 61 72 72 79 20 6F 6E 21 21 22 0D 0A 09 70 "carry on!!"...p
0000D0: 6F 70 20 62 63 3A 20 70 6F 70 20 68 6C 3A 20 70 op bc: pop hl: p
0000E0: 6F 70 20 64 65 3A 20 72 65 74 09 3B 61 6E 64 20 op de: ret.;and
0000F0: 72 65 74 75 72 6E 0D 0A 0D 0A 2E 63 6D 65 72 72 return.....cmerr
000100: 09 6C 64 20 28 69 79 2B 35 29 2C 30 09 09 09 3B .ld (iy+5),0...;
000110: 69 66 20 65 72 72 6F 72 2C 20 63 61 70 74 75 72 if error, captur
000120: 65 20 6D 6F 64 65 20 4F 46 46 0D 0A 09 63 61 6C e mode OFF...cal
000130: 6C 20 26 42 43 39 32 09 09 09 3B 61 62 61 6E 64 l &BC92...;aband
000140: 6F 6E 20 6F 75 74 70 75 74 20 66 69 6C 65 0D 0A on output file..
000150: 09 6A 72 20 72 65 73 63 6F 6D 09 09 09 3B 72 65 .jr rescom...;re
000160: 73 75 6D 65 20 63 6F 6D 6D 75 6E 69 63 61 74 69 sume communicati
000170: 6F 6E 21 0D 0A 0D 0A 09 3B 46 61 73 74 20 74 69 on!.....;Fast ti
000180: 63 6B 65 72 20 65 76 65 6E 74 0D 0A 0D 0A 2E 66 cker event.....f
000190: 61 73 74 5F 72 09 70 75 73 68 20 69 79 0D 0A 09 ast_r.push iy...
0001A0: 6C 64 20 69 79 2C 28 26 42 41 46 44 29 0D 0A 09 ld iy,(&BAFD)...
0001B0: 6C 64 20 68 6C 2C 28 26 42 41 46 44 29 0D 0A 09 ld hl,(&BAFD)...
0001C0: 6C 64 20 64 65 2C 31 31 36 3A 20 61 64 64 20 68 ld de,116: add h
0001D0: 6C 2C 64 65 09 09 3B 48 4C 20 3D 20 62 75 66 66 l,de..;HL = buff
0001E0: 65 72 20 73 74 61 72 74 0D 0A 09 63 61 6C 6C 20 er start...call
0001F0: 67 72 61 62 62 74 0D 0A 09 6C 64 20 64 2C 30 3A grabbt...ld d,0:
Size : 512 (Real : 512)
000000: 68 61 72 61 63 74 65 72 20 61 76 61 69 6C 61 62 haracter availab
000010: 6C 65 3F 0D 0A 09 6A 72 20 7A 2C 6E 6F 63 63 62 le?...jr z,noccb
000020: 0D 0A 09 6C 64 20 62 63 2C 64 61 74 69 6E 3A 20 ...ld bc,datin:
000030: 69 6E 20 61 2C 28 63 29 3A 20 6A 72 20 77 74 63 in a,(c): jr wtc
000040: 63 62 09 3B 49 66 20 73 6F 2C 20 67 65 74 20 61 cb.;If so, get a
000050: 6E 64 20 74 72 79 20 75 6E 74 69 6C 20 6E 6F 74 nd try until not
000060: 20 61 76 61 69 6C 61 62 6C 65 0D 0A 0D 0A 2E 6E available.....n
000070: 6F 63 63 62 09 63 61 6C 6C 20 26 42 39 31 32 3A occb.call &B912:
000080: 20 6C 64 20 63 2C 61 3A 20 6C 64 20 62 2C 26 38 ld c,a: ld b,&8
000090: 30 09 3B 53 65 74 20 75 70 20 66 61 73 74 20 74 0.;Set up fast t
0000A0: 69 63 6B 65 72 20 69 6E 74 65 72 72 75 70 74 0D icker interrupt.
0000B0: 0A 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 ..push iy: pop h
0000C0: 6C 0D 0A 09 6C 64 20 64 65 2C 32 34 3A 20 61 64 l...ld de,24: ad
0000D0: 64 20 68 6C 2C 64 65 0D 0A 09 6C 64 20 64 65 2C d hl,de...ld de,
0000E0: 66 61 73 74 5F 72 0D 0A 09 63 61 6C 6C 20 26 42 fast_r...call &B
0000F0: 43 45 30 0D 0A 0D 0A 09 3B 4D 61 69 6E 20 7C 43 CE0.....;Main |C
000100: 4F 4D 20 6C 6F 6F 70 0D 0A 0D 0A 2E 63 6F 6D 5F OM loop.....com_
000110: 6C 70 20 6C 64 20 61 2C 28 69 79 2B 32 29 3A 20 lp ld a,(iy+2):
000120: 6F 72 20 61 0D 0A 09 63 61 6C 6C 20 6E 7A 2C 26 or a...call nz,&
000130: 42 42 38 31 09 09 09 3B 43 75 72 73 6F 72 20 6F BB81...;Cursor o
000140: 6E 20 69 66 20 73 65 6C 65 63 74 65 64 0D 0A 0D n if selected...
000150: 0A 09 3B 47 65 74 20 6B 65 79 20 61 6E 64 20 73 ..;Get key and s
000160: 65 6E 64 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 42 end.....call &BB
000170: 30 39 0D 0A 09 6A 70 20 6E 63 2C 6E 6F 5F 6B 65 09...jp nc,no_ke
000180: 79 09 09 09 3B 6E 6F 20 6B 65 79 20 70 72 65 73 y...;no key pres
000190: 73 65 64 0D 0A 09 63 70 20 26 46 43 3A 20 6A 70 sed...cp &FC: jp
0001A0: 20 7A 2C 71 75 69 74 09 09 3B 69 66 20 45 53 43 z,quit..;if ESC
0001B0: 2C 20 71 75 69 74 0D 0A 09 63 70 20 32 32 34 3A , quit...cp 224:
0001C0: 20 63 61 6C 6C 20 7A 2C 26 42 42 36 30 09 09 3B call z,&BB60..;
0001D0: 69 66 20 43 4F 50 59 2C 20 63 6F 70 79 20 63 68 if COPY, copy ch
0001E0: 61 72 61 63 74 65 72 0D 0A 09 6C 64 20 65 2C 61 aracter...ld e,a
0001F0: 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 09 3B : call sendbt..;
Size : 512 (Real : 512)
000000: 65 2C 31 31 36 3A 20 61 64 64 20 69 78 2C 64 65 e,116: add ix,de
000010: 09 09 3B 49 58 20 3D 20 62 75 66 66 65 72 0D 0A ..;IX = buffer..
000020: 09 6C 64 20 65 2C 28 69 79 2B 39 29 3A 20 6C 64 .ld e,(iy+9): ld
000030: 20 64 2C 28 69 79 2B 31 30 29 09 3B 44 45 20 3D d,(iy+10).;DE =
000040: 20 74 69 6D 65 6F 75 74 0D 0A 09 63 61 6C 6C 20 timeout...call
000050: 77 61 69 74 62 74 3A 20 6A 70 20 6E 63 2C 77 74 waitbt: jp nc,wt
000060: 6D 6F 75 74 0D 0A 09 6C 64 20 62 2C 28 69 79 2B mout...ld b,(iy+
000070: 34 32 29 09 09 09 3B 42 20 3D 20 6E 75 6D 62 65 42)...;B = numbe
000080: 72 20 6F 66 20 70 61 72 61 6D 65 74 65 72 73 0D r of parameters.
000090: 0A 0D 0A 2E 63 68 6B 73 6C 70 09 6C 64 20 65 2C ....chkslp.ld e,
0000A0: 28 69 78 29 3A 20 6C 64 20 64 2C 30 0D 0A 09 6C (ix): ld d,0...l
0000B0: 64 20 6C 2C 28 69 78 2B 32 29 3A 20 6C 64 20 68 d l,(ix+2): ld h
0000C0: 2C 28 69 78 2B 33 29 0D 0A 09 61 64 64 20 68 6C ,(ix+3)...add hl
0000D0: 2C 64 65 0D 0A 09 63 70 20 28 68 6C 29 3A 20 6A ,de...cp (hl): j
0000E0: 72 20 7A 2C 63 6F 72 72 65 73 0D 0A 09 6C 64 20 r z,corres...ld
0000F0: 28 69 78 29 2C 30 0D 0A 0D 0A 2E 72 66 63 6B 09 (ix),0.....rfck.
000100: 69 6E 63 20 69 78 3A 20 69 6E 63 20 69 78 3A 20 inc ix: inc ix:
000110: 69 6E 63 20 69 78 3A 20 69 6E 63 20 69 78 0D 0A inc ix: inc ix..
000120: 09 64 6A 6E 7A 20 63 68 6B 73 6C 70 0D 0A 0D 0A .djnz chkslp....
000130: 09 70 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C .push iy: pop hl
000140: 0D 0A 09 69 6E 63 20 68 3A 20 64 65 63 20 68 6C ...inc h: dec hl
000150: 09 09 09 3B 48 4C 20 3D 20 62 75 66 66 65 72 2B ...;HL = buffer+
000160: 32 35 35 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 0D 255...ld (hl),a.
000170: 0A 09 6C 64 20 61 2C 28 69 79 2B 35 29 3A 20 6F ..ld a,(iy+5): o
000180: 72 20 61 09 09 3B 41 20 3D 20 66 69 6C 65 20 63 r a..;A = file c
000190: 61 70 74 75 72 65 20 6D 6F 64 65 0D 0A 09 63 61 apture mode...ca
0001A0: 6C 6C 20 6E 7A 2C 63 61 70 70 72 6E 0D 0A 09 6A ll nz,capprn...j
0001B0: 72 20 77 67 6C 6F 6F 70 0D 0A 0D 0A 2E 63 6F 72 r wgloop.....cor
0001C0: 72 65 73 09 69 6E 63 20 65 3A 20 6C 64 20 28 69 res.inc e: ld (i
0001D0: 78 29 2C 65 0D 0A 09 6C 64 20 61 2C 65 3A 20 63 x),e...ld a,e: c
0001E0: 70 20 28 69 78 2B 31 29 3A 20 6C 64 20 61 2C 28 p (ix+1): ld a,(
0001F0: 68 6C 29 0D 0A 09 6A 72 20 6E 7A 2C 72 66 63 6B hl)...jr nz,rfck
Size : 512 (Real : 512)
000000: 0D 0A 0D 0A 09 6A 72 20 63 2C 74 79 70 5F 6F 6B .....jr c,typ_ok
000010: 3A 20 6A 70 20 7A 2C 6F 64 65 72 72 3A 20 6C 64 : jp z,oderr: ld
000020: 20 63 2C 38 3A 20 6A 70 20 65 72 72 6F 72 0D 0A c,8: jp error..
000030: 0D 0A 2E 74 79 70 5F 6F 6B 09 63 61 6C 6C 20 26 ...typ_ok.call &
000040: 42 43 38 30 3A 20 6A 72 20 6E 63 2C 71 75 5F 74 BC80: jr nc,qu_t
000050: 79 70 0D 0A 09 63 61 6C 6C 20 76 74 35 32 63 0D yp...call vt52c.
000060: 0A 09 63 61 6C 6C 20 26 42 42 30 39 3A 20 6A 72 ..call &BB09: jr
000070: 20 6E 63 2C 74 79 70 5F 6F 6B 0D 0A 09 63 70 20 nc,typ_ok...cp
000080: 26 46 43 3A 20 6A 72 20 7A 2C 71 75 5F 74 79 70 &FC: jr z,qu_typ
000090: 3A 20 63 61 6C 6C 20 26 42 42 38 31 3A 20 63 61 : call &BB81: ca
0000A0: 6C 6C 20 26 42 42 31 38 3A 20 63 61 6C 6C 20 26 ll &BB18: call &
0000B0: 42 42 38 34 0D 0A 09 6A 72 20 74 79 70 5F 6F 6B BB84...jr typ_ok
0000C0: 0D 0A 0D 0A 2E 71 75 5F 74 79 70 09 6A 70 20 26 .....qu_typ.jp &
0000D0: 42 43 37 41 0D 0A 0D 0A 09 3B 3E 3E 3E 20 44 54 BC7A.....;>>> DT
0000E0: 52 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 64 74 R command.....dt
0000F0: 72 5F 69 09 69 66 20 6B 64 73 3A 20 6C 64 20 63 r_i.if kds: ld c
000100: 2C 31 39 3A 20 6A 70 20 65 72 72 6F 72 0D 0A 09 ,19: jp error...
000110: 65 6C 73 65 3A 09 6C 64 20 63 2C 32 3A 20 63 70 else:.ld c,2: cp
000120: 20 31 3A 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 1: jp nz,error.
000130: 0A 09 09 6C 64 20 61 2C 28 69 78 29 0D 0A 09 09 ...ld a,(ix)....
000140: 6C 64 20 63 2C 31 3A 20 63 70 20 32 3A 20 6A 70 ld c,1: cp 2: jp
000150: 20 6E 63 2C 65 72 72 6F 72 0D 0A 09 09 72 72 63 nc,error....rrc
000160: 61 3A 20 70 75 73 68 20 61 66 3A 20 6C 64 20 61 a: push af: ld a
000170: 2C 28 69 79 2B 31 32 29 3A 20 61 6E 64 20 31 32 ,(iy+12): and 12
000180: 37 09 3B 75 73 69 6E 67 20 72 65 67 69 73 74 65 7.;using registe
000190: 72 20 35 0D 0A 09 09 70 6F 70 20 62 63 3A 20 6F r 5....pop bc: o
0001A0: 72 20 62 3A 20 6C 64 20 28 69 79 2B 31 32 29 2C r b: ld (iy+12),
0001B0: 61 3A 20 6C 64 20 64 2C 35 0D 0A 09 65 6E 64 69 a: ld d,5...endi
0001C0: 66 3A 09 6A 70 20 70 72 65 67 0D 0A 0D 0A 09 3B f:.jp preg.....;
0001D0: 3E 3E 3E 20 52 54 53 20 63 6F 6D 6D 61 6E 64 0D >>> RTS command.
0001E0: 0A 0D 0A 2E 72 74 73 5F 69 09 6C 64 20 63 2C 32 ....rts_i.ld c,2
0001F0: 3A 20 63 70 20 31 3A 20 6A 70 20 6E 7A 2C 65 72 : cp 1: jp nz,er
Size : 512 (Real : 512)
000000: 0D 0A 0D 0A 2E 77 73 72 76 61 6C 09 6C 64 20 6C .....wsrval.ld l
000010: 2C 28 69 79 2B 33 38 29 3A 20 6C 64 20 68 2C 28 ,(iy+38): ld h,(
000020: 69 79 2B 33 39 29 0D 0A 09 70 75 73 68 20 68 6C iy+39)...push hl
000030: 3A 20 70 6F 70 20 69 78 09 09 09 3B 48 4C 20 3D : pop ix...;HL =
000040: 20 62 75 66 66 65 72 20 67 65 74 20 6F 66 66 73 buffer get offs
000050: 65 74 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 32 et...ld a,(iy+42
000060: 29 09 09 09 3B 41 20 3D 20 6E 75 6D 62 65 72 20 )...;A = number
000070: 6F 66 20 70 61 72 61 6D 65 74 65 72 73 0D 0A 09 of parameters...
000080: 6C 64 20 65 2C 61 3A 20 6C 64 20 64 2C 30 3A 20 ld e,a: ld d,0:
000090: 61 64 64 20 69 78 2C 64 65 3A 20 61 64 64 20 69 add ix,de: add i
0000A0: 78 2C 64 65 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 x,de...ld l,(ix)
0000B0: 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 3A 20 6C : ld h,(ix+1): l
0000C0: 64 20 28 68 6C 29 2C 62 0D 0A 09 72 65 74 0D 0A d (hl),b...ret..
0000D0: 0D 0A 2E 77 74 6D 6F 75 74 09 6C 64 20 62 2C 30 ...wtmout.ld b,0
0000E0: 3A 20 63 61 6C 6C 20 77 73 72 76 61 6C 0D 0A 09 : call wsrval...
0000F0: 6A 70 20 74 69 6D 6F 75 74 0D 0A 0D 0A 09 3B 3E jp timout.....;>
000100: 3E 3E 20 49 4E 50 55 54 20 63 6F 6D 6D 61 6E 64 >> INPUT command
000110: 0D 0A 0D 0A 2E 69 6E 70 5F 69 09 6C 64 20 63 2C .....inp_i.ld c,
000120: 32 0D 0A 09 63 70 20 63 3A 20 6A 72 20 7A 2C 69 2...cp c: jr z,i
000130: 6E 70 77 0D 0A 09 63 70 20 31 3A 20 6A 70 20 6E npw...cp 1: jp n
000140: 7A 2C 65 72 72 6F 72 0D 0A 2E 69 6E 70 5F 6F 6B z,error...inp_ok
000150: 09 6C 64 20 6C 2C 28 69 78 29 0D 0A 09 6C 64 20 .ld l,(ix)...ld
000160: 68 2C 28 69 78 2B 31 29 0D 0A 09 6C 64 20 61 2C h,(ix+1)...ld a,
000170: 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C (hl): inc hl...l
000180: 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C d e,(hl): inc hl
000190: 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 0D 0A 09 65 ...ld d,(hl)...e
0001A0: 78 20 64 65 2C 68 6C 09 09 09 3B 41 20 63 6F 6E x de,hl...;A con
0001B0: 74 61 69 6E 73 20 6C 65 6E 67 74 68 2C 20 48 4C tains length, HL
0001C0: 20 61 64 64 72 65 73 73 20 6F 66 20 73 74 72 69 address of stri
0001D0: 6E 67 0D 0A 09 6C 64 20 62 2C 61 0D 0A 0D 0A 2E ng...ld b,a.....
0001E0: 69 6E 70 5F 6C 70 09 6C 64 20 65 2C 28 69 79 2B inp_lp.ld e,(iy+
0001F0: 39 29 3A 20 6C 64 20 64 2C 28 69 79 2B 31 30 29 9): ld d,(iy+10)
Size : 512 (Real : 512)
000000: 20 6C 64 20 65 2C 28 69 79 2B 33 36 29 09 09 3B ld e,(iy+36)..;
000010: 44 45 20 3D 20 62 75 66 66 65 72 20 6F 66 66 73 DE = buffer offs
000020: 65 74 0D 0A 09 61 64 64 20 68 6C 2C 64 65 0D 0A et...add hl,de..
000030: 09 6C 64 20 28 68 6C 29 2C 61 3A 20 6F 72 20 61 .ld (hl),a: or a
000040: 0D 0A 09 6A 70 20 7A 2C 72 65 74 66 72 3A 20 69 ...jp z,retfr: i
000050: 6E 63 20 65 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 28 nc e.....ld hl,(
000060: 26 42 41 46 44 29 0D 0A 09 70 75 73 68 20 64 65 &BAFD)...push de
000070: 0D 0A 09 6C 64 20 64 65 2C 31 31 36 3A 20 61 64 ...ld de,116: ad
000080: 64 20 68 6C 2C 64 65 09 09 3B 48 4C 20 3D 20 62 d hl,de..;HL = b
000090: 75 66 66 65 72 20 73 74 61 72 74 0D 0A 09 63 61 uffer start...ca
0000A0: 6C 6C 20 67 72 61 62 62 74 0D 0A 09 70 6F 70 20 ll grabbt...pop
0000B0: 64 65 09 09 09 09 3B 44 45 20 3D 20 62 75 66 66 de....;DE = buff
0000C0: 65 72 20 6F 66 66 73 65 74 0D 0A 09 61 64 64 20 er offset...add
0000D0: 68 6C 2C 64 65 0D 0A 09 6C 64 20 28 68 6C 29 2C hl,de...ld (hl),
0000E0: 61 3A 20 6F 72 20 61 0D 0A 09 6A 70 20 7A 2C 72 a: or a...jp z,r
0000F0: 65 74 66 72 31 3A 20 69 6E 63 20 65 0D 0A 0D 0A etfr1: inc e....
000100: 2E 72 65 74 66 72 31 09 6C 64 20 28 69 79 2B 33 .retfr1.ld (iy+3
000110: 36 29 2C 65 09 09 09 3B 62 75 66 66 65 72 20 73 6),e...;buffer s
000120: 74 6F 72 65 20 6F 66 66 73 65 74 20 3D 20 44 45 tore offset = DE
000130: 0D 0A 2E 72 65 74 66 72 09 70 6F 70 20 69 79 3A ...retfr.pop iy:
000140: 20 72 65 74 0D 0A 0D 0A 09 3B 51 75 69 74 20 66 ret.....;Quit f
000150: 72 6F 6D 20 7C 43 4F 4D 20 6D 6F 64 65 0D 0A 0D rom |COM mode...
000160: 0A 2E 71 75 69 74 09 63 61 6C 6C 20 26 42 42 34 ..quit.call &BB4
000170: 38 0D 0A 09 63 61 6C 6C 20 26 42 42 31 42 09 09 8...call &BB1B..
000180: 09 3B 72 65 6D 6F 76 65 20 62 72 65 61 6B 0D 0A .;remove break..
000190: 09 63 61 6C 6C 20 26 42 42 38 34 09 09 09 3B 63 .call &BB84...;c
0001A0: 75 72 73 6F 72 20 6F 66 66 0D 0A 09 70 75 73 68 ursor off...push
0001B0: 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 iy: pop hl...ld
0001C0: 20 64 65 2C 32 34 3A 20 61 64 64 20 68 6C 2C 64 de,24: add hl,d
0001D0: 65 09 09 3B 48 4C 20 3D 20 66 61 73 74 20 74 69 e..;HL = fast ti
0001E0: 63 6B 65 72 20 62 6C 6F 63 6B 20 61 64 64 72 65 cker block addre
0001F0: 73 73 0D 0A 09 63 61 6C 6C 20 26 42 43 45 36 0D ss...call &BCE6.
Size : 512 (Real : 512)
000000: 09 3B 44 45 20 3D 20 74 69 6D 65 6F 75 74 0D 0A .;DE = timeout..
000010: 09 70 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 77 .push bc: call w
000020: 61 69 74 62 74 3A 20 70 6F 70 20 62 63 0D 0A 09 aitbt: pop bc...
000030: 6A 70 20 6E 63 2C 74 69 6D 6F 75 74 0D 0A 09 6C jp nc,timout...l
000040: 64 20 28 68 6C 29 2C 61 0D 0A 09 69 6E 63 20 68 d (hl),a...inc h
000050: 6C 0D 0A 09 64 6A 6E 7A 20 69 6E 70 5F 6C 70 0D l...djnz inp_lp.
000060: 0A 09 72 65 74 0D 0A 0D 0A 2E 69 6E 70 77 09 6C ..ret.....inpw.l
000070: 64 20 6C 2C 28 69 78 2B 32 29 0D 0A 09 6C 64 20 d l,(ix+2)...ld
000080: 68 2C 28 69 78 2B 33 29 0D 0A 09 6C 64 20 61 2C h,(ix+3)...ld a,
000090: 28 68 6C 29 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C (hl): inc hl...l
0000A0: 64 20 65 2C 28 68 6C 29 3A 20 69 6E 63 20 68 6C d e,(hl): inc hl
0000B0: 0D 0A 09 6C 64 20 64 2C 28 68 6C 29 0D 0A 09 65 ...ld d,(hl)...e
0000C0: 78 20 64 65 2C 68 6C 09 09 09 3B 41 20 63 6F 6E x de,hl...;A con
0000D0: 74 61 69 6E 73 20 6C 65 6E 67 74 68 2C 20 48 4C tains length, HL
0000E0: 20 61 64 64 72 65 73 73 20 6F 66 20 73 74 72 69 address of stri
0000F0: 6E 67 0D 0A 09 6C 64 20 65 2C 61 0D 0A 0D 0A 2E ng...ld e,a.....
000100: 69 6E 70 77 5F 6C 09 70 75 73 68 20 64 65 3A 20 inpw_l.push de:
000110: 63 61 6C 6C 20 67 72 61 62 62 74 3A 20 70 6F 70 call grabbt: pop
000120: 20 64 65 0D 0A 09 6A 70 20 6E 63 2C 69 6E 70 77 de...jp nc,inpw
000130: 5F 6C 0D 0A 09 6C 64 20 28 68 6C 29 2C 61 0D 0A _l...ld (hl),a..
000140: 09 63 70 20 28 69 78 29 3A 20 6A 70 20 7A 2C 69 .cp (ix): jp z,i
000150: 6E 70 77 63 0D 0A 09 69 6E 63 20 68 6C 0D 0A 09 npwc...inc hl...
000160: 64 65 63 20 65 3A 20 6A 70 20 6E 7A 2C 69 6E 70 dec e: jp nz,inp
000170: 77 5F 6C 0D 0A 09 72 65 74 0D 0A 0D 0A 2E 69 6E w_l...ret.....in
000180: 70 77 63 09 6C 64 20 6C 2C 28 69 78 2B 32 29 0D pwc.ld l,(ix+2).
000190: 0A 09 6C 64 20 68 2C 28 69 78 2B 33 29 0D 0A 09 ..ld h,(ix+3)...
0001A0: 6C 64 20 61 2C 65 0D 0A 09 64 65 63 20 61 0D 0A ld a,e...dec a..
0001B0: 2E 69 77 63 5F 6C 09 72 65 74 20 7A 0D 0A 09 64 .iwc_l.ret z...d
0001C0: 65 63 20 28 68 6C 29 0D 0A 09 64 65 63 20 61 0D ec (hl)...dec a.
0001D0: 0A 09 6A 70 20 69 77 63 5F 6C 0D 0A 0D 0A 09 3B ..jp iwc_l.....;
0001E0: 3E 3E 3E 20 43 41 50 54 55 52 45 20 63 6F 6D 6D >>> CAPTURE comm
0001F0: 61 6E 64 0D 0A 0D 0A 2E 63 61 70 74 5F 69 09 63 and.....capt_i.c
Size : 512 (Real : 512)
000000: 0A 0D 0A 09 3B 4B 65 79 20 73 65 74 74 69 6E 67 ....;Key setting
000010: 73 0D 0A 0D 0A 2E 63 6B 65 79 6F 66 09 63 61 6C s.....ckeyof.cal
000020: 6C 20 26 42 42 30 30 3A 20 6A 70 20 26 42 42 31 l &BB00: jp &BB1
000030: 38 0D 0A 0D 0A 2E 63 6B 65 79 6F 6E 09 6C 64 20 8.....ckeyon.ld
000040: 61 2C 37 39 3A 20 6C 64 20 62 2C 38 3A 20 63 61 a,79: ld b,8: ca
000050: 6C 6C 20 73 65 74 6B 65 79 0D 0A 09 6C 64 20 61 ll setkey...ld a
000060: 2C 30 3A 20 6C 64 20 62 2C 31 31 3A 20 63 61 6C ,0: ld b,11: cal
000070: 6C 20 73 65 74 6B 65 79 0D 0A 09 6C 64 20 61 2C l setkey...ld a,
000080: 32 3A 20 6C 64 20 62 2C 31 30 3A 20 63 61 6C 6C 2: ld b,10: call
000090: 20 73 65 74 6B 65 79 0D 0A 09 6C 64 20 61 2C 38 setkey...ld a,8
0000A0: 3A 20 6C 64 20 62 2C 38 3A 20 63 61 6C 6C 20 73 : ld b,8: call s
0000B0: 65 74 6B 65 79 0D 0A 09 6C 64 20 61 2C 31 3A 20 etkey...ld a,1:
0000C0: 6C 64 20 62 2C 39 3A 20 63 61 6C 6C 20 73 65 74 ld b,9: call set
0000D0: 6B 65 79 0D 0A 09 6C 64 20 61 2C 39 3A 20 6C 64 key...ld a,9: ld
0000E0: 20 62 2C 32 37 3A 20 63 61 6C 6C 20 73 65 74 6B b,27: call setk
0000F0: 65 79 0D 0A 09 6C 64 20 61 2C 39 3A 20 6C 64 20 ey...ld a,9: ld
000100: 62 2C 32 32 34 3A 20 6A 70 20 26 42 42 32 37 0D b,224: jp &BB27.
000110: 0A 0D 0A 2E 73 65 74 6B 65 79 09 6C 64 20 63 2C ....setkey.ld c,
000120: 61 3A 20 63 61 6C 6C 20 26 42 42 32 37 09 3B 20 a: call &BB27.;
000130: 6E 6F 72 6D 61 6C 20 6B 65 79 0D 0A 09 6C 64 20 normal key...ld
000140: 61 2C 63 3A 20 63 61 6C 6C 20 26 42 42 32 44 09 a,c: call &BB2D.
000150: 3B 2B 53 48 49 46 54 0D 0A 09 6C 64 20 61 2C 63 ;+SHIFT...ld a,c
000160: 3A 20 6A 70 20 26 42 42 33 33 09 3B 2B 43 54 52 : jp &BB33.;+CTR
000170: 4C 0D 0A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 57 41 49 L.......;>>> WAI
000180: 54 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 77 61 T command.....wa
000190: 69 74 5F 69 09 6C 64 20 63 2C 32 3A 20 6F 72 20 it_i.ld c,2: or
0001A0: 61 3A 20 6A 70 20 7A 2C 65 72 72 6F 72 0D 0A 09 a: jp z,error...
0001B0: 63 70 20 31 3A 20 6A 72 20 6E 7A 2C 77 6E 6F 74 cp 1: jr nz,wnot
0001C0: 31 0D 0A 09 70 75 73 68 20 69 79 3A 20 70 6F 70 1...push iy: pop
0001D0: 20 69 78 0D 0A 09 6C 64 20 64 65 2C 31 31 36 2B ix...ld de,116+
0001E0: 32 35 30 3A 20 61 64 64 20 69 78 2C 64 65 09 3B 250: add ix,de.;
0001F0: 49 58 20 3D 20 62 75 66 66 65 72 2B 32 35 30 0D IX = buffer+250.
Size : 512 (Real : 512)
000000: 61 6C 6C 20 62 75 66 66 5F 63 0D 0A 09 6C 64 20 all buff_c...ld
000010: 63 2C 32 3A 20 63 70 20 31 3A 20 6A 70 20 6E 7A c,2: cp 1: jp nz
000020: 2C 65 72 72 6F 72 0D 0A 0D 0A 09 6C 64 20 65 2C ,error.....ld e,
000030: 28 69 79 2B 37 29 3A 20 6C 64 20 64 2C 28 69 79 (iy+7): ld d,(iy
000040: 2B 38 29 09 3B 44 45 20 3D 20 66 69 6C 65 20 62 +8).;DE = file b
000050: 75 66 66 65 72 20 61 64 64 72 65 73 73 0D 0A 09 uffer address...
000060: 6C 64 20 68 6C 2C 31 30 32 33 3A 20 61 64 64 20 ld hl,1023: add
000070: 68 6C 2C 64 65 3A 20 65 78 20 64 65 2C 68 6C 0D hl,de: ex de,hl.
000080: 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 20 ..ld l,(ix): ld
000090: 68 2C 28 69 78 2B 31 29 3A 20 70 75 73 68 20 68 h,(ix+1): push h
0000A0: 6C 3A 20 70 6F 70 20 69 78 0D 0A 09 6C 64 20 62 l: pop ix...ld b
0000B0: 2C 28 69 78 29 3A 20 6C 64 20 6C 2C 28 69 78 2B ,(ix): ld l,(ix+
0000C0: 31 29 3A 20 6C 64 20 68 2C 28 69 78 2B 32 29 3A 1): ld h,(ix+2):
0000D0: 20 63 61 6C 6C 20 26 42 43 38 43 0D 0A 0D 0A 09 call &BC8C.....
0000E0: 6A 72 20 63 2C 63 6F 70 5F 6F 6B 3A 20 6A 72 20 jr c,cop_ok: jr
0000F0: 7A 2C 6F 64 65 72 72 3A 20 6C 64 20 63 2C 38 3A z,oderr: ld c,8:
000100: 20 6A 70 20 65 72 72 6F 72 0D 0A 2E 6F 64 65 72 jp error...oder
000110: 72 09 6C 64 20 63 2C 39 3A 20 6A 70 20 65 72 72 r.ld c,9: jp err
000120: 6F 72 0D 0A 0D 0A 2E 63 6F 70 5F 6F 6B 09 6C 64 or.....cop_ok.ld
000130: 20 61 2C 31 3A 20 6C 64 20 28 69 79 2B 35 29 2C a,1: ld (iy+5),
000140: 61 09 09 3B 41 20 3D 3E 20 66 69 6C 65 20 63 61 a..;A => file ca
000150: 70 74 75 72 65 20 6D 6F 64 65 0D 0A 09 6C 64 20 pture mode...ld
000160: 68 6C 2C 31 30 32 34 3A 20 6C 64 20 28 69 79 2B hl,1024: ld (iy+
000170: 34 30 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 34 31 40),l: ld (iy+41
000180: 29 2C 68 09 3B 48 4C 20 3D 3E 20 66 69 6C 65 20 ),h.;HL => file
000190: 62 79 74 65 73 20 63 6F 75 6E 74 0D 0A 09 78 6F bytes count...xo
0001A0: 72 20 61 3A 20 6A 70 20 26 42 43 39 35 0D 0A 0D r a: jp &BC95...
0001B0: 0A 09 3B 3E 3E 3E 20 43 4C 4F 53 45 20 63 6F 6D ..;>>> CLOSE com
0001C0: 6D 61 6E 64 0D 0A 0D 0A 2E 63 6C 6F 73 5F 69 09 mand.....clos_i.
0001D0: 6C 64 20 63 2C 31 30 3A 20 6C 64 20 61 2C 28 69 ld c,10: ld a,(i
0001E0: 79 2B 35 29 3A 20 6F 72 20 61 3A 20 6A 70 20 7A y+5): or a: jp z
0001F0: 2C 65 72 72 6F 72 0D 0A 09 78 6F 72 20 61 3A 20 ,error...xor a:
Size : 512 (Real : 512)
000000: 0A 09 70 75 73 68 20 69 78 3A 20 70 6F 70 20 64 ..push ix: pop d
000010: 65 0D 0A 09 64 65 63 20 64 65 3A 20 64 65 63 20 e...dec de: dec
000020: 64 65 09 09 09 3B 44 45 20 3D 20 62 75 66 66 65 de...;DE = buffe
000030: 72 2B 32 34 38 0D 0A 09 6C 64 20 6C 2C 28 69 78 r+248...ld l,(ix
000040: 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A ): ld h,(ix+1)..
000050: 09 6C 64 20 28 69 78 29 2C 6C 3A 20 6C 64 20 28 .ld (ix),l: ld (
000060: 69 78 2B 31 29 2C 68 3A 20 6C 64 20 28 69 78 2B ix+1),h: ld (ix+
000070: 32 29 2C 65 3A 20 6C 64 20 28 69 78 2B 33 29 2C 2),e: ld (ix+3),
000080: 64 0D 0A 09 69 6E 63 20 61 0D 0A 2E 77 6E 6F 74 d...inc a...wnot
000090: 31 09 64 65 63 20 61 0D 0A 09 6C 64 20 28 69 79 1.dec a...ld (iy
0000A0: 2B 34 32 29 2C 61 09 09 09 3B 41 20 3E 3D 20 6E +42),a...;A >= n
0000B0: 75 6D 62 65 72 20 6F 66 20 70 61 72 61 6D 65 74 umber of paramet
0000C0: 65 72 73 0D 0A 09 70 75 73 68 20 69 78 3A 20 70 ers...push ix: p
0000D0: 6F 70 20 64 65 0D 0A 09 6C 64 20 28 69 79 2B 33 op de...ld (iy+3
0000E0: 38 29 2C 65 3A 20 6C 64 20 28 69 79 2B 33 39 29 8),e: ld (iy+39)
0000F0: 2C 64 09 3B 62 75 66 66 65 72 20 67 65 74 20 6F ,d.;buffer get o
000100: 66 66 73 65 74 20 3D 20 49 58 0D 0A 0D 0A 09 70 ffset = IX.....p
000110: 75 73 68 20 68 6C 3A 20 70 75 73 68 20 69 79 3A ush hl: push iy:
000120: 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 2C pop hl...ld de,
000130: 31 31 36 3A 20 61 64 64 20 68 6C 2C 64 65 3A 20 116: add hl,de:
000140: 65 78 20 64 65 2C 68 6C 0D 0A 09 70 6F 70 20 68 ex de,hl...pop h
000150: 6C 09 09 09 09 3B 44 45 20 3D 20 62 75 66 66 65 l....;DE = buffe
000160: 72 0D 0A 2E 73 74 62 75 66 66 09 65 78 20 64 65 r...stbuff.ex de
000170: 2C 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 3A 20 ,hl: ld (hl),0:
000180: 65 78 20 64 65 2C 68 6C 3A 20 69 6E 63 20 64 65 ex de,hl: inc de
000190: 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C 64 ...ld l,(ix): ld
0001A0: 20 68 2C 28 69 78 2B 31 29 3A 20 69 6E 63 20 69 h,(ix+1): inc i
0001B0: 78 3A 20 69 6E 63 20 69 78 0D 0A 09 6C 64 69 3A x: inc ix...ldi:
0001C0: 20 6C 64 69 3A 20 6C 64 69 3A 20 64 65 63 20 61 ldi: ldi: dec a
0001D0: 3A 20 6A 72 20 6E 7A 2C 73 74 62 75 66 66 0D 0A : jr nz,stbuff..
0001E0: 0D 0A 2E 77 67 6C 6F 6F 70 09 70 75 73 68 20 69 ...wgloop.push i
0001F0: 79 3A 20 70 6F 70 20 69 78 0D 0A 09 6C 64 20 64 y: pop ix...ld d
Size : 512 (Real : 512)
000000: 6C 64 20 28 69 79 2B 35 29 2C 61 09 09 3B 6E 6F ld (iy+5),a..;no
000010: 20 66 69 6C 65 20 63 61 70 74 75 72 65 20 6D 6F file capture mo
000020: 64 65 0D 0A 09 6C 64 20 6C 2C 28 69 79 2B 37 29 de...ld l,(iy+7)
000030: 3A 20 6C 64 20 68 2C 28 69 79 2B 38 29 09 3B 48 : ld h,(iy+8).;H
000040: 4C 20 3D 20 66 69 6C 65 20 62 75 66 66 65 72 20 L = file buffer
000050: 61 64 64 72 65 73 73 0D 0A 09 6C 64 20 64 65 2C address...ld de,
000060: 31 30 32 34 3A 20 61 64 64 20 68 6C 2C 64 65 0D 1024: add hl,de.
000070: 0A 09 6C 64 20 63 2C 28 69 79 2B 34 30 29 3A 20 ..ld c,(iy+40):
000080: 6C 64 20 62 2C 28 69 79 2B 34 31 29 09 3B 42 43 ld b,(iy+41).;BC
000090: 20 3D 20 66 69 6C 65 20 62 79 74 65 73 20 63 6F = file bytes co
0000A0: 75 6E 74 0D 0A 09 64 65 63 20 62 63 0D 0A 2E 63 unt...dec bc...c
0000B0: 6C 73 5F 6C 70 09 6C 64 20 61 2C 28 68 6C 29 3A ls_lp.ld a,(hl):
0000C0: 20 63 61 6C 6C 20 26 42 43 39 35 3A 20 69 6E 63 call &BC95: inc
0000D0: 20 68 6C 3A 20 64 65 63 20 62 63 3A 20 6C 64 20 hl: dec bc: ld
0000E0: 61 2C 62 3A 20 63 70 20 33 3A 20 6A 72 20 6E 7A a,b: cp 3: jr nz
0000F0: 2C 63 6C 73 5F 6C 70 0D 0A 09 6A 70 20 26 42 43 ,cls_lp...jp &BC
000100: 38 46 0D 0A 0D 0A 09 3B 3E 3E 3E 20 54 59 50 45 8F.....;>>> TYPE
000110: 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 74 79 70 command.....typ
000120: 65 5F 69 09 63 61 6C 6C 20 62 75 66 66 5F 63 0D e_i.call buff_c.
000130: 0A 09 6C 64 20 63 2C 32 3A 20 63 70 20 31 3A 20 ..ld c,2: cp 1:
000140: 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A 09 jp nz,error.....
000150: 6C 64 20 65 2C 28 69 79 2B 37 29 3A 20 6C 64 20 ld e,(iy+7): ld
000160: 64 2C 28 69 79 2B 38 29 09 3B 44 45 20 3D 20 66 d,(iy+8).;DE = f
000170: 69 6C 65 20 62 75 66 66 65 72 20 61 64 64 72 65 ile buffer addre
000180: 73 73 0D 0A 09 6C 64 20 68 6C 2C 31 30 32 34 3A ss...ld hl,1024:
000190: 20 61 64 64 20 68 6C 2C 64 65 3A 20 65 78 20 64 add hl,de: ex d
0001A0: 65 2C 68 6C 0D 0A 09 6C 64 20 6C 2C 28 69 78 29 e,hl...ld l,(ix)
0001B0: 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 3A 20 70 : ld h,(ix+1): p
0001C0: 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 0D 0A ush hl: pop ix..
0001D0: 09 6C 64 20 62 2C 28 69 78 29 3A 20 6C 64 20 6C .ld b,(ix): ld l
0001E0: 2C 28 69 78 2B 31 29 3A 20 6C 64 20 68 2C 28 69 ,(ix+1): ld h,(i
0001F0: 78 2B 32 29 3A 20 63 61 6C 6C 20 26 42 43 37 37 x+2): call &BC77
Size : 512 (Real : 512)
000000: 2D 64 69 67 69 74 20 64 65 63 69 6D 61 6C 0D 0A -digit decimal..
000010: 0D 0A 2E 70 72 5F 64 65 63 09 6C 64 20 64 2C 31 ...pr_dec.ld d,1
000020: 30 30 3A 20 63 61 6C 6C 20 70 64 5F 63 68 72 0D 00: call pd_chr.
000030: 0A 09 6C 64 20 64 2C 31 30 3A 20 63 61 6C 6C 20 ..ld d,10: call
000040: 70 64 5F 63 68 72 0D 0A 09 6C 64 20 64 2C 31 0D pd_chr...ld d,1.
000050: 0A 0D 0A 2E 70 64 5F 63 68 72 09 6C 64 20 63 2C ....pd_chr.ld c,
000060: 30 0D 0A 2E 70 64 5F 6C 6F 70 09 73 75 62 20 64 0...pd_lop.sub d
000070: 3A 20 6A 72 20 63 2C 70 64 5F 66 69 6E 0D 0A 09 : jr c,pd_fin...
000080: 69 6E 63 20 63 3A 20 6A 72 20 70 64 5F 6C 6F 70 inc c: jr pd_lop
000090: 0D 0A 0D 0A 2E 70 64 5F 66 69 6E 09 61 64 64 20 .....pd_fin.add
0000A0: 61 2C 64 0D 0A 09 70 75 73 68 20 61 66 3A 20 6C a,d...push af: l
0000B0: 64 20 61 2C 63 3A 20 61 64 64 20 26 33 30 3A 20 d a,c: add &30:
0000C0: 63 61 6C 6C 20 26 42 42 35 41 3A 20 70 6F 70 20 call &BB5A: pop
0000D0: 61 66 0D 0A 09 72 65 74 0D 0A 0D 0A 09 3B 3E 3E af...ret.....;>>
0000E0: 3E 20 50 72 69 6E 74 20 41 20 61 73 20 33 2D 64 > Print A as 3-d
0000F0: 69 67 69 74 20 64 65 63 69 6D 61 6C 2C 20 77 69 igit decimal, wi
000100: 74 68 20 73 70 61 63 65 73 0D 0A 0D 0A 2E 70 72 th spaces.....pr
000110: 5F 61 73 70 09 6C 64 20 62 2C 30 0D 0A 09 6C 64 _asp.ld b,0...ld
000120: 20 64 2C 31 30 30 3A 20 63 61 6C 6C 20 70 73 5F d,100: call ps_
000130: 63 68 72 0D 0A 09 6C 64 20 64 2C 31 30 3A 20 63 chr...ld d,10: c
000140: 61 6C 6C 20 70 73 5F 63 68 72 0D 0A 09 6C 64 20 all ps_chr...ld
000150: 62 2C 31 3A 20 6C 64 20 64 2C 31 0D 0A 0D 0A 2E b,1: ld d,1.....
000160: 70 73 5F 63 68 72 09 6C 64 20 63 2C 30 0D 0A 2E ps_chr.ld c,0...
000170: 70 73 5F 6C 6F 70 09 73 75 62 20 64 3A 20 6A 72 ps_lop.sub d: jr
000180: 20 63 2C 70 73 5F 66 69 6E 0D 0A 09 69 6E 63 20 c,ps_fin...inc
000190: 63 3A 20 6A 72 20 70 73 5F 6C 6F 70 0D 0A 0D 0A c: jr ps_lop....
0001A0: 2E 70 73 5F 66 69 6E 09 61 64 64 20 61 2C 64 0D .ps_fin.add a,d.
0001B0: 0A 09 70 75 73 68 20 61 66 3A 20 6C 64 20 61 2C ..push af: ld a,
0001C0: 63 3A 20 6F 72 20 62 3A 20 6A 72 20 6E 7A 2C 70 c: or b: jr nz,p
0001D0: 73 5F 6E 73 70 0D 0A 09 6C 64 20 61 2C 32 34 30 s_nsp...ld a,240
0001E0: 0D 0A 2E 70 73 5F 6E 73 70 09 61 64 64 20 34 38 ...ps_nsp.add 48
0001F0: 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 09 70 : call &BB5A...p
Size : 512 (Real : 512)
000000: 65 73 73 0D 0A 09 6C 64 20 68 6C 2C 31 30 32 34 ess...ld hl,1024
000010: 3A 20 61 64 64 20 68 6C 2C 64 65 3A 20 65 78 20 : add hl,de: ex
000020: 64 65 2C 68 6C 0D 0A 09 6C 64 20 6C 2C 28 69 78 de,hl...ld l,(ix
000030: 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 3A 20 ): ld h,(ix+1):
000040: 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 0D push hl: pop ix.
000050: 0A 09 6C 64 20 62 2C 28 69 78 29 3A 20 6C 64 20 ..ld b,(ix): ld
000060: 6C 2C 28 69 78 2B 31 29 3A 20 6C 64 20 68 2C 28 l,(ix+1): ld h,(
000070: 69 78 2B 32 29 3A 20 63 61 6C 6C 20 26 42 43 37 ix+2): call &BC7
000080: 37 0D 0A 0D 0A 09 6A 72 20 63 2C 65 6F 70 5F 6F 7.....jr c,eop_o
000090: 6B 3A 20 6A 70 20 7A 2C 6F 64 65 72 72 3A 20 6C k: jp z,oderr: l
0000A0: 64 20 63 2C 38 3A 20 6A 70 20 65 72 72 6F 72 0D d c,8: jp error.
0000B0: 0A 0D 0A 2E 65 6F 70 5F 6F 6B 09 70 75 73 68 20 ....eop_ok.push
0000C0: 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 iy: pop hl...ld
0000D0: 64 65 2C 32 34 3A 20 61 64 64 20 68 6C 2C 64 65 de,24: add hl,de
0000E0: 09 09 3B 48 4C 20 3D 20 66 61 73 74 20 74 69 63 ..;HL = fast tic
0000F0: 6B 65 72 20 62 6C 6F 63 6B 0D 0A 09 63 61 6C 6C ker block...call
000100: 20 26 42 39 31 32 3A 20 6C 64 20 63 2C 61 3A 20 &B912: ld c,a:
000110: 6C 64 20 62 2C 26 38 30 0D 0A 09 6C 64 20 64 65 ld b,&80...ld de
000120: 2C 66 61 73 74 5F 72 3A 20 63 61 6C 6C 20 26 42 ,fast_r: call &B
000130: 43 45 30 09 3B 73 65 74 20 75 70 20 66 61 73 74 CE0.;set up fast
000140: 20 74 69 63 6B 65 72 20 69 6E 74 65 72 72 75 70 ticker interrup
000150: 74 0D 0A 0D 0A 2E 65 63 68 6F 6C 70 09 63 61 6C t.....echolp.cal
000160: 6C 20 26 42 43 38 30 3A 20 6A 70 20 6E 63 2C 65 l &BC80: jp nc,e
000170: 71 75 69 74 0D 0A 09 63 70 20 31 30 3A 20 6A 72 quit...cp 10: jr
000180: 20 7A 2C 65 63 68 6F 6C 70 0D 0A 09 63 61 6C 6C z,echolp...call
000190: 20 73 65 6E 64 62 74 0D 0A 0D 0A 09 6C 64 20 65 sendbt.....ld e
0001A0: 2C 28 69 79 2B 33 38 29 3A 20 6C 64 20 64 2C 30 ,(iy+38): ld d,0
0001B0: 09 09 3B 44 45 20 3D 20 62 75 66 66 65 72 20 67 ..;DE = buffer g
0001C0: 65 74 20 6F 66 66 73 65 74 0D 0A 0D 0A 2E 65 63 et offset.....ec
0001D0: 6C 6F 6F 70 09 70 75 73 68 20 69 79 3A 20 70 6F loop.push iy: po
0001E0: 70 20 68 6C 3A 20 61 64 64 20 68 6C 2C 64 65 3A p hl: add hl,de:
0001F0: 20 70 75 73 68 20 64 65 0D 0A 09 6C 64 20 64 65 push de...ld de
Size : 512 (Real : 512)
000000: 6F 70 20 61 66 3A 20 72 65 74 0D 0A 0D 0A 09 3B op af: ret.....;
000010: 3E 3E 3E 20 50 72 69 6E 74 20 48 4C 20 61 73 20 >>> Print HL as
000020: 28 75 70 20 74 6F 29 20 35 2D 64 69 67 69 74 20 (up to) 5-digit
000030: 64 65 63 69 6D 61 6C 0D 0A 0D 0A 2E 70 72 5F 68 decimal.....pr_h
000040: 6C 09 6C 64 20 63 2C 30 0D 0A 09 6C 64 20 64 65 l.ld c,0...ld de
000050: 2C 31 30 30 30 30 3A 20 63 61 6C 6C 20 70 72 68 ,10000: call prh
000060: 6C 72 0D 0A 09 6C 64 20 64 65 2C 31 30 30 30 3A lr...ld de,1000:
000070: 20 63 61 6C 6C 20 70 72 68 6C 72 0D 0A 09 6C 64 call prhlr...ld
000080: 20 64 65 2C 31 30 30 3A 20 63 61 6C 6C 20 70 72 de,100: call pr
000090: 68 6C 72 0D 0A 09 6C 64 20 64 65 2C 31 30 3A 20 hlr...ld de,10:
0000A0: 63 61 6C 6C 20 70 72 68 6C 72 0D 0A 09 6C 64 20 call prhlr...ld
0000B0: 63 2C 31 3A 20 6C 64 20 64 65 2C 31 0D 0A 2E 70 c,1: ld de,1...p
0000C0: 72 68 6C 72 09 78 6F 72 20 61 0D 0A 2E 70 72 68 rhlr.xor a...prh
0000D0: 6C 6C 70 09 73 63 66 3A 20 63 63 66 3A 20 73 62 llp.scf: ccf: sb
0000E0: 63 20 68 6C 2C 64 65 3A 20 6A 72 20 63 2C 70 72 c hl,de: jr c,pr
0000F0: 68 6C 6F 0D 0A 09 69 6E 63 20 61 3A 20 6A 72 20 hlo...inc a: jr
000100: 70 72 68 6C 6C 70 0D 0A 2E 70 72 68 6C 6F 09 61 prhllp...prhlo.a
000110: 64 64 20 68 6C 2C 64 65 3A 20 6F 72 20 61 3A 20 dd hl,de: or a:
000120: 6A 72 20 6E 7A 2C 70 72 68 6C 79 3A 20 63 70 20 jr nz,prhly: cp
000130: 63 3A 20 72 65 74 20 7A 0D 0A 2E 70 72 68 6C 79 c: ret z...prhly
000140: 09 6C 64 20 63 2C 31 3A 20 61 64 64 20 26 33 30 .ld c,1: add &30
000150: 3A 20 63 61 6C 6C 20 26 42 42 35 41 3A 20 72 65 : call &BB5A: re
000160: 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 50 72 69 6E 74 t.....;>>> Print
000170: 20 48 4C 20 61 73 20 34 2D 64 69 67 69 74 20 68 HL as 4-digit h
000180: 65 78 0D 0A 0D 0A 2E 70 72 5F 68 6C 68 09 6C 64 ex.....pr_hlh.ld
000190: 20 61 2C 68 3A 20 63 61 6C 6C 20 70 72 5F 61 68 a,h: call pr_ah
0001A0: 0D 0A 09 6C 64 20 61 2C 6C 3A 20 6A 70 20 70 72 ...ld a,l: jp pr
0001B0: 5F 61 68 0D 0A 0D 0A 09 3B 3E 3E 3E 20 50 72 69 _ah.....;>>> Pri
0001C0: 6E 74 20 41 20 61 73 20 32 2D 64 69 67 69 74 20 nt A as 2-digit
0001D0: 68 65 78 0D 0A 0D 0A 2E 70 72 5F 61 68 09 6C 64 hex.....pr_ah.ld
0001E0: 20 62 2C 30 3A 20 6C 64 20 63 2C 61 0D 0A 09 72 b,0: ld c,a...r
0001F0: 72 20 61 3A 20 72 72 20 61 3A 20 72 72 20 61 3A r a: rr a: rr a:
Size : 512 (Real : 512)
000000: 2C 31 31 36 3A 20 61 64 64 20 68 6C 2C 64 65 3A ,116: add hl,de:
000010: 20 70 6F 70 20 64 65 09 3B 48 4C 20 3D 20 70 6F pop de.;HL = po
000020: 73 69 74 69 6F 6E 20 69 6E 20 62 75 66 66 65 72 sition in buffer
000030: 0D 0A 09 6C 64 20 61 2C 28 68 6C 29 3A 20 6F 72 ...ld a,(hl): or
000040: 20 61 3A 20 6A 70 20 7A 2C 65 63 68 6F 6C 70 0D a: jp z,echolp.
000050: 0A 0D 0A 09 63 61 6C 6C 20 76 74 35 32 63 3A 20 ....call vt52c:
000060: 6C 64 20 28 68 6C 29 2C 30 0D 0A 0D 0A 09 64 69 ld (hl),0.....di
000070: 3A 20 70 75 73 68 20 64 65 3A 20 63 61 6C 6C 20 : push de: call
000080: 66 61 73 74 5F 72 3A 20 70 6F 70 20 64 65 3A 20 fast_r: pop de:
000090: 65 69 0D 0A 09 69 6E 63 20 65 0D 0A 09 6C 64 20 ei...inc e...ld
0000A0: 28 69 79 2B 33 38 29 2C 65 09 09 09 3B 44 45 20 (iy+38),e...;DE
0000B0: 3D 3E 20 62 75 66 66 65 72 20 67 65 74 20 6F 66 => buffer get of
0000C0: 66 73 65 74 0D 0A 09 6A 72 20 65 63 6C 6F 6F 70 fset...jr ecloop
0000D0: 0D 0A 0D 0A 2E 65 71 75 69 74 09 70 75 73 68 20 .....equit.push
0000E0: 69 79 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 iy: pop hl...ld
0000F0: 64 65 2C 32 34 3A 20 61 64 64 20 68 6C 2C 64 65 de,24: add hl,de
000100: 3A 20 63 61 6C 6C 20 26 42 43 45 36 0D 0A 09 6A : call &BCE6...j
000110: 70 20 26 42 43 37 41 0D 0A 0D 0A 2E 74 69 6D 6F p &BC7A.....timo
000120: 75 74 09 6C 64 20 63 2C 31 31 3A 20 6A 70 20 65 ut.ld c,11: jp e
000130: 72 72 6F 72 0D 0A 1A 64 20 63 2C 32 3A 20 6F 72 rror...d c,2: or
000140: 20 61 3A 20 6A 70 20 7A 2C 65 72 72 6F 72 0D 0A a: jp z,error..
000150: 0D 0A 09 6C 64 20 65 2C 61 3A 20 64 65 63 20 61 ...ld e,a: dec a
000160: 3A 20 72 6C 63 61 0D 0A 09 6C 64 20 62 2C 30 3A : rlca...ld b,0:
000170: 20 6C 64 20 63 2C 61 0D 0A 09 64 62 20 26 44 44 ld c,a...db &DD
000180: 20 7A 2C 65 63 68 6F 6C 70 0D 0A 09 63 61 6C 6C z,echolp...call
000190: 20 73 65 6E 64 62 74 0D 0A 0D 0A 09 6C 64 20 65 sendbt.....ld e
0001A0: 2C 28 69 79 2B 33 38 29 3A 20 6C 64 20 64 2C 30 ,(iy+38): ld d,0
0001B0: 09 09 3B 44 45 20 3D 20 62 75 66 66 65 72 20 67 ..;DE = buffer g
0001C0: 65 74 20 6F 66 66 73 65 74 0D 0A 0D 0A 2E 65 63 et offset.....ec
0001D0: 6C 6F 6F 70 09 70 75 73 68 20 69 79 3A 20 70 6F loop.push iy: po
0001E0: 70 20 68 6C 3A 20 61 64 64 20 68 6C 2C 64 65 3A p hl: add hl,de:
0001F0: 20 70 75 73 68 20 64 65 0D 0A 09 6C 64 20 64 65 push de...ld de
Size : 512 (Real : 512)
000000: 20 72 72 20 61 0D 0A 2E 70 72 61 68 69 6C 09 61 rr a...prahil.a
000010: 6E 64 20 31 35 0D 0A 09 63 70 20 31 30 3A 20 6A nd 15...cp 10: j
000020: 72 20 6E 63 2C 70 72 61 68 6C 74 0D 0A 09 61 64 r nc,prahlt...ad
000030: 64 20 61 2C 34 38 0D 0A 09 63 61 6C 6C 20 26 42 d a,48...call &B
000040: 42 35 41 0D 0A 09 6A 72 20 70 72 61 68 6F 74 0D B5A...jr prahot.
000050: 0A 2E 70 72 61 68 6C 74 09 61 64 64 20 61 2C 35 ..prahlt.add a,5
000060: 35 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 0D 0A 5...call &BB5A..
000070: 2E 70 72 61 68 6F 74 09 6C 64 20 61 2C 62 0D 0A .prahot.ld a,b..
000080: 09 63 70 20 31 3A 20 72 65 74 20 7A 0D 0A 09 6C .cp 1: ret z...l
000090: 64 20 61 2C 63 3A 20 6C 64 20 62 2C 31 0D 0A 09 d a,c: ld b,1...
0000A0: 6A 72 20 70 72 61 68 69 6C 0D 0A 0D 0A 09 3B 3E jr prahil.....;>
0000B0: 3E 3E 20 53 65 6E 64 20 62 79 74 65 20 41 20 74 >> Send byte A t
0000C0: 6F 20 73 65 72 69 61 6C 20 69 6E 74 65 72 66 61 o serial interfa
0000D0: 63 65 0D 0A 0D 0A 09 69 66 20 6B 64 73 0D 0A 2E ce.....if kds...
0000E0: 73 65 6E 64 62 74 09 6C 64 20 62 63 2C 63 6F 6E sendbt.ld bc,con
0000F0: 69 6E 0D 0A 2E 73 65 6C 6F 6F 70 09 69 6E 20 64 in...seloop.in d
000100: 2C 28 63 29 3A 20 62 69 74 20 36 2C 64 3A 20 6A ,(c): bit 6,d: j
000110: 72 20 7A 2C 73 65 6C 6F 6F 70 0D 0A 09 63 61 6C r z,seloop...cal
000120: 6C 20 72 65 76 65 72 73 0D 0A 09 6C 64 20 62 63 l revers...ld bc
000130: 2C 64 61 74 6F 75 74 3A 20 6F 75 74 20 28 63 29 ,datout: out (c)
000140: 2C 61 3A 20 72 65 74 0D 0A 09 65 6C 73 65 0D 0A ,a: ret...else..
000150: 2E 73 65 6E 64 62 74 09 6C 64 20 62 63 2C 63 6F .sendbt.ld bc,co
000160: 6E 70 6F 72 74 0D 0A 2E 73 65 6C 6F 6F 70 09 69 nport...seloop.i
000170: 6E 20 64 2C 28 63 29 3A 20 72 72 20 64 3A 20 72 n d,(c): rr d: r
000180: 72 20 64 3A 20 72 72 20 64 3A 20 6A 72 20 6E 63 r d: rr d: jr nc
000190: 2C 73 65 6C 6F 6F 70 0D 0A 09 6C 64 20 62 63 2C ,seloop...ld bc,
0001A0: 64 61 74 70 6F 72 74 3A 20 6F 75 74 20 28 63 29 datport: out (c)
0001B0: 2C 61 3A 20 72 65 74 0D 0A 09 65 6E 64 69 66 0D ,a: ret...endif.
0001C0: 0A 0D 0A 09 3B 3E 3E 3E 20 47 65 74 20 62 79 74 ....;>>> Get byt
0001D0: 65 20 41 20 66 72 6F 6D 20 73 65 72 69 61 6C 20 e A from serial
0001E0: 69 6E 74 65 72 66 61 63 65 0D 0A 0D 0A 09 69 66 interface.....if
0001F0: 20 6B 64 73 0D 0A 2E 67 65 74 62 74 09 6C 64 20 kds...getbt.ld
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 53 55 42 52 4F 55 54 2E ...;*** SUBROUT.
000010: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
000020: 20 43 68 65 63 6B 20 66 6F 72 20 66 69 6C 65 20 Check for file
000030: 62 75 66 66 65 72 0D 0A 0D 0A 2E 62 75 66 66 5F buffer.....buff_
000040: 63 09 70 75 73 68 20 61 66 3A 20 70 75 73 68 20 c.push af: push
000050: 62 63 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 37 29 bc...ld a,(iy+7)
000060: 3A 20 6C 64 20 62 2C 61 0D 0A 09 6C 64 20 61 2C : ld b,a...ld a,
000070: 28 69 79 2B 38 29 3A 20 6F 72 20 62 0D 0A 09 70 (iy+8): or b...p
000080: 6F 70 20 62 63 0D 0A 09 6A 72 20 7A 2C 65 62 75 op bc...jr z,ebu
000090: 66 66 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 35 29 ff...ld a,(iy+5)
0000A0: 3A 20 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 65 62 : or a: jr nz,eb
0000B0: 75 66 66 32 0D 0A 09 70 6F 70 20 61 66 3A 20 72 uff2...pop af: r
0000C0: 65 74 0D 0A 2E 65 62 75 66 66 09 70 6F 70 20 61 et...ebuff.pop a
0000D0: 66 3A 20 70 6F 70 20 68 6C 3A 20 6C 64 20 63 2C f: pop hl: ld c,
0000E0: 36 3A 20 6A 70 20 65 72 72 6F 72 0D 0A 2E 65 62 6: jp error...eb
0000F0: 75 66 66 32 09 70 6F 70 20 61 66 3A 20 70 6F 70 uff2.pop af: pop
000100: 20 68 6C 3A 20 6C 64 20 63 2C 38 3A 20 6A 70 20 hl: ld c,8: jp
000110: 65 72 72 6F 72 0D 0A 0D 0A 09 3B 3E 3E 3E 20 43 error.....;>>> C
000120: 6F 6E 76 65 72 74 20 62 61 75 64 20 72 61 74 65 onvert baud rate
000130: 20 48 4C 20 74 6F 20 38 32 35 33 20 76 61 6C 75 HL to 8253 valu
000140: 65 0D 0A 0D 0A 2E 62 63 6F 6E 76 09 6C 64 20 69 e.....bconv.ld i
000150: 78 2C 74 62 38 32 35 33 0D 0A 2E 62 63 6C 6F 6F x,tb8253...bcloo
000160: 70 09 6C 64 20 61 2C 28 69 78 2B 32 29 0D 0A 09 p.ld a,(ix+2)...
000170: 6F 72 20 61 3A 20 6A 72 20 7A 2C 62 63 65 72 72 or a: jr z,bcerr
000180: 09 3B 72 75 6E 20 6F 75 74 21 0D 0A 09 6C 64 20 .;run out!...ld
000190: 61 2C 28 69 78 29 0D 0A 09 63 70 20 6C 3A 20 6A a,(ix)...cp l: j
0001A0: 72 20 6E 7A 2C 64 69 66 66 09 3B 6C 6F 77 20 62 r nz,diff.;low b
0001B0: 79 74 65 20 64 69 66 66 65 72 65 6E 74 0D 0A 09 yte different...
0001C0: 6C 64 20 61 2C 28 69 78 2B 31 29 0D 0A 09 63 70 ld a,(ix+1)...cp
0001D0: 20 68 3A 20 6A 72 20 6E 7A 2C 64 69 66 66 09 3B h: jr nz,diff.;
0001E0: 68 69 67 68 20 62 79 74 65 20 64 69 66 66 65 72 high byte differ
0001F0: 65 6E 74 0D 0A 09 6C 64 20 6C 2C 28 69 78 2B 32 ent...ld l,(ix+2
Size : 512 (Real : 512)
000000: 72 6F 72 0D 0A 09 6C 64 20 61 2C 28 69 78 29 0D ror...ld a,(ix).
000010: 0A 09 6C 64 20 63 2C 31 3A 20 63 70 20 32 3A 20 ..ld c,1: cp 2:
000020: 6A 70 20 6E 63 2C 65 72 72 6F 72 0D 0A 09 69 66 jp nc,error...if
000030: 20 6B 64 73 3A 20 72 6C 63 61 3A 20 72 6C 63 61 kds: rlca: rlca
000040: 3A 20 70 75 73 68 20 61 66 0D 0A 09 09 6C 64 20 : push af....ld
000050: 61 2C 28 69 79 2B 31 31 29 3A 20 61 6E 64 20 32 a,(iy+11): and 2
000060: 34 39 09 09 09 3B 63 6F 6E 74 72 6F 6C 20 72 65 49...;control re
000070: 67 69 73 74 65 72 0D 0A 09 09 70 6F 70 20 62 63 gister....pop bc
000080: 3A 20 6F 72 20 62 3A 20 6C 64 20 28 69 79 2B 31 : or b: ld (iy+1
000090: 31 29 2C 61 0D 0A 09 65 6C 73 65 3A 09 72 6C 63 1),a...else:.rlc
0000A0: 61 3A 20 70 75 73 68 20 61 66 3A 20 6C 64 20 61 a: push af: ld a
0000B0: 2C 28 69 79 2B 31 32 29 3A 20 61 6E 64 20 32 35 ,(iy+12): and 25
0000C0: 33 09 3B 72 35 0D 0A 09 09 70 6F 70 20 62 63 3A 3.;r5....pop bc:
0000D0: 20 6F 72 20 62 3A 20 6C 64 20 28 69 79 2B 31 32 or b: ld (iy+12
0000E0: 29 2C 61 3A 20 6C 64 20 64 2C 35 0D 0A 09 65 6E ),a: ld d,5...en
0000F0: 64 69 66 3A 09 6A 70 20 70 72 65 67 0D 0A 0D 0A dif:.jp preg....
000100: 09 3B 3E 3E 3E 20 44 43 44 20 63 6F 6D 6D 61 6E .;>>> DCD comman
000110: 64 0D 0A 0D 0A 2E 64 63 64 5F 69 09 6C 64 20 63 d.....dcd_i.ld c
000120: 2C 32 3A 20 63 70 20 31 3A 20 6A 70 20 6E 7A 2C ,2: cp 1: jp nz,
000130: 65 72 72 6F 72 0D 0A 09 6C 64 20 6C 2C 28 69 78 error...ld l,(ix
000140: 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A ): ld h,(ix+1)..
000150: 09 69 66 20 6B 64 73 3A 20 63 61 6C 6C 20 72 72 .if kds: call rr
000160: 65 67 3A 20 61 6E 64 20 33 32 3A 20 78 6F 72 20 eg: and 32: xor
000170: 33 32 0D 0A 09 09 72 72 61 3A 20 72 72 61 3A 20 32....rra: rra:
000180: 72 72 61 3A 20 72 72 61 3A 20 72 72 61 0D 0A 09 rra: rra: rra...
000190: 65 6C 73 65 3A 09 6C 64 20 64 2C 30 3A 20 63 61 else:.ld d,0: ca
0001A0: 6C 6C 20 72 72 65 67 3A 20 61 6E 64 20 38 0D 0A ll rreg: and 8..
0001B0: 09 09 72 72 61 3A 20 72 72 61 3A 20 72 72 61 0D ..rra: rra: rra.
0001C0: 0A 09 65 6E 64 69 66 3A 09 6C 64 20 28 68 6C 29 ..endif:.ld (hl)
0001D0: 2C 61 0D 0A 09 09 69 6E 63 20 68 6C 3A 20 6C 64 ,a....inc hl: ld
0001E0: 20 28 68 6C 29 2C 30 3A 20 72 65 74 0D 0A 0D 0A (hl),0: ret....
0001F0: 09 3B 3E 3E 3E 20 43 54 53 20 63 6F 6D 6D 61 6E .;>>> CTS comman
Size : 512 (Real : 512)
000000: 29 3A 20 6C 64 20 68 2C 28 69 78 2B 33 29 3A 20 ): ld h,(ix+3):
000010: 72 65 74 0D 0A 2E 64 69 66 66 09 69 6E 63 20 69 ret...diff.inc i
000020: 78 3A 20 69 6E 63 20 69 78 3A 20 69 6E 63 20 69 x: inc ix: inc i
000030: 78 3A 20 69 6E 63 20 69 78 3A 20 6A 72 20 62 63 x: inc ix: jr bc
000040: 6C 6F 6F 70 0D 0A 2E 62 63 65 72 72 09 70 6F 70 loop...bcerr.pop
000050: 20 68 6C 3A 20 6C 64 20 63 2C 31 3A 20 6A 70 20 hl: ld c,1: jp
000060: 65 72 72 6F 72 0D 0A 0D 0A 09 3B 3E 3E 3E 20 50 error.....;>>> P
000070: 72 69 6E 74 20 65 72 72 6F 72 20 6E 75 6D 62 65 rint error numbe
000080: 72 20 43 20 2D 20 63 6F 72 72 75 70 74 73 20 61 r C - corrupts a
000090: 6C 6C 20 72 65 67 69 73 74 65 72 73 0D 0A 0D 0A ll registers....
0000A0: 2E 65 72 72 6F 72 09 6C 64 20 61 2C 28 69 79 2B .error.ld a,(iy+
0000B0: 30 29 0D 0A 09 6F 72 20 61 3A 20 72 65 74 20 7A 0)...or a: ret z
0000C0: 0D 0A 09 6C 64 20 62 2C 63 09 09 09 3B 70 72 65 ...ld b,c...;pre
0000D0: 73 65 72 76 65 20 65 72 72 6F 72 20 6E 75 6D 62 serve error numb
0000E0: 65 72 0D 0A 09 6C 64 20 68 6C 2C 65 72 72 5F 74 er...ld hl,err_t
0000F0: 78 74 0D 0A 2E 65 5F 74 72 79 09 64 65 63 20 63 xt...e_try.dec c
000100: 3A 20 6A 72 20 7A 2C 67 6F 74 5F 69 74 0D 0A 0D : jr z,got_it...
000110: 0A 2E 65 5F 6C 6F 6F 70 09 69 6E 63 20 68 6C 3A ..e_loop.inc hl:
000120: 20 6C 64 20 61 2C 28 68 6C 29 3A 20 6F 72 20 61 ld a,(hl): or a
000130: 3A 20 6A 72 20 6E 7A 2C 65 5F 6C 6F 6F 70 0D 0A : jr nz,e_loop..
000140: 09 69 6E 63 20 68 6C 3A 20 6A 72 20 65 5F 74 72 .inc hl: jr e_tr
000150: 79 0D 0A 0D 0A 2E 67 6F 74 5F 69 74 09 70 75 73 y.....got_it.pus
000160: 68 20 68 6C 0D 0A 09 6C 64 20 68 6C 2C 63 65 5F h hl...ld hl,ce_
000170: 74 78 74 0D 0A 09 63 61 6C 6C 20 73 74 72 69 6E txt...call strin
000180: 67 09 09 3B 70 72 69 6E 74 20 22 43 6F 6D 6D 73 g..;print "Comms
000190: 20 65 72 72 6F 72 20 22 0D 0A 09 6C 64 20 61 2C error "...ld a,
0001A0: 62 3A 20 63 61 6C 6C 20 70 72 5F 64 65 63 09 3B b: call pr_dec.;
0001B0: 70 72 69 6E 74 20 65 72 72 6F 72 20 6E 75 6D 62 print error numb
0001C0: 65 72 0D 0A 09 70 6F 70 20 68 6C 3A 20 6A 70 20 er...pop hl: jp
0001D0: 73 74 72 69 6E 67 09 3B 70 72 69 6E 74 20 65 72 string.;print er
0001E0: 72 6F 72 20 73 74 72 69 6E 67 0D 0A 0D 0A 09 3B ror string.....;
0001F0: 3E 3E 3E 20 50 72 69 6E 74 20 41 20 61 73 20 33 >>> Print A as 3
Size : 512 (Real : 512)
000000: 64 0D 0A 0D 0A 2E 63 74 73 5F 69 09 6C 64 20 63 d.....cts_i.ld c
000010: 2C 32 3A 20 63 70 20 31 3A 20 6A 70 20 6E 7A 2C ,2: cp 1: jp nz,
000020: 65 72 72 6F 72 0D 0A 09 6C 64 20 6C 2C 28 69 78 error...ld l,(ix
000030: 29 3A 20 6C 64 20 68 2C 28 69 78 2B 31 29 0D 0A ): ld h,(ix+1)..
000040: 09 69 66 20 6B 64 73 3A 09 63 61 6C 6C 20 72 72 .if kds:.call rr
000050: 65 67 3A 20 61 6E 64 20 31 36 0D 0A 09 09 72 72 eg: and 16....rr
000060: 61 3A 20 72 72 61 3A 20 72 72 61 3A 20 72 72 61 a: rra: rra: rra
000070: 0D 0A 09 65 6C 73 65 3A 09 6C 64 20 64 2C 30 3A ...else:.ld d,0:
000080: 20 63 61 6C 6C 20 72 72 65 67 3A 20 61 6E 64 20 call rreg: and
000090: 33 32 0D 0A 09 09 72 6C 63 61 3A 20 72 6C 63 61 32....rlca: rlca
0000A0: 3A 20 72 6C 63 61 0D 0A 09 65 6E 64 69 66 3A 09 : rlca...endif:.
0000B0: 6C 64 20 28 68 6C 29 2C 61 0D 0A 09 09 69 6E 63 ld (hl),a....inc
0000C0: 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 3A 20 hl: ld (hl),0:
0000D0: 72 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 45 43 48 ret.....;>>> ECH
0000E0: 4F 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 65 63 O command.....ec
0000F0: 68 6F 5F 69 09 63 61 6C 6C 20 62 75 66 66 5F 63 ho_i.call buff_c
000100: 0D 0A 09 6C 64 20 63 2C 32 3A 20 63 70 20 31 3A ...ld c,2: cp 1:
000110: 20 6A 70 20 6E 7A 2C 65 72 72 6F 72 0D 0A 0D 0A jp nz,error....
000120: 2E 77 74 63 63 62 65 09 6C 64 20 62 63 2C 63 6F .wtccbe.ld bc,co
000130: 6E 69 6E 3A 20 69 6E 20 61 2C 28 63 29 3A 20 62 nin: in a,(c): b
000140: 69 74 20 37 2C 61 09 3B 43 68 61 72 61 63 74 65 it 7,a.;Characte
000150: 72 20 61 76 61 69 6C 61 62 6C 65 3F 0D 0A 09 6A r available?...j
000160: 72 20 7A 2C 6E 6F 63 63 62 65 0D 0A 09 6C 64 20 r z,noccbe...ld
000170: 62 63 2C 64 61 74 69 6E 3A 20 69 6E 20 61 2C 28 bc,datin: in a,(
000180: 63 29 3A 20 6A 72 20 77 74 63 63 62 65 20 3B 49 c): jr wtccbe ;I
000190: 66 20 73 6F 2C 20 67 65 74 20 61 6E 64 20 74 72 f so, get and tr
0001A0: 79 20 75 6E 74 69 6C 20 6E 6F 74 20 61 76 61 69 y until not avai
0001B0: 6C 61 62 6C 65 0D 0A 0D 0A 2E 6E 6F 63 63 62 65 lable.....noccbe
0001C0: 09 63 61 6C 6C 20 63 62 75 66 66 72 0D 0A 0D 0A .call cbuffr....
0001D0: 09 6C 64 20 65 2C 28 69 79 2B 37 29 3A 20 6C 64 .ld e,(iy+7): ld
0001E0: 20 64 2C 28 69 79 2B 38 29 09 3B 44 45 20 3D 20 d,(iy+8).;DE =
0001F0: 66 69 6C 65 20 62 75 66 66 65 72 20 61 64 64 72 file buffer addr
Size : 512 (Real : 512)
000000: 62 63 2C 63 6F 6E 69 6E 0D 0A 2E 67 74 6C 6F 6F bc,conin...gtloo
000010: 70 09 69 6E 20 64 2C 28 63 29 3A 20 62 69 74 20 p.in d,(c): bit
000020: 37 2C 64 3A 20 6A 72 20 7A 2C 67 74 6C 6F 6F 70 7,d: jr z,gtloop
000030: 0D 0A 09 6C 64 20 62 63 2C 64 61 74 69 6E 3A 20 ...ld bc,datin:
000040: 69 6E 20 61 2C 28 63 29 0D 0A 09 6A 70 20 72 65 in a,(c)...jp re
000050: 76 65 72 73 0D 0A 09 65 6C 73 65 0D 0A 2E 67 65 vers...else...ge
000060: 74 62 74 09 6C 64 20 62 63 2C 63 6F 6E 70 6F 72 tbt.ld bc,conpor
000070: 74 0D 0A 2E 67 74 6C 6F 6F 70 09 69 6E 20 64 2C t...gtloop.in d,
000080: 28 63 29 3A 20 72 72 20 64 3A 20 6A 72 20 6E 63 (c): rr d: jr nc
000090: 2C 67 74 6C 6F 6F 70 0D 0A 2E 67 65 74 63 68 72 ,gtloop...getchr
0000A0: 09 6C 64 20 62 63 2C 64 61 74 70 6F 72 74 3A 20 .ld bc,datport:
0000B0: 69 6E 20 61 2C 28 63 29 3A 20 72 65 74 0D 0A 09 in a,(c): ret...
0000C0: 65 6E 64 69 66 0D 0A 0D 0A 09 3B 3E 3E 3E 20 47 endif.....;>>> G
0000D0: 72 61 62 20 62 79 74 65 20 41 20 66 72 6F 6D 20 rab byte A from
0000E0: 73 65 72 69 61 6C 20 69 6E 74 65 72 66 61 63 65 serial interface
0000F0: 20 28 74 72 79 20 6F 6E 63 65 20 6F 6E 6C 79 29 (try once only)
000100: 0D 0A 0D 0A 09 69 66 20 6B 64 73 0D 0A 2E 67 72 .....if kds...gr
000110: 61 62 62 74 09 6C 64 20 62 63 2C 63 6F 6E 6F 75 abbt.ld bc,conou
000120: 74 3A 20 6C 64 20 61 2C 28 69 79 2B 31 31 29 0D t: ld a,(iy+11).
000130: 0A 09 61 6E 64 20 32 35 31 3A 20 6F 75 74 20 28 ..and 251: out (
000140: 63 29 2C 61 09 09 3B 64 72 6F 70 20 52 54 53 0D c),a..;drop RTS.
000150: 0A 0D 0A 09 6C 64 20 62 63 2C 63 6F 6E 69 6E 3A ....ld bc,conin:
000160: 20 69 6E 20 64 2C 28 63 29 0D 0A 09 62 69 74 20 in d,(c)...bit
000170: 37 2C 64 3A 20 6A 72 20 6E 7A 2C 67 72 62 63 68 7,d: jr nz,grbch
000180: 72 09 09 3B 63 68 61 72 61 63 74 65 72 20 72 65 r..;character re
000190: 63 65 69 76 65 64 3F 0D 0A 0D 0A 09 6C 64 20 62 ceived?.....ld b
0001A0: 63 2C 63 6F 6E 6F 75 74 3A 20 6C 64 20 61 2C 28 c,conout: ld a,(
0001B0: 69 79 2B 31 31 29 0D 0A 09 6F 75 74 20 28 63 29 iy+11)...out (c)
0001C0: 2C 61 3A 20 78 6F 72 20 61 3A 20 72 65 74 09 09 ,a: xor a: ret..
0001D0: 3B 69 66 20 6E 6F 74 2C 20 52 54 53 20 68 69 67 ;if not, RTS hig
0001E0: 68 2C 20 41 3D 30 2C 20 52 45 54 0D 0A 0D 0A 2E h, A=0, RET.....
0001F0: 67 72 62 63 68 72 09 6C 64 20 62 63 2C 64 61 74 grbchr.ld bc,dat
Size : 512 (Real : 512)
000000: 74 63 74 6C 70 09 69 6E 63 20 68 6C 3A 20 6A 72 tctlp.inc hl: jr
000010: 20 76 74 73 74 6C 70 0D 0A 2E 65 78 73 74 6C 70 vtstlp...exstlp
000020: 09 6C 64 20 61 2C 63 3A 20 63 70 20 22 41 22 3A .ld a,c: cp "A":
000030: 20 6A 72 20 7A 2C 76 74 61 3A 20 63 70 20 22 42 jr z,vta: cp "B
000040: 22 3A 20 6A 72 20 7A 2C 76 74 62 3A 20 63 70 20 ": jr z,vtb: cp
000050: 22 43 22 3A 20 6A 72 20 7A 2C 76 74 63 3A 20 63 "C": jr z,vtc: c
000060: 70 20 22 44 22 0D 0A 09 6A 72 20 7A 2C 76 74 64 p "D"...jr z,vtd
000070: 3A 20 63 70 20 22 45 22 3A 20 6A 72 20 7A 2C 76 : cp "E": jr z,v
000080: 74 65 3A 20 63 70 20 22 4C 22 3A 20 6A 72 20 7A te: cp "L": jr z
000090: 2C 76 74 6C 3A 20 63 70 20 22 4D 22 3A 20 6A 70 ,vtl: cp "M": jp
0000A0: 20 7A 2C 76 74 6D 0D 0A 09 63 70 20 22 58 22 3A z,vtm...cp "X":
0000B0: 20 6A 70 20 7A 2C 76 74 78 3A 20 63 70 20 22 59 jp z,vtx: cp "Y
0000C0: 22 3A 20 6A 70 20 7A 2C 76 74 79 3A 20 63 70 20 ": jp z,vty: cp
0000D0: 22 6A 22 3A 20 6A 70 20 7A 2C 76 74 5F 6A 0D 0A "j": jp z,vt_j..
0000E0: 09 63 70 20 22 6B 22 3A 20 6A 70 20 7A 2C 76 74 .cp "k": jp z,vt
0000F0: 5F 6B 3A 20 63 70 20 22 6C 22 3A 20 6A 70 20 7A _k: cp "l": jp z
000100: 2C 76 74 5F 6C 3A 20 63 70 20 22 70 22 0D 0A 09 ,vt_l: cp "p"...
000110: 6A 70 20 7A 2C 76 74 5F 70 3A 20 63 70 20 22 71 jp z,vt_p: cp "q
000120: 22 3A 20 6A 70 20 7A 2C 76 74 5F 71 3A 20 72 65 ": jp z,vt_q: re
000130: 74 0D 0A 0D 0A 2E 76 74 61 09 63 61 6C 6C 20 26 t.....vta.call &
000140: 42 42 37 38 3A 20 6C 64 20 61 2C 31 3A 20 63 70 BB78: ld a,1: cp
000150: 20 6C 3A 20 72 65 74 20 7A 3A 20 6C 64 20 61 2C l: ret z: ld a,
000160: 31 31 3A 20 6A 70 20 26 42 42 35 41 0D 0A 2E 76 11: jp &BB5A...v
000170: 74 62 09 63 61 6C 6C 20 26 42 42 36 39 3A 20 69 tb.call &BB69: i
000180: 6E 63 20 65 3A 20 63 61 6C 6C 20 26 42 42 37 38 nc e: call &BB78
000190: 3A 20 6C 64 20 61 2C 6C 3A 20 63 70 20 65 3A 20 : ld a,l: cp e:
0001A0: 72 65 74 20 7A 3A 20 6C 64 20 61 2C 31 30 3A 20 ret z: ld a,10:
0001B0: 6A 70 20 26 42 42 35 41 0D 0A 2E 76 74 63 09 63 jp &BB5A...vtc.c
0001C0: 61 6C 6C 20 26 42 42 36 39 3A 20 69 6E 63 20 64 all &BB69: inc d
0001D0: 3A 20 63 61 6C 6C 20 26 42 42 37 38 3A 20 6C 64 : call &BB78: ld
0001E0: 20 61 2C 68 3A 20 63 70 20 64 3A 20 72 65 74 20 a,h: cp d: ret
0001F0: 7A 3A 20 6C 64 20 61 2C 39 3A 20 6A 70 20 26 42 z: ld a,9: jp &B
Size : 512 (Real : 512)
000000: 69 6E 3A 20 69 6E 20 61 2C 28 63 29 3A 20 64 65 in: in a,(c): de
000010: 63 20 63 09 3B 6F 74 68 65 72 77 69 73 65 2C 20 c c.;otherwise,
000020: 67 65 74 20 69 74 0D 0A 2E 67 72 62 6C 70 09 69 get it...grblp.i
000030: 6E 20 64 2C 28 63 29 3A 20 62 69 74 20 37 2C 64 n d,(c): bit 7,d
000040: 3A 20 6A 70 20 6E 7A 2C 67 72 62 6C 70 0D 0A 0D : jp nz,grblp...
000050: 0A 09 6C 64 20 62 63 2C 63 6F 6E 6F 75 74 3A 20 ..ld bc,conout:
000060: 6C 64 20 64 2C 28 69 79 2B 31 31 29 09 3B 52 54 ld d,(iy+11).;RT
000070: 53 20 68 69 67 68 20 61 67 61 69 6E 0D 0A 09 6F S high again...o
000080: 75 74 20 28 63 29 2C 64 3A 20 6A 70 20 72 65 76 ut (c),d: jp rev
000090: 65 72 73 0D 0A 0D 0A 09 65 6C 73 65 0D 0A 2E 67 ers.....else...g
0000A0: 72 61 62 62 74 09 6C 64 20 62 63 2C 63 6F 6E 70 rabbt.ld bc,conp
0000B0: 6F 72 74 3A 20 69 6E 20 64 2C 28 63 29 0D 0A 09 ort: in d,(c)...
0000C0: 72 72 20 64 3A 20 6A 72 20 63 2C 67 72 62 63 68 rr d: jr c,grbch
0000D0: 72 3A 20 78 6F 72 20 61 3A 20 72 65 74 0D 0A 2E r: xor a: ret...
0000E0: 67 72 62 63 68 72 09 6C 64 20 62 63 2C 64 61 74 grbchr.ld bc,dat
0000F0: 70 6F 72 74 3A 20 69 6E 20 61 2C 28 63 29 3A 20 port: in a,(c):
000100: 72 65 74 0D 0A 09 65 6E 64 69 66 0D 0A 0D 0A 0D ret...endif.....
000110: 0A 69 66 20 6B 64 73 3A 09 3B 3E 3E 3E 20 52 65 .if kds:.;>>> Re
000120: 76 65 72 73 65 20 62 79 74 65 20 41 20 28 63 6F verse byte A (co
000130: 72 72 75 70 74 73 20 42 43 29 0D 0A 0D 0A 2E 72 rrupts BC).....r
000140: 65 76 65 72 73 09 6C 64 20 63 2C 30 3A 20 6C 64 evers.ld c,0: ld
000150: 20 62 2C 38 0D 0A 2E 72 65 76 5F 6C 70 09 72 6C b,8...rev_lp.rl
000160: 61 3A 20 72 72 20 63 3A 20 64 6A 6E 7A 20 72 65 a: rr c: djnz re
000170: 76 5F 6C 70 0D 0A 09 6C 64 20 61 2C 63 3A 20 72 v_lp...ld a,c: r
000180: 65 74 3A 20 65 6E 64 69 66 0D 0A 0D 0A 09 3B 3E et: endif.....;>
000190: 3E 3E 20 47 65 74 20 62 79 74 65 20 41 20 66 72 >> Get byte A fr
0001A0: 6F 6D 20 73 65 72 69 61 6C 20 69 6E 74 65 72 66 om serial interf
0001B0: 61 63 65 20 28 77 61 69 74 20 66 6F 72 20 74 69 ace (wait for ti
0001C0: 6D 65 20 69 6E 20 44 45 29 0D 0A 09 3B 3E 3E 3E me in DE)...;>>>
0001D0: 20 43 61 72 72 79 20 69 73 20 73 65 74 20 69 66 Carry is set if
0001E0: 20 6F 6B 2C 20 72 65 73 65 74 20 69 66 20 6E 6F ok, reset if no
0001F0: 74 20 6F 6B 0D 0A 0D 0A 09 69 66 20 6B 64 73 0D t ok.....if kds.
Size : 512 (Real : 512)
000000: 42 35 41 0D 0A 2E 76 74 64 09 63 61 6C 6C 20 26 B5A...vtd.call &
000010: 42 42 37 38 3A 20 6C 64 20 61 2C 31 3A 20 63 70 BB78: ld a,1: cp
000020: 20 68 3A 20 72 65 74 20 7A 3A 20 6C 64 20 61 2C h: ret z: ld a,
000030: 38 3A 20 6A 70 20 26 42 42 35 41 0D 0A 2E 76 74 8: jp &BB5A...vt
000040: 65 09 63 61 6C 6C 20 26 42 42 37 38 3A 20 70 75 e.call &BB78: pu
000050: 73 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 42 36 sh hl: call &BB6
000060: 43 3A 20 70 6F 70 20 68 6C 3A 20 6A 70 20 26 42 C: pop hl: jp &B
000070: 42 37 35 0D 0A 2E 76 74 6C 09 63 61 6C 6C 20 26 B75...vtl.call &
000080: 42 42 36 39 3A 20 6C 64 20 63 2C 68 3A 20 63 61 BB69: ld c,h: ca
000090: 6C 6C 20 26 42 42 37 38 3A 20 64 65 63 20 6C 3A ll &BB78: dec l:
0000A0: 20 6C 64 20 68 2C 63 3A 20 6C 64 20 61 2C 30 3A ld h,c: ld a,0:
0000B0: 20 6C 64 20 62 2C 30 3A 20 6A 70 20 26 42 43 35 ld b,0: jp &BC5
0000C0: 30 0D 0A 2E 76 74 6D 09 63 61 6C 6C 20 26 42 42 0...vtm.call &BB
0000D0: 36 39 3A 20 6C 64 20 63 2C 68 3A 20 63 61 6C 6C 69: ld c,h: call
0000E0: 20 26 42 42 37 38 3A 20 64 65 63 20 6C 3A 20 6C &BB78: dec l: l
0000F0: 64 20 68 2C 63 3A 20 6C 64 20 61 2C 30 3A 20 6C d h,c: ld a,0: l
000100: 64 20 62 2C 31 3A 20 6A 70 20 26 42 43 35 30 0D d b,1: jp &BC50.
000110: 0A 2E 76 74 78 09 6C 64 20 61 2C 34 3A 20 6C 64 ..vtx.ld a,4: ld
000120: 20 28 69 79 2B 31 30 38 29 2C 61 3A 20 6C 64 20 (iy+108),a: ld
000130: 61 2C 22 77 22 3A 20 6C 64 20 28 69 79 2B 31 30 a,"w": ld (iy+10
000140: 39 29 2C 61 3A 20 72 65 74 0D 0A 2E 76 74 79 09 9),a: ret...vty.
000150: 6C 64 20 61 2C 32 3A 20 6C 64 20 28 69 79 2B 31 ld a,2: ld (iy+1
000160: 30 38 29 2C 61 3A 20 6C 64 20 61 2C 22 63 22 3A 08),a: ld a,"c":
000170: 20 6C 64 20 28 69 79 2B 31 30 39 29 2C 61 3A 20 ld (iy+109),a:
000180: 72 65 74 0D 0A 2E 76 74 5F 6A 09 63 61 6C 6C 20 ret...vt_j.call
000190: 26 42 42 37 38 3A 20 6C 64 20 28 69 79 2B 31 31 &BB78: ld (iy+11
0001A0: 30 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 31 31 31 0),l: ld (iy+111
0001B0: 29 2C 68 3A 20 72 65 74 0D 0A 2E 76 74 5F 6B 09 ),h: ret...vt_k.
0001C0: 6C 64 20 6C 2C 28 69 79 2B 31 31 30 29 3A 20 6C ld l,(iy+110): l
0001D0: 64 20 68 2C 28 69 79 2B 31 31 31 29 3A 20 6A 70 d h,(iy+111): jp
0001E0: 20 26 42 42 37 35 0D 0A 2E 76 74 5F 6C 09 63 61 &BB75...vt_l.ca
0001F0: 6C 6C 20 26 42 42 36 39 3A 20 6C 64 20 63 2C 68 ll &BB69: ld c,h
Size : 512 (Real : 512)
000000: 0A 2E 77 61 69 74 62 74 09 6C 64 20 28 69 79 2B ..waitbt.ld (iy+
000010: 38 37 29 2C 65 3A 20 6C 64 20 28 69 79 2B 38 38 87),e: ld (iy+88
000020: 29 2C 64 3A 20 6C 64 20 62 63 2C 63 6F 6E 69 6E ),d: ld bc,conin
000030: 3A 20 6C 64 20 61 2C 31 3A 20 6C 64 20 28 69 79 : ld a,1: ld (iy
000040: 2B 38 39 29 2C 61 0D 0A 2E 77 74 6C 6F 6F 70 09 +89),a...wtloop.
000050: 69 6E 20 64 2C 28 63 29 3A 20 62 69 74 20 37 2C in d,(c): bit 7,
000060: 64 3A 20 6A 72 20 6E 7A 2C 77 61 69 74 63 72 0D d: jr nz,waitcr.
000070: 0A 09 6C 64 20 61 2C 28 69 79 2B 38 39 29 3A 20 ..ld a,(iy+89):
000080: 6F 72 20 61 3A 20 6A 72 20 6E 7A 2C 77 74 6C 6F or a: jr nz,wtlo
000090: 6F 70 3A 20 72 65 74 0D 0A 2E 77 61 69 74 63 72 op: ret...waitcr
0000A0: 09 6C 64 20 62 63 2C 64 61 74 69 6E 3A 20 69 6E .ld bc,datin: in
0000B0: 20 61 2C 28 63 29 0D 0A 09 63 61 6C 6C 20 72 65 a,(c)...call re
0000C0: 76 65 72 73 3A 20 73 63 66 3A 20 72 65 74 0D 0A vers: scf: ret..
0000D0: 20 09 65 6C 73 65 0D 0A 2E 77 61 69 74 62 74 09 .else...waitbt.
0000E0: 6C 64 20 28 69 79 2B 38 37 29 2C 65 3A 20 6C 64 ld (iy+87),e: ld
0000F0: 20 28 69 79 2B 38 38 29 2C 64 3A 20 6C 64 20 62 (iy+88),d: ld b
000100: 63 2C 63 6F 6E 70 6F 72 74 3A 20 6C 64 20 61 2C c,conport: ld a,
000110: 31 3A 20 6C 64 20 28 69 79 2B 38 39 29 2C 61 0D 1: ld (iy+89),a.
000120: 0A 2E 77 74 6C 6F 6F 70 09 69 6E 20 64 2C 28 63 ..wtloop.in d,(c
000130: 29 3A 20 72 72 20 64 3A 20 6A 72 20 63 2C 77 61 ): rr d: jr c,wa
000140: 69 74 63 72 0D 0A 09 6C 64 20 61 2C 28 69 79 2B itcr...ld a,(iy+
000150: 38 39 29 3A 20 6F 72 20 61 3A 20 6A 72 20 6E 7A 89): or a: jr nz
000160: 2C 77 74 6C 6F 6F 70 3A 20 72 65 74 0D 0A 2E 77 ,wtloop: ret...w
000170: 61 69 74 63 72 09 6C 64 20 62 63 2C 64 61 74 70 aitcr.ld bc,datp
000180: 6F 72 74 3A 20 69 6E 20 61 2C 28 63 29 3A 20 72 ort: in a,(c): r
000190: 65 74 0D 0A 09 65 6E 64 69 66 0D 0A 0D 0A 09 3B et...endif.....;
0001A0: 3E 3E 3E 20 4D 43 20 57 41 49 54 20 50 52 49 4E >>> MC WAIT PRIN
0001B0: 54 45 52 20 72 65 64 69 72 65 63 74 69 6F 6E 0D TER redirection.
0001C0: 0A 0D 0A 2E 72 65 64 69 72 09 70 75 73 68 20 64 ....redir.push d
0001D0: 65 3A 20 70 75 73 68 20 68 6C 0D 0A 09 6C 64 20 e: push hl...ld
0001E0: 63 2C 30 3A 20 6C 64 20 68 6C 2C 73 65 6E 64 62 c,0: ld hl,sendb
0001F0: 74 0D 0A 09 63 61 6C 6C 20 26 31 42 09 09 09 3B t...call &1B...;
Size : 512 (Real : 512)
000000: 3A 20 63 61 6C 6C 20 26 42 42 37 38 3A 20 64 65 : call &BB78: de
000010: 63 20 6C 3A 20 6C 64 20 65 2C 6C 3A 20 6C 64 20 c l: ld e,l: ld
000020: 68 2C 63 3A 20 78 6F 72 20 61 3A 20 6C 64 20 62 h,c: xor a: ld b
000030: 2C 61 3A 20 6A 70 20 26 42 43 35 30 0D 0A 2E 76 ,a: jp &BC50...v
000040: 74 5F 70 09 78 6F 72 20 61 3A 20 63 61 6C 6C 20 t_p.xor a: call
000050: 26 42 42 39 30 3A 20 6C 64 20 61 2C 31 3A 20 6A &BB90: ld a,1: j
000060: 70 20 26 42 42 39 36 0D 0A 2E 76 74 5F 71 09 78 p &BB96...vt_q.x
000070: 6F 72 20 61 3A 20 63 61 6C 6C 20 26 42 42 39 36 or a: call &BB96
000080: 3A 20 6C 64 20 61 2C 31 3A 20 6A 70 20 26 42 42 : ld a,1: jp &BB
000090: 39 30 0D 0A 0D 0A 2E 65 73 63 73 6E 74 09 6C 64 90.....escsnt.ld
0000A0: 20 61 2C 31 3A 20 6C 64 20 28 69 79 2B 31 30 38 a,1: ld (iy+108
0000B0: 29 2C 61 3A 20 72 65 74 0D 0A 0D 0A 2E 76 74 35 ),a: ret.....vt5
0000C0: 32 61 63 09 63 70 20 22 77 22 3A 20 6C 64 20 61 2ac.cp "w": ld a
0000D0: 2C 28 69 79 2B 31 30 38 29 3A 20 6A 72 20 7A 2C ,(iy+108): jr z,
0000E0: 76 74 35 32 77 73 3A 20 63 70 20 31 3A 20 6A 72 vt52ws: cp 1: jr
0000F0: 20 6E 7A 2C 76 74 64 6F 63 70 3A 20 6C 64 20 61 nz,vtdocp: ld a
000100: 2C 63 3A 20 73 75 62 20 33 31 0D 0A 09 6C 64 20 ,c: sub 31...ld
000110: 28 69 79 2B 31 31 32 29 2C 61 3A 20 72 65 74 0D (iy+112),a: ret.
000120: 0A 2E 76 74 64 6F 63 70 09 6C 64 20 61 2C 63 3A ..vtdocp.ld a,c:
000130: 20 73 75 62 20 33 31 3A 20 6C 64 20 68 2C 61 3A sub 31: ld h,a:
000140: 20 6C 64 20 61 2C 28 69 79 2B 31 31 32 29 3A 20 ld a,(iy+112):
000150: 6C 64 20 6C 2C 61 3A 20 63 61 6C 6C 20 26 42 42 ld l,a: call &BB
000160: 37 35 3A 20 6A 72 20 76 74 63 6D 0D 0A 2E 76 74 75: jr vtcm...vt
000170: 35 32 77 73 09 70 75 73 68 20 69 79 3A 20 70 6F 52ws.push iy: po
000180: 70 20 68 6C 3A 20 6C 64 20 64 65 2C 31 31 32 3A p hl: ld de,112:
000190: 20 61 64 64 20 68 6C 2C 64 65 3A 20 6C 64 20 65 add hl,de: ld e
0001A0: 2C 61 3A 20 6C 64 20 64 2C 30 0D 0A 09 61 64 64 ,a: ld d,0...add
0001B0: 20 68 6C 2C 64 65 3A 20 6C 64 20 61 2C 63 3A 20 hl,de: ld a,c:
0001C0: 73 75 62 20 33 32 3A 20 6C 64 20 28 68 6C 29 2C sub 32: ld (hl),
0001D0: 61 0D 0A 09 6C 64 20 61 2C 65 3A 20 6F 72 20 61 a...ld a,e: or a
0001E0: 3A 20 72 65 74 20 6E 7A 3A 20 6C 64 20 61 2C 28 : ret nz: ld a,(
0001F0: 69 79 2B 31 31 35 29 3A 20 6C 64 20 65 2C 61 3A iy+115): ld e,a:
Size : 512 (Real : 512)
000000: 4B 4C 20 46 41 52 20 50 43 48 4C 0D 0A 09 73 63 KL FAR PCHL...sc
000010: 66 09 09 09 09 3B 63 61 72 72 79 20 3D 20 6E 6F f....;carry = no
000020: 20 74 69 6D 65 2D 6F 75 74 0D 0A 09 70 6F 70 20 time-out...pop
000030: 68 6C 3A 20 70 6F 70 20 64 65 3A 20 72 65 74 0D hl: pop de: ret.
000040: 0A 0D 0A 09 3B 3E 3E 3E 20 46 72 61 6D 65 20 66 ....;>>> Frame f
000050: 6C 79 62 61 63 6B 20 65 76 65 6E 74 20 66 6F 72 lyback event for
000060: 20 63 6F 75 6E 74 65 72 0D 0A 0D 0A 2E 66 63 6F counter.....fco
000070: 75 6E 74 09 70 75 73 68 20 69 79 3A 20 6C 64 20 unt.push iy: ld
000080: 69 79 2C 28 26 42 41 46 44 29 0D 0A 09 6C 64 20 iy,(&BAFD)...ld
000090: 61 2C 28 69 79 2B 38 39 29 3A 20 6F 72 20 61 3A a,(iy+89): or a:
0000A0: 20 6A 72 20 7A 2C 72 65 74 66 63 0D 0A 09 6C 64 jr z,retfc...ld
0000B0: 20 6C 2C 28 69 79 2B 38 37 29 3A 20 6C 64 20 68 l,(iy+87): ld h
0000C0: 2C 28 69 79 2B 38 38 29 3A 20 64 65 63 20 68 6C ,(iy+88): dec hl
0000D0: 0D 0A 09 6C 64 20 28 69 79 2B 38 37 29 2C 6C 3A ...ld (iy+87),l:
0000E0: 20 6C 64 20 28 69 79 2B 38 38 29 2C 68 0D 0A 09 ld (iy+88),h...
0000F0: 6C 64 20 61 2C 68 3A 20 6F 72 20 6C 3A 20 6C 64 ld a,h: or l: ld
000100: 20 28 69 79 2B 38 39 29 2C 61 0D 0A 2E 72 65 74 (iy+89),a...ret
000110: 66 63 09 70 6F 70 20 69 79 3A 20 72 65 74 0D 0A fc.pop iy: ret..
000120: 0D 0A 09 3B 3E 3E 3E 20 50 72 69 6E 74 20 73 74 ...;>>> Print st
000130: 72 69 6E 67 20 61 74 20 48 4C 0D 0A 0D 0A 2E 73 ring at HL.....s
000140: 74 72 69 6E 67 09 6C 64 20 61 2C 28 68 6C 29 3A tring.ld a,(hl):
000150: 20 6F 72 20 61 3A 20 72 65 74 20 7A 3A 20 63 61 or a: ret z: ca
000160: 6C 6C 20 26 42 42 35 41 3A 20 69 6E 63 20 68 6C ll &BB5A: inc hl
000170: 3A 20 6A 72 20 73 74 72 69 6E 67 0D 0A 0D 0A 09 : jr string.....
000180: 3B 3E 3E 3E 20 52 65 67 69 73 74 65 72 20 61 63 ;>>> Register ac
000190: 63 65 73 73 0D 0A 09 3B 3E 3E 3E 20 41 6D 73 74 cess...;>>> Amst
0001A0: 72 61 64 20 2D 20 73 65 6E 64 2F 72 65 61 64 20 rad - send/read
0001B0: 41 2C 20 44 41 52 54 20 72 65 67 69 73 74 65 72 A, DART register
0001C0: 20 44 0D 0A 09 3B 3E 3E 3E 20 4B 44 53 20 2D 20 D...;>>> KDS -
0001D0: 73 65 6E 64 2F 72 65 61 64 20 41 2C 20 36 38 35 send/read A, 685
0001E0: 30 20 63 6F 6E 74 72 6F 6C 20 70 6F 72 74 0D 0A 0 control port..
0001F0: 0D 0A 09 69 66 20 6B 64 73 0D 0A 2E 70 72 65 67 ...if kds...preg
Size : 512 (Real : 512)
000000: 20 6C 64 20 61 2C 28 69 79 2B 31 31 34 29 3A 20 ld a,(iy+114):
000010: 6C 64 20 64 2C 61 0D 0A 09 6C 64 20 61 2C 28 69 ld d,a...ld a,(i
000020: 79 2B 31 31 33 29 3A 20 61 64 64 20 61 2C 65 3A y+113): add a,e:
000030: 20 6C 64 20 6C 2C 61 3A 20 6C 64 20 61 2C 28 69 ld l,a: ld a,(i
000040: 79 2B 31 31 32 29 3A 20 61 64 64 20 61 2C 64 3A y+112): add a,d:
000050: 20 6C 64 20 68 2C 61 0D 0A 09 63 61 6C 6C 20 26 ld h,a...call &
000060: 42 42 36 36 0D 0A 2E 76 74 63 6D 09 78 6F 72 20 BB66...vtcm.xor
000070: 61 3A 20 6C 64 20 28 69 79 2B 31 30 39 29 2C 61 a: ld (iy+109),a
000080: 3A 20 72 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 53 : ret.....;>>> S
000090: 74 6F 70 20 28 58 4F 46 46 2C 20 64 72 6F 70 20 top (XOFF, drop
0000A0: 52 54 53 29 0D 0A 0D 0A 2E 73 74 6F 70 09 6C 64 RTS).....stop.ld
0000B0: 20 61 2C 28 69 79 2B 34 29 3A 20 6F 72 20 61 3A a,(iy+4): or a:
0000C0: 20 6C 64 20 61 2C 31 39 3A 20 63 61 6C 6C 20 6E ld a,19: call n
0000D0: 7A 2C 73 65 6E 64 62 74 0D 0A 2E 73 74 6F 70 32 z,sendbt...stop2
0000E0: 09 69 66 20 6B 64 73 3A 20 6C 64 20 61 2C 28 69 .if kds: ld a,(i
0000F0: 79 2B 31 31 29 3A 20 61 6E 64 20 32 35 31 3A 20 y+11): and 251:
000100: 6A 70 20 70 72 65 67 0D 0A 09 65 6C 73 65 3A 20 jp preg...else:
000110: 20 20 6C 64 20 61 2C 28 69 79 2B 31 32 29 3A 20 ld a,(iy+12):
000120: 61 6E 64 20 32 35 33 3A 20 6C 64 20 64 2C 35 3A and 253: ld d,5:
000130: 20 6A 70 20 70 72 65 67 0D 0A 09 65 6E 64 69 66 jp preg...endif
000140: 0D 0A 0D 0A 09 3B 3E 3E 3E 20 52 65 73 75 6D 65 .....;>>> Resume
000150: 20 28 58 4F 4E 2C 20 52 54 53 20 68 69 67 68 29 (XON, RTS high)
000160: 0D 0A 0D 0A 2E 72 65 73 75 6D 65 09 6C 64 20 61 .....resume.ld a
000170: 2C 28 69 79 2B 34 29 3A 20 6F 72 20 61 3A 20 6C ,(iy+4): or a: l
000180: 64 20 61 2C 31 37 3A 20 63 61 6C 6C 20 6E 7A 2C d a,17: call nz,
000190: 73 65 6E 64 62 74 0D 0A 2E 72 65 73 75 6D 32 09 sendbt...resum2.
0001A0: 69 66 20 6B 64 73 3A 20 6C 64 20 61 2C 28 69 79 if kds: ld a,(iy
0001B0: 2B 31 31 29 3A 20 6A 70 20 70 72 65 67 0D 0A 09 +11): jp preg...
0001C0: 65 6C 73 65 3A 20 20 20 6C 64 20 61 2C 28 69 79 else: ld a,(iy
0001D0: 2B 31 32 29 3A 20 6C 64 20 64 2C 35 3A 20 6A 70 +12): ld d,5: jp
0001E0: 20 70 72 65 67 0D 0A 09 65 6E 64 69 66 0D 0A 0D preg...endif...
0001F0: 0A 09 3B 3E 3E 3E 20 52 65 73 65 74 20 69 6E 74 ..;>>> Reset int
Size : 512 (Real : 512)
000000: 09 6C 64 20 62 63 2C 63 6F 6E 6F 75 74 3A 20 6F .ld bc,conout: o
000010: 75 74 20 28 63 29 2C 61 3A 20 72 65 74 0D 0A 2E ut (c),a: ret...
000020: 72 72 65 67 09 6C 64 20 62 63 2C 63 6F 6E 69 6E rreg.ld bc,conin
000030: 3A 20 69 6E 20 61 2C 28 63 29 3A 20 72 65 74 0D : in a,(c): ret.
000040: 0A 09 65 6C 73 65 0D 0A 2E 70 72 65 67 09 6C 64 ..else...preg.ld
000050: 20 62 63 2C 63 6F 6E 70 6F 72 74 3A 20 6F 75 74 bc,conport: out
000060: 20 28 63 29 2C 64 3A 20 6F 75 74 20 28 63 29 2C (c),d: out (c),
000070: 61 3A 20 72 65 74 0D 0A 2E 72 72 65 67 09 6C 64 a: ret...rreg.ld
000080: 20 62 63 2C 63 6F 6E 70 6F 72 74 3A 20 6F 75 74 bc,conport: out
000090: 20 28 63 29 2C 64 3A 20 69 6E 20 61 2C 28 63 29 (c),d: in a,(c)
0000A0: 3A 20 72 65 74 0D 0A 09 65 6E 64 69 66 0D 0A 0D : ret...endif...
0000B0: 0A 09 3B 3E 3E 3E 20 50 72 69 6E 74 20 56 54 35 ..;>>> Print VT5
0000C0: 32 20 63 68 61 72 61 63 74 65 72 20 41 0D 0A 0D 2 character A...
0000D0: 0A 2E 76 74 35 32 63 09 6C 64 20 63 2C 61 3A 20 ..vt52c.ld c,a:
0000E0: 6C 64 20 61 2C 28 69 79 2B 31 30 38 29 3A 20 6F ld a,(iy+108): o
0000F0: 72 20 61 3A 20 6A 70 20 6E 7A 2C 76 74 70 72 3A r a: jp nz,vtpr:
000100: 20 6C 64 20 61 2C 63 0D 0A 09 63 70 20 33 31 3A ld a,c...cp 31:
000110: 20 6A 70 20 6E 63 2C 26 42 42 35 41 3A 20 63 70 jp nc,&BB5A: cp
000120: 20 32 37 3A 20 6A 70 20 7A 2C 65 73 63 73 6E 74 27: jp z,escsnt
000130: 0D 0A 09 63 70 20 37 3A 20 72 65 74 20 63 3A 20 ...cp 7: ret c:
000140: 63 70 20 31 34 3A 20 72 65 74 20 6E 63 3A 20 6A cp 14: ret nc: j
000150: 70 20 26 42 42 35 41 0D 0A 2E 76 74 70 72 09 64 p &BB5A...vtpr.d
000160: 65 63 20 61 3A 20 6C 64 20 28 69 79 2B 31 30 38 ec a: ld (iy+108
000170: 29 2C 61 3A 20 6C 64 20 61 2C 28 69 79 2B 31 30 ),a: ld a,(iy+10
000180: 39 29 3A 20 6F 72 20 61 3A 20 6A 70 20 6E 7A 2C 9): or a: jp nz,
000190: 76 74 35 32 61 63 3A 20 6C 64 20 68 6C 2C 76 74 vt52ac: ld hl,vt
0001A0: 35 32 73 74 0D 0A 2E 76 74 73 74 6C 70 09 6C 64 52st...vtstlp.ld
0001B0: 20 61 2C 28 68 6C 29 3A 20 6F 72 20 61 3A 20 6A a,(hl): or a: j
0001C0: 72 20 7A 2C 65 78 73 74 6C 70 0D 0A 09 69 6E 63 r z,exstlp...inc
0001D0: 20 68 6C 3A 20 63 70 20 63 3A 20 6A 72 20 6E 7A hl: cp c: jr nz
0001E0: 2C 73 74 63 74 6C 70 3A 20 6C 64 20 61 2C 28 68 ,stctlp: ld a,(h
0001F0: 6C 29 3A 20 6A 70 20 26 42 42 35 41 0D 0A 2E 73 l): jp &BB5A...s
Size : 512 (Real : 512)
000000: 6D 5F 69 09 63 61 6C 6C 20 72 65 73 65 74 3A 20 m_i.call reset:
000010: 6C 64 20 68 6C 2C 32 34 30 30 3A 20 6C 64 20 64 ld hl,2400: ld d
000020: 65 2C 32 34 30 30 09 3B 32 34 30 30 2F 32 34 30 e,2400.;2400/240
000030: 30 20 62 70 73 0D 0A 2E 74 65 72 6D 5F 78 09 63 0 bps...term_x.c
000040: 61 6C 6C 20 67 6F 74 62 70 0D 0A 09 6C 64 20 61 all gotbp...ld a
000050: 2C 31 3A 20 6C 64 20 28 69 79 2B 32 29 2C 61 09 ,1: ld (iy+2),a.
000060: 09 09 3B 63 75 72 73 6F 72 20 6F 6E 0D 0A 09 6C ..;cursor on...l
000070: 64 20 28 69 79 2B 34 29 2C 61 09 09 09 09 3B 58 d (iy+4),a....;X
000080: 4F 4E 20 66 6C 6F 77 20 63 6F 6E 74 72 6F 6C 20 ON flow control
000090: 6F 6E 0D 0A 09 6C 64 20 68 6C 2C 35 30 30 0D 0A on...ld hl,500..
0000A0: 09 6C 64 20 28 69 79 2B 39 29 2C 6C 3A 20 6C 64 .ld (iy+9),l: ld
0000B0: 20 28 69 79 2B 31 30 29 2C 68 09 09 3B 74 69 6D (iy+10),h..;tim
0000C0: 65 6F 75 74 20 31 30 20 73 65 63 6F 6E 64 73 0D eout 10 seconds.
0000D0: 0A 09 6C 64 20 68 6C 2C 74 66 62 75 66 66 0D 0A ..ld hl,tfbuff..
0000E0: 09 6C 64 20 28 69 79 2B 37 29 2C 6C 3A 20 6C 64 .ld (iy+7),l: ld
0000F0: 20 28 69 79 2B 38 29 2C 68 09 09 3B 66 69 6C 65 (iy+8),h..;file
000100: 20 62 75 66 66 65 72 0D 0A 09 6C 64 20 69 78 2C buffer...ld ix,
000110: 74 70 62 6C 6F 63 6B 3A 20 6C 64 20 28 69 78 29 tpblock: ld (ix)
000120: 2C 31 3A 20 6C 64 20 28 69 78 2B 31 29 2C 30 0D ,1: ld (ix+1),0.
000130: 0A 09 6C 64 20 28 69 78 2B 32 29 2C 30 3A 20 6C ..ld (ix+2),0: l
000140: 64 20 28 69 78 2B 33 29 2C 30 0D 0A 09 6C 64 20 d (ix+3),0...ld
000150: 28 69 78 2B 34 29 2C 38 3A 20 6C 64 20 28 69 78 (ix+4),8: ld (ix
000160: 2B 35 29 2C 30 0D 0A 09 70 75 73 68 20 69 79 0D +5),0...push iy.
000170: 0A 09 6C 64 20 61 2C 33 3A 20 63 61 6C 6C 20 77 ..ld a,3: call w
000180: 6F 72 64 5F 69 09 09 09 3B 73 65 74 20 64 61 74 ord_i...;set dat
000190: 61 20 77 6F 72 64 0D 0A 09 70 6F 70 20 69 79 0D a word...pop iy.
0001A0: 0A 69 66 20 6B 64 73 3A 20 65 6C 73 65 3A 20 6C .if kds: else: l
0001B0: 64 20 61 2C 31 3A 20 63 61 6C 6C 20 68 77 6F 6B d a,1: call hwok
0001C0: 3A 20 65 6E 64 69 66 09 09 3B 73 65 74 20 68 61 : endif..;set ha
0001D0: 72 64 77 61 72 65 20 68 61 6E 64 73 68 61 6B 69 rdware handshaki
0001E0: 6E 67 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 42 30 ng.....call &BB0
0001F0: 30 3A 20 63 61 6C 6C 20 26 42 42 34 45 3A 20 63 0: call &BB4E: c
Size : 512 (Real : 512)
000000: 6C 20 67 6F 74 62 70 3A 20 6A 70 20 72 73 6D 6E l gotbp: jp rsmn
000010: 75 0D 0A 0D 0A 2E 77 72 64 6D 6E 75 09 6C 64 20 u.....wrdmnu.ld
000020: 68 6C 2C 74 6D 77 6F 72 64 3A 20 63 61 6C 6C 20 hl,tmword: call
000030: 6D 65 6E 75 3A 20 6A 70 20 7A 2C 72 73 6D 6E 75 menu: jp z,rsmnu
000040: 0D 0A 09 6C 64 20 69 78 2C 74 70 62 6C 6F 63 6B ...ld ix,tpblock
000050: 3A 20 6C 64 20 28 69 78 29 2C 31 3A 20 6C 64 20 : ld (ix),1: ld
000060: 28 69 78 2B 31 29 2C 30 0D 0A 09 63 70 20 31 3A (ix+1),0...cp 1:
000070: 20 6A 72 20 6E 7A 2C 70 61 72 32 0D 0A 09 6C 64 jr nz,par2...ld
000080: 20 28 69 78 2B 32 29 2C 30 3A 20 6C 64 20 28 69 (ix+2),0: ld (i
000090: 78 2B 34 29 2C 38 3A 20 6A 72 20 73 77 72 64 0D x+4),8: jr swrd.
0000A0: 0A 2E 70 61 72 32 09 6C 64 20 28 69 78 2B 32 29 ..par2.ld (ix+2)
0000B0: 2C 32 3A 20 6C 64 20 28 69 78 2B 34 29 2C 37 0D ,2: ld (ix+4),7.
0000C0: 0A 2E 73 77 72 64 09 6C 64 20 28 69 78 2B 33 29 ..swrd.ld (ix+3)
0000D0: 2C 30 3A 20 6C 64 20 28 69 78 2B 35 29 2C 30 0D ,0: ld (ix+5),0.
0000E0: 0A 09 70 75 73 68 20 69 79 3A 20 6C 64 20 61 2C ..push iy: ld a,
0000F0: 33 3A 20 63 61 6C 6C 20 77 6F 72 64 5F 69 0D 0A 3: call word_i..
000100: 09 70 6F 70 20 69 79 3A 20 6A 70 20 72 73 6D 6E .pop iy: jp rsmn
000110: 75 0D 0A 0D 0A 2E 64 6F 62 72 6B 09 63 61 6C 6C u.....dobrk.call
000120: 20 62 72 6B 5F 69 3A 20 6A 70 20 72 73 6D 6E 75 brk_i: jp rsmnu
000130: 0D 0A 0D 0A 2E 64 69 72 6D 6E 75 09 6C 64 20 68 .....dirmnu.ld h
000140: 6C 2C 74 6D 64 69 72 3A 20 63 61 6C 6C 20 6D 65 l,tmdir: call me
000150: 6E 75 3A 20 6A 70 20 7A 2C 6D 61 69 6E 6D 0D 0A nu: jp z,mainm..
000160: 09 6C 64 20 28 69 79 2B 38 36 29 2C 61 09 09 09 .ld (iy+86),a...
000170: 3B 63 75 72 72 65 6E 74 20 64 69 72 65 63 74 6F ;current directo
000180: 72 79 0D 0A 09 6C 64 20 68 6C 2C 63 64 6E 61 6D ry...ld hl,cdnam
000190: 65 3A 20 6C 64 20 64 65 2C 74 70 62 6C 6F 63 6B e: ld de,tpblock
0001A0: 2B 35 31 33 0D 0A 09 6C 64 20 62 63 2C 31 32 3A +513...ld bc,12:
0001B0: 20 6C 64 69 72 0D 0A 09 6C 64 20 68 6C 2C 74 70 ldir...ld hl,tp
0001C0: 62 6C 6F 63 6B 2B 35 32 30 3A 20 61 64 64 20 34 block+520: add 4
0001D0: 38 09 3B 66 69 6C 65 6E 61 6D 65 20 22 43 48 41 8.;filename "CHA
0001E0: 52 4C 45 59 3F 2E 44 49 52 22 0D 0A 09 6C 64 20 RLEY?.DIR"...ld
0001F0: 28 68 6C 29 2C 61 3A 20 63 61 6C 6C 20 26 42 43 (hl),a: call &BC
Size : 512 (Real : 512)
000000: 61 6C 6C 20 26 42 42 42 41 3A 20 63 61 6C 6C 20 all &BBBA: call
000010: 26 42 42 46 46 0D 0A 0D 0A 09 6C 64 20 61 2C 26 &BBFF.....ld a,&
000020: 34 30 3A 20 63 61 6C 6C 20 26 42 43 30 38 0D 0A 40: call &BC08..
000030: 09 6C 64 20 61 2C 31 3A 20 20 20 63 61 6C 6C 20 .ld a,1: call
000040: 26 42 43 30 45 09 09 09 3B 63 6C 65 61 72 20 6C &BC0E...;clear l
000050: 6F 77 20 73 63 72 65 65 6E 0D 0A 09 6C 64 20 61 ow screen...ld a
000060: 2C 26 43 30 3A 20 63 61 6C 6C 20 26 42 43 30 38 ,&C0: call &BC08
000070: 0D 0A 09 6C 64 20 61 2C 32 3A 20 20 20 63 61 6C ...ld a,2: cal
000080: 6C 20 26 42 43 30 45 09 09 09 3B 63 6C 65 61 72 l &BC0E...;clear
000090: 20 68 69 67 68 20 73 63 72 65 65 6E 0D 0A 0D 0A high screen....
0000A0: 2E 74 5F 63 6F 6D 09 63 61 6C 6C 20 63 6F 6D 5F .t_com.call com_
0000B0: 69 0D 0A 09 63 61 6C 6C 20 73 74 6F 70 32 09 09 i...call stop2..
0000C0: 09 09 3B 22 4F 79 21 21 21 21 20 48 6F 6C 64 20 ..;"Oy!!!! Hold
0000D0: 6F 6E 21 22 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 on!".....call &B
0000E0: 42 37 38 3A 20 6C 64 20 28 63 68 61 70 6F 73 29 B78: ld (chapos)
0000F0: 2C 68 6C 09 09 3B 73 74 6F 72 65 20 63 68 61 72 ,hl..;store char
000100: 61 63 74 65 72 20 70 6F 73 69 74 69 6F 6E 0D 0A acter position..
000110: 09 63 61 6C 6C 20 26 42 43 30 42 3A 20 6C 64 20 .call &BC0B: ld
000120: 28 6F 66 66 73 65 74 29 2C 68 6C 09 09 3B 73 74 (offset),hl..;st
000130: 6F 72 65 20 73 63 72 65 65 6E 20 6F 66 66 73 65 ore screen offse
000140: 74 0D 0A 0D 0A 09 6C 64 20 61 2C 26 34 30 3A 20 t.....ld a,&40:
000150: 63 61 6C 6C 20 26 42 43 30 38 0D 0A 2E 6D 73 65 call &BC08...mse
000160: 74 75 70 09 6C 64 20 61 2C 31 3A 20 63 61 6C 6C tup.ld a,1: call
000170: 20 26 42 43 30 45 09 09 09 3B 4D 4F 44 45 20 31 &BC0E...;MODE 1
000180: 0D 0A 09 6C 64 20 62 63 2C 30 3A 20 63 61 6C 6C ...ld bc,0: call
000190: 20 26 42 43 33 38 09 09 09 3B 62 6F 72 64 65 72 &BC38...;border
0001A0: 20 30 0D 0A 09 6C 64 20 61 2C 30 3A 20 6C 64 20 0...ld a,0: ld
0001B0: 62 63 2C 26 30 30 30 30 3A 20 63 61 6C 6C 20 26 bc,&0000: call &
0001C0: 42 43 33 32 09 09 3B 73 65 74 20 69 6E 6B 73 0D BC32..;set inks.
0001D0: 0A 09 6C 64 20 61 2C 31 3A 20 6C 64 20 62 63 2C ..ld a,1: ld bc,
0001E0: 26 31 41 31 41 3A 20 63 61 6C 6C 20 26 42 43 33 &1A1A: call &BC3
0001F0: 32 09 09 3B 20 5E 0D 0A 09 6C 64 20 61 2C 32 3A 2..; ^...ld a,2:
Size : 512 (Real : 512)
000000: 65 72 66 61 63 65 20 61 6E 64 20 76 61 72 69 61 erface and varia
000010: 62 6C 65 73 0D 0A 0D 0A 2E 72 65 73 65 74 09 69 bles.....reset.i
000020: 66 20 6B 64 73 3A 20 6C 64 20 61 2C 28 69 79 2B f kds: ld a,(iy+
000030: 31 31 29 3A 20 6F 72 20 26 43 30 3A 20 63 61 6C 11): or &C0: cal
000040: 6C 20 70 72 65 67 0D 0A 09 65 6C 73 65 3A 20 20 l preg...else:
000050: 20 6C 64 20 61 2C 26 31 38 3A 20 6C 64 20 64 2C ld a,&18: ld d,
000060: 30 3A 20 20 20 20 63 61 6C 6C 20 70 72 65 67 0D 0: call preg.
000070: 0A 09 65 6E 64 69 66 0D 0A 0D 0A 09 6C 64 20 61 ..endif.....ld a
000080: 2C 31 3A 20 6C 64 20 28 69 79 2B 30 29 2C 61 0D ,1: ld (iy+0),a.
000090: 0A 09 6C 64 20 28 69 79 2B 33 29 2C 61 0D 0A 0D ..ld (iy+3),a...
0000A0: 0A 09 6C 64 20 61 2C 30 3A 20 6C 64 20 28 69 79 ..ld a,0: ld (iy
0000B0: 2B 31 29 2C 61 0D 0A 09 6C 64 20 28 69 79 2B 32 +1),a...ld (iy+2
0000C0: 29 2C 61 0D 0A 09 6C 64 20 28 69 79 2B 34 29 2C ),a...ld (iy+4),
0000D0: 61 0D 0A 09 6C 64 20 28 69 79 2B 35 29 2C 61 0D a...ld (iy+5),a.
0000E0: 0A 09 6C 64 20 28 69 79 2B 39 29 2C 61 3A 20 6C ..ld (iy+9),a: l
0000F0: 64 20 28 69 79 2B 31 30 29 2C 61 0D 0A 09 6C 64 d (iy+10),a...ld
000100: 20 28 69 79 2B 31 30 38 29 2C 61 3A 20 6C 64 20 (iy+108),a: ld
000110: 28 69 79 2B 31 30 39 29 2C 61 0D 0A 0D 0A 09 6C (iy+109),a.....l
000120: 64 20 61 2C 32 3A 20 6C 64 20 28 69 79 2B 31 30 d a,2: ld (iy+10
000130: 37 29 2C 61 0D 0A 0D 0A 09 70 75 73 68 20 69 79 7),a.....push iy
000140: 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 : pop hl...ld de
000150: 2C 34 35 3A 20 61 64 64 20 68 6C 2C 64 65 3A 20 ,45: add hl,de:
000160: 65 78 20 64 65 2C 68 6C 0D 0A 09 6C 64 20 68 6C ex de,hl...ld hl
000170: 2C 72 73 66 74 78 74 3A 20 6C 64 20 62 63 2C 32 ,rsftxt: ld bc,2
000180: 33 3A 20 6C 64 69 72 0D 0A 0D 0A 09 69 66 20 6B 3: ldir.....if k
000190: 64 73 3A 20 6C 64 20 61 2C 25 31 30 31 30 31 31 ds: ld a,%101011
0001A0: 30 30 3A 20 6C 64 20 28 69 79 2B 31 31 29 2C 61 00: ld (iy+11),a
0001B0: 3A 20 63 61 6C 6C 20 70 72 65 67 0D 0A 09 65 6C : call preg...el
0001C0: 73 65 3A 20 20 20 6C 64 20 61 2C 25 31 31 31 30 se: ld a,%1110
0001D0: 30 30 30 31 3A 20 6C 64 20 28 69 79 2B 31 31 29 0001: ld (iy+11)
0001E0: 2C 61 3A 20 6C 64 20 64 2C 33 3A 20 63 61 6C 6C ,a: ld d,3: call
0001F0: 20 70 72 65 67 0D 0A 09 09 6C 64 20 61 2C 25 31 preg....ld a,%1
Size : 512 (Real : 512)
000000: 20 6C 64 20 62 63 2C 26 30 32 30 32 3A 20 63 61 ld bc,&0202: ca
000010: 6C 6C 20 26 42 43 33 32 09 09 3B 20 7C 0D 0A 09 ll &BC32..; |...
000020: 6C 64 20 61 2C 33 3A 20 6C 64 20 62 63 2C 26 30 ld a,3: ld bc,&0
000030: 36 30 36 3A 20 63 61 6C 6C 20 26 42 43 33 32 09 606: call &BC32.
000040: 09 3B 20 7C 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 63 .; |.....ld hl,c
000050: 63 72 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 crtxt: call stri
000060: 6E 67 0D 0A 09 6C 64 20 64 65 2C 26 30 30 30 34 ng...ld de,&0004
000070: 3A 20 6C 64 20 68 6C 2C 26 32 37 31 38 0D 0A 09 : ld hl,&2718...
000080: 63 61 6C 6C 20 26 42 42 36 36 09 09 09 09 3B 73 call &BB66....;s
000090: 65 74 20 75 70 20 77 69 6E 64 6F 77 0D 0A 2E 6D et up window...m
0000A0: 61 69 6E 6D 09 6C 64 20 68 6C 2C 74 6D 6D 61 69 ainm.ld hl,tmmai
0000B0: 6E 3A 20 63 61 6C 6C 20 6D 65 6E 75 0D 0A 09 6A n: call menu...j
0000C0: 70 20 7A 2C 71 75 63 6F 6D 0D 0A 09 63 70 20 31 p z,qucom...cp 1
0000D0: 3A 20 6A 70 20 7A 2C 72 73 6D 6E 75 0D 0A 09 63 : jp z,rsmnu...c
0000E0: 70 20 32 3A 20 6A 70 20 7A 2C 63 70 74 6D 6E 75 p 2: jp z,cptmnu
0000F0: 0D 0A 09 63 70 20 33 3A 20 6A 70 20 7A 2C 66 69 ...cp 3: jp z,fi
000100: 6C 6D 6E 75 0D 0A 09 63 70 20 34 3A 20 6A 70 20 lmnu...cp 4: jp
000110: 7A 2C 64 73 63 6D 6E 75 0D 0A 09 63 70 20 35 3A z,dscmnu...cp 5:
000120: 20 6A 70 20 7A 2C 64 69 72 6D 6E 75 0D 0A 09 69 jp z,dirmnu...i
000130: 66 20 6B 64 73 3A 20 65 6C 73 65 0D 0A 09 63 70 f kds: else...cp
000140: 20 36 3A 20 6A 70 20 7A 2C 68 61 6E 67 75 70 0D 6: jp z,hangup.
000150: 0A 09 65 6E 64 69 66 0D 0A 0D 0A 2E 72 73 6D 6E ..endif.....rsmn
000160: 75 09 6C 64 20 68 6C 2C 74 6D 72 73 3A 20 63 61 u.ld hl,tmrs: ca
000170: 6C 6C 20 6D 65 6E 75 0D 0A 09 6A 72 20 7A 2C 6D ll menu...jr z,m
000180: 61 69 6E 6D 0D 0A 09 63 70 20 31 3A 20 6A 70 20 ainm...cp 1: jp
000190: 7A 2C 62 70 73 6D 6E 75 0D 0A 09 63 70 20 32 3A z,bpsmnu...cp 2:
0001A0: 20 6A 70 20 7A 2C 77 72 64 6D 6E 75 0D 0A 69 66 jp z,wrdmnu..if
0001B0: 20 6B 64 73 3A 09 65 6C 73 65 3A 20 63 70 20 36 kds:.else: cp 6
0001C0: 3A 20 6A 70 20 7A 2C 68 68 73 6D 6E 75 0D 0A 65 : jp z,hhsmnu..e
0001D0: 6E 64 69 66 3A 09 63 70 20 33 3A 20 6A 70 20 7A ndif:.cp 3: jp z
0001E0: 2C 64 6F 62 72 6B 0D 0A 09 63 70 20 34 3A 20 6A ,dobrk...cp 4: j
0001F0: 70 20 7A 2C 78 6F 6E 6D 6E 75 0D 0A 09 63 70 20 p z,xonmnu...cp
Size : 512 (Real : 512)
000000: 31 31 30 31 30 31 30 3A 20 6C 64 20 28 69 79 2B 1101010: ld (iy+
000010: 31 32 29 2C 61 3A 20 6C 64 20 64 2C 35 3A 20 63 12),a: ld d,5: c
000020: 61 6C 6C 20 70 72 65 67 0D 0A 09 65 6E 64 69 66 all preg...endif
000030: 3A 20 20 72 65 74 0D 0A 0D 0A 2E 72 73 66 74 78 : ret.....rsftx
000040: 74 09 64 62 20 22 44 4F 57 4E 4C 4F 41 44 2E 22 t.db "DOWNLOAD."
000050: 2C 30 0D 0A 09 64 62 20 22 20 20 20 20 20 20 20 ,0...db "
000060: 20 20 20 20 20 22 2C 30 0D 0A 0D 0A 09 3B 3E 3E ",0.....;>>
000070: 3E 20 43 6C 65 61 72 20 74 65 78 74 20 62 75 66 > Clear text buf
000080: 66 65 72 0D 0A 0D 0A 2E 63 62 75 66 66 72 09 70 fer.....cbuffr.p
000090: 75 73 68 20 69 79 3A 20 70 6F 70 20 68 6C 0D 0A ush iy: pop hl..
0000A0: 09 6C 64 20 64 65 2C 31 31 36 3A 20 61 64 64 20 .ld de,116: add
0000B0: 68 6C 2C 64 65 09 09 3B 48 4C 20 3D 20 62 75 66 hl,de..;HL = buf
0000C0: 66 65 72 0D 0A 09 6C 64 20 64 2C 68 3A 20 6C 64 fer...ld d,h: ld
0000D0: 20 65 2C 6C 3A 20 69 6E 63 20 64 65 09 09 3B 44 e,l: inc de..;D
0000E0: 45 20 3D 20 62 75 66 66 65 72 2B 31 0D 0A 09 6C E = buffer+1...l
0000F0: 64 20 62 63 2C 32 35 35 0D 0A 09 6C 64 20 28 68 d bc,255...ld (h
000100: 6C 29 2C 30 0D 0A 09 6C 64 69 72 0D 0A 0D 0A 09 l),0...ldir.....
000110: 6C 64 20 68 6C 2C 30 0D 0A 09 6C 64 20 28 69 79 ld hl,0...ld (iy
000120: 2B 33 38 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 33 +38),l: ld (iy+3
000130: 39 29 2C 68 09 3B 62 75 66 66 65 72 20 67 65 74 9),h.;buffer get
000140: 20 6F 66 66 73 65 74 0D 0A 09 6C 64 20 28 69 79 offset...ld (iy
000150: 2B 33 36 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 33 +36),l: ld (iy+3
000160: 37 29 2C 68 09 3B 62 75 66 66 65 72 20 73 74 6F 7),h.;buffer sto
000170: 72 65 20 6F 66 66 73 65 74 0D 0A 09 72 65 74 0D re offset...ret.
000180: 0A 1A 53 55 42 52 4F 55 54 20 24 24 24 FF 00 FF ..SUBROUT $$$...
000190: 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 09 3B 3E 3E 3E MOD ***.....;>>>
0001A0: 20 43 68 65 63 6B 20 66 6F 72 20 66 69 6C 65 20 Check for file
0001B0: 62 75 66 66 65 72 0D 0A 0D 0A 2E 62 75 66 66 5F buffer.....buff_
0001C0: 63 09 70 75 73 68 20 61 66 3A 20 70 75 73 68 20 c.push af: push
0001D0: 62 63 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 37 29 bc...ld a,(iy+7)
0001E0: 3A 20 6C 64 20 62 2C 61 0D 0A 09 6C 64 20 61 2C : ld b,a...ld a,
0001F0: 28 69 79 2B 38 29 3A 20 6F 72 20 62 0D 0A 09 70 (iy+8): or b...p
Size : 512 (Real : 512)
000000: 35 3A 20 6A 70 20 7A 2C 6C 63 6C 6D 6E 75 0D 0A 5: jp z,lclmnu..
000010: 0D 0A 09 3B 74 69 6D 65 6F 75 74 20 2D 20 72 65 ...;timeout - re
000020: 6D 6F 76 65 64 20 66 72 6F 6D 20 70 72 6F 64 75 moved from produ
000030: 63 74 69 6F 6E 20 76 65 72 73 69 6F 6E 0D 0A 0D ction version...
000040: 0A 09 6C 64 20 68 6C 2C 74 6F 73 74 78 74 0D 0A ..ld hl,tostxt..
000050: 09 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A 0D 0A .call string....
000060: 2E 74 76 64 69 73 70 09 6C 64 20 68 6C 2C 26 30 .tvdisp.ld hl,&0
000070: 42 30 33 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D B03: call &BB75.
000080: 0A 09 6C 64 20 6C 2C 28 69 79 2B 39 29 3A 20 6C ..ld l,(iy+9): l
000090: 64 20 68 2C 28 69 79 2B 31 30 29 3A 20 63 61 6C d h,(iy+10): cal
0000A0: 6C 20 70 72 5F 68 6C 09 3B 70 72 69 6E 74 20 74 l pr_hl.;print t
0000B0: 69 6D 65 2D 6F 75 74 0D 0A 09 6C 64 20 61 2C 33 ime-out...ld a,3
0000C0: 32 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 0D 2: call &BB5A...
0000D0: 0A 2E 74 76 77 61 69 74 09 63 61 6C 6C 20 26 42 ..tvwait.call &B
0000E0: 42 30 36 0D 0A 09 63 70 20 33 32 3A 20 6A 70 20 B06...cp 32: jp
0000F0: 7A 2C 72 73 6D 6E 75 3A 20 63 70 20 32 32 34 3A z,rsmnu: cp 224:
000100: 20 6A 70 20 7A 2C 72 73 6D 6E 75 3A 20 63 70 20 jp z,rsmnu: cp
000110: 26 46 43 3A 20 6A 70 20 7A 2C 72 73 6D 6E 75 0D &FC: jp z,rsmnu.
000120: 0A 09 6C 64 20 6C 2C 28 69 79 2B 39 29 3A 20 6C ..ld l,(iy+9): l
000130: 64 20 68 2C 28 69 79 2B 31 30 29 0D 0A 09 6C 64 d h,(iy+10)...ld
000140: 20 64 65 2C 32 35 0D 0A 09 63 70 20 32 34 30 3A de,25...cp 240:
000150: 20 6A 72 20 7A 2C 74 76 75 70 0D 0A 09 63 70 20 jr z,tvup...cp
000160: 32 34 31 3A 20 6A 72 20 6E 7A 2C 74 76 77 61 69 241: jr nz,tvwai
000170: 74 0D 0A 09 6C 64 20 61 2C 68 3A 20 63 70 20 64 t...ld a,h: cp d
000180: 3A 20 6A 72 20 6E 7A 2C 74 76 6E 30 0D 0A 09 6C : jr nz,tvn0...l
000190: 64 20 61 2C 6C 3A 20 63 70 20 65 3A 20 6A 72 20 d a,l: cp e: jr
0001A0: 7A 2C 74 76 77 61 69 74 0D 0A 2E 74 76 6E 30 09 z,tvwait...tvn0.
0001B0: 73 63 66 3A 20 63 63 66 3A 20 73 62 63 20 68 6C scf: ccf: sbc hl
0001C0: 2C 64 65 0D 0A 09 6C 64 20 28 69 79 2B 39 29 2C ,de...ld (iy+9),
0001D0: 6C 3A 20 6C 64 20 28 69 79 2B 31 30 29 2C 68 3A l: ld (iy+10),h:
0001E0: 20 6A 72 20 74 76 64 69 73 70 0D 0A 2E 74 76 75 jr tvdisp...tvu
0001F0: 70 09 61 64 64 20 68 6C 2C 64 65 3A 20 6C 64 20 p.add hl,de: ld
Size : 512 (Real : 512)
000000: 0D 0A 09 3B 2A 2A 2A 20 54 45 52 4D 49 4E 41 4C ...;*** TERMINAL
000010: 2E 4D 4F 44 20 2A 2A 2A 0D 0A 0D 0A 74 66 62 75 .MOD ***....tfbu
000020: 66 66 09 65 71 75 20 26 32 30 30 30 09 09 09 3B ff.equ &2000...;
000030: 74 65 72 6D 69 6E 61 6C 20 66 69 6C 65 20 62 75 terminal file bu
000040: 66 66 65 72 0D 0A 74 70 62 6C 6F 63 6B 09 65 71 ffer..tpblock.eq
000050: 75 20 26 33 30 30 30 09 09 09 3B 74 65 72 6D 69 u &3000...;termi
000060: 6E 61 6C 20 70 61 72 61 6D 65 74 65 72 20 62 6C nal parameter bl
000070: 6F 63 6B 0D 0A 6F 66 66 73 65 74 09 65 71 75 20 ock..offset.equ
000080: 26 33 46 46 45 09 09 09 3B 6F 66 66 73 65 74 20 &3FFE...;offset
000090: 73 74 6F 72 65 20 6C 6F 63 61 74 69 6F 6E 0D 0A store location..
0000A0: 63 68 61 70 6F 73 09 65 71 75 20 26 33 46 46 43 chapos.equ &3FFC
0000B0: 09 09 09 3B 63 68 61 72 61 63 74 65 72 20 70 6F ...;character po
0000C0: 73 69 74 69 6F 6E 20 73 74 6F 72 65 20 6C 6F 63 sition store loc
0000D0: 61 74 69 6F 6E 0D 0A 0D 0A 0D 0A 0D 0A 09 3B 3E ation.........;>
0000E0: 3E 3E 20 54 45 52 4D 78 78 20 63 6F 6D 6D 61 6E >> TERMxx comman
0000F0: 64 73 0D 0A 0D 0A 2E 74 6D 33 5F 69 09 63 61 6C ds.....tm3_i.cal
000100: 6C 20 72 65 73 65 74 3A 20 6C 64 20 68 6C 2C 33 l reset: ld hl,3
000110: 30 30 3A 20 6C 64 20 64 65 2C 33 30 30 3A 20 6A 00: ld de,300: j
000120: 70 20 74 65 72 6D 5F 78 0D 0A 2E 74 6D 37 35 5F p term_x...tm75_
000130: 69 09 63 61 6C 6C 20 72 65 73 65 74 3A 20 6C 64 i.call reset: ld
000140: 20 68 6C 2C 31 32 30 30 3A 20 6C 64 20 64 65 2C hl,1200: ld de,
000150: 37 35 3A 20 6A 70 20 74 65 72 6D 5F 78 0D 0A 2E 75: jp term_x...
000160: 74 6D 31 32 5F 69 09 63 61 6C 6C 20 72 65 73 65 tm12_i.call rese
000170: 74 3A 20 6C 64 20 68 6C 2C 31 32 30 30 3A 20 6C t: ld hl,1200: l
000180: 64 20 64 65 2C 31 32 30 30 3A 20 6A 70 20 74 65 d de,1200: jp te
000190: 72 6D 5F 78 0D 0A 2E 74 6D 32 34 5F 69 09 6A 70 rm_x...tm24_i.jp
0001A0: 20 74 65 72 6D 5F 69 0D 0A 2E 74 6D 34 38 5F 69 term_i...tm48_i
0001B0: 09 63 61 6C 6C 20 72 65 73 65 74 3A 20 6C 64 20 .call reset: ld
0001C0: 68 6C 2C 34 38 30 30 3A 20 6C 64 20 64 65 2C 34 hl,4800: ld de,4
0001D0: 38 30 30 3A 20 6A 70 20 74 65 72 6D 5F 78 0D 0A 800: jp term_x..
0001E0: 0D 0A 09 3B 3E 3E 3E 20 54 45 52 4D 49 4E 41 4C ...;>>> TERMINAL
0001F0: 20 63 6F 6D 6D 61 6E 64 0D 0A 0D 0A 2E 74 65 72 command.....ter
Size : 512 (Real : 512)
000000: 28 69 79 2B 39 29 2C 6C 3A 20 6C 64 20 28 69 79 (iy+9),l: ld (iy
000010: 2B 31 30 29 2C 68 3A 20 6A 72 20 74 76 64 69 73 +10),h: jr tvdis
000020: 70 0D 0A 0D 0A 69 66 20 6B 64 73 3A 09 65 6C 73 p....if kds:.els
000030: 65 0D 0A 2E 68 68 73 6D 6E 75 09 6C 64 20 68 6C e...hhsmnu.ld hl
000040: 2C 74 6D 68 73 68 6B 3A 20 63 61 6C 6C 20 6D 65 ,tmhshk: call me
000050: 6E 75 3A 20 6A 70 20 7A 2C 72 73 6D 6E 75 0D 0A nu: jp z,rsmnu..
000060: 09 64 65 63 20 61 3A 20 63 61 6C 6C 20 68 77 6F .dec a: call hwo
000070: 6B 3A 20 6A 70 20 72 73 6D 6E 75 3A 20 65 6E 64 k: jp rsmnu: end
000080: 69 66 0D 0A 0D 0A 2E 78 6F 6E 6D 6E 75 09 6C 64 if.....xonmnu.ld
000090: 20 68 6C 2C 74 6D 78 6F 6E 3A 20 63 61 6C 6C 20 hl,tmxon: call
0000A0: 6D 65 6E 75 3A 20 6A 70 20 7A 2C 72 73 6D 6E 75 menu: jp z,rsmnu
0000B0: 0D 0A 09 64 65 63 20 61 3A 20 78 6F 72 20 31 3A ...dec a: xor 1:
0000C0: 20 6C 64 20 28 69 79 2B 34 29 2C 61 3A 20 6A 70 ld (iy+4),a: jp
0000D0: 20 72 73 6D 6E 75 09 3B 58 4F 4E 20 63 6F 6E 74 rsmnu.;XON cont
0000E0: 72 6F 6C 0D 0A 0D 0A 2E 6C 63 6C 6D 6E 75 09 6C rol.....lclmnu.l
0000F0: 64 20 68 6C 2C 74 6D 6C 6F 63 6C 3A 20 63 61 6C d hl,tmlocl: cal
000100: 6C 20 6D 65 6E 75 3A 20 6A 70 20 7A 2C 72 73 6D l menu: jp z,rsm
000110: 6E 75 0D 0A 09 64 65 63 20 61 3A 20 78 6F 72 20 nu...dec a: xor
000120: 31 3A 20 6C 64 20 28 69 79 2B 31 29 2C 61 3A 20 1: ld (iy+1),a:
000130: 6A 70 20 72 73 6D 6E 75 09 3B 4C 6F 63 61 6C 20 jp rsmnu.;Local
000140: 65 63 68 6F 0D 0A 0D 0A 2E 62 70 73 6D 6E 75 09 echo.....bpsmnu.
000150: 6C 64 20 68 6C 2C 74 6D 62 61 75 64 3A 20 63 61 ld hl,tmbaud: ca
000160: 6C 6C 20 6D 65 6E 75 3A 20 6A 70 20 7A 2C 72 73 ll menu: jp z,rs
000170: 6D 6E 75 0D 0A 09 6C 64 20 62 2C 61 3A 20 6C 64 mnu...ld b,a: ld
000180: 20 69 78 2C 74 62 73 65 74 73 0D 0A 2E 62 70 73 ix,tbsets...bps
000190: 67 76 6C 09 6C 64 20 6C 2C 28 69 78 29 3A 20 6C gvl.ld l,(ix): l
0001A0: 64 20 68 2C 28 69 78 2B 31 29 3A 20 6C 64 20 65 d h,(ix+1): ld e
0001B0: 2C 28 69 78 2B 32 29 3A 20 6C 64 20 64 2C 28 69 ,(ix+2): ld d,(i
0001C0: 78 2B 33 29 0D 0A 09 69 6E 63 20 69 78 3A 20 69 x+3)...inc ix: i
0001D0: 6E 63 20 69 78 3A 20 69 6E 63 20 69 78 3A 20 69 nc ix: inc ix: i
0001E0: 6E 63 20 69 78 3A 20 64 6A 6E 7A 20 62 70 73 67 nc ix: djnz bpsg
0001F0: 76 6C 0D 0A 09 6C 64 20 61 2C 32 3A 20 63 61 6C vl...ld a,2: cal
Size : 512 (Real : 512)
000000: 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 0D 0A 09 61 l: add hl,hl...a
000010: 64 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 68 6C dd hl,hl: add hl
000020: 2C 68 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 0D 0A ,hl: add hl,hl..
000030: 09 6C 64 20 64 65 2C 74 70 62 6C 6F 63 6B 3A 20 .ld de,tpblock:
000040: 61 64 64 20 68 6C 2C 64 65 09 3B 48 4C 20 3D 20 add hl,de.;HL =
000050: 62 61 73 65 20 61 64 64 72 65 73 73 20 6F 66 20 base address of
000060: 65 6E 74 72 79 0D 0A 09 70 75 73 68 20 68 6C 0D entry...push hl.
000070: 0A 09 6C 64 20 63 2C 32 36 3A 20 63 61 6C 6C 20 ..ld c,26: call
000080: 65 64 69 74 6C 6E 0D 0A 09 6C 64 20 61 2C 33 35 editln...ld a,35
000090: 3A 20 63 61 6C 6C 20 26 42 42 36 46 0D 0A 09 70 : call &BB6F...p
0000A0: 6F 70 20 68 6C 3A 20 6C 64 20 64 65 2C 32 36 0D op hl: ld de,26.
0000B0: 0A 09 61 64 64 20 68 6C 2C 64 65 3A 20 70 75 73 ..add hl,de: pus
0000C0: 68 20 68 6C 09 09 3B 48 4C 20 3D 20 61 64 64 72 h hl..;HL = addr
0000D0: 65 73 73 20 6F 66 20 65 6E 74 72 79 20 74 79 70 ess of entry typ
0000E0: 65 0D 0A 09 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 e...inc hl...ld
0000F0: 61 2C 28 74 70 62 6C 6F 63 6B 2B 35 31 32 29 3A a,(tpblock+512):
000100: 20 63 70 20 31 37 0D 0A 09 6A 72 20 7A 2C 6E 6F cp 17...jr z,no
000110: 5F 61 75 74 09 09 09 3B 69 66 20 6D 61 63 72 6F _aut...;if macro
000120: 2C 20 6E 6F 20 73 65 63 6F 6E 64 61 72 79 20 65 , no secondary e
000130: 6E 74 72 79 0D 0A 09 6C 64 20 63 2C 35 3A 20 63 ntry...ld c,5: c
000140: 61 6C 6C 20 65 64 69 74 6C 6E 09 09 3B 65 64 69 all editln..;edi
000150: 74 20 73 65 63 6F 6E 64 61 72 79 20 65 6E 74 72 t secondary entr
000160: 79 0D 0A 09 6C 64 20 61 2C 62 3A 20 6F 72 20 61 y...ld a,b: or a
000170: 3A 20 6A 72 20 6E 7A 2C 6E 6F 74 61 75 74 0D 0A : jr nz,notaut..
000180: 09 3B 6C 64 20 61 2C 33 35 3A 20 3B 63 61 6C 6C .;ld a,35: ;call
000190: 20 26 42 42 36 46 0D 0A 09 3B 6C 64 20 68 6C 2C &BB6F...;ld hl,
0001A0: 61 74 6F 74 78 74 3A 20 3B 63 61 6C 6C 20 73 74 atotxt: ;call st
0001B0: 72 69 6E 67 09 3B 70 72 69 6E 74 20 22 61 75 74 ring.;print "aut
0001C0: 6F 22 20 69 66 20 6E 6F 20 74 65 78 74 20 65 6E o" if no text en
0001D0: 74 65 72 65 64 0D 0A 09 3B 6C 64 20 61 2C 31 3A tered...;ld a,1:
0001E0: 20 3B 6A 72 20 70 75 74 61 75 74 09 09 3B 73 65 ;jr putaut..;se
0001F0: 63 6F 6E 64 61 72 79 20 65 6E 74 72 79 20 31 20 condary entry 1
Size : 512 (Real : 512)
000000: 20 66 69 6E 69 73 68 65 64 20 64 69 73 70 6C 61 finished displa
000010: 79 0D 0A 0D 0A 09 6C 64 20 68 6C 2C 26 30 33 31 y.....ld hl,&031
000020: 31 3A 20 63 61 6C 6C 20 26 42 42 37 35 09 09 3B 1: call &BB75..;
000030: 63 6F 6C 75 6D 6E 20 33 2C 20 72 6F 77 20 31 37 column 3, row 17
000040: 0D 0A 09 6C 64 20 61 2C 22 4D 22 3A 20 63 61 6C ...ld a,"M": cal
000050: 6C 20 26 42 42 35 41 09 09 3B 22 4D 22 20 28 6D l &BB5A..;"M" (m
000060: 61 63 72 6F 29 0D 0A 09 6C 64 20 61 2C 33 32 3A acro)...ld a,32:
000070: 20 63 61 6C 6C 20 26 42 42 35 41 3A 20 63 61 6C call &BB5A: cal
000080: 6C 20 26 42 42 35 41 09 3B 74 77 6F 20 73 70 61 l &BB5A.;two spa
000090: 63 65 73 0D 0A 09 6C 64 20 61 2C 33 3A 20 63 61 ces...ld a,3: ca
0000A0: 6C 6C 20 26 42 42 39 30 09 09 3B 50 45 4E 20 33 ll &BB90..;PEN 3
0000B0: 0D 0A 09 70 75 73 68 20 69 78 3A 20 70 6F 70 20 ...push ix: pop
0000C0: 68 6C 0D 0A 09 6C 64 20 62 2C 32 36 3A 20 63 61 hl...ld b,26: ca
0000D0: 6C 6C 20 73 74 72 6E 67 32 09 09 3B 64 69 61 6C ll strng2..;dial
0000E0: 6C 69 6E 67 20 73 74 72 69 6E 67 20 66 6F 72 20 ling string for
0000F0: 6D 61 63 72 6F 0D 0A 0D 0A 09 6C 64 20 68 6C 2C macro.....ld hl,
000100: 73 76 64 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 svdtxt: call str
000110: 69 6E 67 09 3B 22 53 61 76 65 20 64 69 72 65 63 ing.;"Save direc
000120: 74 6F 72 79 22 0D 0A 0D 0A 09 6C 64 20 61 2C 33 tory".....ld a,3
000130: 3A 20 63 61 6C 6C 20 26 42 42 39 30 0D 0A 09 6C : call &BB90...l
000140: 64 20 68 6C 2C 26 30 31 30 31 0D 0A 2E 64 69 72 d hl,&0101...dir
000150: 63 6C 70 09 70 75 73 68 20 68 6C 3A 20 63 61 6C clp.push hl: cal
000160: 6C 20 26 42 42 37 35 3A 20 70 6F 70 20 68 6C 0D l &BB75: pop hl.
000170: 0A 09 6C 64 20 61 2C 32 34 36 3A 20 63 61 6C 6C ..ld a,246: call
000180: 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C 20 26 42 &BB5A...call &B
000190: 42 30 36 0D 0A 09 70 75 73 68 20 61 66 3A 20 70 B06...push af: p
0001A0: 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 42 ush hl: call &BB
0001B0: 37 35 0D 0A 09 6C 64 20 61 2C 33 32 3A 20 63 61 75...ld a,32: ca
0001C0: 6C 6C 20 26 42 42 35 41 3A 20 70 6F 70 20 68 6C ll &BB5A: pop hl
0001D0: 3A 20 70 6F 70 20 61 66 0D 0A 09 63 70 20 26 46 : pop af...cp &F
0001E0: 43 3A 20 6A 70 20 7A 2C 64 69 72 6D 6E 75 0D 0A C: jp z,dirmnu..
0001F0: 09 63 70 20 32 34 30 3A 20 6A 72 20 7A 2C 64 69 .cp 240: jr z,di
Size : 512 (Real : 512)
000000: 28 61 75 74 6F 64 69 61 6C 29 0D 0A 2E 6E 6F 74 (autodial)...not
000010: 61 75 74 09 6C 64 20 61 2C 30 3A 20 6A 72 20 70 aut.ld a,0: jr p
000020: 75 74 61 75 74 09 09 3B 73 65 63 6F 6E 64 61 72 utaut..;secondar
000030: 79 20 65 6E 74 72 79 20 30 20 28 6E 6F 74 20 61 y entry 0 (not a
000040: 75 74 6F 64 69 61 6C 29 0D 0A 2E 6E 6F 5F 61 75 utodial)...no_au
000050: 74 09 70 6F 70 20 68 6C 3A 20 70 75 73 68 20 68 t.pop hl: push h
000060: 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 09 3B 6E 6F l: ld (hl),0.;no
000070: 20 73 65 63 6F 6E 64 61 72 79 20 65 6E 74 72 79 secondary entry
000080: 20 28 6D 61 63 72 6F 29 0D 0A 09 69 6E 63 20 68 (macro)...inc h
000090: 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 0D 0A 09 69 l: ld (hl),0...i
0000A0: 6E 63 20 68 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 nc hl: ld (hl),0
0000B0: 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C 64 20 28 68 ...inc hl: ld (h
0000C0: 6C 29 2C 30 0D 0A 09 69 6E 63 20 68 6C 3A 20 6C l),0...inc hl: l
0000D0: 64 20 28 68 6C 29 2C 30 0D 0A 09 69 6E 63 20 68 d (hl),0...inc h
0000E0: 6C 3A 20 6C 64 20 28 68 6C 29 2C 30 0D 0A 2E 70 l: ld (hl),0...p
0000F0: 75 74 61 75 74 20 70 6F 70 20 68 6C 3A 20 6C 64 utaut pop hl: ld
000100: 20 28 68 6C 29 2C 61 0D 0A 09 70 6F 70 20 68 6C (hl),a...pop hl
000110: 3A 20 6A 70 20 64 69 72 63 6C 70 0D 0A 0D 0A 0D : jp dirclp.....
000120: 0A 0D 0A 0D 0A 2E 64 69 72 64 69 61 09 09 09 09 ......dirdia....
000130: 09 3B 64 69 72 65 63 74 20 64 69 61 6C 0D 0A 0D .;direct dial...
000140: 0A 0D 0A 0D 0A 2E 64 73 63 6D 6E 75 09 6C 64 20 ......dscmnu.ld
000150: 68 6C 2C 74 6D 64 69 73 63 3A 20 63 61 6C 6C 20 hl,tmdisc: call
000160: 6D 65 6E 75 3A 20 6A 70 20 7A 2C 6D 61 69 6E 6D menu: jp z,mainm
000170: 0D 0A 09 63 70 20 31 3A 20 6A 70 20 7A 2C 63 61 ...cp 1: jp z,ca
000180: 74 64 73 63 0D 0A 09 63 70 20 32 3A 20 6A 70 20 tdsc...cp 2: jp
000190: 7A 2C 64 72 69 76 65 61 0D 0A 09 63 70 20 33 3A z,drivea...cp 3:
0001A0: 20 6A 70 20 7A 2C 64 72 69 76 65 62 0D 0A 09 63 jp z,driveb...c
0001B0: 70 20 34 3A 20 6A 70 20 7A 2C 65 72 61 73 65 0D p 4: jp z,erase.
0001C0: 0A 09 63 70 20 35 3A 20 6A 70 20 7A 2C 72 65 6E ..cp 5: jp z,ren
0001D0: 61 6D 65 0D 0A 09 63 70 20 36 3A 20 6A 70 20 7A ame...cp 6: jp z
0001E0: 2C 75 73 65 72 0D 0A 0D 0A 09 6C 64 20 68 6C 2C ,user.....ld hl,
0001F0: 74 79 70 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 typtxt: call str
Size : 512 (Real : 512)
000000: 72 5F 75 70 0D 0A 09 63 70 20 32 34 31 3A 20 6A r_up...cp 241: j
000010: 72 20 7A 2C 64 69 72 5F 64 6E 0D 0A 09 63 70 20 r z,dir_dn...cp
000020: 32 32 34 3A 20 6A 70 20 7A 2C 64 69 72 5F 64 6C 224: jp z,dir_dl
000030: 0D 0A 09 63 70 20 33 32 3A 20 20 6A 70 20 7A 2C ...cp 32: jp z,
000040: 64 69 72 5F 64 6C 0D 0A 09 63 70 20 32 34 33 3A dir_dl...cp 243:
000050: 20 6A 70 20 7A 2C 64 69 72 5F 65 64 0D 0A 09 6A jp z,dir_ed...j
000060: 72 20 64 69 72 63 6C 70 0D 0A 0D 0A 2E 64 69 72 r dirclp.....dir
000070: 5F 75 70 09 6C 64 20 61 2C 6C 3A 20 63 70 20 31 _up.ld a,l: cp 1
000080: 3A 20 6A 72 20 7A 2C 64 69 72 63 6C 70 0D 0A 09 : jr z,dirclp...
000090: 64 65 63 20 6C 3A 20 63 70 20 31 37 3A 20 6A 72 dec l: cp 17: jr
0000A0: 20 7A 2C 64 65 63 61 67 6E 0D 0A 09 63 70 20 31 z,decagn...cp 1
0000B0: 39 3A 20 6A 72 20 7A 2C 64 65 63 61 67 6E 0D 0A 9: jr z,decagn..
0000C0: 09 6A 72 20 64 69 72 63 6C 70 0D 0A 2E 64 65 63 .jr dirclp...dec
0000D0: 61 67 6E 09 64 65 63 20 6C 3A 20 6A 72 20 64 69 agn.dec l: jr di
0000E0: 72 63 6C 70 0D 0A 0D 0A 2E 64 69 72 5F 64 6E 09 rclp.....dir_dn.
0000F0: 6C 64 20 61 2C 6C 3A 20 63 70 20 31 39 3A 20 6A ld a,l: cp 19: j
000100: 72 20 7A 2C 64 69 72 63 6C 70 0D 0A 09 69 6E 63 r z,dirclp...inc
000110: 20 6C 3A 20 63 70 20 31 35 3A 20 6A 72 20 7A 2C l: cp 15: jr z,
000120: 69 6E 63 61 67 6E 0D 0A 09 63 70 20 31 37 3A 20 incagn...cp 17:
000130: 6A 72 20 7A 2C 69 6E 63 61 67 6E 0D 0A 09 6A 72 jr z,incagn...jr
000140: 20 64 69 72 63 6C 70 0D 0A 2E 69 6E 63 61 67 6E dirclp...incagn
000150: 09 69 6E 63 20 6C 3A 20 6A 72 20 64 69 72 63 6C .inc l: jr dircl
000160: 70 0D 0A 0D 0A 2E 64 69 72 5F 64 6C 09 6C 64 20 p.....dir_dl.ld
000170: 61 2C 6C 09 09 09 09 3B 64 69 61 6C 20 6E 75 6D a,l....;dial num
000180: 62 65 72 0D 0A 09 63 70 20 31 37 3A 20 6A 72 20 ber...cp 17: jr
000190: 7A 2C 64 69 72 63 6C 70 0D 0A 09 63 70 20 31 39 z,dirclp...cp 19
0001A0: 3A 20 6A 72 20 7A 2C 64 69 72 5F 73 76 0D 0A 0D : jr z,dir_sv...
0001B0: 0A 09 64 65 63 20 6C 3A 20 6C 64 20 68 2C 30 3A ..dec l: ld h,0:
0001C0: 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 64 20 add hl,hl: add
0001D0: 68 6C 2C 68 6C 0D 0A 09 61 64 64 20 68 6C 2C 68 hl,hl...add hl,h
0001E0: 6C 3A 20 61 64 64 20 68 6C 2C 68 6C 3A 20 61 64 l: add hl,hl: ad
0001F0: 64 20 68 6C 2C 68 6C 0D 0A 09 6C 64 20 64 65 2C d hl,hl...ld de,
Size : 512 (Real : 512)
000000: 69 6E 67 0D 0A 09 6C 64 20 68 6C 2C 26 30 42 30 ing...ld hl,&0B0
000010: 33 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 3: call &BB75...
000020: 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 35 3A ld hl,tpblock+5:
000030: 20 63 61 6C 6C 20 69 6E 70 75 74 66 3A 20 6A 70 call inputf: jp
000040: 20 7A 2C 64 73 63 6D 6E 75 0D 0A 09 6C 64 20 61 z,dscmnu...ld a
000050: 2C 62 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 64 ,b: or a: jp z,d
000060: 73 63 6D 6E 75 0D 0A 09 6C 64 20 28 74 70 62 6C scmnu...ld (tpbl
000070: 6F 63 6B 2B 32 29 2C 61 3A 20 6C 64 20 28 74 70 ock+2),a: ld (tp
000080: 62 6C 6F 63 6B 2B 33 29 2C 68 6C 0D 0A 09 6C 64 block+3),hl...ld
000090: 20 61 2C 32 3A 20 63 61 6C 6C 20 26 42 43 30 45 a,2: call &BC0E
0000A0: 3A 20 63 61 6C 6C 20 26 42 43 30 32 0D 0A 09 6C : call &BC02...l
0000B0: 64 20 69 78 2C 74 70 62 6C 6F 63 6B 3A 20 6C 64 d ix,tpblock: ld
0000C0: 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 32 0D 0A 09 hl,tpblock+2...
0000D0: 6C 64 20 28 69 78 29 2C 6C 3A 20 6C 64 20 28 69 ld (ix),l: ld (i
0000E0: 78 2B 31 29 2C 68 0D 0A 09 6C 64 20 61 2C 31 3A x+1),h...ld a,1:
0000F0: 20 63 61 6C 6C 20 74 79 70 65 5F 69 0D 0A 09 6C call type_i...l
000100: 64 20 68 6C 2C 6B 65 79 74 78 74 3A 20 63 61 6C d hl,keytxt: cal
000110: 6C 20 73 74 72 69 6E 67 0D 0A 09 63 61 6C 6C 20 l string...call
000120: 26 42 42 38 31 3A 20 63 61 6C 6C 20 26 42 42 31 &BB81: call &BB1
000130: 38 3A 20 63 61 6C 6C 20 26 42 42 38 34 0D 0A 09 8: call &BB84...
000140: 6A 70 20 6D 73 65 74 75 70 0D 0A 0D 0A 2E 75 73 jp msetup.....us
000150: 65 72 09 6C 64 20 68 6C 2C 75 73 74 78 74 3A 20 er.ld hl,ustxt:
000160: 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A 0D 0A 09 call string.....
000170: 6C 64 20 65 2C 30 0D 0A 2E 75 73 64 69 73 70 09 ld e,0...usdisp.
000180: 6C 64 20 68 6C 2C 26 30 42 30 33 3A 20 63 61 6C ld hl,&0B03: cal
000190: 6C 20 26 42 42 37 35 0D 0A 09 6C 64 20 61 2C 65 l &BB75...ld a,e
0001A0: 3A 20 63 61 6C 6C 20 70 72 5F 64 65 63 0D 0A 09 : call pr_dec...
0001B0: 6C 64 20 61 2C 33 32 3A 20 63 61 6C 6C 20 26 42 ld a,32: call &B
0001C0: 42 35 41 0D 0A 2E 75 73 77 61 69 74 09 63 61 6C B5A...uswait.cal
0001D0: 6C 20 26 42 42 30 36 0D 0A 09 63 70 20 33 32 3A l &BB06...cp 32:
0001E0: 20 6A 72 20 7A 2C 65 78 69 74 75 73 3A 20 63 70 jr z,exitus: cp
0001F0: 20 32 32 34 3A 20 6A 72 20 7A 2C 65 78 69 74 75 224: jr z,exitu
Size : 512 (Real : 512)
000000: 74 70 62 6C 6F 63 6B 3A 20 61 64 64 20 68 6C 2C tpblock: add hl,
000010: 64 65 09 3B 48 4C 20 3D 20 62 61 73 65 20 61 64 de.;HL = base ad
000020: 64 72 65 73 73 20 6F 66 20 65 6E 74 72 79 0D 0A dress of entry..
000030: 0D 0A 09 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 ...push hl: pop
000040: 69 78 0D 0A 09 6C 64 20 61 2C 28 69 78 2B 32 36 ix...ld a,(ix+26
000050: 29 3A 20 63 70 20 31 0D 0A 09 6A 72 20 7A 2C 64 ): cp 1...jr z,d
000060: 69 72 5F 61 75 0D 0A 0D 0A 09 6C 64 20 64 65 2C ir_au.....ld de,
000070: 32 37 3A 20 61 64 64 20 68 6C 2C 64 65 0D 0A 09 27: add hl,de...
000080: 6C 64 20 62 2C 35 3A 20 63 61 6C 6C 20 64 69 72 ld b,5: call dir
000090: 5F 74 73 09 09 3B 73 65 6E 64 20 66 69 72 73 74 _ts..;send first
0000A0: 20 70 61 72 74 20 6F 66 20 65 6E 74 72 79 0D 0A part of entry..
0000B0: 09 70 75 73 68 20 69 78 3A 20 70 6F 70 20 68 6C .push ix: pop hl
0000C0: 0D 0A 09 6C 64 20 62 2C 32 36 3A 20 63 61 6C 6C ...ld b,26: call
0000D0: 20 64 69 72 5F 74 73 09 09 3B 73 65 6E 64 20 6D dir_ts..;send m
0000E0: 61 69 6E 20 70 61 72 74 0D 0A 09 6C 64 20 61 2C ain part...ld a,
0000F0: 31 33 3A 20 63 61 6C 6C 20 73 65 6E 64 62 74 09 13: call sendbt.
000100: 09 3B 43 52 0D 0A 09 6A 70 20 71 75 63 6F 6D 0D .;CR...jp qucom.
000110: 0A 0D 0A 2E 64 69 72 5F 74 73 09 6C 64 20 61 2C ....dir_ts.ld a,
000120: 28 68 6C 29 3A 20 6F 72 20 61 3A 20 72 65 74 20 (hl): or a: ret
000130: 7A 09 09 3B 74 72 61 6E 73 6D 69 74 20 73 74 72 z..;transmit str
000140: 69 6E 67 20 66 72 6F 6D 20 48 4C 2C 20 6D 61 78 ing from HL, max
000150: 2E 6C 65 6E 2E 20 42 0D 0A 09 63 70 20 22 4D 22 .len. B...cp "M"
000160: 3A 20 6A 72 20 7A 2C 6D 61 63 72 6F 0D 0A 09 70 : jr z,macro...p
000170: 75 73 68 20 62 63 3A 20 63 61 6C 6C 20 73 65 6E ush bc: call sen
000180: 64 62 74 3A 20 70 6F 70 20 62 63 0D 0A 2E 61 70 dbt: pop bc...ap
000190: 5F 64 74 73 09 69 6E 63 20 68 6C 3A 20 64 6A 6E _dts.inc hl: djn
0001A0: 7A 20 64 69 72 5F 74 73 0D 0A 09 72 65 74 0D 0A z dir_ts...ret..
0001B0: 0D 0A 2E 6D 61 63 72 6F 09 70 75 73 68 20 68 6C ...macro.push hl
0001C0: 3A 20 70 75 73 68 20 62 63 09 09 3B 6D 61 63 72 : push bc..;macr
0001D0: 6F 20 68 61 6E 64 6C 65 72 0D 0A 09 6C 64 20 68 o handler...ld h
0001E0: 6C 2C 74 70 62 6C 6F 63 6B 2B 26 31 45 30 0D 0A l,tpblock+&1E0..
0001F0: 2E 6D 61 63 6C 70 09 6C 64 20 61 2C 28 68 6C 29 .maclp.ld a,(hl)
Size : 512 (Real : 512)
000000: 37 44 0D 0A 09 6C 64 20 68 6C 2C 74 70 62 6C 6F 7D...ld hl,tpblo
000010: 63 6B 2B 35 31 33 3A 20 6C 64 20 62 2C 31 32 0D ck+513: ld b,12.
000020: 0A 09 6C 64 20 64 65 2C 74 66 62 75 66 66 3A 20 ..ld de,tfbuff:
000030: 63 61 6C 6C 20 26 42 43 37 37 09 3B 74 72 79 20 call &BC77.;try
000040: 74 6F 20 6F 70 65 6E 20 66 69 6C 65 20 66 6F 72 to open file for
000050: 20 69 6E 70 75 74 0D 0A 09 6A 72 20 63 2C 64 6F input...jr c,do
000060: 70 5F 6F 6B 0D 0A 0D 0A 09 63 61 6C 6C 20 26 42 p_ok.....call &B
000070: 43 37 44 0D 0A 09 6C 64 20 68 6C 2C 74 70 62 6C C7D...ld hl,tpbl
000080: 6F 63 6B 3A 20 6C 64 20 64 65 2C 74 70 62 6C 6F ock: ld de,tpblo
000090: 63 6B 2B 31 0D 0A 09 6C 64 20 28 68 6C 29 2C 30 ck+1...ld (hl),0
0000A0: 3A 20 6C 64 20 62 63 2C 35 31 32 3A 20 6C 64 69 : ld bc,512: ldi
0000B0: 72 09 3B 63 6C 65 61 72 20 62 75 66 66 65 72 0D r.;clear buffer.
0000C0: 0A 09 6A 72 20 64 69 73 70 64 72 0D 0A 0D 0A 2E ..jr dispdr.....
0000D0: 64 6F 70 5F 6F 6B 09 6C 64 20 68 6C 2C 74 70 62 dop_ok.ld hl,tpb
0000E0: 6C 6F 63 6B 3A 20 63 61 6C 6C 20 26 42 43 38 33 lock: call &BC83
0000F0: 09 3B 72 65 61 64 20 66 69 6C 65 20 69 6E 0D 0A .;read file in..
000100: 09 63 61 6C 6C 20 26 42 43 37 41 09 09 09 3B 63 .call &BC7A...;c
000110: 6C 6F 73 65 20 66 69 6C 65 0D 0A 0D 0A 2E 64 69 lose file.....di
000120: 73 70 64 72 09 63 61 6C 6C 20 26 42 42 36 43 0D spdr.call &BB6C.
000130: 0A 09 6C 64 20 61 2C 31 3A 20 63 61 6C 6C 20 26 ..ld a,1: call &
000140: 42 42 39 30 09 09 3B 50 45 4E 20 31 0D 0A 09 6C BB90..;PEN 1...l
000150: 64 20 6C 2C 31 3A 20 6C 64 20 69 78 2C 74 70 62 d l,1: ld ix,tpb
000160: 6C 6F 63 6B 0D 0A 2E 64 64 6C 6F 6F 70 09 70 75 lock...ddloop.pu
000170: 73 68 20 68 6C 0D 0A 09 6C 64 20 68 2C 33 3A 20 sh hl...ld h,3:
000180: 63 61 6C 6C 20 26 42 42 37 35 09 09 3B 63 6F 6C call &BB75..;col
000190: 75 6D 6E 20 33 2C 20 61 70 70 72 6F 70 72 69 61 umn 3, appropria
0001A0: 74 65 20 72 6F 77 0D 0A 09 70 6F 70 20 68 6C 3A te row...pop hl:
0001B0: 20 70 75 73 68 20 68 6C 0D 0A 09 6C 64 20 61 2C push hl...ld a,
0001C0: 6C 3A 20 61 64 64 20 34 38 0D 0A 09 63 70 20 22 l: add 48...cp "
0001D0: 39 22 2B 31 3A 20 6A 72 20 63 2C 64 64 68 6E 6F 9"+1: jr c,ddhno
0001E0: 6B 0D 0A 09 61 64 64 20 37 09 09 09 09 3B 41 2D k...add 7....;A-
0001F0: 46 3F 0D 0A 2E 64 64 68 6E 6F 6B 09 63 61 6C 6C F?...ddhnok.call
Size : 512 (Real : 512)
000000: 3A 20 6F 72 20 61 3A 20 6A 72 20 7A 2C 65 78 6D : or a: jr z,exm
000010: 61 63 0D 0A 09 63 61 6C 6C 20 73 65 6E 64 62 74 ac...call sendbt
000020: 3A 20 69 6E 63 20 68 6C 0D 0A 09 6A 72 20 6D 61 : inc hl...jr ma
000030: 63 6C 70 0D 0A 2E 65 78 6D 61 63 09 70 6F 70 20 clp...exmac.pop
000040: 62 63 3A 20 70 6F 70 20 68 6C 3A 20 6A 72 20 61 bc: pop hl: jr a
000050: 70 5F 64 74 73 0D 0A 0D 0A 2E 64 69 72 5F 61 75 p_dts.....dir_au
000060: 09 72 65 74 09 09 09 09 3B 2A 2A 2A 2A 2A 2A 2A .ret....;*******
000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 0A **************..
000080: 0D 0A 2E 64 69 72 5F 73 76 09 6C 64 20 68 6C 2C ...dir_sv.ld hl,
000090: 74 70 62 6C 6F 63 6B 2B 35 31 33 3A 20 6C 64 20 tpblock+513: ld
0000A0: 62 2C 31 32 0D 0A 09 6C 64 20 64 65 2C 74 66 62 b,12...ld de,tfb
0000B0: 75 66 66 3A 20 63 61 6C 6C 20 26 42 43 38 43 0D uff: call &BC8C.
0000C0: 0A 09 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 3A ..ld hl,tpblock:
0000D0: 20 6C 64 20 64 65 2C 35 31 32 0D 0A 09 6C 64 20 ld de,512...ld
0000E0: 62 63 2C 74 70 62 6C 6F 63 6B 3A 20 6C 64 20 61 bc,tpblock: ld a
0000F0: 2C 32 0D 0A 09 63 61 6C 6C 20 26 42 43 39 38 3A ,2...call &BC98:
000100: 20 63 61 6C 6C 20 26 42 43 38 46 0D 0A 09 6A 70 call &BC8F...jp
000110: 20 64 69 73 70 64 72 0D 0A 0D 0A 2E 64 69 72 5F dispdr.....dir_
000120: 65 64 09 70 75 73 68 20 68 6C 0D 0A 09 6C 64 20 ed.push hl...ld
000130: 61 2C 6C 3A 20 6C 64 20 28 74 70 62 6C 6F 63 6B a,l: ld (tpblock
000140: 2B 35 31 32 29 2C 61 0D 0A 09 6C 64 20 68 2C 35 +512),a...ld h,5
000150: 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 6C : call &BB75...l
000160: 64 20 61 2C 31 38 3A 20 63 61 6C 6C 20 26 42 42 d a,18: call &BB
000170: 35 41 09 09 3B 63 6C 65 61 72 20 72 65 73 74 20 5A..;clear rest
000180: 6F 66 20 6C 69 6E 65 0D 0A 09 6C 64 20 61 2C 33 of line...ld a,3
000190: 3A 20 63 61 6C 6C 20 26 42 42 39 30 09 09 3B 50 : call &BB90..;P
0001A0: 45 4E 20 33 0D 0A 09 70 6F 70 20 68 6C 3A 20 70 EN 3...pop hl: p
0001B0: 75 73 68 20 68 6C 0D 0A 09 6C 64 20 61 2C 6C 3A ush hl...ld a,l:
0001C0: 20 64 65 63 20 6C 0D 0A 09 63 70 20 31 37 3A 20 dec l...cp 17:
0001D0: 6A 72 20 6E 7A 2C 6E 6F 74 6D 61 63 0D 0A 09 6C jr nz,notmac...l
0001E0: 64 20 6C 2C 31 35 0D 0A 2E 6E 6F 74 6D 61 63 09 d l,15...notmac.
0001F0: 6C 64 20 68 2C 30 3A 20 61 64 64 20 68 6C 2C 68 ld h,0: add hl,h
Size : 512 (Real : 512)
000000: 20 26 42 42 35 41 09 09 09 3B 70 72 69 6E 74 20 &BB5A...;print
000010: 31 2D 39 2C 41 2D 46 20 64 69 67 69 74 0D 0A 09 1-9,A-F digit...
000020: 6C 64 20 61 2C 33 32 3A 20 63 61 6C 6C 20 26 42 ld a,32: call &B
000030: 42 35 41 3A 20 63 61 6C 6C 20 26 42 42 35 41 09 B5A: call &BB5A.
000040: 3B 74 77 6F 20 73 70 61 63 65 73 0D 0A 09 6C 64 ;two spaces...ld
000050: 20 61 2C 33 3A 20 63 61 6C 6C 20 26 42 42 39 30 a,3: call &BB90
000060: 09 09 3B 50 45 4E 20 33 0D 0A 09 70 75 73 68 20 ..;PEN 3...push
000070: 69 78 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 ix: pop hl...ld
000080: 62 2C 32 36 3A 20 63 61 6C 6C 20 73 74 72 6E 67 b,26: call strng
000090: 32 09 09 3B 64 69 61 6C 6C 69 6E 67 20 73 74 72 2..;dialling str
0000A0: 69 6E 67 0D 0A 09 6C 64 20 61 2C 33 35 3A 20 63 ing...ld a,35: c
0000B0: 61 6C 6C 20 26 42 42 36 46 09 09 3B 63 6F 6C 75 all &BB6F..;colu
0000C0: 6D 6E 20 33 35 0D 0A 09 6C 64 20 61 2C 28 69 78 mn 35...ld a,(ix
0000D0: 2B 32 36 29 3A 20 6F 72 20 61 0D 0A 09 6A 72 20 +26): or a...jr
0000E0: 6E 7A 2C 61 75 74 6F 64 09 09 09 3B 61 75 74 6F nz,autod...;auto
0000F0: 64 69 61 6C 3F 0D 0A 09 70 75 73 68 20 69 78 3A dial?...push ix:
000100: 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 64 65 2C pop hl...ld de,
000110: 32 37 3A 20 61 64 64 20 68 6C 2C 64 65 3A 20 6C 27: add hl,de: l
000120: 64 20 62 2C 35 0D 0A 09 63 61 6C 6C 20 73 74 72 d b,5...call str
000130: 6E 67 32 09 09 09 3B 69 66 20 6E 6F 74 2C 20 70 ng2...;if not, p
000140: 72 69 6E 74 20 65 78 74 72 61 20 66 69 65 6C 64 rint extra field
000150: 0D 0A 09 6A 72 20 64 65 78 74 72 61 0D 0A 2E 61 ...jr dextra...a
000160: 75 74 6F 64 09 6C 64 20 68 6C 2C 61 74 6F 74 78 utod.ld hl,atotx
000170: 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 09 3B t: call string.;
000180: 70 72 69 6E 74 20 22 61 75 74 6F 22 0D 0A 2E 64 print "auto"...d
000190: 65 78 74 72 61 09 6C 64 20 61 2C 31 3A 20 63 61 extra.ld a,1: ca
0001A0: 6C 6C 20 26 42 42 39 30 0D 0A 09 70 6F 70 20 68 ll &BB90...pop h
0001B0: 6C 0D 0A 09 6C 64 20 64 65 2C 33 32 3A 20 61 64 l...ld de,32: ad
0001C0: 64 20 69 78 2C 64 65 0D 0A 09 69 6E 63 20 6C 3A d ix,de...inc l:
0001D0: 20 6C 64 20 61 2C 6C 0D 0A 09 63 70 20 31 36 3A ld a,l...cp 16:
0001E0: 20 6A 70 20 6E 7A 2C 64 64 6C 6F 6F 70 09 09 3B jp nz,ddloop..;
0001F0: 6C 6F 6F 70 20 62 61 63 6B 20 69 66 20 6E 6F 74 loop back if not
Size : 512 (Real : 512)
000000: 73 3A 20 63 70 20 26 46 43 3A 20 6A 72 20 7A 2C s: cp &FC: jr z,
000010: 65 78 69 74 75 73 0D 0A 09 63 70 20 32 34 30 3A exitus...cp 240:
000020: 20 6A 72 20 7A 2C 75 73 75 70 0D 0A 09 63 70 20 jr z,usup...cp
000030: 32 34 31 3A 20 6A 72 20 6E 7A 2C 75 73 77 61 69 241: jr nz,uswai
000040: 74 0D 0A 09 6C 64 20 61 2C 65 3A 20 6F 72 20 61 t...ld a,e: or a
000050: 3A 20 20 6A 72 20 7A 2C 75 73 77 61 69 74 3A 20 : jr z,uswait:
000060: 64 65 63 20 65 3A 20 6A 72 20 75 73 64 69 73 70 dec e: jr usdisp
000070: 0D 0A 2E 75 73 75 70 09 6C 64 20 61 2C 65 3A 20 ...usup.ld a,e:
000080: 63 70 20 31 35 3A 20 6A 72 20 7A 2C 75 73 77 61 cp 15: jr z,uswa
000090: 69 74 3A 20 69 6E 63 20 65 3A 20 6A 72 20 75 73 it: inc e: jr us
0000A0: 64 69 73 70 0D 0A 2E 65 78 69 74 75 73 09 70 75 disp...exitus.pu
0000B0: 73 68 20 64 65 3A 20 6C 64 20 68 6C 2C 75 73 65 sh de: ld hl,use
0000C0: 74 78 74 3A 20 63 61 6C 6C 20 72 73 78 3A 20 6C txt: call rsx: l
0000D0: 64 20 61 2C 32 3A 20 70 6F 70 20 64 65 0D 0A 09 d a,2: pop de...
0000E0: 6C 64 20 69 78 2C 74 70 62 6C 6F 63 6B 3A 20 6C ld ix,tpblock: l
0000F0: 64 20 28 69 78 29 2C 65 3A 20 6C 64 20 28 69 78 d (ix),e: ld (ix
000100: 2B 31 29 2C 30 3A 20 6C 64 20 61 2C 31 3A 20 63 +1),0: ld a,1: c
000110: 61 6C 6C 20 26 31 42 3A 20 6A 70 20 64 73 63 6D all &1B: jp dscm
000120: 6E 75 0D 0A 0D 0A 2E 63 61 74 64 73 63 09 63 61 nu.....catdsc.ca
000130: 6C 6C 20 63 61 74 6C 6F 67 3A 20 6A 70 20 64 73 ll catlog: jp ds
000140: 63 6D 6E 75 0D 0A 2E 63 61 74 63 70 74 09 63 61 cmnu...catcpt.ca
000150: 6C 6C 20 63 61 74 6C 6F 67 3A 20 6A 70 20 63 70 ll catlog: jp cp
000160: 74 6D 6E 75 0D 0A 2E 63 61 74 66 69 6C 09 63 61 tmnu...catfil.ca
000170: 6C 6C 20 63 61 74 6C 6F 67 3A 20 6A 70 20 66 69 ll catlog: jp fi
000180: 6C 6D 6E 75 0D 0A 0D 0A 2E 63 61 74 6C 6F 67 09 lmnu.....catlog.
000190: 63 61 6C 6C 20 26 42 42 36 43 3A 20 6C 64 20 61 call &BB6C: ld a
0001A0: 2C 31 3A 20 63 61 6C 6C 20 26 42 42 39 30 0D 0A ,1: call &BB90..
0001B0: 09 6C 64 20 6C 2C 28 69 79 2B 37 29 3A 20 6C 64 .ld l,(iy+7): ld
0001C0: 20 68 2C 28 69 79 2B 38 29 3A 20 6C 64 20 64 65 h,(iy+8): ld de
0001D0: 2C 31 30 32 34 3A 20 61 64 64 20 68 6C 2C 64 65 ,1024: add hl,de
0001E0: 0D 0A 09 65 78 20 64 65 2C 68 6C 3A 20 63 61 6C ...ex de,hl: cal
0001F0: 6C 20 26 42 43 39 42 3A 20 63 61 6C 6C 20 26 42 l &BC9B: call &B
Size : 512 (Real : 512)
000000: 6E 6D 0D 0A 09 63 70 20 31 3A 20 6A 70 20 7A 2C nm...cp 1: jp z,
000010: 63 61 74 66 69 6C 0D 0A 09 63 70 20 32 3A 20 6A catfil...cp 2: j
000020: 70 20 7A 2C 64 6F 77 6E 6C 64 0D 0A 09 63 70 20 p z,downld...cp
000030: 33 3A 20 6A 70 20 7A 2C 75 70 6C 6F 61 64 0D 0A 3: jp z,upload..
000040: 0D 0A 2E 73 65 6C 70 72 74 09 6C 64 20 68 6C 2C ...selprt.ld hl,
000050: 74 6D 70 72 6F 74 3A 20 63 61 6C 6C 20 6D 65 6E tmprot: call men
000060: 75 3A 20 6A 70 20 7A 2C 66 69 6C 6D 6E 75 0D 0A u: jp z,filmnu..
000070: 09 64 65 63 20 61 3A 20 6C 64 20 28 69 79 2B 31 .dec a: ld (iy+1
000080: 30 37 29 2C 61 3A 20 6A 70 20 66 69 6C 6D 6E 75 07),a: jp filmnu
000090: 09 3B 70 72 6F 74 6F 63 6F 6C 20 73 65 6C 65 63 .;protocol selec
0000A0: 74 69 6F 6E 0D 0A 0D 0A 2E 64 6F 77 6E 6C 64 09 tion.....downld.
0000B0: 6C 64 20 68 6C 2C 64 73 66 74 78 74 3A 20 63 61 ld hl,dsftxt: ca
0000C0: 6C 6C 20 73 74 72 69 6E 67 0D 0A 09 6C 64 20 68 ll string...ld h
0000D0: 6C 2C 74 70 62 6C 6F 63 6B 2B 35 3A 20 63 61 6C l,tpblock+5: cal
0000E0: 6C 20 69 6E 70 75 74 66 3A 20 6A 70 20 7A 2C 66 l inputf: jp z,f
0000F0: 69 6C 6D 6E 75 0D 0A 09 6C 64 20 61 2C 62 3A 20 ilmnu...ld a,b:
000100: 6F 72 20 61 3A 20 6A 70 20 7A 2C 6E 6F 6E 61 6D or a: jp z,nonam
000110: 65 0D 0A 09 6C 64 20 28 74 70 62 6C 6F 63 6B 2B e...ld (tpblock+
000120: 32 29 2C 61 3A 20 6C 64 20 28 74 70 62 6C 6F 63 2),a: ld (tpbloc
000130: 6B 2B 33 29 2C 68 6C 0D 0A 09 6C 64 20 69 78 2C k+3),hl...ld ix,
000140: 74 70 62 6C 6F 63 6B 3A 20 6C 64 20 68 6C 2C 74 tpblock: ld hl,t
000150: 70 62 6C 6F 63 6B 2B 32 0D 0A 09 6C 64 20 28 69 pblock+2...ld (i
000160: 78 29 2C 6C 3A 20 6C 64 20 28 69 78 2B 31 29 2C x),l: ld (ix+1),
000170: 68 0D 0A 09 6C 64 20 61 2C 31 3A 20 64 65 63 20 h...ld a,1: dec
000180: 69 78 3A 20 64 65 63 20 69 78 3A 20 70 75 73 68 ix: dec ix: push
000190: 20 69 78 3A 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 ix: pop hl...ld
0001A0: 20 28 69 79 2B 37 30 29 2C 6C 3A 20 6C 64 20 28 (iy+70),l: ld (
0001B0: 69 79 2B 37 31 29 2C 68 09 3B 63 75 72 72 65 6E iy+71),h.;curren
0001C0: 74 20 6E 61 6D 65 20 61 64 64 72 65 73 73 0D 0A t name address..
0001D0: 09 6A 72 20 64 6F 64 6E 6C 64 0D 0A 2E 6E 6F 6E .jr dodnld...non
0001E0: 61 6D 65 09 78 6F 72 20 61 0D 0A 2E 64 6F 64 6E ame.xor a...dodn
0001F0: 6C 64 09 6C 64 20 28 69 79 2B 34 32 29 2C 61 3A ld.ld (iy+42),a:
Size : 512 (Real : 512)
000000: 42 31 38 3A 20 72 65 74 0D 0A 0D 0A 2E 64 72 69 B18: ret.....dri
000010: 76 65 61 09 6C 64 20 61 2C 31 35 3A 20 63 61 6C vea.ld a,15: cal
000020: 6C 20 26 42 42 37 32 3A 20 6C 64 20 68 6C 2C 64 l &BB72: ld hl,d
000030: 72 61 74 78 74 3A 20 63 61 6C 6C 20 72 73 78 3A ratxt: call rsx:
000040: 20 63 61 6C 6C 20 26 31 42 3A 20 6A 70 20 64 73 call &1B: jp ds
000050: 63 6D 6E 75 0D 0A 2E 64 72 69 76 65 62 09 6C 64 cmnu...driveb.ld
000060: 20 61 2C 31 35 3A 20 63 61 6C 6C 20 26 42 42 37 a,15: call &BB7
000070: 32 3A 20 6C 64 20 68 6C 2C 64 72 62 74 78 74 3A 2: ld hl,drbtxt:
000080: 20 63 61 6C 6C 20 72 73 78 3A 20 63 61 6C 6C 20 call rsx: call
000090: 26 31 42 3A 20 6A 70 20 64 73 63 6D 6E 75 0D 0A &1B: jp dscmnu..
0000A0: 0D 0A 2E 65 72 61 73 65 09 6C 64 20 68 6C 2C 65 ...erase.ld hl,e
0000B0: 72 61 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 ratxt: call stri
0000C0: 6E 67 0D 0A 09 6C 64 20 68 6C 2C 26 30 42 30 33 ng...ld hl,&0B03
0000D0: 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 6C : call &BB75...l
0000E0: 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 35 3A 20 d hl,tpblock+5:
0000F0: 63 61 6C 6C 20 69 6E 70 75 74 66 3A 20 6A 70 20 call inputf: jp
000100: 7A 2C 64 73 63 6D 6E 75 0D 0A 09 6C 64 20 61 2C z,dscmnu...ld a,
000110: 62 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 64 73 b: or a: jp z,ds
000120: 63 6D 6E 75 0D 0A 09 6C 64 20 28 74 70 62 6C 6F cmnu...ld (tpblo
000130: 63 6B 2B 32 29 2C 61 3A 20 6C 64 20 28 74 70 62 ck+2),a: ld (tpb
000140: 6C 6F 63 6B 2B 33 29 2C 68 6C 0D 0A 09 6C 64 20 lock+3),hl...ld
000150: 68 6C 2C 65 72 63 74 78 74 3A 20 63 61 6C 6C 20 hl,erctxt: call
000160: 72 73 78 0D 0A 09 6C 64 20 61 2C 31 3A 20 6C 64 rsx...ld a,1: ld
000170: 20 69 78 2C 74 70 62 6C 6F 63 6B 3A 20 6C 64 20 ix,tpblock: ld
000180: 64 65 2C 74 70 62 6C 6F 63 6B 2B 32 0D 0A 09 6C de,tpblock+2...l
000190: 64 20 28 69 78 29 2C 65 3A 20 6C 64 20 28 69 78 d (ix),e: ld (ix
0001A0: 2B 31 29 2C 64 0D 0A 09 63 61 6C 6C 20 26 31 42 +1),d...call &1B
0001B0: 3A 20 6A 70 20 64 73 63 6D 6E 75 0D 0A 0D 0A 2E : jp dscmnu.....
0001C0: 72 65 6E 61 6D 65 09 6C 64 20 68 6C 2C 72 65 6E rename.ld hl,ren
0001D0: 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 txt: call string
0001E0: 0D 0A 09 6C 64 20 68 6C 2C 26 30 42 30 33 3A 20 ...ld hl,&0B03:
0001F0: 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 6C 64 20 call &BB75...ld
Size : 512 (Real : 512)
000000: 20 6C 64 20 61 2C 33 3A 20 6C 64 20 28 69 79 2B ld a,3: ld (iy+
000010: 35 29 2C 61 3A 20 6A 70 20 71 75 63 6F 6D 09 3B 5),a: jp qucom.;
000020: 6E 70 61 72 61 6D 2C 20 66 63 6D 6F 64 65 0D 0A nparam, fcmode..
000030: 0D 0A 2E 75 70 6C 6F 61 64 09 6C 64 20 61 2C 28 ...upload.ld a,(
000040: 69 79 2B 31 30 37 29 3A 20 63 70 20 32 3A 20 6A iy+107): cp 2: j
000050: 70 20 6E 7A 2C 73 66 69 6C 65 09 09 3B 73 70 65 p nz,sfile..;spe
000060: 63 70 0D 0A 09 6C 64 20 68 6C 2C 75 66 6E 74 78 cp...ld hl,ufntx
000070: 74 3A 20 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A t: call string..
000080: 09 78 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B 34 .xor a: ld (iy+4
000090: 32 29 2C 61 0D 0A 09 6C 64 20 68 6C 2C 74 70 62 2),a...ld hl,tpb
0000A0: 6C 6F 63 6B 2B 26 37 45 3A 20 20 6C 64 20 28 69 lock+&7E: ld (i
0000B0: 79 2B 37 30 29 2C 6C 3A 20 6C 64 20 28 69 79 2B y+70),l: ld (iy+
0000C0: 37 31 29 2C 68 09 3B 73 70 61 63 65 20 74 6F 20 71),h.;space to
0000D0: 73 74 6F 72 65 20 70 61 72 61 6D 65 74 65 72 73 store parameters
0000E0: 0D 0A 09 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B ...ld hl,tpblock
0000F0: 2B 26 38 30 3A 20 20 6C 64 20 28 69 79 2B 34 33 +&80: ld (iy+43
000100: 29 2C 6C 3A 20 6C 64 20 28 69 79 2B 34 34 29 2C ),l: ld (iy+44),
000110: 68 09 3B 73 70 61 63 65 20 74 6F 20 73 74 6F 72 h.;space to stor
000120: 65 20 64 65 73 63 72 69 70 74 6F 72 73 0D 0A 09 e descriptors...
000130: 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 26 31 ld hl,tpblock+&1
000140: 31 30 3A 20 6C 64 20 28 69 79 2B 34 30 29 2C 6C 10: ld (iy+40),l
000150: 3A 20 6C 64 20 28 69 79 2B 34 31 29 2C 68 09 3B : ld (iy+41),h.;
000160: 73 70 61 63 65 20 74 6F 20 73 74 6F 72 65 20 73 space to store s
000170: 74 72 69 6E 67 73 0D 0A 0D 0A 2E 75 70 66 6C 70 trings.....upflp
000180: 09 6C 64 20 6C 2C 28 69 79 2B 34 30 29 3A 20 6C .ld l,(iy+40): l
000190: 64 20 68 2C 28 69 79 2B 34 31 29 3A 20 63 61 6C d h,(iy+41): cal
0001A0: 6C 20 69 6E 70 75 74 66 0D 0A 09 6A 70 20 7A 2C l inputf...jp z,
0001B0: 66 69 6C 6D 6E 75 09 09 09 09 3B 45 53 43 20 70 filmnu....;ESC p
0001C0: 72 65 73 73 65 64 3F 0D 0A 09 6C 64 20 61 2C 62 ressed?...ld a,b
0001D0: 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 64 6F 75 : or a: jp z,dou
0001E0: 70 6C 64 09 09 3B 6C 61 73 74 20 66 69 6C 65 6E pld..;last filen
0001F0: 61 6D 65 20 65 6E 74 65 72 65 64 3F 0D 0A 09 70 ame entered?...p
Size : 512 (Real : 512)
000000: 68 6C 2C 74 70 62 6C 6F 63 6B 2B 31 30 3A 20 63 hl,tpblock+10: c
000010: 61 6C 6C 20 69 6E 70 75 74 66 3A 20 6A 70 20 7A all inputf: jp z
000020: 2C 64 73 63 6D 6E 75 0D 0A 09 6C 64 20 61 2C 62 ,dscmnu...ld a,b
000030: 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 64 73 63 : or a: jp z,dsc
000040: 6D 6E 75 0D 0A 09 6C 64 20 28 74 70 62 6C 6F 63 mnu...ld (tpbloc
000050: 6B 2B 34 29 2C 61 3A 20 6C 64 20 28 74 70 62 6C k+4),a: ld (tpbl
000060: 6F 63 6B 2B 35 29 2C 68 6C 0D 0A 09 6C 64 20 68 ock+5),hl...ld h
000070: 6C 2C 72 65 32 74 78 74 3A 20 63 61 6C 6C 20 73 l,re2txt: call s
000080: 74 72 69 6E 67 0D 0A 09 6C 64 20 68 6C 2C 26 30 tring...ld hl,&0
000090: 42 30 37 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D B07: call &BB75.
0000A0: 0A 09 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B ..ld hl,tpblock+
0000B0: 26 34 41 3A 20 63 61 6C 6C 20 69 6E 70 75 74 66 &4A: call inputf
0000C0: 3A 20 6A 70 20 7A 2C 64 73 63 6D 6E 75 0D 0A 09 : jp z,dscmnu...
0000D0: 6C 64 20 61 2C 62 3A 20 6F 72 20 61 3A 20 6A 70 ld a,b: or a: jp
0000E0: 20 7A 2C 64 73 63 6D 6E 75 0D 0A 09 6C 64 20 28 z,dscmnu...ld (
0000F0: 74 70 62 6C 6F 63 6B 2B 37 29 2C 61 3A 20 6C 64 tpblock+7),a: ld
000100: 20 28 74 70 62 6C 6F 63 6B 2B 38 29 2C 68 6C 0D (tpblock+8),hl.
000110: 0A 09 6C 64 20 68 6C 2C 72 65 63 74 78 74 3A 20 ..ld hl,rectxt:
000120: 63 61 6C 6C 20 72 73 78 0D 0A 09 6C 64 20 61 2C call rsx...ld a,
000130: 32 3A 20 6C 64 20 69 78 2C 74 70 62 6C 6F 63 6B 2: ld ix,tpblock
000140: 0D 0A 09 6C 64 20 64 65 2C 74 70 62 6C 6F 63 6B ...ld de,tpblock
000150: 2B 34 3A 20 6C 64 20 28 69 78 29 2C 65 3A 20 6C +4: ld (ix),e: l
000160: 64 20 28 69 78 2B 31 29 2C 64 0D 0A 09 6C 64 20 d (ix+1),d...ld
000170: 64 65 2C 74 70 62 6C 6F 63 6B 2B 37 3A 20 6C 64 de,tpblock+7: ld
000180: 20 28 69 78 2B 32 29 2C 65 3A 20 6C 64 20 28 69 (ix+2),e: ld (i
000190: 78 2B 33 29 2C 64 0D 0A 09 63 61 6C 6C 20 26 31 x+3),d...call &1
0001A0: 42 3A 20 6A 70 20 64 73 63 6D 6E 75 0D 0A 0D 0A B: jp dscmnu....
0001B0: 69 66 20 6B 64 73 3A 09 65 6C 73 65 0D 0A 2E 68 if kds:.else...h
0001C0: 61 6E 67 75 70 09 6C 64 20 64 2C 35 3A 20 6C 64 angup.ld d,5: ld
0001D0: 20 61 2C 28 69 79 2B 31 32 29 3A 20 61 6E 64 20 a,(iy+12): and
0001E0: 31 32 37 3A 20 63 61 6C 6C 20 70 72 65 67 09 3B 127: call preg.;
0001F0: 72 35 0D 0A 09 6C 64 20 68 6C 2C 31 30 3A 20 6C r5...ld hl,10: l
Size : 512 (Real : 512)
000000: 75 73 68 20 68 6C 0D 0A 09 20 6C 64 20 6C 2C 28 ush hl... ld l,(
000010: 69 79 2B 34 33 29 3A 20 6C 64 20 68 2C 28 69 79 iy+43): ld h,(iy
000020: 2B 34 34 29 0D 0A 09 20 70 75 73 68 20 68 6C 3A +44)... push hl:
000030: 20 70 6F 70 20 69 78 0D 0A 09 70 6F 70 20 68 6C pop ix...pop hl
000040: 09 09 09 09 09 3B 49 58 20 3D 20 70 62 6C 6F 63 .....;IX = pbloc
000050: 6B 0D 0A 09 6C 64 20 28 69 78 29 2C 62 3A 20 6C k...ld (ix),b: l
000060: 64 20 28 69 78 2B 31 29 2C 6C 3A 20 6C 64 20 28 d (ix+1),l: ld (
000070: 69 78 2B 32 29 2C 68 09 3B 69 6E 73 65 72 74 20 ix+2),h.;insert
000080: 73 74 72 69 6E 67 20 64 65 73 63 72 69 70 74 6F string descripto
000090: 72 20 62 6C 6F 63 6B 0D 0A 09 6C 64 20 63 2C 62 r block...ld c,b
0000A0: 3A 20 6C 64 20 62 2C 30 0D 0A 09 61 64 64 20 68 : ld b,0...add h
0000B0: 6C 2C 62 63 3A 20 6C 64 20 28 69 79 2B 34 30 29 l,bc: ld (iy+40)
0000C0: 2C 6C 3A 20 6C 64 20 28 69 79 2B 34 31 29 2C 68 ,l: ld (iy+41),h
0000D0: 09 3B 6D 6F 76 65 20 6F 6E 74 6F 20 6E 65 78 74 .;move onto next
0000E0: 20 73 74 72 69 6E 67 20 73 70 61 63 65 0D 0A 0D string space...
0000F0: 0A 09 70 75 73 68 20 69 78 3A 20 70 6F 70 20 68 ..push ix: pop h
000100: 6C 0D 0A 09 70 75 73 68 20 64 65 3A 20 6C 64 20 l...push de: ld
000110: 65 2C 28 69 79 2B 37 30 29 3A 20 6C 64 20 64 2C e,(iy+70): ld d,
000120: 28 69 79 2B 37 31 29 0D 0A 09 70 75 73 68 20 64 (iy+71)...push d
000130: 65 3A 20 70 6F 70 20 69 78 3A 20 70 6F 70 20 64 e: pop ix: pop d
000140: 65 09 09 09 3B 49 58 20 3D 20 63 6E 61 64 64 72 e...;IX = cnaddr
000150: 0D 0A 09 6C 64 20 28 69 78 29 2C 6C 3A 20 6C 64 ...ld (ix),l: ld
000160: 20 28 69 78 2B 31 29 2C 68 09 09 09 3B 61 64 64 (ix+1),h...;add
000170: 20 64 65 73 63 72 69 70 74 6F 72 20 74 6F 20 70 descriptor to p
000180: 61 72 61 6D 20 74 61 62 6C 65 0D 0A 09 64 65 63 aram table...dec
000190: 20 69 78 3A 20 64 65 63 20 69 78 3A 20 09 09 09 ix: dec ix: ...
0001A0: 3B 75 70 64 61 74 65 20 70 61 72 61 6D 65 74 65 ;update paramete
0001B0: 72 20 74 61 62 6C 65 20 70 6F 73 69 74 69 6F 6E r table position
0001C0: 0D 0A 09 70 75 73 68 20 64 65 3A 20 70 75 73 68 ...push de: push
0001D0: 20 69 78 3A 20 70 6F 70 20 64 65 0D 0A 09 6C 64 ix: pop de...ld
0001E0: 20 28 69 79 2B 37 30 29 2C 65 3A 20 6C 64 20 28 (iy+70),e: ld (
0001F0: 69 79 2B 37 31 29 2C 64 3A 20 70 6F 70 20 68 6C iy+71),d: pop hl
Size : 512 (Real : 512)
000000: 64 20 28 69 79 2B 38 37 29 2C 6C 3A 20 6C 64 20 d (iy+87),l: ld
000010: 28 69 79 2B 38 38 29 2C 68 3A 20 6C 64 20 61 2C (iy+88),h: ld a,
000020: 31 3A 20 6C 64 20 28 69 79 2B 38 39 29 2C 61 0D 1: ld (iy+89),a.
000030: 0A 2E 68 66 66 6C 70 09 6C 64 20 61 2C 28 69 79 ..hfflp.ld a,(iy
000040: 2B 38 39 29 3A 20 6F 72 20 61 3A 20 6A 72 20 6E +89): or a: jr n
000050: 7A 2C 68 66 66 6C 70 0D 0A 09 6C 64 20 64 2C 35 z,hfflp...ld d,5
000060: 3A 20 6C 64 20 61 2C 28 69 79 2B 31 32 29 3A 20 : ld a,(iy+12):
000070: 6F 72 20 31 32 38 3A 20 63 61 6C 6C 20 70 72 65 or 128: call pre
000080: 67 0D 0A 09 6A 70 20 6D 61 69 6E 6D 3A 20 65 6E g...jp mainm: en
000090: 64 69 66 0D 0A 0D 0A 2E 63 70 74 6D 6E 75 09 6C dif.....cptmnu.l
0000A0: 64 20 68 6C 2C 74 6D 63 61 70 74 3A 20 63 61 6C d hl,tmcapt: cal
0000B0: 6C 20 6D 65 6E 75 3A 20 6A 70 20 7A 2C 6D 61 69 l menu: jp z,mai
0000C0: 6E 6D 0D 0A 09 63 70 20 31 3A 20 6A 70 20 7A 2C nm...cp 1: jp z,
0000D0: 63 61 74 63 70 74 0D 0A 09 63 70 20 32 3A 20 6A catcpt...cp 2: j
0000E0: 70 20 7A 2C 6F 70 63 61 70 74 0D 0A 09 63 70 20 p z,opcapt...cp
0000F0: 33 3A 20 6A 70 20 7A 2C 63 6C 63 61 70 74 0D 0A 3: jp z,clcapt..
000100: 0D 0A 2E 64 6F 65 63 68 6F 09 6C 64 20 68 6C 2C ...doecho.ld hl,
000110: 65 63 6F 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 ecotxt: call str
000120: 69 6E 67 0D 0A 09 6C 64 20 68 6C 2C 26 30 42 30 ing...ld hl,&0B0
000130: 33 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 3: call &BB75...
000140: 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 35 3A ld hl,tpblock+5:
000150: 20 63 61 6C 6C 20 69 6E 70 75 74 66 3A 20 6A 70 call inputf: jp
000160: 20 7A 2C 63 70 74 6D 6E 75 0D 0A 09 6C 64 20 61 z,cptmnu...ld a
000170: 2C 62 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 63 ,b: or a: jp z,c
000180: 70 74 6D 6E 75 0D 0A 09 6C 64 20 28 74 70 62 6C ptmnu...ld (tpbl
000190: 6F 63 6B 2B 32 29 2C 61 3A 20 6C 64 20 28 74 70 ock+2),a: ld (tp
0001A0: 62 6C 6F 63 6B 2B 33 29 2C 68 6C 0D 0A 09 6C 64 block+3),hl...ld
0001B0: 20 69 78 2C 74 70 62 6C 6F 63 6B 3A 20 6C 64 20 ix,tpblock: ld
0001C0: 68 6C 2C 74 70 62 6C 6F 63 6B 2B 32 0D 0A 09 6C hl,tpblock+2...l
0001D0: 64 20 28 69 78 29 2C 6C 3A 20 6C 64 20 28 69 78 d (ix),l: ld (ix
0001E0: 2B 31 29 2C 68 0D 0A 09 6C 64 20 61 2C 32 3A 20 +1),h...ld a,2:
0001F0: 6C 64 20 28 69 79 2B 35 29 2C 61 3A 20 6A 70 20 ld (iy+5),a: jp
Size : 512 (Real : 512)
000000: 09 3B 49 58 20 3D 3E 20 63 6E 61 64 64 72 0D 0A .;IX => cnaddr..
000010: 0D 0A 09 69 6E 63 20 68 6C 3A 20 69 6E 63 20 68 ...inc hl: inc h
000020: 6C 3A 20 69 6E 63 20 68 6C 0D 0A 09 6C 64 20 28 l: inc hl...ld (
000030: 69 79 2B 34 33 29 2C 6C 3A 20 6C 64 20 28 69 79 iy+43),l: ld (iy
000040: 2B 34 34 29 2C 68 09 09 3B 75 70 64 61 74 65 20 +44),h..;update
000050: 64 65 73 63 72 69 70 74 6F 72 20 70 6F 73 69 74 descriptor posit
000060: 69 6F 6E 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 ion...ld a,(iy+4
000070: 32 29 3A 20 69 6E 63 20 61 3A 20 6C 64 20 28 69 2): inc a: ld (i
000080: 79 2B 34 32 29 2C 61 09 3B 69 6E 63 72 65 61 73 y+42),a.;increas
000090: 65 20 6E 75 6D 62 65 72 20 6F 66 20 70 61 72 61 e number of para
0000A0: 6D 65 74 65 72 73 0D 0A 09 62 69 74 20 36 2C 61 meters...bit 6,a
0000B0: 3A 20 6A 70 20 6E 7A 2C 64 6F 75 70 6C 64 09 09 : jp nz,doupld..
0000C0: 09 3B 36 34 20 66 69 6C 65 73 20 79 65 74 3F 0D .;64 files yet?.
0000D0: 0A 09 6C 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 ..ld a,10: call
0000E0: 26 42 42 35 41 09 09 09 3B 69 66 20 6E 6F 74 2C &BB5A...;if not,
0000F0: 20 6E 65 78 74 20 6C 69 6E 65 0D 0A 09 6C 64 20 next line...ld
000100: 61 2C 31 31 3A 20 63 61 6C 6C 20 26 42 42 36 46 a,11: call &BB6F
000110: 09 09 09 3B 61 6E 64 20 63 6F 6C 75 6D 6E 20 31 ...;and column 1
000120: 31 0D 0A 09 6A 72 20 75 70 66 6C 70 0D 0A 0D 0A 1...jr upflp....
000130: 2E 64 6F 75 70 6C 64 09 6C 64 20 61 2C 34 3A 20 .doupld.ld a,4:
000140: 6C 64 20 28 69 79 2B 35 29 2C 61 3A 20 6A 70 20 ld (iy+5),a: jp
000150: 71 75 63 6F 6D 09 09 3B 66 63 6D 6F 64 65 0D 0A qucom..;fcmode..
000160: 0D 0A 2E 73 66 69 6C 65 09 6C 64 20 68 6C 2C 75 ...sfile.ld hl,u
000170: 73 66 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 sftxt: call stri
000180: 6E 67 0D 0A 09 6C 64 20 68 6C 2C 74 70 62 6C 6F ng...ld hl,tpblo
000190: 63 6B 2B 35 3A 20 63 61 6C 6C 20 69 6E 70 75 74 ck+5: call input
0001A0: 66 3A 20 6A 70 20 7A 2C 66 69 6C 6D 6E 75 0D 0A f: jp z,filmnu..
0001B0: 09 6C 64 20 61 2C 62 3A 20 6F 72 20 61 3A 20 6A .ld a,b: or a: j
0001C0: 70 20 7A 2C 66 69 6C 6D 6E 75 0D 0A 09 6C 64 20 p z,filmnu...ld
0001D0: 28 74 70 62 6C 6F 63 6B 2B 32 29 2C 61 3A 20 6C (tpblock+2),a: l
0001E0: 64 20 28 74 70 62 6C 6F 63 6B 2B 33 29 2C 68 6C d (tpblock+3),hl
0001F0: 0D 0A 09 6C 64 20 69 78 2C 74 70 62 6C 6F 63 6B ...ld ix,tpblock
Size : 512 (Real : 512)
000000: 71 75 63 6F 6D 09 3B 66 63 6D 6F 64 65 0D 0A 0D qucom.;fcmode...
000010: 0A 2E 6F 70 63 61 70 74 09 6C 64 20 68 6C 2C 63 ..opcapt.ld hl,c
000020: 70 74 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 pttxt: call stri
000030: 6E 67 0D 0A 09 6C 64 20 68 6C 2C 26 30 42 30 33 ng...ld hl,&0B03
000040: 3A 20 63 61 6C 6C 20 26 42 42 37 35 0D 0A 09 6C : call &BB75...l
000050: 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B 35 3A 20 d hl,tpblock+5:
000060: 63 61 6C 6C 20 69 6E 70 75 74 66 3A 20 6A 70 20 call inputf: jp
000070: 7A 2C 63 70 74 6D 6E 75 0D 0A 09 6C 64 20 61 2C z,cptmnu...ld a,
000080: 62 3A 20 6F 72 20 61 3A 20 6A 70 20 7A 2C 63 70 b: or a: jp z,cp
000090: 74 6D 6E 75 0D 0A 09 6C 64 20 28 74 70 62 6C 6F tmnu...ld (tpblo
0000A0: 63 6B 2B 32 29 2C 61 3A 20 6C 64 20 28 74 70 62 ck+2),a: ld (tpb
0000B0: 6C 6F 63 6B 2B 33 29 2C 68 6C 0D 0A 09 6C 64 20 lock+3),hl...ld
0000C0: 61 2C 31 3A 20 6C 64 20 69 78 2C 74 70 62 6C 6F a,1: ld ix,tpblo
0000D0: 63 6B 3A 20 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 ck: ld hl,tpbloc
0000E0: 6B 2B 32 0D 0A 09 6C 64 20 28 69 78 29 2C 6C 3A k+2...ld (ix),l:
0000F0: 20 6C 64 20 28 69 78 2B 31 29 2C 68 0D 0A 09 63 ld (ix+1),h...c
000100: 61 6C 6C 20 63 61 70 74 5F 69 3A 20 6A 70 20 63 all capt_i: jp c
000110: 70 74 6D 6E 75 0D 0A 0D 0A 2E 63 6C 63 61 70 74 ptmnu.....clcapt
000120: 09 6C 64 20 61 2C 28 69 79 2B 35 29 3A 20 63 70 .ld a,(iy+5): cp
000130: 20 31 09 09 3B 66 63 6D 6F 64 65 0D 0A 09 6A 72 1..;fcmode...jr
000140: 20 6E 7A 2C 63 6E 6F 70 65 6E 0D 0A 09 63 61 6C nz,cnopen...cal
000150: 6C 20 63 6C 6F 73 5F 69 3A 20 6A 70 20 63 70 74 l clos_i: jp cpt
000160: 6D 6E 75 0D 0A 2E 63 6E 6F 70 65 6E 09 6C 64 20 mnu...cnopen.ld
000170: 68 6C 2C 63 6E 6F 74 78 74 3A 20 63 61 6C 6C 20 hl,cnotxt: call
000180: 73 74 72 69 6E 67 0D 0A 09 6C 64 20 68 6C 2C 6B string...ld hl,k
000190: 79 32 74 78 74 3A 20 63 61 6C 6C 20 73 74 72 69 y2txt: call stri
0001A0: 6E 67 0D 0A 09 63 61 6C 6C 20 26 42 42 38 31 3A ng...call &BB81:
0001B0: 20 63 61 6C 6C 20 26 42 42 31 38 3A 20 63 61 6C call &BB18: cal
0001C0: 6C 20 26 42 42 38 34 0D 0A 09 6A 70 20 63 70 74 l &BB84...jp cpt
0001D0: 6D 6E 75 0D 0A 0D 0A 2E 66 69 6C 6D 6E 75 09 6C mnu.....filmnu.l
0001E0: 64 20 68 6C 2C 74 6D 66 69 6C 65 3A 20 63 61 6C d hl,tmfile: cal
0001F0: 6C 20 6D 65 6E 75 3A 20 6A 70 20 7A 2C 6D 61 69 l menu: jp z,mai
Size : 512 (Real : 512)
000000: 65 74 0D 0A 2E 6D 6E 75 75 70 09 6C 64 20 61 2C et...mnuup.ld a,
000010: 31 3A 20 63 70 20 6C 3A 20 6A 72 20 7A 2C 6D 6E 1: cp l: jr z,mn
000020: 75 5F 6C 70 0D 0A 09 64 65 63 20 6C 3A 20 6A 72 u_lp...dec l: jr
000030: 20 6D 6E 75 5F 6C 70 0D 0A 2E 6D 6E 75 64 77 6E mnu_lp...mnudwn
000040: 09 6C 64 20 61 2C 62 3A 20 63 70 20 6C 3A 20 6A .ld a,b: cp l: j
000050: 72 20 7A 2C 6D 6E 75 5F 6C 70 0D 0A 09 69 6E 63 r z,mnu_lp...inc
000060: 20 6C 3A 20 6A 72 20 6D 6E 75 5F 6C 70 0D 0A 2E l: jr mnu_lp...
000070: 6D 6E 75 73 65 6C 09 6C 64 20 61 2C 6C 3A 20 6F mnusel.ld a,l: o
000080: 72 20 61 3A 20 72 65 74 0D 0A 0D 0A 09 3B 3E 3E r a: ret.....;>>
000090: 3E 20 52 53 58 20 69 6E 76 6F 6B 65 0D 0A 0D 0A > RSX invoke....
0000A0: 2E 72 73 78 09 6C 64 20 64 65 2C 26 41 46 30 30 .rsx.ld de,&AF00
0000B0: 0D 0A 2E 72 73 78 6C 70 09 6C 64 20 61 2C 28 68 ...rsxlp.ld a,(h
0000C0: 6C 29 3A 20 6C 64 20 28 64 65 29 2C 61 0D 0A 09 l): ld (de),a...
0000D0: 69 6E 63 20 68 6C 3A 20 69 6E 63 20 64 65 0D 0A inc hl: inc de..
0000E0: 09 62 69 74 20 37 2C 61 3A 20 6A 72 20 7A 2C 72 .bit 7,a: jr z,r
0000F0: 73 78 6C 70 0D 0A 09 6C 64 20 68 6C 2C 26 41 46 sxlp...ld hl,&AF
000100: 30 30 0D 0A 09 6A 70 20 26 42 43 44 34 0D 0A 0D 00...jp &BCD4...
000110: 0A 09 3B 3E 3E 3E 20 53 74 72 69 6E 67 20 70 72 ..;>>> String pr
000120: 69 6E 74 20 72 6F 75 74 69 6E 65 20 76 32 0D 0A int routine v2..
000130: 0D 0A 2E 73 74 72 6E 67 32 09 6C 64 20 61 2C 28 ...strng2.ld a,(
000140: 68 6C 29 3A 20 6F 72 20 61 3A 20 72 65 74 20 7A hl): or a: ret z
000150: 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 3A 20 69 ...call &BB5A: i
000160: 6E 63 20 68 6C 0D 0A 09 64 6A 6E 7A 20 73 74 72 nc hl...djnz str
000170: 6E 67 32 3A 20 72 65 74 0D 0A 0D 0A 09 3B 3E 3E ng2: ret.....;>>
000180: 3E 20 45 64 69 74 20 6C 69 6E 65 0D 0A 09 3B 20 > Edit line...;
000190: 20 20 20 28 48 4C 20 69 73 20 62 75 66 66 65 72 (HL is buffer
0001A0: 20 61 64 64 72 65 73 73 2C 20 43 20 69 73 20 6D address, C is m
0001B0: 61 78 69 6D 75 6D 20 6C 65 6E 67 74 68 20 2D 20 aximum length -
0001C0: 72 65 74 75 72 6E 73 20 6C 65 6E 67 74 68 20 69 returns length i
0001D0: 6E 20 42 29 0D 0A 0D 0A 2E 65 64 69 74 6C 6E 09 n B).....editln.
0001E0: 63 61 6C 6C 20 26 42 42 38 31 0D 0A 09 6C 64 20 call &BB81...ld
0001F0: 62 2C 30 0D 0A 2E 65 64 69 74 6C 70 09 63 61 6C b,0...editlp.cal
Size : 512 (Real : 512)
000000: 0A 2E 74 6D 6D 61 69 6E 09 64 62 20 22 52 53 32 ..tmmain.db "RS2
000010: 33 32 20 73 65 74 74 69 6E 67 73 22 2C 30 0D 0A 32 settings",0..
000020: 09 64 62 20 22 43 61 70 74 75 72 65 2F 65 63 68 .db "Capture/ech
000030: 6F 22 2C 30 0D 0A 09 64 62 20 22 46 69 6C 65 20 o",0...db "File
000040: 74 72 61 6E 73 66 65 72 22 2C 30 0D 0A 09 64 62 transfer",0...db
000050: 20 22 44 69 73 63 20 6F 70 65 72 61 74 69 6F 6E "Disc operation
000060: 73 22 2C 30 0D 0A 09 64 62 20 22 44 69 61 6C 6C s",0...db "Diall
000070: 69 6E 67 20 6D 65 6E 75 22 2C 30 0D 0A 69 66 20 ing menu",0..if
000080: 6B 64 73 3A 09 65 6C 73 65 3A 20 64 62 20 22 48 kds:.else: db "H
000090: 61 6E 67 20 75 70 22 2C 30 0D 0A 65 6E 64 69 66 ang up",0..endif
0000A0: 3A 09 64 62 20 32 35 35 0D 0A 0D 0A 2E 74 6D 64 :.db 255.....tmd
0000B0: 69 72 09 64 62 20 22 44 69 72 65 63 74 6F 72 79 ir.db "Directory
0000C0: 20 31 22 2C 30 2C 22 44 69 72 65 63 74 6F 72 79 1",0,"Directory
0000D0: 20 32 22 2C 30 2C 22 44 69 72 65 63 74 6F 72 79 2",0,"Directory
0000E0: 20 33 22 2C 30 2C 22 44 69 72 65 63 74 6F 72 79 3",0,"Directory
0000F0: 20 34 22 2C 30 0D 0A 09 64 62 20 22 44 69 72 65 4",0...db "Dire
000100: 63 74 6F 72 79 20 35 22 2C 30 2C 22 44 69 72 65 ctory 5",0,"Dire
000110: 63 74 6F 72 79 20 36 22 2C 30 2C 22 44 69 72 65 ctory 6",0,"Dire
000120: 63 74 6F 72 79 20 37 22 2C 30 2C 22 44 69 72 65 ctory 7",0,"Dire
000130: 63 74 6F 72 79 20 38 22 2C 30 0D 0A 09 64 62 20 ctory 8",0...db
000140: 32 35 35 0D 0A 2E 74 6D 64 69 73 63 09 64 62 20 255...tmdisc.db
000150: 22 43 61 74 61 6C 6F 67 75 65 22 2C 30 2C 22 41 "Catalogue",0,"A
000160: 22 2C 30 2C 22 42 22 2C 30 2C 22 45 72 61 73 65 ",0,"B",0,"Erase
000170: 22 2C 30 2C 22 52 65 6E 61 6D 65 22 2C 30 2C 22 ",0,"Rename",0,"
000180: 55 73 65 72 22 2C 30 2C 22 54 79 70 65 22 2C 30 User",0,"Type",0
000190: 2C 32 35 35 0D 0A 2E 74 6D 63 61 70 74 09 64 62 ,255...tmcapt.db
0001A0: 20 22 43 61 74 61 6C 6F 67 75 65 22 2C 30 2C 22 "Catalogue",0,"
0001B0: 4F 70 65 6E 20 63 61 70 74 75 72 65 22 2C 30 2C Open capture",0,
0001C0: 22 43 6C 6F 73 65 20 63 61 70 74 75 72 65 22 2C "Close capture",
0001D0: 30 2C 22 45 63 68 6F 20 66 69 6C 65 22 2C 30 2C 0,"Echo file",0,
0001E0: 32 35 35 0D 0A 2E 74 6D 66 69 6C 65 09 64 62 20 255...tmfile.db
0001F0: 22 43 61 74 61 6C 6F 67 75 65 22 2C 30 2C 22 44 "Catalogue",0,"D
Size : 512 (Real : 512)
000000: 6C 20 26 42 42 30 36 0D 0A 09 63 70 20 31 33 3A l &BB06...cp 13:
000010: 20 6A 72 20 7A 2C 65 6C 5F 63 72 0D 0A 09 63 70 jr z,el_cr...cp
000020: 20 31 32 37 3A 20 6A 72 20 7A 2C 65 6C 5F 64 65 127: jr z,el_de
000030: 6C 0D 0A 09 6C 64 20 65 2C 61 0D 0A 09 20 6C 64 l...ld e,a... ld
000040: 20 61 2C 62 3A 20 63 70 20 63 3A 20 6A 72 20 7A a,b: cp c: jr z
000050: 2C 65 64 69 74 6C 70 09 3B 6D 61 78 69 6D 75 6D ,editlp.;maximum
000060: 20 6C 65 6E 67 74 68 3F 0D 0A 09 6C 64 20 61 2C length?...ld a,
000070: 65 0D 0A 09 63 70 20 33 32 3A 20 6A 72 20 63 2C e...cp 32: jr c,
000080: 65 64 69 74 6C 70 0D 0A 09 62 69 74 20 37 2C 61 editlp...bit 7,a
000090: 3A 20 6A 72 20 6E 7A 2C 65 64 69 74 6C 70 0D 0A : jr nz,editlp..
0000A0: 09 6C 64 20 28 68 6C 29 2C 61 3A 20 69 6E 63 20 .ld (hl),a: inc
0000B0: 68 6C 3A 20 69 6E 63 20 62 0D 0A 09 63 61 6C 6C hl: inc b...call
0000C0: 20 26 42 42 35 41 3A 20 6A 72 20 65 64 69 74 6C &BB5A: jr editl
0000D0: 70 0D 0A 2E 65 6C 5F 63 72 09 63 61 6C 6C 20 26 p...el_cr.call &
0000E0: 42 42 38 34 09 09 09 3B 63 61 72 72 69 61 67 65 BB84...;carriage
0000F0: 20 72 65 74 75 72 6E 0D 0A 09 6C 64 20 61 2C 62 return...ld a,b
000100: 3A 20 63 70 20 63 3A 20 72 65 74 20 7A 0D 0A 09 : cp c: ret z...
000110: 6C 64 20 28 68 6C 29 2C 30 3A 20 72 65 74 0D 0A ld (hl),0: ret..
000120: 2E 65 6C 5F 64 65 6C 09 6C 64 20 61 2C 62 3A 20 .el_del.ld a,b:
000130: 6F 72 20 61 3A 20 6A 72 20 7A 2C 65 64 69 74 6C or a: jr z,editl
000140: 70 09 3B 63 61 6E 27 74 20 64 65 6C 65 74 65 20 p.;can't delete
000150: 77 69 74 68 20 6E 6F 20 63 68 61 72 61 63 74 65 with no characte
000160: 72 73 21 0D 0A 09 64 65 63 20 68 6C 3A 20 6C 64 rs!...dec hl: ld
000170: 20 28 68 6C 29 2C 30 3A 20 64 65 63 20 62 0D 0A (hl),0: dec b..
000180: 09 6C 64 20 61 2C 38 3A 20 63 61 6C 6C 20 26 42 .ld a,8: call &B
000190: 42 35 41 0D 0A 09 6C 64 20 61 2C 31 36 3A 20 63 B5A...ld a,16: c
0001A0: 61 6C 6C 20 26 42 42 35 41 0D 0A 09 6A 72 20 65 all &BB5A...jr e
0001B0: 64 69 74 6C 70 0D 0A 0D 0A 09 3B 3E 3E 3E 20 49 ditlp.....;>>> I
0001C0: 6E 70 75 74 20 66 69 6C 65 6E 61 6D 65 0D 0A 0D nput filename...
0001D0: 0A 2E 69 6E 70 75 74 66 09 70 75 73 68 20 68 6C ..inputf.push hl
0001E0: 3A 20 63 61 6C 6C 20 26 42 42 38 31 0D 0A 09 6C : call &BB81...l
0001F0: 64 20 62 2C 30 0D 0A 2E 67 69 6E 6B 65 79 09 63 d b,0...ginkey.c
Size : 512 (Real : 512)
000000: 3A 20 6C 64 20 68 6C 2C 74 70 62 6C 6F 63 6B 2B : ld hl,tpblock+
000010: 32 0D 0A 09 6C 64 20 28 69 78 29 2C 6C 3A 20 6C 2...ld (ix),l: l
000020: 64 20 28 69 78 2B 31 29 2C 68 0D 0A 09 6C 64 20 d (ix+1),h...ld
000030: 61 2C 31 3A 20 6C 64 20 28 69 79 2B 34 32 29 2C a,1: ld (iy+42),
000040: 61 3A 20 64 65 63 20 69 78 3A 20 64 65 63 20 69 a: dec ix: dec i
000050: 78 0D 0A 09 70 75 73 68 20 69 78 3A 20 70 6F 70 x...push ix: pop
000060: 20 68 6C 3A 20 6C 64 20 28 69 79 2B 37 30 29 2C hl: ld (iy+70),
000070: 6C 3A 20 6C 64 20 28 69 79 2B 37 31 29 2C 68 0D l: ld (iy+71),h.
000080: 0A 09 6A 72 20 64 6F 75 70 6C 64 0D 0A 0D 0A 0D ..jr doupld.....
000090: 0A 0D 0A 0D 0A 0D 0A 0D 0A 09 3B 3E 3E 3E 20 51 ..........;>>> Q
0000A0: 75 69 74 20 74 6F 20 43 4F 4D 20 6D 6F 64 65 0D uit to COM mode.
0000B0: 0A 0D 0A 2E 71 75 63 6F 6D 09 6C 64 20 61 2C 32 ....qucom.ld a,2
0000C0: 3A 20 63 61 6C 6C 20 26 42 43 30 45 3A 20 63 61 : call &BC0E: ca
0000D0: 6C 6C 20 26 42 43 30 32 0D 0A 09 6C 64 20 61 2C ll &BC02...ld a,
0000E0: 26 43 30 3A 20 63 61 6C 6C 20 26 42 43 30 38 09 &C0: call &BC08.
0000F0: 09 09 3B 63 6C 65 61 72 20 68 69 67 68 20 73 63 ..;clear high sc
000100: 72 65 65 6E 0D 0A 09 6C 64 20 68 6C 2C 28 6F 66 reen...ld hl,(of
000110: 66 73 65 74 29 3A 20 63 61 6C 6C 20 26 42 43 30 fset): call &BC0
000120: 35 09 09 3B 72 65 73 74 6F 72 65 20 6F 66 66 73 5..;restore offs
000130: 65 74 0D 0A 09 6C 64 20 68 6C 2C 28 63 68 61 70 et...ld hl,(chap
000140: 6F 73 29 3A 20 63 61 6C 6C 20 26 42 42 37 35 09 os): call &BB75.
000150: 09 3B 72 65 73 74 6F 72 65 20 63 68 61 72 61 63 .;restore charac
000160: 74 65 72 20 70 6F 73 69 74 69 6F 6E 0D 0A 09 63 ter position...c
000170: 61 6C 6C 20 72 65 73 75 6D 32 09 09 09 09 3B 22 all resum2....;"
000180: 63 61 72 72 79 20 6F 6E 22 20 74 6F 20 6D 6F 64 carry on" to mod
000190: 65 6D 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 35 29 em...ld a,(iy+5)
0001A0: 3A 20 73 75 62 20 32 3A 20 6A 70 20 63 2C 74 5F : sub 2: jp c,t_
0001B0: 63 6F 6D 0D 0A 0D 0A 09 6A 72 20 7A 2C 71 65 63 com.....jr z,qec
0001C0: 68 6F 0D 0A 09 63 70 20 32 3A 20 6A 72 20 7A 2C ho...cp 2: jr z,
0001D0: 71 75 70 6C 64 0D 0A 0D 0A 2E 71 64 6E 6C 64 09 qupld.....qdnld.
0001E0: 78 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B 35 29 xor a: ld (iy+5)
0001F0: 2C 61 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 32 ,a...ld a,(iy+42
Size : 512 (Real : 512)
000000: 61 6C 6C 20 26 42 42 30 36 0D 0A 09 63 70 20 26 all &BB06...cp &
000010: 46 43 3A 20 6A 72 20 7A 2C 65 69 6E 70 66 0D 0A FC: jr z,einpf..
000020: 09 63 70 20 31 33 3A 20 6A 72 20 7A 2C 65 69 6E .cp 13: jr z,ein
000030: 70 66 0D 0A 09 63 70 20 33 32 3A 20 6A 72 20 63 pf...cp 32: jr c
000040: 2C 67 69 6E 6B 65 79 0D 0A 09 63 70 20 31 32 37 ,ginkey...cp 127
000050: 3A 20 6A 72 20 7A 2C 64 65 6C 65 74 65 3A 20 6A : jr z,delete: j
000060: 72 20 6E 63 2C 67 69 6E 6B 65 79 0D 0A 09 62 69 r nc,ginkey...bi
000070: 74 20 34 2C 62 3A 20 6A 72 20 6E 7A 2C 67 69 6E t 4,b: jr nz,gin
000080: 6B 65 79 0D 0A 09 63 61 6C 6C 20 26 42 42 35 41 key...call &BB5A
000090: 3A 20 6C 64 20 28 68 6C 29 2C 61 3A 20 69 6E 63 : ld (hl),a: inc
0000A0: 20 68 6C 0D 0A 09 69 6E 63 20 62 3A 20 6A 72 20 hl...inc b: jr
0000B0: 67 69 6E 6B 65 79 0D 0A 2E 64 65 6C 65 74 65 09 ginkey...delete.
0000C0: 6C 64 20 61 2C 62 3A 20 6F 72 20 61 3A 20 6A 72 ld a,b: or a: jr
0000D0: 20 7A 2C 67 69 6E 6B 65 79 0D 0A 09 64 65 63 20 z,ginkey...dec
0000E0: 62 3A 20 64 65 63 20 68 6C 3A 20 6C 64 20 28 68 b: dec hl: ld (h
0000F0: 6C 29 2C 30 0D 0A 09 6C 64 20 61 2C 38 3A 20 63 l),0...ld a,8: c
000100: 61 6C 6C 20 26 42 42 35 41 3A 20 6C 64 20 61 2C all &BB5A: ld a,
000110: 33 32 3A 20 63 61 6C 6C 20 26 42 42 35 41 0D 0A 32: call &BB5A..
000120: 09 6C 64 20 61 2C 38 3A 20 63 61 6C 6C 20 26 42 .ld a,8: call &B
000130: 42 35 41 3A 20 6A 72 20 67 69 6E 6B 65 79 0D 0A B5A: jr ginkey..
000140: 2E 65 69 6E 70 66 09 6C 64 20 28 68 6C 29 2C 30 .einpf.ld (hl),0
000150: 3A 20 70 6F 70 20 68 6C 3A 20 70 75 73 68 20 61 : pop hl: push a
000160: 66 3A 20 63 61 6C 6C 20 26 42 42 38 34 3A 20 70 f: call &BB84: p
000170: 6F 70 20 61 66 3A 20 63 70 20 26 46 43 3A 20 72 op af: cp &FC: r
000180: 65 74 0D 0A 0D 0A 09 3B 3E 3E 3E 20 44 61 74 61 et.....;>>> Data
000190: 0D 0A 0D 0A 2E 63 63 72 74 78 74 09 64 62 20 33 .....ccrtxt.db 3
0001A0: 31 2C 31 31 2C 32 2C 20 31 35 2C 31 2C 20 22 43 1,11,2, 15,1, "C
0001B0: 68 61 72 6C 65 79 27 73 20 43 6F 6D 6D 73 20 52 harley's Comms R
0001C0: 4F 4D 22 0D 0A 09 64 62 20 33 31 2C 31 31 2C 33 OM"...db 31,11,3
0001D0: 2C 20 31 35 2C 32 2C 20 32 30 38 2C 32 30 38 2C , 15,2, 208,208,
0001E0: 32 30 38 2C 32 30 38 2C 32 30 38 2C 32 30 38 2C 208,208,208,208,
0001F0: 32 30 38 2C 32 30 38 2C 32 30 38 2C 32 30 38 2C 208,208,208,208,
Size : 512 (Real : 512)
000000: 29 3A 20 6C 64 20 6C 2C 28 69 79 2B 37 30 29 3A ): ld l,(iy+70):
000010: 20 6C 64 20 68 2C 28 69 79 2B 37 31 29 0D 0A 09 ld h,(iy+71)...
000020: 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 3A push hl: pop ix:
000030: 20 69 6E 63 20 69 78 3A 20 69 6E 63 20 69 78 0D inc ix: inc ix.
000040: 0A 09 63 61 6C 6C 20 64 6E 6C 64 5F 69 0D 0A 09 ..call dnld_i...
000050: 6A 70 20 74 5F 63 6F 6D 0D 0A 2E 71 75 70 6C 64 jp t_com...qupld
000060: 09 78 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B 35 .xor a: ld (iy+5
000070: 29 2C 61 0D 0A 09 6C 64 20 61 2C 28 69 79 2B 34 ),a...ld a,(iy+4
000080: 32 29 3A 20 6C 64 20 6C 2C 28 69 79 2B 37 30 29 2): ld l,(iy+70)
000090: 3A 20 6C 64 20 68 2C 28 69 79 2B 37 31 29 0D 0A : ld h,(iy+71)..
0000A0: 09 70 75 73 68 20 68 6C 3A 20 70 6F 70 20 69 78 .push hl: pop ix
0000B0: 3A 20 69 6E 63 20 69 78 3A 20 69 6E 63 20 69 78 : inc ix: inc ix
0000C0: 0D 0A 09 63 61 6C 6C 20 75 70 6C 64 5F 69 0D 0A ...call upld_i..
0000D0: 09 6A 70 20 74 5F 63 6F 6D 0D 0A 2E 71 65 63 68 .jp t_com...qech
0000E0: 6F 09 78 6F 72 20 61 3A 20 6C 64 20 28 69 79 2B o.xor a: ld (iy+
0000F0: 35 29 2C 61 0D 0A 09 6C 64 20 61 2C 31 3A 20 63 5),a...ld a,1: c
000100: 61 6C 6C 20 65 63 68 6F 5F 69 0D 0A 09 6A 70 20 all echo_i...jp
000110: 74 5F 63 6F 6D 0D 0A 0D 0A 09 3B 3E 3E 3E 20 4D t_com.....;>>> M
000120: 65 6E 75 20 73 75 62 72 6F 75 74 69 6E 65 0D 0A enu subroutine..
000130: 0D 0A 2E 6D 65 6E 75 09 6C 64 20 61 2C 31 3A 20 ...menu.ld a,1:
000140: 70 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 push hl: call &B
000150: 42 39 30 3A 20 63 61 6C 6C 20 26 42 42 36 43 3A B90: call &BB6C:
000160: 20 70 6F 70 20 68 6C 0D 0A 09 6C 64 20 62 2C 30 pop hl...ld b,0
000170: 0D 0A 2E 6D 70 5F 6C 70 09 6C 64 20 61 2C 28 68 ...mp_lp.ld a,(h
000180: 6C 29 0D 0A 09 63 70 20 32 35 35 3A 20 6A 72 20 l)...cp 255: jr
000190: 7A 2C 73 65 6C 6D 6E 75 0D 0A 09 6C 64 20 61 2C z,selmnu...ld a,
0001A0: 31 31 3A 20 70 75 73 68 20 68 6C 3A 20 63 61 6C 11: push hl: cal
0001B0: 6C 20 26 42 42 36 46 3A 20 70 6F 70 20 68 6C 0D l &BB6F: pop hl.
0001C0: 0A 09 63 61 6C 6C 20 73 74 72 69 6E 67 0D 0A 09 ..call string...
0001D0: 6C 64 20 61 2C 31 30 3A 20 63 61 6C 6C 20 26 42 ld a,10: call &B
0001E0: 42 35 41 0D 0A 09 69 6E 63 20 62 3A 20 69 6E 63 B5A...inc b: inc
0001F0: 20 68 6C 0D 0A 09 6A 72 20 6D 70 5F 6C 70 0D 0A hl...jr mp_lp..
Size : 512 (Real : 512)
000000: 32 30 38 2C 32 30 38 2C 32 30 38 0D 0A 09 64 62 208,208,208...db
000010: 20 32 30 38 2C 32 30 38 2C 32 30 38 2C 32 30 38 208,208,208,208
000020: 2C 32 30 38 2C 32 30 38 2C 30 0D 0A 0D 0A 2E 75 ,208,208,0.....u
000030: 73 74 78 74 09 64 62 20 31 32 2C 20 33 31 2C 31 stxt.db 12, 31,1
000040: 31 2C 31 2C 20 31 35 2C 31 2C 20 22 53 65 6C 65 1,1, 15,1, "Sele
000050: 63 74 20 75 73 65 72 20 61 72 65 61 3A 22 2C 20 ct user area:",
000060: 30 0D 0A 2E 74 6F 73 74 78 74 09 64 62 20 31 32 0...tostxt.db 12
000070: 2C 20 33 31 2C 31 31 2C 31 2C 20 31 35 2C 31 2C , 31,11,1, 15,1,
000080: 20 22 54 69 6D 65 2D 6F 75 74 20 28 30 2E 30 32 "Time-out (0.02
000090: 73 29 3A 22 2C 20 30 0D 0A 2E 65 72 61 74 78 74 s):", 0...eratxt
0000A0: 09 64 62 20 31 32 2C 20 33 31 2C 31 31 2C 31 2C .db 12, 31,11,1,
0000B0: 20 31 35 2C 31 2C 20 22 46 69 6C 65 20 74 6F 20 15,1, "File to
0000C0: 65 72 61 73 65 3A 22 2C 20 30 0D 0A 2E 74 79 70 erase:", 0...typ
0000D0: 74 78 74 09 64 62 20 31 32 2C 20 33 31 2C 31 31 txt.db 12, 31,11
0000E0: 2C 31 2C 20 31 35 2C 31 2C 20 22 46 69 6C 65 20 ,1, 15,1, "File
0000F0: 74 6F 20 74 79 70 65 3A 22 2C 20 30 0D 0A 2E 65 to type:", 0...e
000100: 63 6F 74 78 74 09 64 62 20 31 32 2C 20 33 31 2C cotxt.db 12, 31,
000110: 31 31 2C 31 2C 20 31 35 2C 31 2C 20 22 46 69 6C 11,1, 15,1, "Fil
000120: 65 20 74 6F 20 65 63 68 6F 3A 22 2C 20 30 0D 0A e to echo:", 0..
000130: 2E 63 70 74 74 78 74 09 64 62 20 31 32 2C 20 33 .cpttxt.db 12, 3
000140: 31 2C 31 31 2C 31 2C 20 31 35 2C 31 2C 20 22 43 1,11,1, 15,1, "C
000150: 61 70 74 75 72 65 20 66 69 6C 65 6E 61 6D 65 3A apture filename:
000160: 22 2C 20 30 0D 0A 2E 63 6E 6F 74 78 74 09 64 62 ", 0...cnotxt.db
000170: 20 31 32 2C 20 33 31 2C 31 31 2C 31 2C 20 31 35 12, 31,11,1, 15
000180: 2C 31 2C 20 22 43 61 70 74 75 72 65 20 6E 6F 74 ,1, "Capture not
000190: 20 61 63 74 69 76 65 22 2C 20 30 0D 0A 2E 64 73 active", 0...ds
0001A0: 66 74 78 74 09 64 62 20 31 32 2C 20 33 31 2C 31 ftxt.db 12, 31,1
0001B0: 31 2C 31 2C 20 31 35 2C 31 2C 20 22 46 69 6C 65 1,1, 15,1, "File
0001C0: 20 74 6F 20 64 6F 77 6E 6C 6F 61 64 3A 22 2C 20 to download:",
0001D0: 33 31 2C 31 31 2C 33 2C 20 30 0D 0A 2E 75 66 6E 31,11,3, 0...ufn
0001E0: 74 78 74 09 64 62 20 31 32 2C 20 33 31 2C 31 31 txt.db 12, 31,11
0001F0: 2C 31 2C 20 31 35 2C 31 2C 20 22 46 69 6C 65 73 ,1, 15,1, "Files
Size : 512 (Real : 512)
000000: 0D 0A 2E 73 65 6C 6D 6E 75 09 6C 64 20 61 2C 33 ...selmnu.ld a,3
000010: 3A 20 63 61 6C 6C 20 26 42 42 39 30 0D 0A 09 6C : call &BB90...l
000020: 64 20 68 6C 2C 26 30 39 30 31 0D 0A 2E 6D 6E 75 d hl,&0901...mnu
000030: 5F 6C 70 09 70 75 73 68 20 68 6C 3A 20 63 61 6C _lp.push hl: cal
000040: 6C 20 26 42 42 37 35 3A 20 70 6F 70 20 68 6C 0D l &BB75: pop hl.
000050: 0A 09 6C 64 20 61 2C 32 34 36 3A 20 63 61 6C 6C ..ld a,246: call
000060: 20 26 42 42 35 41 0D 0A 09 63 61 6C 6C 20 26 42 &BB5A...call &B
000070: 42 30 36 0D 0A 09 70 75 73 68 20 61 66 3A 20 70 B06...push af: p
000080: 75 73 68 20 68 6C 3A 20 63 61 6C 6C 20 26 42 42 ush hl: call &BB
000090: 37 35 0D 0A 09 6C 64 20 61 2C 33 32 3A 20 63 61 75...ld a,32: ca
0000A0: 6C 6C 20 26 42 42 35 41 3A 20 70 6F 70 20 68 6C ll &BB5A: pop hl
0000B0: 3A 20 70 6F 70 20 61 66 0D 0A 09 63 70 20 26 46 : pop af...cp &F
0000C0: 43 3A 20 6A 72 20 7A 2C 65 73 63 6D 6E 75 09 09 C: jr z,escmnu..
0000D0: 09 3B 45 53 43 0D 0A 09 63 70 20 32 34 30 3A 20 .;ESC...cp 240:
0000E0: 6A 72 20 7A 2C 6D 6E 75 75 70 09 09 09 3B 63 75 jr z,mnuup...;cu
0000F0: 72 73 6F 72 20 75 70 0D 0A 09 63 70 20 32 34 31 rsor up...cp 241
000100: 3A 20 6A 72 20 7A 2C 6D 6E 75 64 77 6E 09 09 09 : jr z,mnudwn...
000110: 3B 63 75 72 73 6F 72 20 64 6F 77 6E 0D 0A 09 63 ;cursor down...c
000120: 70 20 32 32 34 3A 20 6A 72 20 7A 2C 6D 6E 75 73 p 224: jr z,mnus
000130: 65 6C 09 09 09 3B 43 4F 50 59 0D 0A 09 63 70 20 el...;COPY...cp
000140: 33 32 3A 20 6A 72 20 7A 2C 6D 6E 75 73 65 6C 09 32: jr z,mnusel.
000150: 09 09 3B 73 70 61 63 65 0D 0A 09 63 70 20 34 39 ..;space...cp 49
000160: 3A 20 6A 72 20 63 2C 6D 6E 75 5F 6C 70 09 09 09 : jr c,mnu_lp...
000170: 3B 6E 6F 74 20 6E 75 6D 65 72 69 63 0D 0A 0D 0A ;not numeric....
000180: 09 70 75 73 68 20 61 66 0D 0A 09 6C 64 20 61 2C .push af...ld a,
000190: 62 3A 20 61 64 64 20 34 38 3A 20 6C 64 20 63 2C b: add 48: ld c,
0001A0: 61 0D 0A 09 70 6F 70 20 61 66 0D 0A 09 63 70 20 a...pop af...cp
0001B0: 63 3A 20 6A 72 20 63 2C 6E 75 6D 6F 70 74 3A 20 c: jr c,numopt:
0001C0: 6A 72 20 7A 2C 6E 75 6D 6F 70 74 0D 0A 09 6A 72 jr z,numopt...jr
0001D0: 20 6D 6E 75 5F 6C 70 0D 0A 0D 0A 2E 6E 75 6D 6F mnu_lp.....numo
0001E0: 70 74 09 73 75 62 20 34 38 3A 20 72 65 74 0D 0A pt.sub 48: ret..
0001F0: 2E 65 73 63 6D 6E 75 09 78 6F 72 20 61 3A 20 72 .escmnu.xor a: r
Size : 512 (Real : 512)
000000: 20 74 6F 20 75 70 6C 6F 61 64 22 2C 20 33 31 2C to upload", 31,
000010: 31 31 2C 32 2C 20 22 28 45 4E 54 45 52 20 74 6F 11,2, "(ENTER to
000020: 20 66 69 6E 69 73 68 29 3A 22 2C 20 33 31 2C 31 finish):", 31,1
000030: 31 2C 34 2C 20 30 0D 0A 2E 75 73 66 74 78 74 09 1,4, 0...usftxt.
000040: 64 62 20 31 32 2C 20 33 31 2C 31 31 2C 31 2C 20 db 12, 31,11,1,
000050: 31 35 2C 31 2C 20 22 46 69 6C 65 20 74 6F 20 75 15,1, "File to u
000060: 70 6C 6F 61 64 3A 22 2C 20 33 31 2C 31 31 2C 33 pload:", 31,11,3
000070: 2C 20 30 0D 0A 2E 72 65 6E 74 78 74 09 64 62 20 , 0...rentxt.db
000080: 31 32 2C 20 33 31 2C 31 31 2C 31 2C 20 31 35 2C 12, 31,11,1, 15,
000090: 31 2C 20 22 53 6F 75 72 63 65 20 66 69 6C 65 6E 1, "Source filen
0000A0: 61 6D 65 3A 22 2C 20 30 0D 0A 2E 72 65 32 74 78 ame:", 0...re2tx
0000B0: 74 09 64 62 20 33 31 2C 31 31 2C 35 2C 20 22 44 t.db 31,11,5, "D
0000C0: 65 73 74 69 6E 61 74 69 6F 6E 20 66 69 6C 65 6E estination filen
0000D0: 61 6D 65 3A 22 2C 20 30 0D 0A 2E 61 74 6F 74 78 ame:", 0...atotx
0000E0: 74 09 64 62 20 22 61 75 74 6F 22 2C 30 0D 0A 2E t.db "auto",0...
0000F0: 73 76 64 74 78 74 09 64 62 20 33 31 2C 33 2C 31 svdtxt.db 31,3,1
000100: 39 2C 20 31 35 2C 31 2C 20 22 53 61 76 65 20 64 9, 15,1, "Save d
000110: 69 72 65 63 74 6F 72 79 22 2C 30 0D 0A 2E 6B 65 irectory",0...ke
000120: 79 74 78 74 09 64 62 20 31 30 2C 31 30 2C 31 33 ytxt.db 10,10,13
000130: 2C 20 22 50 72 65 73 73 20 61 6E 79 20 6B 65 79 , "Press any key
000140: 3A 20 22 2C 30 0D 0A 2E 6B 79 32 74 78 74 09 64 : ",0...ky2txt.d
000150: 62 20 33 31 2C 31 31 2C 33 2C 20 22 50 72 65 73 b 31,11,3, "Pres
000160: 73 20 61 6E 79 20 6B 65 79 3A 20 22 2C 30 0D 0A s any key: ",0..
000170: 2E 63 64 6E 61 6D 65 09 64 62 20 22 43 48 41 52 .cdname.db "CHAR
000180: 4C 45 59 20 2E 44 49 52 22 0D 0A 2E 64 72 61 74 LEY .DIR"...drat
000190: 78 74 09 64 62 20 22 41 22 2B 31 32 38 0D 0A 2E xt.db "A"+128...
0001A0: 64 72 62 74 78 74 09 64 62 20 22 42 22 2B 31 32 drbtxt.db "B"+12
0001B0: 38 0D 0A 2E 65 72 63 74 78 74 09 64 62 20 22 45 8...erctxt.db "E
0001C0: 52 22 2C 22 41 22 2B 31 32 38 0D 0A 2E 72 65 63 R","A"+128...rec
0001D0: 74 78 74 09 64 62 20 22 52 45 22 2C 22 4E 22 2B txt.db "RE","N"+
0001E0: 31 32 38 0D 0A 2E 75 73 65 74 78 74 09 64 62 20 128...usetxt.db
0001F0: 22 55 53 45 22 2C 22 52 22 2B 31 32 38 0D 0A 0D "USE","R"+128...
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 6F 77 6E 6C 6F 61 64 20 28 72 65 63 65 69 76 65 ownload (receive
000010: 29 22 2C 30 2C 22 55 70 6C 6F 61 64 20 28 73 65 )",0,"Upload (se
000020: 6E 64 29 22 2C 30 2C 22 53 65 6C 65 63 74 20 70 nd)",0,"Select p
000030: 72 6F 74 6F 63 6F 6C 22 2C 30 2C 32 35 35 0D 0A rotocol",0,255..
000040: 2E 74 6D 72 73 09 64 62 20 22 42 61 75 64 20 72 .tmrs.db "Baud r
000050: 61 74 65 22 2C 30 2C 22 44 61 74 61 20 77 6F 72 ate",0,"Data wor
000060: 64 22 2C 30 2C 22 53 65 6E 64 20 62 72 65 61 6B d",0,"Send break
000070: 22 2C 30 0D 0A 09 64 62 20 22 58 4F 4E 20 63 6F ",0...db "XON co
000080: 6E 74 72 6F 6C 22 2C 30 2C 22 4C 6F 63 61 6C 20 ntrol",0,"Local
000090: 65 63 68 6F 22 2C 30 0D 0A 69 66 20 6B 64 73 3A echo",0..if kds:
0000A0: 09 65 6C 73 65 3A 20 64 62 20 22 48 61 72 64 77 .else: db "Hardw
0000B0: 61 72 65 20 68 61 6E 64 73 68 61 6B 65 22 2C 30 are handshake",0
0000C0: 0D 0A 65 6E 64 69 66 3A 09 64 62 20 32 35 35 0D ..endif:.db 255.
0000D0: 0A 0D 0A 2E 74 6D 62 61 75 64 09 64 62 20 22 31 ....tmbaud.db "1
0000E0: 39 32 30 30 22 2C 30 2C 22 39 36 30 30 22 2C 30 9200",0,"9600",0
0000F0: 2C 22 34 38 30 30 22 2C 30 2C 22 32 34 30 30 22 ,"4800",0,"2400"
000100: 2C 30 2C 22 31 32 30 30 22 2C 30 2C 22 31 32 30 ,0,"1200",0,"120
000110: 30 2F 37 35 22 2C 30 0D 0A 09 64 62 20 22 37 35 0/75",0...db "75
000120: 2F 31 32 30 30 22 2C 30 2C 22 36 30 30 22 2C 30 /1200",0,"600",0
000130: 2C 22 33 30 30 22 2C 30 2C 32 35 35 0D 0A 2E 74 ,"300",0,255...t
000140: 62 73 65 74 73 09 64 77 20 31 39 32 30 30 2C 31 bsets.dw 19200,1
000150: 39 32 30 30 2C 39 36 30 30 2C 39 36 30 30 2C 34 9200,9600,9600,4
000160: 38 30 30 2C 34 38 30 30 2C 32 34 30 30 2C 32 34 800,4800,2400,24
000170: 30 30 2C 31 32 30 30 2C 31 32 30 30 2C 31 32 30 00,1200,1200,120
000180: 30 2C 37 35 2C 37 35 2C 31 32 30 30 0D 0A 09 64 0,75,75,1200...d
000190: 77 20 36 30 30 2C 36 30 30 2C 33 30 30 2C 33 30 w 600,600,300,30
0001A0: 30 0D 0A 2E 74 6D 77 6F 72 64 09 64 62 20 22 38 0...tmword.db "8
0001B0: 4E 31 22 2C 30 2C 22 37 45 31 22 2C 30 2C 32 35 N1",0,"7E1",0,25
0001C0: 35 0D 0A 2E 74 6D 68 73 68 6B 09 64 62 20 22 48 5...tmhshk.db "H
0001D0: 61 6E 64 73 68 61 6B 65 20 6F 6E 22 2C 30 2C 22 andshake on",0,"
0001E0: 48 61 6E 64 73 68 61 6B 65 20 6F 66 66 22 2C 30 Handshake off",0
0001F0: 2C 32 35 35 0D 0A 2E 74 6D 78 6F 6E 09 64 62 20 ,255...tmxon.db
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: 22 58 4F 4E 20 63 6F 6E 74 72 6F 6C 20 6F 6E 22 "XON control on"
000010: 2C 30 2C 22 58 4F 4E 20 63 6F 6E 74 72 6F 6C 20 ,0,"XON control
000020: 6F 66 66 22 2C 30 2C 32 35 35 0D 0A 2E 74 6D 6C off",0,255...tml
000030: 6F 63 6C 09 64 62 20 22 4C 6F 63 61 6C 20 65 63 ocl.db "Local ec
000040: 68 6F 20 6F 6E 22 2C 30 2C 22 4C 6F 63 61 6C 20 ho on",0,"Local
000050: 65 63 68 6F 20 6F 66 66 22 2C 30 2C 32 35 35 0D echo off",0,255.
000060: 0A 2E 74 6D 70 72 6F 74 09 64 62 20 22 58 4D 6F ..tmprot.db "XMo
000070: 64 65 6D 22 2C 30 2C 22 58 4D 6F 64 65 6D 2D 31 dem",0,"XModem-1
000080: 6B 22 2C 30 2C 22 59 4D 6F 64 65 6D 20 62 61 74 k",0,"YModem bat
000090: 63 68 22 2C 30 2C 32 35 35 1A 0D 0A 74 66 62 75 ch",0,255...tfbu
0000A0: 66 66 09 65 71 75 20 26 32 30 30 30 09 09 09 3B ff.equ &2000...;
0000B0: 74 65 72 6D 69 6E 61 6C 20 66 69 6C 65 20 62 75 terminal file bu
0000C0: 66 66 65 72 0D 0A 74 70 62 6C 6F 63 6B 09 65 71 ffer..tpblock.eq
0000D0: 75 20 26 33 30 30 30 09 09 09 3B 74 65 72 6D 69 u &3000...;termi
0000E0: 6E 61 6C 20 70 61 72 61 6D 65 74 65 72 20 62 6C nal parameter bl
0000F0: 6F 63 6B 0D 0A 6F 66 66 73 65 74 09 65 71 75 20 ock..offset.equ
000100: 2C 30 2C 22 31 32 30 30 22 2C 30 2C 22 31 32 30 ,0,"1200",0,"120
000110: 30 2F 37 35 22 2C 30 0D 0A 09 64 62 20 22 37 35 0/75",0...db "75
000120: 2F 31 32 30 30 22 2C 30 2C 22 36 30 30 22 2C 30 /1200",0,"600",0
000130: 2C 22 33 30 30 22 2C 30 2C 32 35 35 0D 0A 2E 74 ,"300",0,255...t
000140: 62 73 65 74 73 09 64 77 20 31 39 32 30 30 2C 31 bsets.dw 19200,1
000150: 39 32 30 30 2C 39 36 30 30 2C 39 36 30 30 2C 34 9200,9600,9600,4
000160: 38 30 30 2C 34 38 30 30 2C 32 34 30 30 2C 32 34 800,4800,2400,24
000170: 30 30 2C 31 32 30 30 2C 31 32 30 30 2C 31 32 30 00,1200,1200,120
000180: 30 2C 37 35 2C 37 35 2C 31 32 30 30 0D 0A 09 64 0,75,75,1200...d
000190: 77 20 36 30 30 2C 36 30 30 2C 33 30 30 2C 33 30 w 600,600,300,30
0001A0: 30 0D 0A 2E 74 6D 77 6F 72 64 09 64 62 20 22 38 0...tmword.db "8
0001B0: 4E 31 22 2C 30 2C 22 37 45 31 22 2C 30 2C 32 35 N1",0,"7E1",0,25
0001C0: 35 0D 0A 2E 74 6D 68 73 68 6B 09 64 62 20 22 48 5...tmhshk.db "H
0001D0: 61 6E 64 73 68 61 6B 65 20 6F 6E 22 2C 30 2C 22 andshake on",0,"
0001E0: 48 61 6E 64 73 68 61 6B 65 20 6F 66 66 22 2C 30 Handshake off",0
0001F0: 2C 32 35 35 0D 0A 2E 74 6D 78 6F 6E 09 64 62 20 ,255...tmxon.db
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Size : 512 (Real : 512)
000000: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000010: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000020: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000030: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000040: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000050: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000060: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000070: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000080: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000090: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0000F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000100: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000110: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000120: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000130: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000140: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000150: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000160: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000170: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000180: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
000190: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001A0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001B0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001C0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001D0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001E0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
0001F0: E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 E5 ................
Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan