home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-12-03 | 7.6 KB |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 66%
| dexvert
| Planetary Data System (image/pds)
| ext
| Supported |
| 66%
| dexvert
| Planetary Data System v3 (image/pds3)
| ext
| Supported |
| 1%
| dexvert
| The Print Shop Deluxe Sign (document/printShopDeluxeSign)
| ext
| Unsupported |
| 1%
| dexvert
| Hangul Word Processor Device driver (other/hangulWordProcessorDeviceDriver)
| ext
| Unsupported |
| 100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 00 05 02 00 00 32 1e | 00 00 3e 1e cf 01 0c 12 |......2.|..>.....|
|00000010| 1e 28 ff 01 ca 01 5d 7f | 03 58 30 20 20 20 20 20 |.(....].|.X0 |
|00000020| 20 50 44 53 00 00 00 00 | 00 00 00 00 00 00 00 00 | PDS....|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 01 |........|........|
|00000040| 03 01 06 01 09 01 0c 01 | 0f 01 12 01 15 01 18 01 |........|........|
|00000050| 1b 01 00 00 22 00 00 00 | 00 00 30 30 30 30 30 30 |...."...|..000000|
|00000060| 30 30 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |00......|........|
|00000070| 34 1e 00 00 1e 01 00 00 | 01 00 30 00 00 00 00 00 |4.......|..0.....|
|00000080| 0d 00 72 61 0d 00 0d 00 | 00 00 0d 00 00 61 6c 20 |..ra....|.....al |
|00000090| 64 65 20 74 68 65 20 6f | 74 68 65 72 0d 00 00 2a |de the o|ther...*|
|000000a0| 2a 2a 2a 2a 2a 0d 00 20 | 20 20 20 20 20 20 20 20 |*****.. | |
|000000b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000000d0| 20 20 20 20 20 20 20 20 | 22 0d 00 0d 0d 0d 0d 0d | |".......|
|000000e0| 0d 0d 0d 0d 0d 0d 0d 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 46 30 00 46 31 00 46 32 | 00 46 33 00 46 34 00 46 |F0.F1.F2|.F3.F4.F|
|00000110| 35 00 46 36 00 46 37 00 | 46 38 00 46 39 00 00 00 |5.F6.F7.|F8.F9...|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 3b 20 20 0d 3b 0d 3b 20 | 20 50 44 53 20 50 63 31 |; .;.; | PDS Pc1|
|00000210| 2e 32 36 20 3a 30 30 30 | 3a 20 28 63 29 20 50 2e |.26 :000|: (c) P.|
|00000220| 44 2e 53 79 73 74 65 6d | 73 20 4c 74 64 20 31 39 |D.System|s Ltd 19|
|00000230| 38 35 2d 38 38 0d 3b 0d | 3b 0d 3b 20 20 20 20 20 |85-88.;.|;.; |
|00000240| 20 20 46 69 6c 65 20 20 | 22 2d 2d 2d 2d 2d 2d 2d | File |"-------|
|00000250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 22 0d 3b 20 |--------|----".; |
|00000260| 20 20 20 56 65 72 73 69 | 6f 6e 20 20 20 20 20 20 | Versi|on |
|00000270| 20 20 20 20 30 30 2e 33 | 34 20 20 20 20 20 20 20 | 00.3|4 |
|00000280| 20 0d 3b 20 20 20 20 20 | 20 20 20 20 42 79 20 20 | .; | By |
|00000290| 22 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |"-------|--------|
|000002a0| 2d 2d 2d 2d 22 0d 3b 20 | 20 20 20 0d 3b 20 20 20 |----".; | .; |
|000002b0| 20 20 43 72 65 61 74 65 | 64 20 6f 6e 20 53 61 74 | Create|d on Sat|
|000002c0| 20 74 68 65 20 30 39 74 | 68 20 6f 66 20 46 65 62 | the 09t|h of Feb|
|000002d0| 20 31 39 39 31 20 20 0d | 3b 20 20 20 20 20 20 20 | 1991 .|; |
|000002e0| 20 4c 61 73 74 20 75 70 | 64 61 74 65 20 32 31 3a | Last up|date 21:|
|000002f0| 34 38 20 6f 6e 20 30 33 | 2f 31 32 2f 39 32 20 0d |48 on 03|/12/92 .|
|00000300| 3b 20 0d 00 0d 00 3b 2a | 2a 2a 2a 2a 2a 2a 2a 2a |; ....;*|********|
|00000310| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000340| 2a 2a 2a 2a 2a 2a 2a 0d | 3b 63 68 65 63 6b 20 74 |*******.|;check t|
|00000350| 68 61 74 20 63 72 6f 74 | 63 68 65 74 20 73 70 65 |hat crot|chet spe|
|00000360| 65 64 20 69 73 20 63 6f | 72 72 65 63 74 0d 3b 75 |ed is co|rrect.;u|
|00000370| 70 6c 6f 61 64 20 66 69 | 6c 65 2e 6d 69 64 20 66 |pload fi|le.mid f|
|00000380| 6f 72 6d 61 74 20 30 20 | 74 6f 20 34 30 30 30 30 |ormat 0 |to 40000|
|00000390| 20 75 73 69 6e 67 20 6d | 6f 6e 69 74 65 72 0d 00 | using m|oniter..|
|000003a0| 3b 61 73 73 65 6d 62 6c | 65 20 61 6e 64 20 72 75 |;assembl|e and ru|
|000003b0| 6e 20 70 72 6f 67 72 61 | 6d 6d 65 0d 3b 64 6f 20 |n progra|mme.;do |
|000003c0| 61 20 6d 64 65 6e 64 20 | 74 6f 20 66 69 6e 64 20 |a mdend |to find |
|000003d0| 65 6e 64 20 6f 66 20 63 | 65 61 74 65 64 20 64 61 |end of c|eated da|
|000003e0| 74 61 0d 00 3b 75 70 6c | 6f 61 64 20 74 6f 20 64 |ta..;upl|oad to d|
|000003f0| 69 73 6b 20 66 69 6c 65 | 2e 62 6c 6b 2c 35 35 30 |isk file|.blk,550|
|00000400| 30 30 2d 30 28 64 65 6e | 64 29 68 2d 35 35 30 30 |00-0(den|d)h-5500|
|00000410| 30 0d 0d 00 3b 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |0...;***|********|
|00000420| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000430| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000440| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000450| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0d 0d 00 63 72 6f 74 |********|*...crot|
|00000460| 63 68 65 74 09 09 65 71 | 75 20 32 30 09 3b 70 75 |chet..eq|u 20.;pu|
|00000470| 74 20 63 72 6f 74 63 68 | 65 74 20 76 61 6c 75 65 |t crotch|et value|
|00000480| 20 64 65 73 69 72 65 64 | 20 68 65 72 65 0d 63 75 | desired| here.cu|
|00000490| 72 72 65 6e 74 5f 73 71 | 09 65 71 75 20 63 72 6f |rrent_sq|.equ cro|
|000004a0| 74 63 68 65 74 2f 34 0d | 6d 69 64 69 5f 66 69 6c |tchet/4.|midi_fil|
|000004b0| 65 09 09 65 71 75 20 34 | 30 30 30 30 09 3b 75 70 |e..equ 4|0000.;up|
|000004c0| 6c 6f 61 64 20 6d 69 64 | 69 20 66 69 6c 65 20 68 |load mid|i file h|
|000004d0| 65 72 65 0d 68 65 61 64 | 65 72 09 09 65 71 75 20 |ere.head|er..equ |
|000004e0| 35 38 09 3b 20 6d 69 64 | 69 20 68 65 61 64 65 72 |58.; mid|i header|
|000004f0| 20 6c 65 6e 67 74 68 2e | 2e 75 6e 74 69 74 6c 65 | length.|.untitle|
|00000500| 64 0d 64 65 73 74 5f 66 | 69 6c 65 09 09 65 71 75 |d.dest_f|ile..equ|
|00000510| 20 35 35 30 30 30 09 3b | 74 65 78 74 20 66 69 6c | 55000.;|text fil|
|00000520| 65 20 77 72 69 74 74 65 | 6e 20 68 65 72 65 0d 00 |e writte|n here..|
|00000530| 6c 69 6e 65 5f 6c 65 6e | 67 74 68 09 65 71 75 20 |line_len|gth.equ |
|00000540| 34 09 3b 6e 6f 74 65 2b | 74 69 6d 69 6e 67 73 20 |4.;note+|timings |
|00000550| 70 65 72 20 6c 69 6e 65 | 0d 00 0d 00 3b 2a 2a 2a |per line|....;***|
|00000560| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000570| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000580| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000590| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000005a0| 2a 2a 0d 00 0d 00 09 6f | 72 67 20 35 30 30 30 30 |**.....o|rg 50000|
|000005b0| 2d 36 30 0d 0d 00 09 09 | 09 3b 70 61 74 74 20 6e |-60.....|.;patt n|
|000005c0| 61 6d 65 20 61 6e 64 20 | 63 6f 6d 6d 65 6e 74 20 |ame and |comment |
|000005d0| 68 65 72 65 0d 00 0d 00 | 70 61 74 74 5f 6e 6f 09 |here....|patt_no.|
|000005e0| 64 65 66 6d 20 22 70 61 | 74 74 31 74 65 73 74 20 |defm "pa|tt1test |
|000005f0| 20 20 20 20 20 20 20 20 | 3b 20 20 20 20 20 20 20 | |; |
|00000600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000620| 20 20 20 20 22 09 0d 00 | 0d 00 09 73 65 6e 64 20 | "...|...send |
|00000630| 63 6f 6d 70 75 74 65 72 | 31 0d 0d 00 09 6f 72 67 |computer|1....org|
|00000640| 20 35 30 30 30 30 0d 00 | 73 74 0d 00 09 09 09 3b | 50000..|st.....;|
|00000650| 63 6c 65 61 72 20 64 65 | 73 74 20 74 65 78 74 20 |clear de|st text |
|00000660| 66 69 6c 65 20 61 72 65 | 61 0d 09 6c 64 20 64 65 |file are|a..ld de|
|00000670| 2c 64 65 73 74 5f 66 69 | 6c 65 2b 31 0d 00 09 6c |,dest_fi|le+1...l|
|00000680| 64 20 62 63 2c 39 30 30 | 30 0d 09 6c 64 20 68 6c |d bc,900|0..ld hl|
|00000690| 2c 64 65 73 74 5f 66 69 | 6c 65 0d 00 09 6c 64 20 |,dest_fi|le...ld |
|000006a0| 28 68 6c 29 2c 30 0d 00 | 09 6c 64 69 72 0d 0d 00 |(hl),0..|.ldir...|
|000006b0| 0d 00 09 63 61 6c 6c 20 | 73 74 61 72 74 5f 70 61 |...call |start_pa|
|000006c0| 74 74 20 0d 09 6c 64 20 | 28 64 65 73 74 5f 70 6f |tt ..ld |(dest_po|
|000006d0| 69 6e 74 65 72 29 2c 69 | 78 0d 09 6c 64 20 69 78 |inter),i|x..ld ix|
|000006e0| 2c 6d 69 64 69 5f 66 69 | 6c 65 2b 68 65 61 64 65 |,midi_fi|le+heade|
|000006f0| 72 0d 09 63 61 6c 6c 20 | 73 74 61 72 74 5f 6d 61 |r..call |start_ma|
|00000700| 69 6e 5f 6c 6f 6f 70 0d | 0d 00 09 09 09 09 3b 63 |in_loop.|......;c|
|00000710| 6c 65 61 72 20 6d 69 64 | 69 20 64 61 74 61 20 61 |lear mid|i data a|
|00000720| 72 65 61 0d 63 6c 6d 0d | 09 6c 64 20 64 65 2c 6d |rea.clm.|.ld de,m|
|00000730| 69 64 69 5f 66 69 6c 65 | 2b 31 0d 00 09 6c 64 20 |idi_file|+1...ld |
|00000740| 62 63 2c 39 30 30 30 0d | 09 6c 64 20 68 6c 2c 6d |bc,9000.|.ld hl,m|
|00000750| 69 64 69 5f 66 69 6c 65 | 0d 00 09 6c 64 20 28 68 |idi_file|...ld (h|
|00000760| 6c 29 2c 30 0d 00 09 3b | 6c 64 69 72 0d 00 0d 00 |l),0...;|ldir....|
|00000770| 0d 00 0d 00 0d 00 09 72 | 65 74 0d 00 3b 2d 2d 2d |.......r|et..;---|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007a0| 0d 00 0d 00 73 74 61 72 | 74 5f 6d 61 69 6e 5f 6c |....star|t_main_l|
|000007b0| 6f 6f 70 0d 09 6c 64 20 | 61 2c 28 69 78 2b 30 29 |oop..ld |a,(ix+0)|
|000007c0| 0d 00 09 62 69 74 20 37 | 2c 61 0d 00 09 6a 72 20 |...bit 7|,a...jr |
|000007d0| 7a 2c 6e 6f 5f 72 65 73 | 74 0d 09 09 09 3b 69 73 |z,no_res|t....;is|
|000007e0| 20 72 65 73 74 0d 09 6c | 64 20 68 6c 2c 72 65 73 | rest..l|d hl,res|
|000007f0| 74 5f 6d 65 73 73 0d 00 | 09 6c 64 20 64 65 2c 63 |t_mess..|.ld de,c|
|00000800| 75 72 72 65 6e 74 5f 6e | 6f 74 65 0d 09 6c 64 20 |urrent_n|ote..ld |
|00000810| 62 63 2c 35 0d 00 09 6c | 64 69 72 09 09 3b 77 72 |bc,5...l|dir..;wr|
|00000820| 69 74 65 20 72 65 73 74 | 20 64 61 74 61 20 69 6e |ite rest| data in|
|00000830| 74 6f 20 62 75 66 66 65 | 72 0d 09 63 61 6c 6c 20 |to buffe|r..call |
|00000840| 74 69 6d 69 6e 67 5f 76 | 61 6c 0d 00 09 69 6e 63 |timing_v|al...inc|
|00000850| 20 69 78 0d 09 6c 64 20 | 28 73 6f 75 72 63 65 5f | ix..ld |(source_|
|00000860| 70 6f 69 6e 74 65 72 29 | 2c 69 78 09 3b 20 73 61 |pointer)|,ix.; sa|
|00000870| 76 65 0d 00 09 6c 64 20 | 69 78 2c 28 64 65 73 74 |ve...ld |ix,(dest|
|00000880| 5f 70 6f 69 6e 74 65 72 | 29 0d 09 63 61 6c 6c 20 |_pointer|)..call |
|00000890| 6e 6f 74 65 5f 74 6f 5f | 64 65 73 74 0d 00 09 6c |note_to_|dest...l|
|000008a0| 64 20 28 64 65 73 74 5f | 70 6f 69 6e 74 65 72 29 |d (dest_|pointer)|
|000008b0| 2c 69 78 0d 09 63 61 6c | 6c 20 74 69 6d 65 5f 74 |,ix..cal|l time_t|
|000008c0| 6f 5f 64 65 73 74 0d 00 | 0d 00 09 6c 64 20 28 64 |o_dest..|...ld (d|
|000008d0| 65 73 74 5f 70 6f 69 6e | 74 65 72 29 2c 69 78 20 |est_poin|ter),ix |
|000008e0| 20 0d 09 6a 72 20 6d 61 | 69 6e 5f 6c 6f 6f 70 0d | ..jr ma|in_loop.|
|000008f0| 6e 6f 5f 72 65 73 74 0d | 09 69 6e 63 20 69 78 0d |no_rest.|.inc ix.|
|00000900| 09 69 6e 63 20 69 78 0d | 09 6c 64 20 28 73 6f 75 |.inc ix.|.ld (sou|
|00000910| 72 63 65 5f 70 6f 69 6e | 74 65 72 29 2c 69 78 0d |rce_poin|ter),ix.|
|00000920| 0d 00 6d 61 69 6e 5f 6c | 6f 6f 70 0d 09 6c 64 20 |..main_l|oop..ld |
|00000930| 69 78 2c 28 73 6f 75 72 | 63 65 5f 70 6f 69 6e 74 |ix,(sour|ce_point|
|00000940| 65 72 29 0d 09 6c 64 20 | 61 2c 28 69 78 2d 32 29 |er)..ld |a,(ix-2)|
|00000950| 0d 00 09 63 70 20 30 09 | 09 3b 65 6e 64 20 6d 69 |...cp 0.|.;end mi|
|00000960| 64 69 20 66 69 6c 65 0d | 09 6a 72 20 6e 7a 2c 63 |di file.|.jr nz,c|
|00000970| 6f 6e 74 31 0d 00 09 6c | 64 20 61 2c 28 69 78 2d |ont1...l|d a,(ix-|
|00000980| 31 29 0d 00 09 63 70 20 | 32 35 35 0d 09 6a 72 20 |1)...cp |255..jr |
|00000990| 6e 7a 2c 63 6f 6e 74 31 | 0d 00 09 63 61 6c 6c 20 |nz,cont1|...call |
|000009a0| 77 72 69 74 65 5f 65 6e | 64 0d 09 72 65 74 0d 00 |write_en|d..ret..|
|000009b0| 63 6f 6e 74 31 0d 09 63 | 61 6c 6c 20 77 72 69 74 |cont1..c|all writ|
|000009c0| 65 5f 6e 65 77 5f 6e 6f | 74 65 0d 00 09 69 6e 63 |e_new_no|te...inc|
|000009d0| 20 69 78 09 09 3b 76 65 | 6c 6f 63 69 74 79 0d 00 | ix..;ve|locity..|
|000009e0| 20 09 69 6e 63 20 69 78 | 0d 00 09 63 61 6c 6c 20 | .inc ix|...call |
|000009f0| 74 69 6d 69 6e 67 5f 76 | 61 6c 09 09 3b 69 78 20 |timing_v|al..;ix |
|00000a00| 61 74 20 6e 65 78 74 20 | 6e 6f 74 65 20 6f 6e 20 |at next |note on |
|00000a10| 6f 72 20 66 69 6e 69 73 | 68 0d 09 69 6e 63 20 69 |or finis|h..inc i|
|00000a20| 78 0d 09 6c 64 20 28 73 | 6f 75 72 63 65 5f 70 6f |x..ld (s|ource_po|
|00000a30| 69 6e 74 65 72 29 2c 69 | 78 09 3b 20 73 61 76 65 |inter),i|x.; save|
|00000a40| 0d 00 09 6c 64 20 69 78 | 2c 28 64 65 73 74 5f 70 |...ld ix|,(dest_p|
|00000a50| 6f 69 6e 74 65 72 29 0d | 09 63 61 6c 6c 20 6e 6f |ointer).|.call no|
|00000a60| 74 65 5f 74 6f 5f 64 65 | 73 74 0d 00 09 6c 64 20 |te_to_de|st...ld |
|00000a70| 28 64 65 73 74 5f 70 6f | 69 6e 74 65 72 29 2c 69 |(dest_po|inter),i|
|00000a80| 78 0d 09 63 61 6c 6c 20 | 74 69 6d 65 5f 74 6f 5f |x..call |time_to_|
|00000a90| 64 65 73 74 0d 00 09 6c | 64 20 28 64 65 73 74 5f |dest...l|d (dest_|
|00000aa0| 70 6f 69 6e 74 65 72 29 | 2c 69 78 20 20 0d 09 6a |pointer)|,ix ..j|
|00000ab0| 72 20 6d 61 69 6e 5f 6c | 6f 6f 70 0d 0d 00 3b 2a |r main_l|oop...;*|
|00000ac0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ad0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ae0| 2a 2a 2a 2a 2a 2a 2a 0d | 3b 09 63 61 6c 63 75 6c |*******.|;.calcul|
|00000af0| 61 74 65 20 6e 6f 74 65 | 20 6c 65 6e 67 74 68 20 |ate note| length |
|00000b00| 76 61 6c 75 65 0d 3b 09 | 69 78 20 3d 20 6d 69 64 |value.;.|ix = mid|
|00000b10| 69 20 66 69 6c 65 20 70 | 6f 73 69 74 69 6f 6e 0d |i file p|osition.|
|00000b20| 3b 09 64 72 69 76 65 72 | 20 74 69 6d 69 6e 67 20 |;.driver| timing |
|00000b30| 76 61 6c 75 65 20 77 72 | 69 74 74 65 6e 20 74 6f |value wr|itten to|
|00000b40| 20 76 61 72 69 61 62 6c | 65 0d 0d 00 74 69 6d 69 | variabl|e...timi|
|00000b50| 6e 67 5f 76 61 6c 0d 00 | 09 09 3b 20 66 69 72 73 |ng_val..|..; firs|
|00000b60| 74 20 67 65 74 20 74 6f | 74 61 6c 20 74 69 63 6b |t get to|tal tick|
|00000b70| 20 76 61 6c 20 6e 6f 74 | 65 20 6f 6e 2f 6f 66 66 | val not|e on/off|
|00000b80| 0d 00 09 6c 64 20 68 6c | 2c 30 09 0d 09 6c 64 20 |...ld hl|,0...ld |
|00000b90| 61 2c 28 69 78 2b 30 29 | 0d 00 09 62 69 74 20 37 |a,(ix+0)|...bit 7|
|00000ba0| 2c 61 0d 00 09 6a 72 20 | 7a 2c 6e 6f 5f 68 69 0d |,a...jr |z,no_hi.|
|00000bb0| 09 6c 64 20 68 2c 28 69 | 78 2b 30 29 0d 00 09 72 |.ld h,(i|x+0)...r|
|00000bc0| 65 73 20 37 2c 68 0d 00 | 09 6c 64 20 6c 2c 28 69 |es 7,h..|.ld l,(i|
|00000bd0| 78 2b 31 29 0d 00 09 69 | 6e 63 20 69 78 0d 09 69 |x+1)...i|nc ix..i|
|00000be0| 6e 63 20 69 78 0d 09 6a | 72 20 73 74 6f 72 65 5f |nc ix..j|r store_|
|00000bf0| 6f 6e 5f 76 61 6c 0d 00 | 6e 6f 5f 68 69 09 6c 64 |on_val..|no_hi.ld|
|00000c00| 20 6c 2c 28 69 78 2b 30 | 29 0d 09 69 6e 63 20 69 | l,(ix+0|)..inc i|
|00000c10| 78 0d 73 74 6f 72 65 5f | 6f 6e 5f 76 61 6c 3a 0d |x.store_|on_val:.|
|00000c20| 09 6c 64 20 61 2c 38 30 | 68 09 09 3b 6e 6f 74 65 |.ld a,80|h..;note|
|00000c30| 20 6f 66 66 0d 00 69 6e | 63 5f 6c 6f 6f 70 09 63 | off..in|c_loop.c|
|00000c40| 70 20 28 69 78 2b 30 29 | 0d 00 09 6a 72 20 7a 2c |p (ix+0)|...jr z,|
|00000c50| 67 65 74 5f 6f 66 66 5f | 74 69 63 6b 0d 00 09 6c |get_off_|tick...l|
|00000c60| 64 20 61 2c 39 30 68 0d | 09 63 70 20 28 69 78 2b |d a,90h.|.cp (ix+|
|00000c70| 30 29 09 3b 6e 6f 20 6e | 6f 74 65 20 6f 66 66 0d |0).;no n|ote off.|
|00000c80| 09 6a 72 20 7a 2c 73 74 | 6f 72 65 5f 68 6c 0d 00 |.jr z,st|ore_hl..|
|00000c90| 0d 00 09 69 6e 63 20 69 | 78 0d 09 6a 72 20 69 6e |...inc i|x..jr in|
|00000ca0| 63 5f 6c 6f 6f 70 09 0d | 67 65 74 5f 6f 66 66 5f |c_loop..|get_off_|
|00000cb0| 74 69 63 6b 0d 00 09 69 | 6e 63 20 69 78 0d 09 69 |tick...i|nc ix..i|
|00000cc0| 6e 63 20 69 78 0d 09 69 | 6e 63 20 69 78 0d 09 6c |nc ix..i|nc ix..l|
|00000cd0| 64 20 64 65 2c 30 0d 00 | 09 6c 64 20 61 2c 28 69 |d de,0..|.ld a,(i|
|00000ce0| 78 2b 30 29 0d 00 09 62 | 69 74 20 37 2c 61 0d 00 |x+0)...b|it 7,a..|
|00000cf0| 09 6a 72 20 7a 2c 6e 6f | 5f 6f 66 66 5f 68 69 0d |.jr z,no|_off_hi.|
|00000d00| 09 6c 64 20 64 2c 28 69 | 78 2b 30 29 0d 00 09 72 |.ld d,(i|x+0)...r|
|00000d10| 65 73 20 37 2c 64 0d 00 | 09 6c 64 20 65 2c 28 69 |es 7,d..|.ld e,(i|
|00000d20| 78 2b 31 29 0d 00 09 69 | 6e 63 20 69 78 0d 09 69 |x+1)...i|nc ix..i|
|00000d30| 6e 63 20 69 78 0d 09 6a | 72 20 61 64 64 5f 6f 6e |nc ix..j|r add_on|
|00000d40| 5f 6f 66 66 0d 00 6e 6f | 5f 6f 66 66 5f 68 69 09 |_off..no|_off_hi.|
|00000d50| 6c 64 20 65 2c 28 69 78 | 2b 30 29 0d 09 69 6e 63 |ld e,(ix|+0)..inc|
|00000d60| 20 69 78 0d 61 64 64 5f | 6f 6e 5f 6f 66 66 20 61 | ix.add_|on_off a|
|00000d70| 64 64 20 68 6c 2c 64 65 | 0d 00 73 74 6f 72 65 5f |dd hl,de|..store_|
|00000d80| 68 6c 09 6c 64 20 28 74 | 6f 74 61 6c 5f 74 69 63 |hl.ld (t|otal_tic|
|00000d90| 6b 29 2c 68 6c 0d 0d 00 | 3b 2d 2d 2d 2d 2d 2d 2d |k),hl...|;-------|
|00000da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000dc0| 2d 2d 2d 0d 67 65 74 5f | 74 69 6d 0d 09 70 75 73 |---.get_|tim..pus|
|00000dd0| 68 20 69 78 0d 00 09 6c | 64 20 69 78 2c 74 6f 74 |h ix...l|d ix,tot|
|00000de0| 61 6c 5f 74 69 63 6b 0d | 09 6c 64 20 68 6c 2c 30 |al_tick.|.ld hl,0|
|00000df0| 0d 00 09 6c 64 20 61 2c | 28 69 78 2b 31 29 0d 00 |...ld a,|(ix+1)..|
|00000e00| 09 63 70 20 30 0d 09 6a | 72 20 7a 2c 73 69 6e 67 |.cp 0..j|r z,sing|
|00000e10| 6c 65 5f 62 79 74 65 0d | 09 63 61 6c 6c 20 6d 75 |le_byte.|.call mu|
|00000e20| 6c 74 31 32 38 09 3b 6d | 75 6c 74 69 70 6c 79 20 |lt128.;m|ultiply |
|00000e30| 6e 6f 20 6f 66 20 31 32 | 38 27 73 20 6f 75 74 20 |no of 12|8's out |
|00000e40| 69 6e 20 68 6c 0d 73 69 | 6e 67 6c 65 5f 62 79 74 |in hl.si|ngle_byt|
|00000e50| 65 0d 09 6c 64 20 65 2c | 28 69 78 2b 30 29 09 3b |e..ld e,|(ix+0).;|
|00000e60| 6c 6f 77 20 62 79 74 65 | 20 6f 66 20 74 69 63 6b |low byte| of tick|
|00000e70| 20 76 61 6c 75 65 0d 00 | 09 6c 64 20 64 2c 30 0d | value..|.ld d,0.|
|00000e80| 09 61 64 64 20 68 6c 2c | 64 65 0d 00 09 09 09 3b |.add hl,|de.....;|
|00000e90| 20 68 6c 20 3d 20 61 63 | 74 75 61 6c 20 6e 75 6d | hl = ac|tual num|
|00000ea0| 62 65 72 20 6f 66 20 74 | 69 63 6b 73 20 69 6e 20 |ber of t|icks in |
|00000eb0| 6d 69 64 69 20 66 69 6c | 65 0d 09 09 09 3b 20 6e |midi fil|e....; n|
|00000ec0| 6f 77 20 63 61 6c 63 75 | 6c 61 74 65 20 68 6f 77 |ow calcu|late how|
|00000ed0| 20 6d 61 6e 79 20 73 65 | 6d 69 20 71 75 61 76 65 | many se|mi quave|
|00000ee0| 72 73 0d 00 09 6c 64 20 | 61 2c 68 0d 09 6c 64 20 |rs...ld |a,h..ld |
|00000ef0| 63 2c 6c 0d 09 6c 64 20 | 65 2c 32 34 09 3b 20 39 |c,l..ld |e,24.; 9|
|00000f00| 36 20 74 69 63 6b 73 20 | 62 79 20 34 09 0d 09 6c |6 ticks |by 4...l|
|00000f10| 64 20 64 2c 30 09 09 09 | 0d 00 09 63 61 6c 6c 20 |d d,0...|...call |
|00000f20| 64 69 76 31 36 0d 09 6c | 64 20 68 2c 61 0d 09 6c |div16..l|d h,a..l|
|00000f30| 64 20 6c 2c 63 0d 09 09 | 09 3b 68 6c 20 3d 20 6e |d l,c...|.;hl = n|
|00000f40| 6f 20 6f 66 20 73 71 0d | 09 09 09 3b 63 6f 6e 76 |o of sq.|...;conv|
|00000f50| 65 72 74 20 74 6f 20 6f | 75 72 20 64 72 69 76 65 |ert to o|ur drive|
|00000f60| 72 20 76 61 6c 75 65 0d | 09 6c 64 20 61 2c 63 75 |r value.|.ld a,cu|
|00000f70| 72 72 65 6e 74 5f 73 71 | 0d 00 09 6c 64 20 65 2c |rrent_sq|...ld e,|
|00000f80| 61 0d 09 6c 64 20 64 2c | 30 0d 09 63 61 6c 6c 20 |a..ld d,|0..call |
|00000f90| 6d 75 6c 74 31 36 0d 00 | 09 09 09 3b 68 6c 20 3d |mult16..|...;hl =|
|00000fa0| 20 64 72 69 76 65 72 20 | 76 61 6c 75 65 20 74 6f | driver |value to|
|00000fb0| 20 77 72 69 74 65 09 0d | 3b 2d 2d 2d 2d 2d 2d 2d | write..|;-------|
|00000fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fd0| 2d 2d 0d 00 63 6f 6e 76 | 65 72 74 5f 61 73 63 69 |--..conv|ert_asci|
|00000fe0| 69 0d 0d 00 09 6c 64 20 | 28 63 75 72 72 65 6e 74 |i....ld |(current|
|00000ff0| 5f 69 6e 74 5f 63 6f 75 | 6e 74 29 2c 68 6c 0d 00 |_int_cou|nt),hl..|
|00001000| 09 09 09 3b 20 6e 6f 77 | 20 63 6f 6e 76 65 72 74 |...; now| convert|
|00001010| 20 74 6f 20 61 73 63 49 | 49 20 68 65 78 20 6e 75 | to ascI|I hex nu|
|00001020| 6d 62 65 72 73 0d 0d 00 | 09 6c 64 20 61 2c 28 63 |mbers...|.ld a,(c|
|00001030| 75 72 72 65 6e 74 5f 69 | 6e 74 5f 63 6f 75 6e 74 |urrent_i|nt_count|
|00001040| 2b 31 29 09 3b 20 68 69 | 67 68 20 62 79 74 65 20 |+1).; hi|gh byte |
|00001050| 76 61 6c 75 65 0d 09 6c | 64 20 6c 2c 61 0d 09 6c |value..l|d l,a..l|
|00001060| 64 20 68 2c 30 0d 09 61 | 64 64 20 68 6c 2c 68 6c |d h,0..a|dd hl,hl|
|00001070| 0d 00 09 65 78 20 64 65 | 2c 68 6c 0d 09 6c 64 20 |...ex de|,hl..ld |
|00001080| 68 6c 2c 68 65 78 5f 74 | 61 62 6c 65 0d 00 09 61 |hl,hex_t|able...a|
|00001090| 64 64 20 68 6c 2c 64 65 | 0d 00 09 6c 64 20 61 2c |dd hl,de|...ld a,|
|000010a0| 28 68 6c 29 0d 00 09 6c | 64 20 28 69 6e 74 5f 62 |(hl)...l|d (int_b|
|000010b0| 75 66 66 29 2c 61 0d 00 | 09 69 6e 63 20 68 6c 0d |uff),a..|.inc hl.|
|000010c0| 09 6c 64 20 61 2c 28 68 | 6c 29 0d 00 09 6c 64 20 |.ld a,(h|l)...ld |
|000010d0| 28 69 6e 74 5f 62 75 66 | 66 2b 31 29 2c 61 0d 00 |(int_buf|f+1),a..|
|000010e0| 09 6c 64 20 61 2c 28 63 | 75 72 72 65 6e 74 5f 69 |.ld a,(c|urrent_i|
|000010f0| 6e 74 5f 63 6f 75 6e 74 | 29 09 3b 6c 6f 77 0d 00 |nt_count|).;low..|
|00001100| 09 6c 64 20 6c 2c 61 0d | 09 6c 64 20 68 2c 30 0d |.ld l,a.|.ld h,0.|
|00001110| 09 61 64 64 20 68 6c 2c | 68 6c 0d 00 09 65 78 20 |.add hl,|hl...ex |
|00001120| 64 65 2c 68 6c 0d 09 6c | 64 20 68 6c 2c 68 65 78 |de,hl..l|d hl,hex|
|00001130| 5f 74 61 62 6c 65 0d 00 | 09 61 64 64 20 68 6c 2c |_table..|.add hl,|
|00001140| 64 65 0d 00 09 6c 64 20 | 61 2c 28 68 6c 29 0d 00 |de...ld |a,(hl)..|
|00001150| 09 6c 64 20 28 69 6e 74 | 5f 62 75 66 66 2b 32 29 |.ld (int|_buff+2)|
|00001160| 2c 61 0d 00 09 69 6e 63 | 20 68 6c 0d 09 6c 64 20 |,a...inc| hl..ld |
|00001170| 61 2c 28 68 6c 29 0d 00 | 09 6c 64 20 28 69 6e 74 |a,(hl)..|.ld (int|
|00001180| 5f 62 75 66 66 2b 33 29 | 2c 61 0d 00 09 70 6f 70 |_buff+3)|,a...pop|
|00001190| 20 69 78 0d 09 72 65 74 | 0d 00 0d 00 3b 2a 2a 2a | ix..ret|....;***|
|000011a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 00 77 72 69 74 |********|**..writ|
|000011d0| 65 5f 6e 65 77 5f 6e 6f | 74 65 3a 0d 0d 00 09 09 |e_new_no|te:.....|
|000011e0| 3b 20 73 75 62 72 6f 75 | 74 69 6e 65 20 74 6f 20 |; subrou|tine to |
|000011f0| 77 72 69 74 65 20 6e 65 | 77 20 6e 6f 74 65 20 69 |write ne|w note i|
|00001200| 6e 74 6f 20 62 75 66 66 | 65 72 0d 00 09 09 3b 20 |nto buff|er....; |
|00001210| 69 78 20 3d 20 63 75 72 | 72 65 6e 74 20 6e 6f 74 |ix = cur|rent not|
|00001220| 65 20 70 6f 73 69 74 69 | 6f 6e 20 69 6e 20 6d 69 |e positi|on in mi|
|00001230| 64 69 20 66 69 6c 65 0d | 09 70 75 73 68 20 68 6c |di file.|.push hl|
|00001240| 0d 00 09 70 75 73 68 20 | 64 65 0d 00 09 3b 20 70 |...push |de...; p|
|00001250| 6f 69 6e 74 20 68 6c 20 | 74 6f 20 63 6f 72 72 65 |oint hl |to corre|
|00001260| 63 74 20 6e 6f 74 65 20 | 70 6f 73 0d 09 6c 64 20 |ct note |pos..ld |
|00001270| 68 6c 2c 6e 6f 74 65 5f | 74 61 62 6c 65 09 0d 00 |hl,note_|table...|
|00001280| 09 6c 64 20 65 2c 28 69 | 78 2b 30 29 0d 00 09 6c |.ld e,(i|x+0)...l|
|00001290| 64 20 64 2c 30 0d 09 09 | 09 3b 64 65 20 68 6f 6c |d d,0...|.;de hol|
|000012a0| 64 73 20 6d 69 64 69 20 | 6e 6f 74 65 20 6e 75 6d |ds midi |note num|
|000012b0| 62 65 72 0d 09 6c 64 20 | 68 6c 2c 32 34 68 0d 00 |ber..ld |hl,24h..|
|000012c0| 09 65 78 20 64 65 2c 68 | 6c 0d 09 61 6e 64 20 61 |.ex de,h|l..and a|
|000012d0| 0d 00 09 73 62 63 20 68 | 6c 2c 64 65 09 3b 20 68 |...sbc h|l,de.; h|
|000012e0| 6c 20 3d 20 6e 6f 74 65 | 20 6e 75 6d 62 65 72 20 |l = note| number |
|000012f0| 69 6e 20 74 61 62 6c 65 | 0d 00 09 61 64 64 20 68 |in table|...add h|
|00001300| 6c 2c 68 6c 0d 00 09 61 | 64 64 20 68 6c 2c 68 6c |l,hl...a|dd hl,hl|
|00001310| 0d 00 09 61 64 64 20 68 | 6c 2c 68 6c 09 3b 6d 75 |...add h|l,hl.;mu|
|00001320| 6c 74 20 62 79 20 38 0d | 09 65 78 20 64 65 2c 68 |lt by 8.|.ex de,h|
|00001330| 6c 09 3b 62 61 63 6b 20 | 74 6f 20 64 65 0d 09 6c |l.;back |to de..l|
|00001340| 64 20 68 6c 2c 6e 6f 74 | 65 5f 74 61 62 6c 65 0d |d hl,not|e_table.|
|00001350| 09 61 64 64 20 68 6c 2c | 64 65 0d 00 09 09 09 3b |.add hl,|de.....;|
|00001360| 68 6c 20 61 74 20 61 73 | 63 69 69 20 6e 6f 74 65 |hl at as|cii note|
|00001370| 20 70 6f 73 0d 00 09 6c | 64 20 64 65 2c 63 75 72 | pos...l|d de,cur|
|00001380| 72 65 6e 74 5f 6e 6f 74 | 65 0d 09 6c 64 20 62 63 |rent_not|e..ld bc|
|00001390| 2c 38 0d 00 09 6c 64 69 | 72 09 09 3b 74 72 61 6e |,8...ldi|r..;tran|
|000013a0| 73 66 65 72 20 69 6e 74 | 6f 20 62 75 66 66 65 72 |sfer int|o buffer|
|000013b0| 0d 00 09 70 6f 70 20 64 | 65 0d 09 70 6f 70 20 68 |...pop d|e..pop h|
|000013c0| 6c 0d 0d 00 09 72 65 74 | 20 0d 3b 2a 2a 2a 2a 2a |l....ret| .;*****|
|000013d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000013e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000013f0| 2a 2a 2a 2a 2a 0d 6e 6f | 74 65 5f 74 6f 5f 64 65 |*****.no|te_to_de|
|00001400| 73 74 0d 00 09 09 3b 77 | 72 69 74 65 20 6e 6f 74 |st....;w|rite not|
|00001410| 65 20 76 61 6c 20 69 6e | 20 62 75 66 66 65 72 20 |e val in| buffer |
|00001420| 74 6f 20 64 65 73 74 69 | 6e 61 74 69 6f 6e 20 66 |to desti|nation f|
|00001430| 69 6c 65 0d 09 09 3b 20 | 69 78 20 3d 20 64 65 73 |ile...; |ix = des|
|00001440| 74 20 66 69 6c 65 20 70 | 6f 73 69 74 69 6f 6e 0d |t file p|osition.|
|00001450| 09 6c 64 20 68 6c 2c 63 | 75 72 72 65 6e 74 5f 6e |.ld hl,c|urrent_n|
|00001460| 6f 74 65 0d 6e 74 64 6c | 6f 6f 70 09 6c 64 20 61 |ote.ntdl|oop.ld a|
|00001470| 2c 28 68 6c 29 0d 09 63 | 70 20 22 2c 22 0d 09 6a |,(hl)..c|p ","..j|
|00001480| 72 20 7a 2c 77 72 69 74 | 65 5f 63 6f 6d 6d 61 31 |r z,writ|e_comma1|
|00001490| 0d 00 09 6a 72 20 64 6f | 5f 69 74 0d 0d 00 0d 00 |...jr do|_it.....|
|000014a0| 3b 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |;_______|________|
|000014b0| 5f 5f 5f 5f 5f 5f 5f 5f | 0d 00 09 09 09 3b 20 6c |________|.....; l|
|000014c0| 69 6e 65 20 6c 65 6e 20 | 61 74 20 6d 61 78 20 73 |ine len |at max s|
|000014d0| 6f 20 77 72 69 74 65 20 | 63 61 72 72 69 61 67 65 |o write |carriage|
|000014e0| 20 72 65 74 0d 00 6e 65 | 77 5f 6c 69 6e 65 09 6c | ret..ne|w_line.l|
|000014f0| 64 20 61 2c 31 33 0d 00 | 09 6c 64 20 28 69 78 2b |d a,13..|.ld (ix+|
|00001500| 30 29 2c 61 0d 00 09 69 | 6e 63 20 69 78 0d 09 6c |0),a...i|nc ix..l|
|00001510| 64 20 61 2c 30 61 68 09 | 3b 74 61 62 0d 00 09 6c |d a,0ah.|;tab...l|
|00001520| 64 20 28 69 78 2b 30 29 | 2c 61 0d 00 09 69 6e 63 |d (ix+0)|,a...inc|
|00001530| 20 69 78 0d 09 6c 64 20 | 61 2c 39 0d 09 6c 64 20 | ix..ld |a,9..ld |
|00001540| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|00001550| 78 0d 09 6c 64 20 61 2c | 22 64 22 0d 09 6c 64 20 |x..ld a,|"d"..ld |
|00001560| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|00001570| 78 0d 09 6c 64 20 61 2c | 22 63 22 0d 09 6c 64 20 |x..ld a,|"c"..ld |
|00001580| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|00001590| 78 0d 09 6c 64 20 61 2c | 22 2e 22 0d 09 6c 64 20 |x..ld a,|"."..ld |
|000015a0| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|000015b0| 78 0d 09 6c 64 20 61 2c | 22 77 22 0d 09 6c 64 20 |x..ld a,|"w"..ld |
|000015c0| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|000015d0| 78 0d 09 6c 64 20 61 2c | 22 20 22 0d 09 6c 64 20 |x..ld a,|" "..ld |
|000015e0| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|000015f0| 78 0d 09 6c 64 20 61 2c | 30 0d 09 6c 64 20 28 63 |x..ld a,|0..ld (c|
|00001600| 6f 6d 6d 61 5f 63 6f 75 | 6e 74 29 2c 61 0d 09 72 |omma_cou|nt),a..r|
|00001610| 65 74 09 0d 3b 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |et..;___|________|
|00001620| 5f 5f 5f 5f 5f 5f 0d 00 | 0d 00 0d 00 77 72 69 74 |______..|....writ|
|00001630| 65 5f 63 6f 6d 6d 61 31 | 0d 00 09 6c 64 20 61 2c |e_comma1|...ld a,|
|00001640| 22 2c 22 0d 74 6f 5f 74 | 65 78 74 31 09 6c 64 20 |",".to_t|ext1.ld |
|00001650| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|00001660| 78 0d 09 72 65 74 09 09 | 3b 66 69 6e 69 73 68 0d |x..ret..|;finish.|
|00001670| 64 6f 5f 69 74 0d 09 6c | 64 20 28 69 78 2b 30 29 |do_it..l|d (ix+0)|
|00001680| 2c 61 0d 00 09 69 6e 63 | 20 69 78 0d 09 69 6e 63 |,a...inc| ix..inc|
|00001690| 20 68 6c 0d 09 6a 72 20 | 6e 74 64 6c 6f 6f 70 09 | hl..jr |ntdloop.|
|000016a0| 09 0d 0d 00 0d 00 3b 2a | 2a 2a 2a 2a 2a 2a 2a 2a |......;*|********|
|000016b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016c0| 2a 2a 2a 2a 2a 2a 2a 0d | 73 74 61 72 74 5f 70 61 |*******.|start_pa|
|000016d0| 74 74 3a 0d 0d 00 09 6c | 64 20 68 6c 2c 70 61 74 |tt:....l|d hl,pat|
|000016e0| 74 5f 6e 6f 0d 00 09 6c | 64 20 64 65 2c 73 74 61 |t_no...l|d de,sta|
|000016f0| 72 74 5f 6d 65 73 73 0d | 09 6c 64 20 62 63 2c 36 |rt_mess.|.ld bc,6|
|00001700| 30 0d 09 6c 64 69 72 0d | 09 6c 64 20 68 6c 2c 73 |0..ldir.|.ld hl,s|
|00001710| 74 61 72 74 5f 6d 65 73 | 73 0d 09 6c 64 20 64 65 |tart_mes|s..ld de|
|00001720| 2c 64 65 73 74 5f 66 69 | 6c 65 0d 00 09 6c 64 20 |,dest_fi|le...ld |
|00001730| 62 63 2c 31 31 38 0d 00 | 09 6c 64 69 72 0d 09 70 |bc,118..|.ldir..p|
|00001740| 75 73 68 20 64 65 0d 00 | 09 70 6f 70 20 69 78 0d |ush de..|.pop ix.|
|00001750| 0d 00 0d 00 09 72 65 74 | 0d 00 0d 00 73 74 61 72 |.....ret|....star|
|00001760| 74 5f 6d 65 73 73 3a 09 | 64 65 66 6d 20 22 20 20 |t_mess:.|defm " |
|00001770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000017a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000017b0| 20 20 20 20 22 0d 09 09 | 64 65 66 62 20 30 64 68 | "...|defb 0dh|
|000017c0| 2c 30 61 68 2c 30 39 68 | 0d 00 09 09 64 65 66 6d |,0ah,09h|....defm|
|000017d0| 20 22 64 63 2e 62 20 6d | 2c 6e 65 77 5f 65 6e 76 | "dc.b m|,new_env|
|000017e0| 2c 74 72 69 67 67 2c 30 | 22 0d 09 09 64 65 66 62 |,trigg,0|"...defb|
|000017f0| 20 30 64 68 2c 30 61 68 | 2c 30 39 68 0d 00 09 09 | 0dh,0ah|,09h....|
|00001800| 64 65 66 6d 20 22 64 63 | 2e 6c 20 20 20 20 5f 65 |defm "dc|.l _e|
|00001810| 6e 76 22 0d 09 09 64 65 | 66 62 20 30 64 68 2c 30 |nv"...de|fb 0dh,0|
|00001820| 61 68 2c 30 39 68 0d 00 | 09 09 64 65 66 6d 20 22 |ah,09h..|..defm "|
|00001830| 64 63 2e 77 20 22 0d 00 | 0d 00 3b 2a 2a 2a 2a 2a |dc.w "..|..;*****|
|00001840| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001850| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 74 69 |********|*****.ti|
|00001860| 6d 65 5f 74 6f 5f 64 65 | 73 74 0d 00 09 09 3b 74 |me_to_de|st....;t|
|00001870| 69 6d 69 6e 67 20 76 61 | 6c 20 74 6f 20 74 65 78 |iming va|l to tex|
|00001880| 74 20 66 69 6c 65 0d 00 | 09 09 0d 00 09 6c 64 20 |t file..|.....ld |
|00001890| 69 78 2c 28 64 65 73 74 | 5f 70 6f 69 6e 74 65 72 |ix,(dest|_pointer|
|000018a0| 29 0d 09 6c 64 20 61 2c | 22 24 22 0d 09 6c 64 20 |)..ld a,|"$"..ld |
|000018b0| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 69 |(ix+0),a|...inc i|
|000018c0| 78 0d 09 6c 64 20 68 6c | 2c 69 6e 74 5f 62 75 66 |x..ld hl|,int_buf|
|000018d0| 66 0d 09 6c 64 20 62 2c | 34 0d 77 74 6c 6f 6f 70 |f..ld b,|4.wtloop|
|000018e0| 09 6c 64 20 61 2c 28 68 | 6c 29 0d 00 09 6c 64 20 |.ld a,(h|l)...ld |
|000018f0| 28 69 78 2b 30 29 2c 61 | 0d 00 09 69 6e 63 20 68 |(ix+0),a|...inc h|
|00001900| 6c 0d 09 69 6e 63 20 69 | 78 0d 09 64 6a 6e 7a 20 |l..inc i|x..djnz |
|00001910| 77 74 6c 6f 6f 70 0d 00 | 09 6c 64 20 61 2c 28 63 |wtloop..|.ld a,(c|
|00001920| 6f 6d 6d 61 5f 63 6f 75 | 6e 74 29 0d 09 63 70 20 |omma_cou|nt)..cp |
|00001930| 6c 69 6e 65 5f 6c 65 6e | 67 74 68 0d 09 6a 72 20 |line_len|gth..jr |
|00001940| 63 2c 77 72 69 74 65 5f | 63 6f 6d 6d 61 32 0d 00 |c,write_|comma2..|
|00001950| 09 63 61 6c 6c 20 6e 65 | 77 5f 6c 69 6e 65 09 09 |.call ne|w_line..|
|00001960| 0d 00 09 72 65 74 0d 00 | 0d 00 77 72 69 74 65 5f |...ret..|..write_|
|00001970| 63 6f 6d 6d 61 32 0d 00 | 09 6c 64 20 61 2c 22 2c |comma2..|.ld a,",|
|00001980| 22 0d 74 6f 5f 74 65 78 | 74 32 09 6c 64 20 28 69 |".to_tex|t2.ld (i|
|00001990| 78 2b 30 29 2c 61 0d 00 | 09 69 6e 63 20 69 78 0d |x+0),a..|.inc ix.|
|000019a0| 09 6c 64 20 61 2c 28 63 | 6f 6d 6d 61 5f 63 6f 75 |.ld a,(c|omma_cou|
|000019b0| 6e 74 29 0d 09 69 6e 63 | 20 61 0d 00 09 6c 64 20 |nt)..inc| a...ld |
|000019c0| 28 63 6f 6d 6d 61 5f 63 | 6f 75 6e 74 29 2c 61 0d |(comma_c|ount),a.|
|000019d0| 09 72 65 74 09 09 3b 66 | 69 6e 69 73 68 0d 0d 00 |.ret..;f|inish...|
|000019e0| 3b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;*******|********|
|000019f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001a00| 2a 2a 2a 2a 0d 00 77 72 | 69 74 65 5f 65 6e 64 3a |****..wr|ite_end:|
|00001a10| 0d 00 09 6c 64 20 69 78 | 2c 28 64 65 73 74 5f 70 |...ld ix|,(dest_p|
|00001a20| 6f 69 6e 74 65 72 29 0d | 09 3b 20 20 65 72 61 73 |ointer).|.; eras|
|00001a30| 65 20 6c 61 73 74 20 63 | 6f 6d 6d 61 0d 00 09 6c |e last c|omma...l|
|00001a40| 64 20 61 2c 28 69 78 2d | 31 29 0d 00 09 63 70 20 |d a,(ix-|1)...cp |
|00001a50| 22 2c 22 0d 09 6a 72 20 | 6e 7a 2c 77 6a 31 0d 00 |","..jr |nz,wj1..|
|00001a60| 09 6c 64 20 61 2c 22 20 | 22 0d 09 6c 64 20 28 69 |.ld a," |"..ld (i|
|00001a70| 78 2d 31 29 2c 61 0d 00 | 77 6a 31 0d 09 6c 64 20 |x-1),a..|wj1..ld |
|00001a80| 64 65 2c 28 64 65 73 74 | 5f 70 6f 69 6e 74 65 72 |de,(dest|_pointer|
|00001a90| 29 0d 09 6c 64 20 68 6c | 2c 65 6e 64 5f 6d 65 73 |)..ld hl|,end_mes|
|00001aa0| 73 0d 09 6c 64 20 62 63 | 2c 31 38 0d 09 6c 64 69 |s..ld bc|,18..ldi|
|00001ab0| 72 0d 09 6c 64 20 61 2c | 64 0d 09 6c 64 20 28 64 |r..ld a,|d..ld (d|
|00001ac0| 65 6e 64 29 2c 61 0d 00 | 09 6c 64 20 61 2c 65 0d |end),a..|.ld a,e.|
|00001ad0| 09 6c 64 20 28 64 65 6e | 64 2b 31 29 2c 61 09 3b |.ld (den|d+1),a.;|
|00001ae0| 64 61 74 61 20 65 6e 64 | 20 73 74 6f 72 65 64 20 |data end| stored |
|00001af0| 6e 6f 72 6d 61 6c 6c 79 | 20 66 6f 72 20 72 65 66 |normally| for ref|
|00001b00| 2e 0d 09 72 65 74 0d 00 | 0d 00 0d 00 65 6e 64 5f |...ret..|....end_|
|00001b10| 6d 65 73 73 09 64 65 66 | 62 09 30 64 68 2c 30 61 |mess.def|b.0dh,0a|
|00001b20| 68 2c 30 39 68 0d 09 64 | 65 66 6d 20 22 64 63 2e |h,09h..d|efm "dc.|
|00001b30| 62 20 6d 2c 65 6e 64 5f | 70 61 74 74 22 0d 0d 00 |b m,end_|patt"...|
|00001b40| 3b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;*******|********|
|00001b50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001b60| 2a 2a 2a 2a 2a 0d 3b 20 | 64 69 76 69 64 65 6e 64 |*****.; |dividend|
|00001b70| 20 69 6e 20 61 63 0d 00 | 3b 20 64 69 76 69 73 6f | in ac..|; diviso|
|00001b80| 72 20 69 6e 20 64 65 0d | 3b 20 61 6e 73 77 65 72 |r in de.|; answer|
|00001b90| 20 69 6e 20 61 63 0d 00 | 3b 20 72 65 6d 61 69 6e | in ac..|; remain|
|00001ba0| 64 65 72 20 69 6e 20 68 | 6c 0d 0d 00 0d 00 64 69 |der in h|l.....di|
|00001bb0| 76 31 36 0d 09 6c 64 20 | 68 6c 2c 30 0d 00 09 6c |v16..ld |hl,0...l|
|00001bc0| 64 20 62 2c 31 36 0d 00 | 6c 6f 6f 70 31 36 09 72 |d b,16..|loop16.r|
|00001bd0| 6c 09 63 0d 09 72 6c 61 | 0d 00 09 61 64 63 20 68 |l.c..rla|...adc h|
|00001be0| 6c 2c 68 6c 0d 00 09 73 | 62 63 20 68 6c 2c 64 65 |l,hl...s|bc hl,de|
|00001bf0| 0d 00 09 6a 72 20 6e 63 | 2c 24 2b 33 0d 00 09 61 |...jr nc|,$+3...a|
|00001c00| 64 64 20 68 6c 2c 64 65 | 0d 00 09 63 63 66 0d 00 |dd hl,de|...ccf..|
|00001c10| 09 64 6a 6e 7a 20 6c 6f | 6f 70 31 36 0d 00 09 72 |.djnz lo|op16...r|
|00001c20| 6c 09 63 0d 09 72 6c 61 | 0d 00 09 72 65 74 0d 00 |l.c..rla|...ret..|
|00001c30| 3b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;*******|********|
|00001c40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001c50| 2a 0d 6d 75 6c 74 31 32 | 38 0d 09 6c 64 20 65 2c |*.mult12|8..ld e,|
|00001c60| 31 32 38 0d 09 3b 61 20 | 3d 20 6e 75 6d 62 65 72 |128..;a |= number|
|00001c70| 20 74 6f 20 6d 75 6c 74 | 20 62 79 20 31 32 38 0d | to mult| by 128.|
|00001c80| 09 6c 64 20 6c 2c 30 0d | 09 6c 64 20 68 2c 61 0d |.ld l,0.|.ld h,a.|
|00001c90| 09 6c 64 20 64 2c 30 0d | 09 6c 64 20 62 2c 38 0d |.ld d,0.|.ld b,8.|
|00001ca0| 6d 75 6c 74 09 61 64 64 | 20 68 6c 2c 68 6c 0d 00 |mult.add| hl,hl..|
|00001cb0| 09 6a 72 20 6e 63 2c 6e | 6f 61 64 64 0d 00 09 61 |.jr nc,n|oadd...a|
|00001cc0| 64 64 20 68 6c 2c 64 65 | 0d 00 6e 6f 61 64 64 09 |dd hl,de|..noadd.|
|00001cd0| 64 6a 6e 7a 20 6d 75 6c | 74 0d 09 72 65 74 0d 00 |djnz mul|t..ret..|
|00001ce0| 3b 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;*******|********|
|00001cf0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 6d 75 |********|*****.mu|
|00001d00| 6c 74 31 36 0d 00 0d 00 | 09 09 3b 72 65 74 75 72 |lt16....|..;retur|
|00001d10| 6e 73 20 61 6e 73 77 65 | 72 20 69 6e 20 68 6c 0d |ns answe|r in hl.|
|00001d20| 0d 00 09 09 3b 68 6c 20 | 3d 20 6f 6e 65 20 76 61 |....;hl |= one va|
|00001d30| 6c 20 64 65 20 74 68 65 | 20 6f 74 68 65 72 0d 00 |l de the| other..|
|00001d40| 09 6c 64 20 63 2c 68 0d | 09 6c 64 20 61 2c 6c 0d |.ld c,h.|.ld a,l.|
|00001d50| 09 09 3b 63 20 3d 20 68 | 69 67 68 0d 09 09 3b 61 |..;c = h|igh...;a|
|00001d60| 20 3d 20 6c 6f 77 0d 00 | 09 6c 64 20 62 2c 31 36 | = low..|.ld b,16|
|00001d70| 0d 00 09 6c 64 20 68 6c | 2c 30 0d 00 6d 75 6c 74 |...ld hl|,0..mult|
|00001d80| 31 36 6c 0d 09 73 72 6c | 20 63 0d 00 09 72 72 61 |16l..srl| c...rra|
|00001d90| 0d 00 09 6a 72 09 6e 63 | 2c 6e 6f 61 64 64 31 36 |...jr.nc|,noadd16|
|00001da0| 0d 00 09 61 64 64 20 68 | 6c 2c 64 65 0d 00 6e 6f |...add h|l,de..no|
|00001db0| 61 64 64 31 36 09 65 78 | 20 64 65 2c 68 6c 0d 00 |add16.ex| de,hl..|
|00001dc0| 09 61 64 64 20 68 6c 2c | 68 6c 0d 00 09 65 78 20 |.add hl,|hl...ex |
|00001dd0| 64 65 2c 68 6c 0d 09 64 | 6a 6e 7a 20 6d 75 6c 74 |de,hl..d|jnz mult|
|00001de0| 31 36 6c 0d 09 72 65 74 | 09 0d 3b 2a 2a 2a 2a 2a |16l..ret|..;*****|
|00001df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001e00| 2a 2a 2a 2a 2a 2a 0d 00 | 0d 00 72 65 73 74 5f 6d |******..|..rest_m|
|00001e10| 65 73 73 0d 09 64 65 66 | 6d 20 22 72 65 73 74 2c |ess..def|m "rest,|
|00001e20| 22 0d 0d 00 09 0d 0d 00 | 0d 00 0d 00 0d 00 0d 00 |".......|........|
|00001e30| 0d 00 0d 00 0d 00 0d 00 | 0d 00 0d 00 0d 00 93 0d |........|........|
|00001e40| 0d 00 0d 00 0d 00 0d 00 | 0d 00 0d 00 0d 00 0d 00 |........|........|
|00001e50| 0d 00 | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
