+--------+-------------------------+-------------------------+--------+--------+ |00000000| 00 20 20 20 20 20 20 20 | 20 20 20 20 00 00 01 00 |. | ....| |00000010| ec 11 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000020| 00 53 54 4f 50 20 20 20 | 20 43 4f 4d 01 00 01 00 |.STOP | COM....| |00000030| 3c b7 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |<.......|........| |00000040| 00 53 54 4f 50 20 20 20 | 20 5a 38 30 02 00 0b 00 |.STOP | Z80....| |00000050| 79 c9 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |y.......|........| |00000060| ff 20 20 20 20 20 20 20 | 20 20 20 20 00 00 00 00 |. | ....| |00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000080| c3 0e 01 5a 33 45 4e 56 | 03 00 f3 00 01 0a 2a 09 |...Z3ENV|......*.| |00000090| 01 cd 5f 01 06 08 cd 1e | 01 10 fb c3 42 01 e5 cd |.._.....|....B...| |000000a0| 33 01 23 7e b7 ca 30 01 | 0f e6 7f 77 e1 af 3d c9 |3.#~..0.|...w..=.| |000000b0| e1 af c9 d5 2a 63 01 11 | 22 00 19 7e 23 66 6f b4 |....*c..|"..~#fo.| |000000c0| d1 c9 e5 d5 2a 63 01 11 | 18 00 19 5e 23 56 7a b3 |....*c..|...^#Vz.| |000000d0| ca 5c 01 1a 6f 13 1a 67 | 36 00 f6 ff d1 e1 c9 22 |.\..o..g|6......"| |000000e0| 63 01 c9 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |c.......|........| |000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........| |00000100| 3b 20 50 52 4f 47 52 41 | 4d 3a 09 53 74 6f 70 0d |; PROGRA|M:.Stop.| |00000110| 0a 3b 20 41 55 54 48 4f | 52 3a 09 50 61 75 6c 20 |.; AUTHO|R:.Paul | |00000120| 50 6f 6d 65 72 6c 65 61 | 75 0d 0a 3b 20 44 41 54 |Pomerlea|u..; DAT| |00000130| 45 3a 09 09 4d 61 79 20 | 36 2c 20 31 39 38 37 0d |E:..May |6, 1987.| |00000140| 0a 3b 20 56 45 52 53 49 | 4f 4e 3a 09 31 2e 30 0d |.; VERSI|ON:.1.0.| |00000150| 0a 0d 0a 3b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |...;====|========| |00000160| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000180| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000190| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000001a0| 3d 0d 0a 3b 0d 0a 3b 09 | 09 44 20 45 20 46 20 49 |=..;..;.|.D E F I| |000001b0| 20 4e 20 49 20 54 20 49 | 20 4f 20 4e 20 53 20 20 | N I T I| O N S | |000001c0| 20 20 53 20 45 20 43 20 | 54 20 49 20 4f 20 4e 0d | S E C |T I O N.| |000001d0| 0a 3b 0d 0a 3b 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.;..;===|========| |000001e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000001f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000200| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000210| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000220| 3d 3d 0d 0a 0d 0a 76 65 | 72 73 69 6f 6e 09 65 71 |==....ve|rsion.eq| |00000230| 75 09 31 30 0d 0a 0d 0a | 09 65 78 74 09 7a 33 69 |u.10....|.ext.z3i| |00000240| 6e 69 74 2c 69 66 65 6e | 64 2c 63 6c 72 63 6c 0d |nit,ifen|d,clrcl.| |00000250| 0a 0d 0a 3b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |...;====|========| |00000260| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000270| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000280| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000290| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000002a0| 3d 0d 0a 3b 0d 0a 3b 09 | 09 53 20 54 20 41 20 4e |=..;..;.|.S T A N| |000002b0| 20 44 20 41 20 52 20 44 | 20 20 20 20 50 20 52 20 | D A R D| P R | |000002c0| 4f 20 47 20 52 20 41 20 | 4d 20 20 20 20 48 20 45 |O G R A |M H E| |000002d0| 20 41 20 44 20 45 20 52 | 0d 0a 3b 0d 0a 3b 3d 3d | A D E R|..;..;==| |000002e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000002f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000300| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000310| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000320| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 0a 0d 0a 45 |========|===....E| |00000330| 4e 54 52 59 3a 0d 0a 09 | 6a 70 09 53 54 41 52 54 |NTRY:...|jp.START| |00000340| 0d 0a 09 64 65 66 62 09 | 27 5a 33 45 4e 56 27 0d |...defb.|'Z3ENV'.| |00000350| 0a 09 64 65 66 62 09 33 | 09 09 3b 20 54 79 70 65 |..defb.3|..; Type| |00000360| 2d 33 20 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 0d 0a |-3 envir|onment..| |00000370| 45 4e 56 41 44 44 52 3a | 0d 0a 09 64 77 09 30 66 |ENVADDR:|...dw.0f| |00000380| 33 30 30 68 0d 0a 09 64 | 77 09 45 4e 54 52 59 0d |300h...d|w.ENTRY.| |00000390| 0a 09 64 65 66 62 09 76 | 65 72 73 69 6f 6e 0d 0a |..defb.v|ersion..| |000003a0| 0d 0a 3b 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |..;=====|========| |000003b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000003c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000003d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000003e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000003f0| 0d 0a 3b 0d 0a 3b 09 09 | 43 20 4f 20 4e 20 46 20 |..;..;..|C O N F | |00000400| 49 20 47 20 55 20 52 20 | 41 20 54 20 49 20 4f 20 |I G U R |A T I O | |00000410| 4e 20 20 20 20 41 20 52 | 20 45 20 41 0d 0a 3b 0d |N A R| E A..;.| |00000420| 0a 3b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.;======|========| |00000430| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000440| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000450| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000460| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0d |========|=======.| |00000470| 0a 0d 0a 3b 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |...;====|========| |00000480| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000490| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000004a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000004b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |000004c0| 3d 0d 0a 3b 0d 0a 3b 09 | 09 4d 20 41 20 49 20 4e |=..;..;.|.M A I N| |000004d0| 20 20 20 20 43 20 4f 20 | 44 20 45 20 20 20 20 53 | C O |D E S| |000004e0| 20 45 20 43 20 54 20 49 | 20 4f 20 4e 0d 0a 3b 0d | E C T I| O N..;.| |000004f0| 0a 3b 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.;======|========| |00000500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000510| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000520| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========| |00000530| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0d |========|=======.| |00000540| 0a 0d 0a 53 54 41 52 54 | 3a 0d 0a 0d 0a 09 6c 64 |...START|:.....ld| |00000550| 09 68 6c 2c 28 45 4e 56 | 41 44 44 52 29 09 3b 20 |.hl,(ENV|ADDR).; | |00000560| 47 65 74 20 65 6e 76 69 | 72 6f 6e 6d 65 6e 74 20 |Get envi|ronment | |00000570| 61 64 64 72 65 73 73 0d | 0a 09 63 61 6c 6c 09 7a |address.|..call.z| |00000580| 33 69 6e 69 74 09 09 3b | 20 49 6e 69 74 69 61 6c |3init..;| Initial| |00000590| 69 7a 65 20 6c 69 62 72 | 61 72 79 20 72 6f 75 74 |ize libr|ary rout| |000005a0| 69 6e 65 73 0d 0a 0d 0a | 09 6c 64 09 62 2c 38 0d |ines....|.ld.b,8.| |000005b0| 0a 43 4c 45 41 52 5f 49 | 46 5f 42 49 54 53 5f 4c |.CLEAR_I|F_BITS_L| |000005c0| 4f 4f 50 3a 0d 0a 09 63 | 61 6c 6c 09 69 66 65 6e |OOP:...c|all.ifen| |000005d0| 64 09 09 3b 20 44 72 6f | 70 20 64 6f 77 6e 20 6f |d..; Dro|p down o| |000005e0| 6e 65 20 6c 65 76 65 6c | 20 6f 66 20 49 46 0d 0a |ne level| of IF..| |000005f0| 09 64 6a 6e 7a 09 43 4c | 45 41 52 5f 49 46 5f 42 |.djnz.CL|EAR_IF_B| |00000600| 49 54 53 5f 4c 4f 4f 50 | 0d 0a 0d 0a 09 6a 70 09 |ITS_LOOP|.....jp.| |00000610| 63 6c 72 63 6c 09 09 3b | 20 5a 61 70 20 74 68 65 |clrcl..;| Zap the| |00000620| 20 63 6f 6d 6d 61 6e 64 | 20 6c 69 6e 65 0d 0a 1a | command| line...| |00000630| 0a 43 4c 45 41 52 5f 49 | 46 5f 42 49 54 53 5f 4c |.CLEAR_I|F_BITS_L| |00000640| 4f 4f 50 3a 0d 0a 09 63 | 61 6c 6c 09 69 66 65 6e |OOP:...c|all.ifen| |00000650| 64 09 09 3b 20 44 72 6f | 70 20 64 6f 77 6e 20 6f |d..; Dro|p down o| |00000660| 6e 65 20 6c 65 76 65 6c | 20 6f 66 20 49 46 0d 0a |ne level| of IF..| |00000670| 09 64 6a 6e 7a 09 43 4c | 45 41 52 5f 49 46 5f 42 |.djnz.CL|EAR_IF_B| +--------+-------------------------+-------------------------+--------+--------+