home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: LBR Archive
(archive/lbr).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| LBR Archive (archive/lbr)
| magic
| Supported |
| 1%
| dexvert
| Micro Focus Cobol library (other/microFocusCobolLibrary)
| ext
| Unsupported |
| 1%
| dexvert
| Micro Focus COBOL Library (other/microFocusCOBOLLibrary)
| ext
| Unsupported |
| 100%
| file
| LBR archive data
| default
| |
| 99%
| file
| data
| default
| |
| 87%
| TrID
| LU library
| default
| |
| 12%
| TrID
| C64 Hires bitmap
| default (weak)
| |
| 100%
| lsar
| LBR
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 20 20 20 20 20 20 20 | 20 20 20 20 00 00 01 00 |. | ....|
|00000010| d7 45 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.E......|........|
|00000020| 00 54 50 41 54 43 48 31 | 20 5a 38 30 01 00 12 00 |.TPATCH1| Z80....|
|00000030| c6 2f 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |./......|........|
|00000040| 00 54 50 41 54 43 48 32 | 20 5a 38 30 13 00 06 00 |.TPATCH2| Z80....|
|00000050| 9a 7a 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.z......|........|
|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| 3b 20 54 55 52 42 4f 20 | 50 41 53 43 41 4c 20 56 |; TURBO |PASCAL V|
|00000090| 45 52 53 49 4f 4e 20 33 | 2e 30 20 50 41 54 43 48 |ERSION 3|.0 PATCH|
|000000a0| 20 42 59 20 4a 41 59 20 | 53 41 47 45 2c 20 30 34 | BY JAY |SAGE, 04|
|000000b0| 2f 32 32 2f 38 35 0d 0a | 0d 0a 3b 20 54 68 69 73 |/22/85..|..; This|
|000000c0| 20 63 6f 64 65 20 70 61 | 74 63 68 65 73 20 54 55 | code pa|tches TU|
|000000d0| 52 42 4f 20 50 61 73 63 | 61 6c 20 56 65 72 73 69 |RBO Pasc|al Versi|
|000000e0| 6f 6e 20 33 2e 30 20 73 | 6f 20 74 68 61 74 20 69 |on 3.0 s|o that i|
|000000f0| 74 20 77 69 6c 6c 20 66 | 69 6e 64 20 74 68 65 0d |t will f|ind the.|
|00000100| 0a 3b 20 65 72 72 6f 72 | 20 6d 65 73 73 61 67 65 |.; error| message|
|00000110| 20 6f 76 65 72 6c 61 79 | 20 66 69 6c 65 20 54 55 | overlay| file TU|
|00000120| 52 42 4f 2e 4d 53 47 20 | 69 6e 20 61 20 64 69 66 |RBO.MSG |in a dif|
|00000130| 66 65 72 65 6e 74 20 75 | 73 65 72 20 61 72 65 61 |ferent u|ser area|
|00000140| 20 28 67 69 76 65 6e 0d | 0a 3b 20 62 79 20 74 68 | (given.|.; by th|
|00000150| 65 20 65 71 75 61 74 65 | 20 54 55 53 45 52 20 62 |e equate| TUSER b|
|00000160| 65 6c 6f 77 29 2e 20 20 | 54 68 65 20 70 61 74 63 |elow). |The patc|
|00000170| 68 20 69 73 20 61 70 70 | 65 6e 64 65 64 20 74 6f |h is app|ended to|
|00000180| 20 74 68 65 20 73 74 61 | 6e 64 61 72 64 20 63 6f | the sta|ndard co|
|00000190| 64 65 0d 0a 3b 20 62 75 | 74 20 72 65 6c 6f 63 61 |de..; bu|t reloca|
|000001a0| 74 65 73 20 69 74 73 65 | 6c 66 20 68 69 67 68 65 |tes itse|lf highe|
|000001b0| 72 20 69 6e 20 6d 65 6d | 6f 72 79 20 73 6f 20 74 |r in mem|ory so t|
|000001c0| 68 61 74 20 69 74 20 69 | 73 20 6e 6f 74 20 6f 76 |hat it i|s not ov|
|000001d0| 65 72 77 72 69 74 74 65 | 6e 20 62 79 0d 0a 3b 20 |erwritte|n by..; |
|000001e0| 74 68 65 20 65 72 72 6f | 72 20 6d 65 73 73 61 67 |the erro|r messag|
|000001f0| 65 20 74 65 78 74 20 61 | 73 20 69 74 20 69 73 20 |e text a|s it is |
|00000200| 6c 6f 61 64 65 64 2e 20 | 20 54 68 65 20 63 61 6c |loaded. | The cal|
|00000210| 6c 20 61 74 20 61 64 64 | 72 65 73 73 20 32 32 33 |l at add|ress 223|
|00000220| 32 68 20 69 73 0d 0a 3b | 20 74 68 65 20 6f 6e 65 |2h is..;| the one|
|00000230| 20 6d 61 64 65 20 69 66 | 20 74 68 65 20 71 75 65 | made if| the que|
|00000240| 73 74 69 6f 6e 20 61 62 | 6f 75 74 20 69 6e 63 6c |stion ab|out incl|
|00000250| 75 64 69 6e 67 20 74 68 | 65 20 65 72 72 6f 72 20 |uding th|e error |
|00000260| 6d 65 73 73 61 67 65 73 | 20 77 61 73 20 61 6e 73 |messages| was ans|
|00000270| 77 65 72 65 64 0d 0a 3b | 20 69 6e 20 74 68 65 20 |wered..;| in the |
|00000280| 61 66 66 69 72 6d 61 74 | 69 76 65 2e 20 20 54 68 |affirmat|ive. Th|
|00000290| 65 20 63 61 6c 6c 20 69 | 73 20 72 65 70 6c 61 63 |e call i|s replac|
|000002a0| 65 64 20 62 79 20 61 20 | 63 6f 6e 64 69 74 69 6f |ed by a |conditio|
|000002b0| 6e 61 6c 20 63 61 6c 6c | 20 74 6f 20 74 68 69 73 |nal call| to this|
|000002c0| 0d 0a 3b 20 70 61 74 63 | 68 20 63 6f 64 65 2e 20 |..; patc|h code. |
|000002d0| 20 54 68 65 20 70 61 74 | 63 68 20 63 6f 64 65 20 | The pat|ch code |
|000002e0| 69 6e 20 74 75 72 6e 20 | 63 61 6c 6c 73 20 74 68 |in turn |calls th|
|000002f0| 65 20 6f 72 69 67 69 6e | 61 6c 20 63 6f 64 65 2c |e origin|al code,|
|00000300| 20 62 75 74 20 6f 6e 6c | 79 20 61 66 74 65 72 0d | but onl|y after.|
|00000310| 0a 3b 20 74 68 65 20 75 | 73 65 72 20 6e 75 6d 62 |.; the u|ser numb|
|00000320| 65 72 20 68 61 73 20 62 | 65 65 6e 20 73 77 69 74 |er has b|een swit|
|00000330| 63 68 65 64 20 74 6f 20 | 74 68 65 20 73 70 65 63 |ched to |the spec|
|00000340| 69 61 6c 20 76 61 6c 75 | 65 2e 20 20 41 66 74 65 |ial valu|e. Afte|
|00000350| 72 20 74 68 65 20 4d 53 | 47 20 66 69 6c 65 0d 0a |r the MS|G file..|
|00000360| 3b 20 69 73 20 6c 6f 61 | 64 65 64 2c 20 74 68 65 |; is loa|ded, the|
|00000370| 20 70 61 74 63 68 20 63 | 6f 64 65 20 72 65 2d 6c | patch c|ode re-l|
|00000380| 6f 67 73 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c |ogs the |original|
|00000390| 20 75 73 65 72 20 61 72 | 65 61 2e 20 20 54 68 69 | user ar|ea. Thi|
|000003a0| 73 20 70 61 74 63 68 20 | 64 6f 65 73 0d 0a 3b 20 |s patch |does..; |
|000003b0| 6e 6f 74 68 69 6e 67 20 | 61 62 6f 75 74 20 74 68 |nothing |about th|
|000003c0| 65 20 6c 6f 67 67 65 64 | 20 64 72 69 76 65 2c 20 |e logged| drive, |
|000003d0| 73 69 6e 63 65 20 54 75 | 72 62 6f 20 69 74 73 65 |since Tu|rbo itse|
|000003e0| 6c 66 20 74 72 69 65 73 | 20 61 20 6e 75 6d 62 65 |lf tries| a numbe|
|000003f0| 72 20 6f 66 20 64 72 69 | 76 65 73 2e 0d 0a 3b 20 |r of dri|ves...; |
|00000400| 4d 79 20 64 69 72 65 63 | 74 6f 72 79 20 54 55 52 |My direc|tory TUR|
|00000410| 42 4f 3a 20 69 73 20 6f | 6e 20 64 72 69 76 65 20 |BO: is o|n drive |
|00000420| 41 20 61 6e 64 20 69 73 | 20 61 6c 77 61 79 73 20 |A and is| always |
|00000430| 66 6f 75 6e 64 2e 20 20 | 49 66 20 74 68 69 73 20 |found. |If this |
|00000440| 70 61 74 63 68 20 66 61 | 69 6c 73 0d 0a 3b 20 74 |patch fa|ils..; t|
|00000450| 6f 20 66 69 6e 64 20 74 | 68 65 20 72 69 67 68 74 |o find t|he right|
|00000460| 20 64 72 69 76 65 20 66 | 6f 72 20 79 6f 75 2c 20 | drive f|or you, |
|00000470| 74 72 79 20 61 64 64 69 | 6e 67 20 63 6f 64 65 20 |try addi|ng code |
|00000480| 74 6f 20 6c 6f 67 20 69 | 6e 20 74 68 65 20 64 65 |to log i|n the de|
|00000490| 73 69 72 65 64 0d 0a 3b | 20 64 72 69 76 65 20 69 |sired..;| drive i|
|000004a0| 6e 20 74 68 65 20 73 61 | 6d 65 20 77 61 79 2e 20 |n the sa|me way. |
|000004b0| 20 52 65 6d 65 6d 62 65 | 72 20 74 68 61 74 20 74 | Remembe|r that t|
|000004c0| 68 65 20 72 65 6c 6f 63 | 61 74 65 64 20 63 6f 64 |he reloc|ated cod|
|000004d0| 65 20 68 61 73 20 6e 6f | 20 61 62 73 6f 6c 75 74 |e has no| absolut|
|000004e0| 65 0d 0a 3b 20 61 64 64 | 72 65 73 73 65 73 20 73 |e..; add|resses s|
|000004f0| 6f 20 74 68 61 74 20 69 | 74 20 63 61 6e 20 73 69 |o that i|t can si|
|00000500| 6d 70 6c 79 20 62 65 20 | 63 6f 70 69 65 64 20 74 |mply be |copied t|
|00000510| 6f 20 69 74 73 20 6e 65 | 77 20 6c 6f 63 61 74 69 |o its ne|w locati|
|00000520| 6f 6e 2e 0d 0a 0d 0a 0d | 0a 74 62 64 6f 73 09 65 |on......|.tbdos.e|
|00000530| 71 75 09 37 32 36 35 68 | 09 09 3b 54 75 72 62 6f |qu.7265h|..;Turbo|
|00000540| 27 73 20 42 44 4f 53 20 | 63 61 6c 6c 20 28 70 72 |'s BDOS |call (pr|
|00000550| 6f 74 65 63 74 73 20 49 | 58 2c 20 49 59 29 0d 0a |otects I|X, IY)..|
|00000560| 75 73 65 72 66 09 65 71 | 75 09 32 30 68 09 09 3b |userf.eq|u.20h..;|
|00000570| 42 44 4f 53 20 67 65 74 | 2f 73 65 74 20 75 73 65 |BDOS get|/set use|
|00000580| 72 20 6e 75 6d 62 65 72 | 20 66 75 6e 63 74 69 6f |r number| functio|
|00000590| 6e 0d 0a 74 75 73 65 72 | 09 65 71 75 09 32 09 09 |n..tuser|.equ.2..|
|000005a0| 3b 75 73 65 72 20 6e 75 | 6d 62 65 72 20 6f 66 20 |;user nu|mber of |
|000005b0| 54 55 52 42 4f 3a 20 64 | 69 72 65 63 74 6f 72 79 |TURBO: d|irectory|
|000005c0| 0d 0a 64 65 73 74 09 65 | 71 75 09 39 30 30 30 68 |..dest.e|qu.9000h|
|000005d0| 09 09 3b 64 65 73 74 69 | 6e 61 74 69 6f 6e 20 66 |..;desti|nation f|
|000005e0| 6f 72 20 72 65 6c 6f 63 | 61 74 65 64 20 73 65 63 |or reloc|ated sec|
|000005f0| 74 69 6f 6e 20 28 61 62 | 6f 76 65 0d 0a 09 09 09 |tion (ab|ove.....|
|00000600| 09 3b 2e 2e 61 72 65 61 | 20 75 73 65 64 20 66 6f |.;..area| used fo|
|00000610| 72 20 6d 65 73 73 61 67 | 65 73 29 0d 0a 0d 0a 3b |r messag|es)....;|
|00000620| 20 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -------|--------|
|00000630| 2d 2d 2d 2d 2d 0d 0a 0d | 0a 09 6f 72 67 09 32 32 |-----...|..org.22|
|00000640| 33 32 68 09 09 3b 6f 72 | 69 67 69 6e 61 6c 20 63 |32h..;or|iginal c|
|00000650| 6f 64 65 20 74 6f 20 70 | 61 74 63 68 0d 0a 0d 0a |ode to p|atch....|
|00000660| 09 63 61 6c 6c 09 6e 7a | 2c 70 61 74 63 68 0d 0a |.call.nz|,patch..|
|00000670| 0d 0a 3b 20 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..; ----|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0a 0d 0a 09 6f 72 67 |--------|.....org|
|00000690| 09 37 39 38 30 68 09 09 | 3b 6e 65 77 20 63 6f 64 |.7980h..|;new cod|
|000006a0| 65 20 74 6f 20 61 70 70 | 65 6e 64 20 74 6f 20 6f |e to app|end to o|
|000006b0| 72 69 67 69 6e 61 6c 20 | 63 6f 64 65 0d 0a 0d 0a |riginal |code....|
|000006c0| 70 61 74 63 68 3a 0d 0a | 09 70 75 73 68 09 68 6c |patch:..|.push.hl|
|000006d0| 09 09 3b 73 61 76 65 20 | 72 65 67 69 73 74 65 72 |..;save |register|
|000006e0| 73 0d 0a 09 70 75 73 68 | 09 64 65 0d 0a 09 70 75 |s...push|.de...pu|
|000006f0| 73 68 09 62 63 0d 0a 0d | 0a 09 09 3b 72 65 6c 6f |sh.bc...|...;relo|
|00000700| 63 61 74 65 20 70 61 74 | 63 68 20 63 6f 64 65 20 |cate pat|ch code |
|00000710| 74 6f 20 73 61 66 65 20 | 61 72 65 61 0d 0a 0d 0a |to safe |area....|
|00000720| 09 6c 64 09 68 6c 2c 70 | 62 65 67 09 09 3b 73 6f |.ld.hl,p|beg..;so|
|00000730| 75 72 63 65 20 6f 66 20 | 63 6f 64 65 20 74 6f 20 |urce of |code to |
|00000740| 6d 6f 76 65 0d 0a 09 6c | 64 09 64 65 2c 64 65 73 |move...l|d.de,des|
|00000750| 74 09 09 3b 64 65 73 74 | 69 6e 61 74 69 6f 6e 0d |t..;dest|ination.|
|00000760| 0a 09 6c 64 09 62 63 2c | 70 65 6e 64 2d 70 62 65 |..ld.bc,|pend-pbe|
|00000770| 67 09 3b 6c 65 6e 67 74 | 68 20 6f 66 20 73 65 63 |g.;lengt|h of sec|
|00000780| 74 69 6f 6e 20 74 6f 20 | 6d 6f 76 65 0d 0a 09 6c |tion to |move...l|
|00000790| 64 69 72 09 09 09 3b 6d | 6f 76 65 20 69 74 0d 0a |dir...;m|ove it..|
|000007a0| 09 6a 70 09 64 65 73 74 | 09 09 3b 63 6f 6e 74 69 |.jp.dest|..;conti|
|000007b0| 6e 75 65 20 77 69 74 68 | 20 6d 6f 76 65 64 20 63 |nue with| moved c|
|000007c0| 6f 64 65 0d 0a 0d 0a 09 | 09 3b 63 6f 64 65 20 74 |ode.....|.;code t|
|000007d0| 6f 20 62 65 20 72 65 6c | 6f 63 61 74 65 64 0d 0a |o be rel|ocated..|
|000007e0| 0d 0a 70 62 65 67 3a 0d | 0a 09 6c 64 09 63 2c 75 |..pbeg:.|..ld.c,u|
|000007f0| 73 65 72 66 09 09 3b 67 | 65 74 20 63 75 72 72 65 |serf..;g|et curre|
|00000800| 6e 74 20 75 73 65 72 20 | 23 0d 0a 09 6c 64 09 65 |nt user |#...ld.e|
|00000810| 2c 30 66 66 68 0d 0a 09 | 63 61 6c 6c 09 74 62 64 |,0ffh...|call.tbd|
|00000820| 6f 73 0d 0a 09 70 75 73 | 68 09 61 66 09 09 3b 73 |os...pus|h.af..;s|
|00000830| 61 76 65 20 75 73 65 72 | 20 6e 75 6d 62 65 72 0d |ave user| number.|
|00000840| 0a 0d 0a 09 6c 64 09 63 | 2c 75 73 65 72 66 09 09 |....ld.c|,userf..|
|00000850| 3b 6c 6f 67 20 69 6e 20 | 54 75 72 62 6f 20 75 73 |;log in |Turbo us|
|00000860| 65 72 20 61 72 65 61 0d | 0a 09 6c 64 09 65 2c 74 |er area.|..ld.e,t|
|00000870| 75 73 65 72 0d 0a 09 63 | 61 6c 6c 09 74 62 64 6f |user...c|all.tbdo|
|00000880| 73 0d 0a 0d 0a 09 63 61 | 6c 6c 09 32 64 61 34 68 |s.....ca|ll.2da4h|
|00000890| 09 09 3b 63 61 6c 6c 20 | 54 75 72 62 6f 20 63 6f |..;call |Turbo co|
|000008a0| 64 65 20 66 6f 72 20 6c | 6f 61 64 69 6e 67 20 54 |de for l|oading T|
|000008b0| 55 52 42 4f 2e 4d 53 47 | 0d 0a 0d 0a 09 70 6f 70 |URBO.MSG|.....pop|
|000008c0| 09 61 66 09 09 3b 72 65 | 73 74 6f 72 65 20 75 73 |.af..;re|store us|
|000008d0| 65 72 20 6e 75 6d 62 65 | 72 0d 0a 09 6c 64 09 65 |er numbe|r...ld.e|
|000008e0| 2c 61 0d 0a 09 6c 64 09 | 63 2c 75 73 65 72 66 0d |,a...ld.|c,userf.|
|000008f0| 0a 09 63 61 6c 6c 09 74 | 62 64 6f 73 0d 0a 0d 0a |..call.t|bdos....|
|00000900| 09 70 6f 70 09 62 63 09 | 09 3b 72 65 73 74 6f 72 |.pop.bc.|.;restor|
|00000910| 65 20 72 65 67 69 73 74 | 65 72 73 0d 0a 09 70 6f |e regist|ers...po|
|00000920| 70 09 64 65 0d 0a 09 70 | 6f 70 09 68 6c 0d 0a 09 |p.de...p|op.hl...|
|00000930| 72 65 74 0d 0a 0d 0a 70 | 65 6e 64 09 65 71 75 09 |ret....p|end.equ.|
|00000940| 24 09 09 3b 6d 61 72 6b | 20 65 6e 64 20 6f 66 20 |$..;mark| end of |
|00000950| 63 6f 64 65 20 66 6f 72 | 20 72 65 6c 6f 63 61 74 |code for| relocat|
|00000960| 69 6f 6e 0d 0a 0d 0a 09 | 65 6e 64 0d 0a 1a 00 00 |ion.....|end.....|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 3b 20 54 68 69 73 20 69 | 73 20 61 20 70 61 74 63 |; This i|s a patc|
|00000990| 68 20 66 6f 72 20 74 68 | 65 20 43 50 2f 4d 2d 38 |h for th|e CP/M-8|
|000009a0| 30 20 76 65 72 73 69 6f | 6e 20 6f 66 20 54 75 72 |0 versio|n of Tur|
|000009b0| 62 6f 20 50 61 73 63 61 | 6c 20 76 65 72 73 69 6f |bo Pasca|l versio|
|000009c0| 6e 20 33 20 74 6f 20 6d | 61 6b 65 0d 0a 3b 20 69 |n 3 to m|ake..; i|
|000009d0| 74 20 69 6e 63 6c 75 64 | 65 20 6f 72 20 6e 6f 74 |t includ|e or not|
|000009e0| 20 69 6e 63 6c 75 64 65 | 20 74 68 65 20 65 72 72 | include| the err|
|000009f0| 6f 72 20 6d 65 73 73 61 | 67 65 20 6f 76 65 72 6c |or messa|ge overl|
|00000a00| 61 79 20 66 69 6c 65 20 | 77 69 74 68 6f 75 74 20 |ay file |without |
|00000a10| 61 73 6b 69 6e 67 2e 0d | 0a 3b 20 49 74 20 77 6f |asking..|.; It wo|
|00000a20| 72 6b 73 20 62 79 20 72 | 65 70 6c 61 63 69 6e 67 |rks by r|eplacing|
|00000a30| 20 74 68 61 74 20 63 6f | 64 65 20 62 79 20 61 20 | that co|de by a |
|00000a40| 64 65 66 61 75 6c 74 20 | 61 6e 73 77 65 72 2e 0d |default |answer..|
|00000a50| 0a 0d 0a 4e 4f 09 45 51 | 55 09 30 0d 0a 59 45 53 |...NO.EQ|U.0..YES|
|00000a60| 09 45 51 55 09 4e 4f 54 | 20 4e 4f 0d 0a 0d 0a 49 |.EQU.NOT| NO....I|
|00000a70| 4e 43 4c 55 44 45 09 45 | 51 55 09 59 45 53 09 09 |NCLUDE.E|QU.YES..|
|00000a80| 09 3b 75 73 65 20 6e 6f | 20 74 6f 20 6f 6d 69 74 |.;use no| to omit|
|00000a90| 20 65 72 72 6f 72 20 6d | 65 73 73 61 67 65 20 6f | error m|essage o|
|00000aa0| 76 65 72 6c 61 79 0d 0a | 0d 0a 53 54 41 52 54 09 |verlay..|..START.|
|00000ab0| 45 51 55 09 30 32 32 30 | 44 48 09 09 09 3b 61 64 |EQU.0220|DH...;ad|
|00000ac0| 64 72 65 73 73 20 77 68 | 65 72 65 20 54 75 72 62 |dress wh|ere Turb|
|00000ad0| 6f 20 70 75 74 73 20 75 | 70 20 6d 65 73 73 61 67 |o puts u|p messag|
|00000ae0| 65 0d 0a 09 09 09 09 09 | 3b 2e 2e 20 61 73 6b 69 |e.......|;.. aski|
|00000af0| 6e 67 20 77 68 65 74 68 | 65 72 20 74 6f 20 69 6e |ng wheth|er to in|
|00000b00| 63 6c 75 64 65 20 65 72 | 72 6f 72 0d 0a 09 09 09 |clude er|ror.....|
|00000b10| 09 09 3b 2e 2e 20 6d 65 | 73 73 61 67 65 20 6f 76 |..;.. me|ssage ov|
|00000b20| 65 72 6c 61 79 0d 0a 43 | 4f 4e 54 09 45 51 55 09 |erlay..C|ONT.EQU.|
|00000b30| 30 32 32 32 46 48 09 09 | 09 3b 61 64 64 72 65 73 |0222FH..|.;addres|
|00000b40| 73 20 77 68 65 72 65 20 | 63 6f 64 65 20 63 6f 6e |s where |code con|
|00000b50| 74 69 6e 75 65 73 20 61 | 66 74 65 72 0d 0a 09 09 |tinues a|fter....|
|00000b60| 09 09 09 3b 2e 2e 20 79 | 65 73 2f 6e 6f 20 71 75 |...;.. y|es/no qu|
|00000b70| 65 73 74 69 6f 6e 20 69 | 73 20 61 6e 73 77 65 72 |estion i|s answer|
|00000b80| 65 64 0d 0a 0d 0a 09 4f | 52 47 09 53 54 41 52 54 |ed.....O|RG.START|
|00000b90| 0d 0a 0d 0a 09 49 46 09 | 49 4e 43 4c 55 44 45 0d |.....IF.|INCLUDE.|
|00000ba0| 0a 09 4c 44 09 41 2c 27 | 59 27 09 09 09 3b 76 61 |..LD.A,'|Y'...;va|
|00000bb0| 6c 75 65 20 66 6f 72 20 | 61 66 66 69 72 6d 61 74 |lue for |affirmat|
|00000bc0| 69 76 65 20 61 6e 73 77 | 65 72 0d 0a 09 45 4c 53 |ive answ|er...ELS|
|00000bd0| 45 0d 0a 09 4c 44 09 41 | 2c 27 4e 27 09 09 09 3b |E...LD.A|,'N'...;|
|00000be0| 76 61 6c 75 65 20 66 6f | 72 20 6e 65 67 61 74 69 |value fo|r negati|
|00000bf0| 76 65 20 61 6e 73 77 65 | 72 0d 0a 09 45 4e 44 49 |ve answe|r...ENDI|
|00000c00| 46 0d 0a 0d 0a 09 53 55 | 42 09 27 4e 27 0d 0a 09 |F.....SU|B.'N'...|
|00000c10| 4a 50 09 43 4f 4e 54 09 | 09 09 3b 67 6f 20 6f 6e |JP.CONT.|..;go on|
|00000c20| 20 77 69 74 68 20 63 6f | 64 65 0d 0a 0d 0a 09 45 | with co|de.....E|
|00000c30| 4e 44 0d 0a 1a 00 00 00 | 00 00 00 00 00 00 00 00 |ND......|........|
|00000c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+
