/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume6 / glib / part08

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4e 65 77 73 67 72 6f 75 | 70 73 3a 20 63 6f 6d 70 |Newsgrou|ps: comp|
|00000010| 2e 73 6f 75 72 63 65 73 | 2e 6d 69 73 63 0a 46 72 |.sources|.misc.Fr|
|00000020| 6f 6d 3a 20 61 6c 6c 62 | 65 72 79 40 75 75 6e 65 |om: allb|ery@uune|
|00000030| 74 2e 55 55 2e 4e 45 54 | 20 28 42 72 61 6e 64 6f |t.UU.NET| (Brando|
|00000040| 6e 20 53 2e 20 41 6c 6c | 62 65 72 79 20 2d 20 63 |n S. All|bery - c|
|00000050| 6f 6d 70 2e 73 6f 75 72 | 63 65 73 2e 6d 69 73 63 |omp.sour|ces.misc|
|00000060| 29 0a 53 75 62 6a 65 63 | 74 3a 20 76 30 36 69 31 |).Subjec|t: v06i1|
|00000070| 30 39 3a 20 67 6c 69 62 | 20 70 61 72 74 20 38 20 |09: glib| part 8 |
|00000080| 6f 66 20 31 35 0a 52 65 | 70 6c 79 2d 54 6f 3a 20 |of 15.Re|ply-To: |
|00000090| 6c 65 65 40 75 68 63 63 | 75 78 2e 75 68 63 63 2e |lee@uhcc|ux.uhcc.|
|000000a0| 48 61 77 61 69 69 2e 45 | 64 75 20 28 47 72 65 67 |Hawaii.E|du (Greg|
|000000b0| 20 4c 65 65 20 29 0a 0a | 50 6f 73 74 69 6e 67 2d | Lee )..|Posting-|
|000000c0| 6e 75 6d 62 65 72 3a 20 | 56 6f 6c 75 6d 65 20 36 |number: |Volume 6|
|000000d0| 2c 20 49 73 73 75 65 20 | 31 30 39 0a 53 75 62 6d |, Issue |109.Subm|
|000000e0| 69 74 74 65 64 2d 62 79 | 3a 20 6c 65 65 40 75 68 |itted-by|: lee@uh|
|000000f0| 63 63 75 78 2e 75 68 63 | 63 2e 48 61 77 61 69 69 |ccux.uhc|c.Hawaii|
|00000100| 2e 45 64 75 20 28 47 72 | 65 67 20 4c 65 65 20 29 |.Edu (Gr|eg Lee )|
|00000110| 0a 41 72 63 68 69 76 65 | 2d 6e 61 6d 65 3a 20 67 |.Archive|-name: g|
|00000120| 6c 69 62 2f 70 61 72 74 | 30 38 0a 0a 23 21 20 2f |lib/part|08..#! /|
|00000130| 62 69 6e 2f 73 68 0a 23 | 20 54 68 69 73 20 69 73 |bin/sh.#| This is|
|00000140| 20 61 20 73 68 65 6c 6c | 20 61 72 63 68 69 76 65 | a shell| archive|
|00000150| 2e 20 20 52 65 6d 6f 76 | 65 20 61 6e 79 74 68 69 |.  Remov|e anythi|
|00000160| 6e 67 20 62 65 66 6f 72 | 65 20 74 68 69 73 20 6c |ng befor|e this l|
|00000170| 69 6e 65 2c 20 74 68 65 | 6e 20 75 6e 70 61 63 6b |ine, the|n unpack|
|00000180| 0a 23 20 69 74 20 62 79 | 20 73 61 76 69 6e 67 20 |.# it by| saving |
|00000190| 69 74 20 69 6e 74 6f 20 | 61 20 66 69 6c 65 20 61 |it into |a file a|
|000001a0| 6e 64 20 74 79 70 69 6e | 67 20 22 73 68 20 66 69 |nd typin|g "sh fi|
|000001b0| 6c 65 22 2e 20 20 54 6f | 20 6f 76 65 72 77 72 69 |le".  To| overwri|
|000001c0| 74 65 20 65 78 69 73 74 | 69 6e 67 0a 23 20 66 69 |te exist|ing.# fi|
|000001d0| 6c 65 73 2c 20 74 79 70 | 65 20 22 73 68 20 66 69 |les, typ|e "sh fi|
|000001e0| 6c 65 20 2d 63 22 2e 20 | 20 59 6f 75 20 63 61 6e |le -c". | You can|
|000001f0| 20 61 6c 73 6f 20 66 65 | 65 64 20 74 68 69 73 20 | also fe|ed this |
|00000200| 61 73 20 73 74 61 6e 64 | 61 72 64 20 69 6e 70 75 |as stand|ard inpu|
|00000210| 74 20 76 69 61 0a 23 20 | 75 6e 73 68 61 72 2c 20 |t via.# |unshar, |
|00000220| 6f 72 20 62 79 20 74 79 | 70 69 6e 67 20 22 73 68 |or by ty|ping "sh|
|00000230| 20 3c 66 69 6c 65 22 2c | 20 65 2e 67 2e 2e 20 20 | <file",| e.g..  |
|00000240| 49 66 20 74 68 69 73 20 | 61 72 63 68 69 76 65 20 |If this |archive |
|00000250| 69 73 20 63 6f 6d 70 6c | 65 74 65 2c 20 79 6f 75 |is compl|ete, you|
|00000260| 0a 23 20 77 69 6c 6c 20 | 73 65 65 20 74 68 65 20 |.# will |see the |
|00000270| 66 6f 6c 6c 6f 77 69 6e | 67 20 6d 65 73 73 61 67 |followin|g messag|
|00000280| 65 20 61 74 20 74 68 65 | 20 65 6e 64 3a 0a 23 09 |e at the| end:.#.|
|00000290| 09 22 45 6e 64 20 6f 66 | 20 61 72 63 68 69 76 65 |."End of| archive|
|000002a0| 20 38 20 28 6f 66 20 31 | 35 29 2e 22 0a 23 20 43 | 8 (of 1|5).".# C|
|000002b0| 6f 6e 74 65 6e 74 73 3a | 20 20 64 65 70 35 2e 6d |ontents:|  dep5.m|
|000002c0| 6e 75 20 6d 61 63 2d 6d | 64 72 2e 61 20 74 78 38 |nu mac-m|dr.a tx8|
|000002d0| 31 70 2e 6d 6e 75 0a 23 | 20 57 72 61 70 70 65 64 |1p.mnu.#| Wrapped|
|000002e0| 20 62 79 20 6c 65 65 40 | 75 68 63 63 75 78 20 6f | by lee@|uhccux o|
|000002f0| 6e 20 53 75 6e 20 4d 61 | 79 20 20 37 20 30 30 3a |n Sun Ma|y  7 00:|
|00000300| 34 30 3a 31 35 20 31 39 | 38 39 0a 50 41 54 48 3d |40:15 19|89.PATH=|
|00000310| 2f 62 69 6e 3a 2f 75 73 | 72 2f 62 69 6e 3a 2f 75 |/bin:/us|r/bin:/u|
|00000320| 73 72 2f 75 63 62 20 3b | 20 65 78 70 6f 72 74 20 |sr/ucb ;| export |
|00000330| 50 41 54 48 0a 69 66 20 | 74 65 73 74 20 2d 66 20 |PATH.if |test -f |
|00000340| 27 64 65 70 35 2e 6d 6e | 75 27 20 2d 61 20 22 24 |'dep5.mn|u' -a "$|
|00000350| 7b 31 7d 22 20 21 3d 20 | 22 2d 63 22 20 3b 20 74 |{1}" != |"-c" ; t|
|00000360| 68 65 6e 20 0a 20 20 65 | 63 68 6f 20 73 68 61 72 |hen .  e|cho shar|
|00000370| 3a 20 57 69 6c 6c 20 6e | 6f 74 20 63 6c 6f 62 62 |: Will n|ot clobb|
|00000380| 65 72 20 65 78 69 73 74 | 69 6e 67 20 66 69 6c 65 |er exist|ing file|
|00000390| 20 5c 22 27 64 65 70 35 | 2e 6d 6e 75 27 5c 22 0a | \"'dep5|.mnu'\".|
|000003a0| 65 6c 73 65 0a 65 63 68 | 6f 20 73 68 61 72 3a 20 |else.ech|o shar: |
|000003b0| 45 78 74 72 61 63 74 69 | 6e 67 20 5c 22 27 64 65 |Extracti|ng \"'de|
|000003c0| 70 35 2e 6d 6e 75 27 5c | 22 20 5c 28 31 38 38 38 |p5.mnu'\|" \(1888|
|000003d0| 32 20 63 68 61 72 61 63 | 74 65 72 73 5c 29 0a 73 |2 charac|ters\).s|
|000003e0| 65 64 20 22 73 2f 5e 58 | 2f 2f 22 20 3e 27 64 65 |ed "s/^X|//" >'de|
|000003f0| 70 35 2e 6d 6e 75 27 20 | 3c 3c 27 45 4e 44 5f 4f |p5.mnu' |<<'END_O|
|00000400| 46 5f 46 49 4c 45 27 0a | 58 2f 2a 20 24 49 64 3a |F_FILE'.|X/* $Id:|
|00000410| 20 64 65 70 35 2e 6d 6e | 75 2c 76 20 31 2e 36 20 | dep5.mn|u,v 1.6 |
|00000420| 38 39 2f 30 35 2f 30 36 | 20 31 37 3a 31 33 3a 32 |89/05/06| 17:13:2|
|00000430| 30 20 6c 65 65 20 45 78 | 70 20 24 0a 58 20 2a 20 |0 lee Ex|p $.X * |
|00000440| 47 4c 49 42 20 2d 20 61 | 20 47 65 6e 65 72 69 63 |GLIB - a| Generic|
|00000450| 20 4c 49 42 72 61 72 69 | 61 6e 20 61 6e 64 20 65 | LIBrari|an and e|
|00000460| 64 69 74 6f 72 20 66 6f | 72 20 73 79 6e 74 68 73 |ditor fo|r synths|
|00000470| 0a 58 20 2a 0a 58 20 2a | 20 44 45 50 2d 35 20 72 |.X *.X *| DEP-5 r|
|00000480| 6f 75 74 69 6e 65 73 2e | 0a 58 20 2a 20 54 69 6d |outines.|.X * Tim|
|00000490| 20 54 68 6f 6d 70 73 6f | 6e 0a 58 20 2a 0a 58 20 | Thompso|n.X *.X |
|000004a0| 2a 20 54 68 65 20 44 45 | 50 2d 35 20 69 73 20 61 |* The DE|P-5 is a|
|000004b0| 20 6d 65 73 73 2c 20 74 | 68 65 20 63 6f 64 65 20 | mess, t|he code |
|000004c0| 62 65 6c 6f 77 20 69 73 | 20 6c 69 6b 65 77 69 73 |below is| likewis|
|000004d0| 65 2e 20 20 54 68 65 72 | 65 20 61 72 65 20 6f 6e |e.  Ther|e are on|
|000004e0| 6c 79 20 31 32 0a 58 20 | 2a 20 70 61 72 61 6d 65 |ly 12.X |* parame|
|000004f0| 74 65 72 73 20 6f 72 20 | 73 6f 2c 20 62 75 74 20 |ters or |so, but |
|00000500| 74 68 65 72 65 20 61 72 | 65 20 31 31 20 61 6c 67 |there ar|e 11 alg|
|00000510| 6f 72 69 74 68 6d 73 2c | 20 61 6e 64 20 64 69 66 |orithms,| and dif|
|00000520| 66 65 72 65 6e 74 20 70 | 61 72 61 6d 65 74 65 72 |ferent p|arameter|
|00000530| 73 0a 58 20 2a 20 68 61 | 76 65 20 64 69 66 66 65 |s.X * ha|ve diffe|
|00000540| 72 65 6e 74 20 6d 65 61 | 6e 69 6e 67 73 20 61 6e |rent mea|nings an|
|00000550| 64 20 72 61 6e 67 65 73 | 20 69 6e 20 65 61 63 68 |d ranges| in each|
|00000560| 20 61 6c 67 6f 72 69 74 | 68 6d 2e 20 20 41 6c 73 | algorit|hm.  Als|
|00000570| 6f 2c 20 74 68 65 20 64 | 69 73 70 6c 61 79 65 64 |o, the d|isplayed|
|00000580| 0a 58 20 2a 20 76 61 6c | 75 65 73 20 68 61 76 65 |.X * val|ues have|
|00000590| 20 4e 4f 20 72 65 67 75 | 6c 61 72 20 72 65 6c 61 | NO regu|lar rela|
|000005a0| 74 69 6f 6e 73 68 69 70 | 20 74 6f 20 74 68 65 20 |tionship| to the |
|000005b0| 62 79 74 65 20 76 61 6c | 75 65 73 20 6f 66 20 74 |byte val|ues of t|
|000005c0| 68 65 20 70 61 72 61 6d | 65 74 65 72 73 2c 0a 58 |he param|eters,.X|
|000005d0| 20 2a 20 68 65 6e 63 65 | 20 74 68 65 20 6e 65 65 | * hence| the nee|
|000005e0| 64 20 66 6f 72 20 61 6c | 6c 20 74 68 65 20 68 75 |d for al|l the hu|
|000005f0| 67 65 20 74 61 62 6c 65 | 73 2e 0a 58 20 2a 0a 58 |ge table|s..X *.X|
|00000600| 20 2a 20 6d 6f 64 69 66 | 69 63 61 74 69 6f 6e 73 | * modif|ications|
|00000610| 3a 20 47 72 65 67 20 4c | 65 65 0a 58 20 2a 20 24 |: Greg L|ee.X * $|
|00000620| 4c 6f 67 3a 09 64 65 70 | 35 2e 6d 6e 75 2c 76 20 |Log:.dep|5.mnu,v |
|00000630| 24 0a 58 20 2a 20 52 65 | 76 69 73 69 6f 6e 20 31 |$.X * Re|vision 1|
|00000640| 2e 36 20 20 38 39 2f 30 | 35 2f 30 36 20 20 31 37 |.6  89/0|5/06  17|
|00000650| 3a 31 33 3a 32 30 20 20 | 6c 65 65 0a 58 20 2a 20 |:13:20  |lee.X * |
|00000660| 72 65 6c 2e 20 74 6f 20 | 63 6f 6d 70 2e 73 6f 75 |rel. to |comp.sou|
|00000670| 72 63 65 73 2e 6d 69 73 | 63 0a 58 20 2a 20 0a 58 |rces.mis|c.X * .X|
|00000680| 20 2a 20 0a 58 20 2a 2f | 0a 58 0a 58 23 64 65 66 | * .X */|.X.X#def|
|00000690| 69 6e 65 20 4f 56 45 52 | 4c 41 59 32 0a 58 0a 58 |ine OVER|LAY2.X.X|
|000006a0| 23 69 6e 63 6c 75 64 65 | 20 22 67 6c 69 62 2e 68 |#include| "glib.h|
|000006b0| 22 0a 58 23 69 6e 63 6c | 75 64 65 20 3c 63 74 79 |".X#incl|ude <cty|
|000006c0| 70 65 2e 68 3e 0a 58 0a | 58 23 64 65 66 69 6e 65 |pe.h>.X.|X#define|
|000006d0| 20 44 45 50 35 56 53 49 | 5a 45 20 34 32 0a 58 23 | DEP5VSI|ZE 42.X#|
|000006e0| 64 65 66 69 6e 65 20 44 | 45 50 35 4e 53 49 5a 45 |define D|EP5NSIZE|
|000006f0| 20 31 36 0a 58 23 64 65 | 66 69 6e 65 20 44 45 50 | 16.X#de|fine DEP|
|00000700| 35 4e 56 4f 49 43 45 53 | 20 39 39 0a 58 23 64 65 |5NVOICES| 99.X#de|
|00000710| 66 69 6e 65 20 52 45 53 | 45 52 56 45 53 49 5a 45 |fine RES|ERVESIZE|
|00000720| 20 30 0a 58 0a 58 63 68 | 61 72 20 44 35 62 75 66 | 0.X.Xch|ar D5buf|
|00000730| 66 5b 31 36 5d 3b 0a 58 | 69 6e 74 20 41 6c 67 3b |f[16];.X|int Alg;|
|00000740| 09 2f 2a 20 63 75 72 72 | 65 6e 74 20 61 6c 67 6f |./* curr|ent algo|
|00000750| 72 69 74 68 6d 2c 20 30 | 2d 31 30 20 2a 2f 0a 58 |rithm, 0|-10 */.X|
|00000760| 0a 58 63 68 61 72 20 2a | 76 69 73 6e 75 6d 28 29 |.Xchar *|visnum()|
|00000770| 2c 20 2a 76 69 73 6f 6e | 6f 66 66 28 29 2c 20 2a |, *vison|off(), *|
|00000780| 76 69 73 6d 33 6e 75 6d | 28 29 2c 20 2a 76 69 73 |vism3num|(), *vis|
|00000790| 77 61 76 65 28 29 2c 20 | 2a 76 69 73 6d 6f 6e 6f |wave(), |*vismono|
|000007a0| 28 29 3b 0a 58 63 68 61 | 72 20 2a 76 69 73 64 35 |();.Xcha|r *visd5|
|000007b0| 61 6c 67 28 29 2c 20 2a | 76 69 73 64 63 72 28 29 |alg(), *|visdcr()|
|000007c0| 2c 20 2a 76 69 73 64 63 | 64 28 29 2c 20 2a 76 69 |, *visdc|d(), *vi|
|000007d0| 73 64 63 66 28 29 2c 20 | 2a 76 69 73 64 72 73 28 |sdcf(), |*visdrs(|
|000007e0| 29 2c 20 2a 76 69 73 64 | 35 70 64 28 29 3b 0a 58 |), *visd|5pd();.X|
|000007f0| 63 68 61 72 20 2a 76 69 | 73 64 35 72 74 28 29 2c |char *vi|sd5rt(),|
|00000800| 20 2a 76 69 73 64 35 68 | 66 28 29 2c 20 2a 76 69 | *visd5h|f(), *vi|
|00000810| 73 64 35 6e 6f 28 29 2c | 20 2a 76 69 73 64 35 71 |sd5no(),| *visd5q|
|00000820| 28 29 2c 20 2a 76 69 73 | 64 35 66 6d 28 29 2c 20 |(), *vis|d5fm(), |
|00000830| 2a 76 69 73 64 35 62 63 | 28 29 3b 0a 58 0a 58 73 |*visd5bc|();.X.Xs|
|00000840| 74 72 75 63 74 20 6e 75 | 6d 70 61 69 72 20 7b 0a |truct nu|mpair {.|
|00000850| 58 09 69 6e 74 20 6e 70 | 5f 62 79 74 65 3b 0a 58 |X.int np|_byte;.X|
|00000860| 09 69 6e 74 20 6e 70 5f | 76 61 6c 3b 0a 58 7d 3b |.int np_|val;.X};|
|00000870| 0a 58 0a 58 73 74 72 75 | 63 74 20 68 66 70 61 69 |.X.Xstru|ct hfpai|
|00000880| 72 20 7b 0a 58 09 73 68 | 6f 72 74 20 68 66 5f 62 |r {.X.sh|ort hf_b|
|00000890| 79 74 65 3b 0a 58 09 73 | 68 6f 72 74 20 68 66 5f |yte;.X.s|hort hf_|
|000008a0| 76 61 6c 3b 0a 58 7d 3b | 0a 58 0a 58 0a 58 23 64 |val;.X};|.X.X.X#d|
|000008b0| 65 66 69 6e 65 20 4e 55 | 4d 48 46 20 39 36 0a 58 |efine NU|MHF 96.X|
|000008c0| 23 64 65 66 69 6e 65 20 | 4e 55 4d 43 44 20 32 32 |#define |NUMCD 22|
|000008d0| 33 0a 58 23 64 65 66 69 | 6e 65 20 4e 55 4d 46 52 |3.X#defi|ne NUMFR|
|000008e0| 45 51 20 31 32 38 0a 58 | 23 64 65 66 69 6e 65 20 |EQ 128.X|#define |
|000008f0| 4e 55 4d 47 41 54 45 20 | 32 35 36 0a 58 23 64 65 |NUMGATE |256.X#de|
|00000900| 66 69 6e 65 20 4e 55 4d | 43 46 20 32 35 36 0a 58 |fine NUM|CF 256.X|
|00000910| 23 64 65 66 69 6e 65 20 | 4e 55 4d 43 52 20 39 37 |#define |NUMCR 97|
|00000920| 0a 58 23 64 65 66 69 6e | 65 20 4e 55 4d 4e 4c 52 |.X#defin|e NUMNLR|
|00000930| 54 20 31 35 31 0a 58 23 | 64 65 66 69 6e 65 20 4e |T 151.X#|define N|
|00000940| 55 4d 52 54 20 31 35 33 | 0a 58 23 64 65 66 69 6e |UMRT 153|.X#defin|
|00000950| 65 20 4e 55 4d 44 54 20 | 32 35 36 0a 58 23 64 65 |e NUMDT |256.X#de|
|00000960| 66 69 6e 65 20 4e 55 4d | 50 44 20 32 35 36 0a 58 |fine NUM|PD 256.X|
|00000970| 73 74 72 75 63 74 20 6e | 75 6d 70 61 69 72 20 2a |struct n|umpair *|
|00000980| 52 65 76 74 69 6d 65 3b | 0a 58 73 74 72 75 63 74 |Revtime;|.Xstruct|
|00000990| 20 6e 75 6d 70 61 69 72 | 20 2a 4e 6c 72 65 76 74 | numpair| *Nlrevt|
|000009a0| 69 6d 65 3b 0a 58 73 74 | 72 75 63 74 20 68 66 70 |ime;.Xst|ruct hfp|
|000009b0| 61 69 72 20 2a 48 66 3b | 0a 58 73 74 72 75 63 74 |air *Hf;|.Xstruct|
|000009c0| 20 6e 75 6d 70 61 69 72 | 20 2a 43 68 64 65 70 74 | numpair| *Chdept|
|000009d0| 68 3b 0a 58 73 74 72 75 | 63 74 20 6e 75 6d 70 61 |h;.Xstru|ct numpa|
|000009e0| 69 72 20 2a 43 68 72 61 | 74 65 3b 0a 58 69 6e 74 |ir *Chra|te;.Xint|
|000009f0| 20 2a 50 72 65 64 6c 79 | 3b 0a 58 69 6e 74 20 2a | *Predly|;.Xint *|
|00000a00| 43 68 66 65 65 64 3b 0a | 58 69 6e 74 20 2a 44 74 |Chfeed;.|Xint *Dt|
|00000a10| 69 6d 65 3b 0a 58 69 6e | 74 20 2a 46 72 65 71 6d |ime;.Xin|t *Freqm|
|00000a20| 69 64 3b 0a 58 69 6e 74 | 20 2a 47 61 74 65 74 69 |id;.Xint| *Gateti|
|00000a30| 6d 65 3b 0a 58 0a 58 2f | 2a 20 54 68 69 73 20 61 |me;.X.X/|* This a|
|00000a40| 72 72 61 79 20 63 6f 6e | 74 61 69 6e 73 20 61 72 |rray con|tains ar|
|00000a50| 62 69 74 72 61 72 79 20 | 73 63 72 65 65 6e 20 6c |bitrary |screen l|
|00000a60| 61 62 65 6c 73 20 2a 2f | 0a 58 73 74 72 75 63 74 |abels */|.Xstruct|
|00000a70| 20 6c 61 62 65 6c 69 6e | 66 6f 20 4c 64 65 70 35 | labelin|fo Ldep5|
|00000a80| 5b 5d 20 3d 20 7b 0a 58 | 23 4d 45 4e 55 0a 58 0a |[] = {.X|#MENU.X.|
|00000a90| 58 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X.X     |        |
|00000aa0| 20 20 20 20 41 6c 67 6f | 72 69 74 68 6d 20 25 0a |    Algo|rithm %.|
|00000ab0| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X       |        |
|00000ac0| 20 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0a 58 0a |  ======|=====.X.|
|00000ad0| 58 3c 45 71 75 61 6c 69 | 7a 65 72 3e 20 20 20 20 |X<Equali|zer>    |
|00000ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000af0| 20 20 20 3c 43 68 6f 72 | 75 73 3e 0a 58 20 20 20 |   <Chor|us>.X   |
|00000b00| 4f 75 74 70 75 74 20 4c | 65 76 65 6c 20 20 20 20 |Output L|evel    |
|00000b10| 20 20 20 20 25 20 20 20 | 20 20 20 20 20 20 20 20 |    %   |        |
|00000b20| 20 20 20 20 20 20 46 65 | 65 64 62 61 63 6b 20 6f |      Fe|edback o|
|00000b30| 66 20 43 68 6f 72 75 73 | 20 20 20 25 0a 58 20 20 |f Chorus|   %.X  |
|00000b40| 20 42 6f 6f 73 74 2f 43 | 75 74 20 6f 66 20 4c 6f | Boost/C|ut of Lo|
|00000b50| 77 20 20 20 20 25 20 20 | 20 20 20 20 20 20 20 20 |w    %  |        |
|00000b60| 20 20 20 20 20 20 20 52 | 61 74 65 20 6f 66 20 43 |       R|ate of C|
|00000b70| 68 6f 72 75 73 20 20 20 | 20 20 20 20 25 0a 58 20 |horus   |    %.X |
|00000b80| 20 20 42 6f 6f 73 74 2f | 43 75 74 20 6f 66 20 4d |  Boost/|Cut of M|
|00000b90| 69 64 20 20 20 20 25 20 | 20 20 20 20 20 20 20 20 |id    % |        |
|00000ba0| 20 20 20 20 20 20 20 20 | 44 65 70 74 68 20 6f 66 |        |Depth of|
|00000bb0| 20 43 68 6f 72 75 73 20 | 20 20 20 20 20 25 0a 58 | Chorus |     %.X|
|00000bc0| 20 20 20 42 6f 6f 73 74 | 2f 43 75 74 20 6f 66 20 |   Boost|/Cut of |
|00000bd0| 48 69 67 68 20 20 20 25 | 20 20 20 20 20 20 20 20 |High   %|        |
|00000be0| 20 20 3c 52 65 76 65 72 | 62 3e 0a 58 20 20 20 51 |  <Rever|b>.X   Q|
|00000bf0| 20 6f 66 20 4d 69 64 20 | 20 20 20 20 20 20 20 20 | of Mid |        |
|00000c00| 20 20 20 25 20 20 20 20 | 20 20 20 20 20 20 20 20 |   %    |        |
|00000c10| 20 20 20 20 20 50 72 65 | 2d 44 65 6c 61 79 20 20 |     Pre|-Delay  |
|00000c20| 20 20 20 20 20 20 20 20 | 20 20 25 0a 58 20 20 20 |        |  %.X   |
|00000c30| 46 72 65 71 20 28 4b 48 | 7a 29 20 6f 66 20 4d 69 |Freq (KH|z) of Mi|
|00000c40| 64 20 20 20 25 20 20 20 | 20 20 20 20 20 20 20 20 |d   %   |        |
|00000c50| 20 20 20 20 20 20 52 65 | 76 65 72 62 20 54 69 6d |      Re|verb Tim|
|00000c60| 65 20 20 20 20 20 20 20 | 20 20 20 25 0a 58 20 20 |e       |   %.X  |
|00000c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c90| 20 20 20 20 20 20 20 48 | 46 20 44 61 6d 70 69 6e |       H|F Dampin|
|00000ca0| 67 20 20 20 20 20 20 20 | 20 20 20 20 25 0a 58 2d |g       |    %.X-|
|00000cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2b 20 20 20 20 20 20 20 |--------|+       |
|00000cd0| 20 20 20 20 20 20 20 20 | 52 65 76 65 72 62 20 53 |        |Reverb S|
|00000ce0| 65 6c 65 63 74 69 6f 6e | 20 20 20 20 20 25 0a 58 |election|     %.X|
|00000cf0| 4e 20 2d 20 73 65 74 20 | 6e 61 6d 65 20 20 71 20 |N - set |name  q |
|00000d00| 2d 20 71 75 69 74 20 20 | 20 7c 20 20 20 20 20 20 |- quit  | |      |
|00000d10| 20 20 3c 4e 6f 6e 2d 4c | 69 6e 65 61 72 3e 0a 58 |  <Non-L|inear>.X|
|00000d20| 68 20 2d 20 6c 65 66 74 | 20 20 20 20 20 20 6a 20 |h - left|      j |
|00000d30| 2d 20 64 6f 77 6e 20 20 | 20 7c 0a 58 6b 20 2d 20 |- down  | |.Xk - |
|00000d40| 75 70 20 20 20 20 20 20 | 20 20 6c 20 2d 20 72 69 |up      |  l - ri|
|00000d50| 67 68 74 20 20 7c 0a 58 | 4a 20 2d 20 64 65 63 72 |ght  |.X|J - decr|
|00000d60| 20 20 20 20 20 20 4b 20 | 2d 20 69 6e 63 72 20 20 |      K |- incr  |
|00000d70| 20 7c 0a 58 73 70 61 63 | 65 20 3d 20 70 6c 61 79 | |.Xspac|e = play|
|00000d80| 20 61 75 74 6f 2d 6e 6f | 74 65 20 20 20 7c 0a 58 | auto-no|te   |.X|
|00000d90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000da0| 20 20 20 20 20 20 20 20 | 20 7c 20 20 20 20 20 20 |        | |      |
|00000db0| 20 20 3c 44 65 6c 61 79 | 3e 0a 58 41 75 74 6f 2d |  <Delay|>.XAuto-|
|00000dc0| 4e 6f 74 65 3a 20 20 20 | 20 20 20 20 20 20 20 20 |Note:   |        |
|00000dd0| 20 20 20 20 7c 0a 58 20 | 20 20 50 69 74 63 68 20 |    |.X |  Pitch |
|00000de0| 25 20 20 20 20 56 6f 6c | 20 20 25 20 20 20 20 20 |%    Vol|  %     |
|00000df0| 7c 0a 58 20 20 20 44 75 | 72 20 20 20 25 20 20 20 ||.X   Du|r   %   |
|00000e00| 20 43 68 61 6e 20 25 20 | 20 20 20 20 7c 0a 58 20 | Chan % |    |.X |
|00000e10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000e20| 20 20 20 20 20 20 20 20 | 7c 0a 58 23 45 4e 44 0a |        ||.X#END.|
|00000e30| 58 2d 31 2c 2d 31 2c 4e | 55 4c 4c 0a 58 7d 3b 0a |X-1,-1,N|ULL.X};.|
|00000e40| 58 0a 58 73 74 72 75 63 | 74 20 70 61 72 61 6d 69 |X.Xstruc|t parami|
|00000e50| 6e 66 6f 20 20 50 64 65 | 70 35 5b 5d 20 3d 20 20 |nfo  Pde|p5[] =  |
|00000e60| 7b 0a 58 2f 2a 0a 58 4e | 41 4d 45 09 09 54 59 50 |{.X/*.XN|AME..TYP|
|00000e70| 45 09 09 50 4f 53 09 4d | 41 58 09 4f 46 46 53 45 |E..POS.M|AX.OFFSE|
|00000e80| 54 09 4d 41 53 4b 09 53 | 48 49 46 54 09 41 44 48 |T.MASK.S|HIFT.ADH|
|00000e90| 4f 43 0a 58 20 2a 2f 0a | 58 23 4f 20 61 6c 67 6f |OC.X */.|X#O algo|
|00000ea0| 72 69 74 68 6d 09 64 35 | 61 6c 67 09 25 25 09 31 |rithm.d5|alg.%%.1|
|00000eb0| 30 09 30 0a 58 23 4f 20 | 63 68 6f 72 66 65 65 64 |0.0.X#O |chorfeed|
|00000ec0| 09 64 63 66 09 25 25 09 | 32 35 35 09 30 0a 58 23 |.dcf.%%.|255.0.X#|
|00000ed0| 4f 20 6f 75 74 6c 65 76 | 09 6e 75 6d 09 25 25 09 |O outlev|.num.%%.|
|00000ee0| 39 39 09 31 0a 58 23 4f | 20 63 68 6f 72 72 61 74 |99.1.X#O| chorrat|
|00000ef0| 65 09 64 63 72 09 25 25 | 09 39 36 09 30 0a 58 23 |e.dcr.%%|.96.0.X#|
|00000f00| 4f 20 6c 6f 77 66 69 6c | 74 09 64 35 62 63 09 25 |O lowfil|t.d5bc.%|
|00000f10| 25 09 32 34 09 30 0a 58 | 23 4f 20 63 68 6f 72 64 |%.24.0.X|#O chord|
|00000f20| 65 70 74 68 09 64 63 64 | 09 25 25 09 32 32 32 09 |epth.dcd|.%%.222.|
|00000f30| 30 0a 58 23 4f 20 6d 69 | 64 66 69 6c 74 09 64 35 |0.X#O mi|dfilt.d5|
|00000f40| 62 63 09 25 25 09 32 34 | 09 30 0a 58 23 4f 20 68 |bc.%%.24|.0.X#O h|
|00000f50| 69 67 68 66 69 6c 74 09 | 64 35 62 63 09 25 25 09 |ighfilt.|d5bc.%%.|
|00000f60| 32 34 09 30 0a 58 23 4f | 20 70 72 65 64 65 6c 61 |24.0.X#O| predela|
|00000f70| 79 09 64 35 70 64 09 25 | 25 09 32 35 35 09 30 0a |y.d5pd.%|%.255.0.|
|00000f80| 58 23 4f 20 71 09 09 64 | 35 71 09 25 25 09 39 30 |X#O q..d|5q.%%.90|
|00000f90| 09 32 0a 58 23 4f 20 72 | 65 76 65 72 62 74 69 6d |.2.X#O r|everbtim|
|00000fa0| 65 09 64 35 72 74 09 25 | 25 09 31 35 32 09 30 0a |e.d5rt.%|%.152.0.|
|00000fb0| 58 23 4f 20 66 72 65 71 | 6d 69 64 09 64 35 66 6d |X#O freq|mid.d5fm|
|00000fc0| 09 25 25 09 31 32 37 09 | 33 0a 58 23 4f 20 68 66 |.%%.127.|3.X#O hf|
|00000fd0| 64 61 6d 70 09 64 35 68 | 66 09 25 25 09 39 35 09 |damp.d5h|f.%%.95.|
|00000fe0| 30 0a 58 23 4f 20 72 65 | 76 65 72 62 73 65 6c 09 |0.X#O re|verbsel.|
|00000ff0| 64 72 73 09 25 25 09 32 | 31 09 30 0a 58 23 4f 20 |drs.%%.2|1.0.X#O |
|00001000| 61 75 74 6f 76 6f 6c 09 | 6e 75 6d 09 25 25 09 31 |autovol.|num.%%.1|
|00001010| 32 37 09 2d 36 33 0a 58 | 23 4f 20 61 75 74 6f 70 |27.-63.X|#O autop|
|00001020| 69 74 63 68 09 6e 75 6d | 09 25 25 09 31 32 37 09 |itch.num|.%%.127.|
|00001030| 2d 36 30 0a 58 23 4f 20 | 61 75 74 6f 63 68 61 6e |-60.X#O |autochan|
|00001040| 09 6e 75 6d 09 25 25 09 | 31 36 09 2d 31 09 2a 35 |.num.%%.|16.-1.*5|
|00001050| 0a 58 23 4f 20 61 75 74 | 6f 64 75 72 09 6e 75 6d |.X#O aut|odur.num|
|00001060| 09 25 25 09 32 30 09 2d | 35 09 2a 35 0a 58 4e 55 |.%%.20.-|5.*5.XNU|
|00001070| 4c 4c 2c 4e 55 4c 4c 2c | 2d 31 2c 2d 31 2c 2d 31 |LL,NULL,|-1,-1,-1|
|00001080| 2c 2d 31 2c 76 69 73 6e | 75 6d 2c 30 2c 30 2c 30 |,-1,visn|um,0,0,0|
|00001090| 2c 30 0a 58 7d 3b 0a 58 | 0a 58 0a 58 2f 2a 0a 58 |,0.X};.X|.X.X/*.X|
|000010a0| 20 2a 20 64 65 70 35 64 | 69 6e 0a 58 20 2a 0a 58 | * dep5d|in.X *.X|
|000010b0| 20 2a 20 54 61 6b 65 20 | 69 6e 66 6f 20 66 72 6f | * Take |info fro|
|000010c0| 6d 20 27 64 61 74 61 27 | 20 61 6e 64 20 73 74 75 |m 'data'| and stu|
|000010d0| 66 66 20 76 61 6c 75 65 | 73 20 69 6e 20 74 68 65 |ff value|s in the|
|000010e0| 20 50 20 61 72 72 61 79 | 2c 20 62 79 20 75 73 69 | P array|, by usi|
|000010f0| 6e 67 0a 58 20 2a 20 74 | 68 65 20 73 65 74 76 61 |ng.X * t|he setva|
|00001100| 6c 20 66 75 6e 63 74 69 | 6f 6e 6d 73 2e 0a 58 20 |l functi|onms..X |
|00001110| 2a 2f 0a 58 0a 58 64 65 | 70 35 64 69 6e 28 64 61 |*/.X.Xde|p5din(da|
|00001120| 74 61 29 0a 58 63 68 61 | 72 20 2a 64 61 74 61 3b |ta).Xcha|r *data;|
|00001130| 0a 58 7b 0a 58 09 69 6e | 69 74 64 70 35 28 29 3b |.X{.X.in|itdp5();|
|00001140| 0a 58 0a 58 09 41 6c 67 | 20 3d 20 64 35 61 6c 67 |.X.X.Alg| = d5alg|
|00001150| 69 6e 28 64 61 74 61 5b | 31 36 5d 20 7c 20 28 28 |in(data[|16] | ((|
|00001160| 64 61 74 61 5b 31 37 5d | 26 30 78 66 29 3c 3c 34 |data[17]|&0xf)<<4|
|00001170| 29 29 3b 0a 58 09 73 65 | 74 76 61 6c 28 22 61 6c |));.X.se|tval("al|
|00001180| 67 6f 72 69 74 68 6d 22 | 2c 20 41 6c 67 29 3b 0a |gorithm"|, Alg);.|
|00001190| 58 0a 58 09 73 65 74 76 | 61 6c 28 22 72 65 76 65 |X.X.setv|al("reve|
|000011a0| 72 62 73 65 6c 22 2c 64 | 61 74 61 5b 30 5d 29 3b |rbsel",d|ata[0]);|
|000011b0| 0a 58 09 73 65 74 76 61 | 6c 28 22 6f 75 74 6c 65 |.X.setva|l("outle|
|000011c0| 76 22 2c 64 61 74 61 5b | 31 5d 29 3b 0a 58 09 73 |v",data[|1]);.X.s|
|000011d0| 65 74 76 61 6c 28 22 71 | 22 2c 64 61 74 61 5b 32 |etval("q|",data[2|
|000011e0| 5d 29 3b 0a 58 09 73 65 | 74 76 61 6c 28 22 66 72 |]);.X.se|tval("fr|
|000011f0| 65 71 6d 69 64 22 2c 64 | 61 74 61 5b 33 5d 29 3b |eqmid",d|ata[3]);|
|00001200| 0a 58 09 2f 2a 20 74 68 | 65 73 65 20 70 61 72 61 |.X./* th|ese para|
|00001210| 6d 65 74 65 72 73 20 74 | 61 6b 65 20 75 70 20 32 |meters t|ake up 2|
|00001220| 20 62 79 74 65 73 20 28 | 34 62 69 74 73 20 69 6e | bytes (|4bits in|
|00001230| 20 65 61 63 68 29 20 2a | 2f 0a 58 09 73 65 74 76 | each) *|/.X.setv|
|00001240| 61 6c 28 22 6c 6f 77 66 | 69 6c 74 22 2c 20 64 35 |al("lowf|ilt", d5|
|00001250| 62 63 69 6e 28 64 61 74 | 61 5b 34 5d 20 7c 20 28 |bcin(dat|a[4] | (|
|00001260| 28 64 61 74 61 5b 35 5d | 26 30 78 66 29 3c 3c 34 |(data[5]|&0xf)<<4|
|00001270| 29 29 20 29 3b 0a 58 09 | 73 65 74 76 61 6c 28 22 |)) );.X.|setval("|
|00001280| 6d 69 64 66 69 6c 74 22 | 2c 20 64 35 62 63 69 6e |midfilt"|, d5bcin|
|00001290| 28 64 61 74 61 5b 36 5d | 20 7c 20 28 28 64 61 74 |(data[6]| | ((dat|
|000012a0| 61 5b 37 5d 26 30 78 66 | 29 3c 3c 34 29 29 20 29 |a[7]&0xf|)<<4)) )|
|000012b0| 3b 0a 58 09 73 65 74 76 | 61 6c 28 22 68 69 67 68 |;.X.setv|al("high|
|000012c0| 66 69 6c 74 22 2c 20 64 | 35 62 63 69 6e 28 64 61 |filt", d|5bcin(da|
|000012d0| 74 61 5b 38 5d 20 7c 20 | 28 28 64 61 74 61 5b 39 |ta[8] | |((data[9|
|000012e0| 5d 26 30 78 66 29 3c 3c | 34 29 29 20 29 3b 0a 58 |]&0xf)<<|4)) );.X|
|000012f0| 09 73 65 74 76 61 6c 28 | 22 63 68 6f 72 66 65 65 |.setval(|"chorfee|
|00001300| 64 22 2c 20 64 61 74 61 | 5b 31 30 5d 20 7c 20 28 |d", data|[10] | (|
|00001310| 28 64 61 74 61 5b 31 31 | 5d 26 30 78 66 29 3c 3c |(data[11|]&0xf)<<|
|00001320| 34 29 20 29 3b 0a 58 09 | 73 65 74 76 61 6c 28 22 |4) );.X.|setval("|
|00001330| 63 68 6f 72 72 61 74 65 | 22 2c 64 35 76 69 6e 28 |chorrate|",d5vin(|
|00001340| 43 68 72 61 74 65 2c 64 | 61 74 61 5b 31 32 5d 20 |Chrate,d|ata[12] |
|00001350| 7c 20 28 28 64 61 74 61 | 5b 31 33 5d 26 30 78 66 || ((data|[13]&0xf|
|00001360| 29 3c 3c 34 29 29 29 3b | 0a 58 09 73 65 74 76 61 |)<<4)));|.X.setva|
|00001370| 6c 28 22 63 68 6f 72 64 | 65 70 74 68 22 2c 64 35 |l("chord|epth",d5|
|00001380| 76 69 6e 28 43 68 64 65 | 70 74 68 2c 64 61 74 61 |vin(Chde|pth,data|
|00001390| 5b 31 34 5d 20 7c 20 28 | 28 64 61 74 61 5b 31 35 |[14] | (|(data[15|
|000013a0| 5d 26 30 78 66 29 3c 3c | 34 29 29 29 3b 0a 58 09 |]&0xf)<<|4)));.X.|
|000013b0| 73 65 74 76 61 6c 28 22 | 70 72 65 64 65 6c 61 79 |setval("|predelay|
|000013c0| 22 2c 20 64 61 74 61 5b | 31 38 5d 20 7c 20 28 28 |", data[|18] | ((|
|000013d0| 64 61 74 61 5b 31 39 5d | 26 30 78 66 29 3c 3c 34 |data[19]|&0xf)<<4|
|000013e0| 29 20 29 3b 0a 58 09 73 | 65 74 76 61 6c 28 22 72 |) );.X.s|etval("r|
|000013f0| 65 76 65 72 62 74 69 6d | 65 22 2c 20 64 35 72 74 |everbtim|e", d5rt|
|00001400| 69 6e 28 64 61 74 61 5b | 32 30 5d 20 7c 20 28 28 |in(data[|20] | ((|
|00001410| 64 61 74 61 5b 32 31 5d | 26 30 78 66 29 3c 3c 34 |data[21]|&0xf)<<4|
|00001420| 29 29 20 29 3b 0a 58 09 | 73 65 74 76 61 6c 28 22 |)) );.X.|setval("|
|00001430| 68 66 64 61 6d 70 22 2c | 20 64 35 68 66 69 6e 28 |hfdamp",| d5hfin(|
|00001440| 64 61 74 61 5b 32 32 5d | 20 7c 20 28 28 64 61 74 |data[22]| | ((dat|
|00001450| 61 5b 32 33 5d 26 30 78 | 66 29 3c 3c 34 29 29 20 |a[23]&0x|f)<<4)) |
|00001460| 29 3b 0a 58 0a 58 09 73 | 65 74 76 61 6c 28 22 61 |);.X.X.s|etval("a|
|00001470| 75 74 6f 63 68 61 6e 22 | 2c 43 68 61 6e 6e 65 6c |utochan"|,Channel|
|00001480| 29 3b 0a 58 0a 58 7d 0a | 58 0a 58 2f 2a 0a 58 20 |);.X.X}.|X.X/*.X |
|00001490| 2a 20 64 65 70 35 64 6f | 75 74 0a 58 20 2a 0a 58 |* dep5do|ut.X *.X|
|000014a0| 20 2a 20 54 61 6b 65 20 | 28 70 6f 73 73 69 62 6c | * Take |(possibl|
|000014b0| 79 20 63 68 61 6e 67 65 | 64 29 20 70 61 72 61 6d |y change|d) param|
|000014c0| 65 74 65 72 73 20 76 61 | 6c 75 65 73 20 6f 75 74 |eters va|lues out|
|000014d0| 20 6f 66 20 74 68 65 20 | 50 20 61 72 72 61 79 20 | of the |P array |
|000014e0| 61 6e 64 0a 58 20 2a 20 | 70 75 74 20 74 68 65 6d |and.X * |put them|
|000014f0| 20 62 61 63 6b 20 69 6e | 74 6f 20 27 64 61 74 61 | back in|to 'data|
|00001500| 27 2e 0a 58 20 2a 2f 0a | 58 0a 58 64 65 70 35 64 |'..X */.|X.Xdep5d|
|00001510| 6f 75 74 28 64 61 74 61 | 29 0a 58 63 68 61 72 20 |out(data|).Xchar |
|00001520| 2a 64 61 74 61 3b 0a 58 | 7b 0a 58 09 69 6e 74 20 |*data;.X|{.X.int |
|00001530| 6e 2c 20 61 6c 67 3b 0a | 58 0a 58 09 61 6c 67 20 |n, alg;.|X.X.alg |
|00001540| 3d 20 64 35 61 6c 67 6f | 75 74 28 67 65 74 76 61 |= d5algo|ut(getva|
|00001550| 6c 28 22 61 6c 67 6f 72 | 69 74 68 6d 22 29 29 3b |l("algor|ithm"));|
|00001560| 0a 58 09 64 61 74 61 5b | 31 36 5d 20 3d 20 61 6c |.X.data[|16] = al|
|00001570| 67 20 26 20 30 78 66 3b | 0a 58 09 64 61 74 61 5b |g & 0xf;|.X.data[|
|00001580| 31 37 5d 20 3d 20 28 61 | 6c 67 20 3e 3e 20 34 29 |17] = (a|lg >> 4)|
|00001590| 20 26 20 30 78 66 3b 0a | 58 0a 58 09 64 61 74 61 | & 0xf;.|X.X.data|
|000015a0| 5b 30 5d 20 3d 20 67 65 | 74 76 61 6c 28 22 72 65 |[0] = ge|tval("re|
|000015b0| 76 65 72 62 73 65 6c 22 | 29 3b 0a 58 09 64 61 74 |verbsel"|);.X.dat|
|000015c0| 61 5b 31 5d 20 3d 20 67 | 65 74 76 61 6c 28 22 6f |a[1] = g|etval("o|
|000015d0| 75 74 6c 65 76 22 29 3b | 0a 58 09 64 61 74 61 5b |utlev");|.X.data[|
|000015e0| 32 5d 20 3d 20 67 65 74 | 76 61 6c 28 22 71 22 29 |2] = get|val("q")|
|000015f0| 3b 0a 58 09 64 61 74 61 | 5b 33 5d 20 3d 20 67 65 |;.X.data|[3] = ge|
|00001600| 74 76 61 6c 28 22 66 72 | 65 71 6d 69 64 22 29 3b |tval("fr|eqmid");|
|00001610| 0a 58 0a 58 09 2f 2a 20 | 74 68 65 73 65 20 70 61 |.X.X./* |these pa|
|00001620| 72 61 6d 65 74 65 72 73 | 20 74 61 6b 65 20 75 70 |rameters| take up|
|00001630| 20 32 20 62 79 74 65 73 | 20 28 34 62 69 74 73 20 | 2 bytes| (4bits |
|00001640| 69 6e 20 65 61 63 68 29 | 20 2a 2f 0a 58 09 6e 20 |in each)| */.X.n |
|00001650| 3d 20 64 35 62 63 6f 75 | 74 28 67 65 74 76 61 6c |= d5bcou|t(getval|
|00001660| 28 22 6c 6f 77 66 69 6c | 74 22 29 29 3b 0a 58 09 |("lowfil|t"));.X.|
|00001670| 64 61 74 61 5b 34 5d 20 | 3d 20 6e 20 26 20 30 78 |data[4] |= n & 0x|
|00001680| 66 3b 0a 58 09 64 61 74 | 61 5b 35 5d 20 3d 20 28 |f;.X.dat|a[5] = (|
|00001690| 6e 20 3e 3e 20 34 29 20 | 26 20 30 78 66 3b 0a 58 |n >> 4) |& 0xf;.X|
|000016a0| 09 6e 20 3d 20 64 35 62 | 63 6f 75 74 28 67 65 74 |.n = d5b|cout(get|
|000016b0| 76 61 6c 28 22 6d 69 64 | 66 69 6c 74 22 29 29 3b |val("mid|filt"));|
|000016c0| 0a 58 09 64 61 74 61 5b | 36 5d 20 3d 20 6e 20 26 |.X.data[|6] = n &|
|000016d0| 20 30 78 66 3b 0a 58 09 | 64 61 74 61 5b 37 5d 20 | 0xf;.X.|data[7] |
|000016e0| 3d 20 28 6e 20 3e 3e 20 | 34 29 20 26 20 30 78 66 |= (n >> |4) & 0xf|
|000016f0| 3b 0a 58 09 6e 20 3d 20 | 64 35 62 63 6f 75 74 28 |;.X.n = |d5bcout(|
|00001700| 67 65 74 76 61 6c 28 22 | 68 69 67 68 66 69 6c 74 |getval("|highfilt|
|00001710| 22 29 29 3b 0a 58 09 64 | 61 74 61 5b 38 5d 20 3d |"));.X.d|ata[8] =|
|00001720| 20 6e 20 26 20 30 78 66 | 3b 0a 58 09 64 61 74 61 | n & 0xf|;.X.data|
|00001730| 5b 39 5d 20 3d 20 28 6e | 20 3e 3e 20 34 29 20 26 |[9] = (n| >> 4) &|
|00001740| 20 30 78 66 3b 0a 58 09 | 6e 20 3d 20 67 65 74 76 | 0xf;.X.|n = getv|
|00001750| 61 6c 28 22 63 68 6f 72 | 66 65 65 64 22 29 3b 0a |al("chor|feed");.|
|00001760| 58 09 64 61 74 61 5b 31 | 30 5d 20 3d 20 6e 20 26 |X.data[1|0] = n &|
|00001770| 20 30 78 66 3b 0a 58 09 | 64 61 74 61 5b 31 31 5d | 0xf;.X.|data[11]|
|00001780| 20 3d 20 28 6e 20 3e 3e | 20 34 29 20 26 20 30 78 | = (n >>| 4) & 0x|
|00001790| 66 3b 0a 58 09 6e 20 3d | 20 64 35 63 72 6f 75 74 |f;.X.n =| d5crout|
|000017a0| 28 67 65 74 76 61 6c 28 | 22 63 68 6f 72 72 61 74 |(getval(|"chorrat|
|000017b0| 65 22 29 29 3b 0a 58 09 | 64 61 74 61 5b 31 32 5d |e"));.X.|data[12]|
|000017c0| 20 3d 20 6e 20 26 20 30 | 78 66 3b 0a 58 09 64 61 | = n & 0|xf;.X.da|
|000017d0| 74 61 5b 31 33 5d 20 3d | 20 28 6e 20 3e 3e 20 34 |ta[13] =| (n >> 4|
|000017e0| 29 20 26 20 30 78 66 3b | 0a 58 09 6e 20 3d 20 64 |) & 0xf;|.X.n = d|
|000017f0| 35 63 64 6f 75 74 28 67 | 65 74 76 61 6c 28 22 63 |5cdout(g|etval("c|
|00001800| 68 6f 72 64 65 70 74 68 | 22 29 29 3b 0a 58 09 64 |hordepth|"));.X.d|
|00001810| 61 74 61 5b 31 34 5d 20 | 3d 20 6e 20 26 20 30 78 |ata[14] |= n & 0x|
|00001820| 66 3b 0a 58 09 64 61 74 | 61 5b 31 35 5d 20 3d 20 |f;.X.dat|a[15] = |
|00001830| 28 6e 20 3e 3e 20 34 29 | 20 26 20 30 78 66 3b 0a |(n >> 4)| & 0xf;.|
|00001840| 58 09 6e 20 3d 20 67 65 | 74 76 61 6c 28 22 70 72 |X.n = ge|tval("pr|
|00001850| 65 64 65 6c 61 79 22 29 | 3b 0a 58 09 64 61 74 61 |edelay")|;.X.data|
|00001860| 5b 31 38 5d 20 3d 20 6e | 20 26 20 30 78 66 3b 0a |[18] = n| & 0xf;.|
|00001870| 58 09 64 61 74 61 5b 31 | 39 5d 20 3d 20 28 6e 20 |X.data[1|9] = (n |
|00001880| 3e 3e 20 34 29 20 26 20 | 30 78 66 3b 0a 58 09 6e |>> 4) & |0xf;.X.n|
|00001890| 20 3d 20 64 35 72 74 6f | 75 74 28 67 65 74 76 61 | = d5rto|ut(getva|
|000018a0| 6c 28 22 72 65 76 65 72 | 62 74 69 6d 65 22 29 29 |l("rever|btime"))|
|000018b0| 3b 0a 58 09 64 61 74 61 | 5b 32 30 5d 20 3d 20 6e |;.X.data|[20] = n|
|000018c0| 20 26 20 30 78 66 3b 0a | 58 09 64 61 74 61 5b 32 | & 0xf;.|X.data[2|
|000018d0| 31 5d 20 3d 20 28 6e 20 | 3e 3e 20 34 29 20 26 20 |1] = (n |>> 4) & |
|000018e0| 30 78 66 3b 0a 58 09 6e | 20 3d 20 64 35 68 66 6f |0xf;.X.n| = d5hfo|
|000018f0| 75 74 28 67 65 74 76 61 | 6c 28 22 68 66 64 61 6d |ut(getva|l("hfdam|
|00001900| 70 22 29 29 3b 0a 58 09 | 64 61 74 61 5b 32 32 5d |p"));.X.|data[22]|
|00001910| 20 3d 20 6e 20 26 20 30 | 78 66 3b 0a 58 09 64 61 | = n & 0|xf;.X.da|
|00001920| 74 61 5b 32 33 5d 20 3d | 20 28 6e 20 3e 3e 20 34 |ta[23] =| (n >> 4|
|00001930| 29 20 26 20 30 78 66 3b | 0a 58 0a 58 09 43 68 61 |) & 0xf;|.X.X.Cha|
|00001940| 6e 6e 65 6c 20 3d 20 67 | 65 74 76 61 6c 28 22 61 |nnel = g|etval("a|
|00001950| 75 74 6f 63 68 61 6e 22 | 29 3b 0a 58 7d 0a 58 0a |utochan"|);.X}.X.|
|00001960| 58 2f 2a 0a 58 20 2a 20 | 64 65 70 35 73 65 64 69 |X/*.X * |dep5sedi|
|00001970| 74 0a 58 20 2a 0a 58 20 | 2a 20 53 65 6e 64 20 61 |t.X *.X |* Send a|
|00001980| 20 73 69 6e 67 6c 65 20 | 76 6f 69 63 65 20 74 6f | single |voice to|
|00001990| 20 74 68 65 20 65 64 69 | 74 20 62 75 66 66 65 72 | the edi|t buffer|
|000019a0| 20 6f 66 20 74 68 65 20 | 64 65 70 35 2e 0a 58 20 | of the |dep5..X |
|000019b0| 2a 2f 0a 58 64 65 70 35 | 73 65 64 69 74 28 64 61 |*/.Xdep5|sedit(da|
|000019c0| 74 61 29 0a 58 63 68 61 | 72 20 2a 64 61 74 61 3b |ta).Xcha|r *data;|
|000019d0| 0a 58 7b 0a 58 09 64 65 | 70 35 70 61 72 6d 73 28 |.X{.X.de|p5parms(|
|000019e0| 64 61 74 61 29 3b 0a 58 | 7d 0a 58 0a 58 64 65 70 |data);.X|}.X.Xdep|
|000019f0| 35 70 61 72 6d 73 28 64 | 61 74 61 29 0a 58 63 68 |5parms(d|ata).Xch|
|00001a00| 61 72 20 2a 64 61 74 61 | 3b 0a 58 7b 0a 58 09 69 |ar *data|;.X{.X.i|
|00001a10| 6e 74 20 6e 3b 0a 58 0a | 58 09 73 65 6e 64 6d 69 |nt n;.X.|X.sendmi|
|00001a20| 64 69 28 30 78 66 30 29 | 3b 0a 58 09 73 65 6e 64 |di(0xf0)|;.X.send|
|00001a30| 6d 69 64 69 28 30 78 34 | 31 29 3b 09 09 2f 2a 20 |midi(0x4|1);../* |
|00001a40| 52 6f 6c 61 6e 64 20 2a | 2f 0a 58 09 73 65 6e 64 |Roland *|/.X.send|
|00001a50| 6d 69 64 69 28 30 78 33 | 35 29 3b 09 09 2f 2a 20 |midi(0x3|5);../* |
|00001a60| 6f 70 65 72 61 74 69 6f | 6e 20 63 6f 64 65 20 3d |operatio|n code =|
|00001a70| 20 41 50 52 20 28 61 6c | 6c 20 70 61 72 61 6d 65 | APR (al|l parame|
|00001a80| 74 65 72 73 29 20 2a 2f | 0a 58 09 73 65 6e 64 6d |ters) */|.X.sendm|
|00001a90| 69 64 69 28 43 68 61 6e | 6e 65 6c 2d 31 29 3b 09 |idi(Chan|nel-1);.|
|00001aa0| 2f 2a 20 4d 49 44 49 20 | 63 68 61 6e 6e 65 6c 20 |/* MIDI |channel |
|00001ab0| 2a 2f 0a 58 09 73 65 6e | 64 6d 69 64 69 28 30 78 |*/.X.sen|dmidi(0x|
|00001ac0| 35 32 29 3b 09 09 2f 2a | 20 66 6f 72 6d 61 74 20 |52);../*| format |
|00001ad0| 74 79 70 65 20 2a 2f 0a | 58 09 73 65 6e 64 6d 69 |type */.|X.sendmi|
|00001ae0| 64 69 28 30 78 32 30 29 | 3b 09 09 2f 2a 20 6c 65 |di(0x20)|;../* le|
|00001af0| 76 65 6c 20 23 20 3d 20 | 31 20 2a 2f 0a 58 09 73 |vel # = |1 */.X.s|
|00001b00| 65 6e 64 6d 69 64 69 28 | 30 78 30 31 29 3b 09 09 |endmidi(|0x01);..|
|00001b10| 2f 2a 20 67 72 6f 75 70 | 20 23 20 3d 20 31 20 2a |/* group| # = 1 *|
|00001b20| 2f 0a 58 09 2f 2a 20 73 | 65 6e 64 20 32 34 20 62 |/.X./* s|end 24 b|
|00001b30| 79 74 65 73 20 6f 66 20 | 70 61 72 61 6d 65 74 65 |ytes of |paramete|
|00001b40| 72 20 69 6e 66 6f 20 2a | 2f 0a 58 09 66 6f 72 20 |r info *|/.X.for |
|00001b50| 28 20 6e 3d 30 3b 20 6e | 3c 32 34 3b 20 6e 2b 2b |( n=0; n|<24; n++|
|00001b60| 20 29 20 7b 0a 58 09 09 | 73 65 6e 64 6d 69 64 69 | ) {.X..|sendmidi|
|00001b70| 28 28 69 6e 74 29 28 64 | 61 74 61 5b 6e 5d 29 29 |((int)(d|ata[n]))|
|00001b80| 3b 0a 58 09 7d 0a 58 09 | 73 65 6e 64 6d 69 64 69 |;.X.}.X.|sendmidi|
|00001b90| 28 45 4f 58 29 3b 0a 58 | 7d 0a 58 0a 58 2f 2a 20 |(EOX);.X|}.X.X/* |
|00001ba0| 64 65 70 35 6e 6f 66 20 | 2d 20 72 65 74 75 72 6e |dep5nof |- return|
|00001bb0| 20 61 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 74 68 | a point|er to th|
|00001bc0| 65 20 76 6f 69 63 65 20 | 6e 61 6d 65 20 62 75 72 |e voice |name bur|
|00001bd0| 69 65 64 20 69 6e 20 64 | 61 74 61 20 2a 2f 0a 58 |ied in d|ata */.X|
|00001be0| 63 68 61 72 20 2a 0a 58 | 64 65 70 35 6e 6f 66 28 |char *.X|dep5nof(|
|00001bf0| 64 61 74 61 29 0a 58 63 | 68 61 72 20 2a 64 61 74 |data).Xc|har *dat|
|00001c00| 61 3b 0a 58 7b 0a 58 09 | 73 74 61 74 69 63 20 63 |a;.X{.X.|static c|
|00001c10| 68 61 72 20 63 75 72 72 | 62 75 66 66 5b 44 45 50 |har curr|buff[DEP|
|00001c20| 35 4e 53 49 5a 45 2b 31 | 5d 3b 0a 58 09 63 68 61 |5NSIZE+1|];.X.cha|
|00001c30| 72 20 2a 70 3b 0a 58 09 | 69 6e 74 20 6d 3b 0a 58 |r *p;.X.|int m;.X|
|00001c40| 0a 58 09 70 20 3d 20 63 | 75 72 72 62 75 66 66 3b |.X.p = c|urrbuff;|
|00001c50| 0a 58 09 66 6f 72 20 28 | 20 6d 3d 30 3b 20 6d 3c |.X.for (| m=0; m<|
|00001c60| 44 45 50 35 4e 53 49 5a | 45 3b 20 6d 2b 2b 20 29 |DEP5NSIZ|E; m++ )|
|00001c70| 0a 58 09 09 2a 70 2b 2b | 20 3d 20 64 61 74 61 5b |.X..*p++| = data[|
|00001c80| 32 34 2b 6d 5d 3b 0a 58 | 09 2a 70 20 3d 20 27 5c |24+m];.X|.*p = '\|
|00001c90| 30 27 3b 0a 58 09 72 65 | 74 75 72 6e 28 63 75 72 |0';.X.re|turn(cur|
|00001ca0| 72 62 75 66 66 29 3b 0a | 58 7d 0a 58 0a 58 2f 2a |rbuff);.|X}.X.X/*|
|00001cb0| 20 73 65 74 6e 61 6d 65 | 6f 66 20 2d 20 73 65 74 | setname|of - set|
|00001cc0| 20 74 68 65 20 76 6f 69 | 63 65 20 6e 61 6d 65 20 | the voi|ce name |
|00001cd0| 62 75 72 69 65 64 20 69 | 6e 20 64 61 74 61 20 74 |buried i|n data t|
|00001ce0| 6f 20 6e 61 6d 65 20 2a | 2f 0a 58 64 65 70 35 73 |o name *|/.Xdep5s|
|00001cf0| 6e 6f 66 28 64 61 74 61 | 2c 6e 61 6d 65 29 0a 58 |nof(data|,name).X|
|00001d00| 63 68 61 72 20 2a 64 61 | 74 61 3b 0a 58 63 68 61 |char *da|ta;.Xcha|
|00001d10| 72 20 2a 6e 61 6d 65 3b | 0a 58 7b 0a 58 09 63 68 |r *name;|.X{.X.ch|
|00001d20| 61 72 20 2a 70 3b 0a 58 | 09 69 6e 74 20 6d 3b 0a |ar *p;.X|.int m;.|
|00001d30| 58 0a 58 09 66 6f 72 20 | 28 20 70 3d 6e 61 6d 65 |X.X.for |( p=name|
|00001d40| 2c 6d 3d 30 3b 20 2a 70 | 21 3d 27 5c 30 27 20 26 |,m=0; *p|!='\0' &|
|00001d50| 26 20 6d 3c 44 45 50 35 | 4e 53 49 5a 45 3b 20 70 |& m<DEP5|NSIZE; p|
|00001d60| 2b 2b 2c 6d 2b 2b 20 29 | 0a 58 09 09 64 61 74 61 |++,m++ )|.X..data|
|00001d70| 5b 32 34 2b 6d 5d 20 3d | 20 2a 70 3b 0a 58 09 66 |[24+m] =| *p;.X.f|
|00001d80| 6f 72 20 28 20 3b 20 6d | 3c 44 45 50 35 4e 53 49 |or ( ; m|<DEP5NSI|
|00001d90| 5a 45 3b 20 6d 2b 2b 20 | 29 0a 58 09 09 64 61 74 |ZE; m++ |).X..dat|
|00001da0| 61 5b 32 34 2b 6d 5d 20 | 3d 20 27 5c 30 27 3b 0a |a[24+m] |= '\0';.|
|00001db0| 58 7d 0a 58 0a 58 2f 2a | 20 64 65 70 35 73 6f 6e |X}.X.X/*| dep5son|
|00001dc0| 65 20 2d 20 73 65 6e 64 | 20 61 6e 64 20 73 74 6f |e - send| and sto|
|00001dd0| 72 65 20 6f 6e 65 20 76 | 6f 69 63 65 20 2a 2f 0a |re one v|oice */.|
|00001de0| 58 64 65 70 35 73 6f 6e | 65 28 76 6f 69 63 65 6e |Xdep5son|e(voicen|
|00001df0| 75 6d 2c 64 61 74 61 29 | 0a 58 63 68 61 72 20 2a |um,data)|.Xchar *|
|00001e00| 64 61 74 61 3b 0a 58 7b | 0a 58 09 2f 2a 20 53 65 |data;.X{|.X./* Se|
|00001e10| 6e 64 20 74 68 65 20 70 | 61 72 61 6d 65 74 65 72 |nd the p|arameter|
|00001e20| 73 20 66 6f 72 20 74 68 | 69 73 20 76 6f 69 63 65 |s for th|is voice|
|00001e30| 2e 20 2a 2f 0a 58 09 64 | 65 70 35 70 61 72 6d 73 |. */.X.d|ep5parms|
|00001e40| 28 64 61 74 61 29 3b 0a | 58 0a 58 09 2f 2a 20 6e |(data);.|X.X./* n|
|00001e50| 6f 77 20 61 73 6b 20 69 | 74 20 74 6f 20 62 65 20 |ow ask i|t to be |
|00001e60| 73 74 6f 72 65 64 20 69 | 6e 74 6f 20 6d 65 6d 6f |stored i|nto memo|
|00001e70| 72 79 20 2a 2f 0a 58 09 | 73 65 6e 64 6d 69 64 69 |ry */.X.|sendmidi|
|00001e80| 28 30 78 66 30 29 3b 0a | 58 09 73 65 6e 64 6d 69 |(0xf0);.|X.sendmi|
|00001e90| 64 69 28 30 78 34 31 29 | 3b 09 09 2f 2a 20 52 6f |di(0x41)|;../* Ro|
|00001ea0| 6c 61 6e 64 20 2a 2f 0a | 58 09 73 65 6e 64 6d 69 |land */.|X.sendmi|
|00001eb0| 64 69 28 30 78 33 34 29 | 3b 09 09 2f 2a 20 6f 70 |di(0x34)|;../* op|
|00001ec0| 65 72 61 74 69 6f 6e 20 | 63 6f 64 65 20 3d 20 50 |eration |code = P|
|00001ed0| 47 52 20 28 70 72 6f 67 | 72 61 6d 20 23 29 20 2a |GR (prog|ram #) *|
|00001ee0| 2f 0a 58 09 73 65 6e 64 | 6d 69 64 69 28 43 68 61 |/.X.send|midi(Cha|
|00001ef0| 6e 6e 65 6c 2d 31 29 3b | 09 2f 2a 20 4d 49 44 49 |nnel-1);|./* MIDI|
|00001f00| 20 63 68 61 6e 6e 65 6c | 20 2a 2f 0a 58 09 73 65 | channel| */.X.se|
|00001f10| 6e 64 6d 69 64 69 28 30 | 78 35 32 29 3b 09 09 2f |ndmidi(0|x52);../|
|00001f20| 2a 20 66 6f 72 6d 61 74 | 20 74 79 70 65 20 2a 2f |* format| type */|
|00001f30| 0a 58 09 73 65 6e 64 6d | 69 64 69 28 30 78 32 30 |.X.sendm|idi(0x20|
|00001f40| 29 3b 09 09 2f 2a 20 6c | 65 76 65 6c 20 23 20 3d |);../* l|evel # =|
|00001f50| 20 31 20 2a 2f 0a 58 09 | 73 65 6e 64 6d 69 64 69 | 1 */.X.|sendmidi|
|00001f60| 28 30 78 30 30 29 3b 09 | 09 2f 2a 20 67 72 6f 75 |(0x00);.|./* grou|
|00001f70| 70 20 23 20 3d 20 30 20 | 2a 2f 0a 58 09 73 65 6e |p # = 0 |*/.X.sen|
|00001f80| 64 6d 69 64 69 28 30 78 | 30 30 29 3b 09 09 2f 2a |dmidi(0x|00);../*|
|00001f90| 20 65 78 74 65 6e 73 69 | 6f 6e 20 3d 20 30 20 2a | extensi|on = 0 *|
|00001fa0| 2f 0a 58 09 73 65 6e 64 | 6d 69 64 69 28 76 6f 69 |/.X.send|midi(voi|
|00001fb0| 63 65 6e 75 6d 20 26 20 | 30 78 37 66 29 3b 09 2f |cenum & |0x7f);./|
|00001fc0| 2a 20 6d 65 6d 6f 72 79 | 20 6e 75 6d 62 65 72 20 |* memory| number |
|00001fd0| 28 6d 69 6e 75 73 20 31 | 29 20 2a 2f 0a 58 09 73 |(minus 1|) */.X.s|
|00001fe0| 65 6e 64 6d 69 64 69 28 | 30 78 30 32 29 3b 09 09 |endmidi(|0x02);..|
|00001ff0| 2f 2a 20 77 72 69 74 69 | 6e 67 20 64 61 74 61 20 |/* writi|ng data |
|00002000| 74 6f 20 6d 65 6d 6f 72 | 79 20 2a 2f 0a 58 09 73 |to memor|y */.X.s|
|00002010| 65 6e 64 6d 69 64 69 28 | 45 4f 58 29 3b 0a 58 09 |endmidi(|EOX);.X.|
|00002020| 0a 58 09 52 65 61 73 6f | 6e 20 3d 20 22 22 3b 0a |.X.Reaso|n = "";.|
|00002030| 58 09 72 65 74 75 72 6e | 28 30 29 3b 09 2f 2a 20 |X.return|(0);./* |
|00002040| 63 61 6e 27 74 20 66 61 | 69 6c 20 2a 2f 0a 58 7d |can't fa|il */.X}|
|00002050| 0a 58 0a 58 63 68 61 72 | 20 2a 44 35 61 6c 67 5b |.X.Xchar| *D5alg[|
|00002060| 5d 20 3d 20 7b 0a 58 22 | 31 20 20 20 20 2d 2d 2d |] = {.X"|1    ---|
|00002070| 45 51 2d 2d 2d 43 68 6f | 72 75 73 2d 2d 2d 3c 7e |EQ---Cho|rus---<~|
|00002080| 75 2f 2d 2d 2d 2d 7e 64 | 7e 64 7e 6c 7e 6c 7e 6c |u/----~d|~d~l~l~l|
|00002090| 7e 6c 7e 6c 5c 5c 2d 2d | 2d 2d 22 2c 0a 58 22 32 |~l~l\\--|--",.X"2|
|000020a0| 20 20 20 20 2d 2d 2d 45 | 51 2d 2d 2d 52 65 76 65 |    ---E|Q---Reve|
|000020b0| 72 62 2d 2d 2d 3c 7e 75 | 2f 2d 2d 2d 2d 7e 64 7e |rb---<~u|/----~d~|
|000020c0| 64 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 5c 5c 2d 2d 2d |d~l~l~l~|l~l\\---|
|000020d0| 2d 22 2c 0a 58 22 33 20 | 20 20 20 2d 2d 2d 45 51 |-",.X"3 |   ---EQ|
|000020e0| 2d 2d 2d 52 65 76 65 72 | 62 28 4d 6f 64 29 2d 2d |---Rever|b(Mod)--|
|000020f0| 2d 3c 7e 75 2f 2d 2d 2d | 2d 7e 64 7e 64 7e 6c 7e |-<~u/---|-~d~d~l~|
|00002100| 6c 7e 6c 7e 6c 7e 6c 5c | 5c 2d 2d 2d 2d 22 2c 0a |l~l~l~l\|\----",.|
|00002110| 58 22 34 20 20 20 20 2d | 2d 2d 45 51 2d 2d 2d 52 |X"4    -|--EQ---R|
|00002120| 65 76 65 72 62 28 4d 6f | 64 29 2d 2d 2d 43 68 6f |everb(Mo|d)---Cho|
|00002130| 72 75 73 2d 2d 2d 3c 7e | 75 2f 2d 2d 2d 2d 7e 64 |rus---<~|u/----~d|
|00002140| 7e 64 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 5c 5c 2d 2d |~d~l~l~l|~l~l\\--|
|00002150| 2d 2d 22 2c 0a 58 22 35 | 20 20 20 20 2d 2d 2d 45 |--",.X"5|    ---E|
|00002160| 51 2d 2b 2d 52 65 76 65 | 72 62 2d 2d 3c 20 20 20 |Q-+-Reve|rb--<   |
|00002170| 2b 2d 43 68 6f 72 75 73 | 2d 2d 2d 3c 7e 75 2f 7e |+-Chorus|---<~u/~|
|00002180| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7e |l~l~l~l~|l~l~l~l~|
|00002190| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 5c |l~l~l~l~|l~l~l~l\|
|000021a0| 0a 58 2f 7e 75 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.X/~u/--|--------|
|000021b0| 2d 2d 2d 2d 2b 2d 2d 2d | 7e 6c 7e 6c 7e 6c 7e 6c |----+---|~l~l~l~l|
|000021c0| 7e 6c 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 7e 6c 7e 6c |~l~l~l~l|~l~l~l~l|
|000021d0| 7e 6c 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 7e 6c 7e 6c |~l~l~l~l|~l~l~l~l|
|000021e0| 7e 6c 7e 6c 7e 64 7e 64 | 7e 64 7e 5c 0a 58 6c 7e |~l~l~d~d|~d~\.Xl~|
|000021f0| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7c |l~l~l~l~|l~l~l~l||
|00002200| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5c 5c 5f 5f 7c 7e |________|__\\__|~|
|00002210| 6c 7e 6c 7e 6c 7e 64 5c | 5c 2d 2d 2d 2d 2d 2d 2d |l~l~l~d\|\-------|
|00002220| 2d 2d 2d 2d 2d 2d 2d 7e | 6c 7e 75 5c 5c 7e 64 2b |-------~|l~u\\~d+|
|00002230| 2d 2d 2d 22 2c 0a 58 22 | 36 20 20 20 20 2d 2d 2d |---",.X"|6    ---|
|00002240| 45 51 2d 2d 2d 52 65 76 | 65 72 62 2d 2d 3c 2d 2d |EQ---Rev|erb--<--|
|00002250| 43 68 6f 72 75 73 2d 2d | 2d 3c 7e 75 2f 7e 6c 7e |Chorus--|-<~u/~l~|
|00002260| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7e |l~l~l~l~|l~l~l~l~|
|00002270| 6c 7e 6c 7e 6c 7e 6c 5c | 0a 58 2f 7e 75 2f 2d 2d |l~l~l~l\|.X/~u/--|
|00002280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2b 2d 2d 2d 7e 6c 7e |--------|-+---~l~|
|00002290| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7e |l~l~l~l~|l~l~l~l~|
|000022a0| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 64 7e |l~l~l~l~|l~l~l~d~|
|000022b0| 64 7e 64 7e 5c 0a 58 6c | 5c 5c 7e 64 5c 5c 2d 2d |d~d~\.Xl|\\~d\\--|
|000022c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7e 6c 7e 75 5c 5c 7e |--------|-~l~u\\~|
|000022d0| 64 2b 2d 2d 2d 22 2c 0a | 58 22 37 20 20 20 20 2d |d+---",.|X"7    -|
|000022e0| 2d 2d 45 51 2d 2d 2d 4e | 4c 52 2d 2d 2d 3c 7e 75 |--EQ---N|LR---<~u|
|000022f0| 2f 2d 2d 2d 2d 7e 64 7e | 64 7e 6c 7e 6c 7e 6c 7e |/----~d~|d~l~l~l~|
|00002300| 6c 7e 6c 5c 5c 2d 2d 2d | 2d 22 2c 0a 58 22 38 20 |l~l\\---|-",.X"8 |
|00002310| 20 20 20 2d 2d 2d 45 51 | 2d 2d 2d 4e 4c 52 28 4d |   ---EQ|---NLR(M|
|00002320| 6f 64 29 2d 2d 2d 3c 7e | 75 2f 2d 2d 2d 2d 7e 64 |od)---<~|u/----~d|
|00002330| 7e 64 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 5c 5c 2d 2d |~d~l~l~l|~l~l\\--|
|00002340| 2d 2d 22 2c 0a 58 22 39 | 20 20 20 20 2d 2d 2d 45 |--",.X"9|    ---E|
|00002350| 51 2d 2d 2d 4e 4c 52 2d | 2d 3c 2d 2d 43 68 6f 72 |Q---NLR-|-<--Chor|
|00002360| 75 73 2d 2d 2d 3c 7e 75 | 2f 7e 6c 7e 6c 7e 6c 7e |us---<~u|/~l~l~l~|
|00002370| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7e |l~l~l~l~|l~l~l~l~|
|00002380| 6c 7e 6c 5c 0a 58 2f 7e | 75 2f 2d 2d 2d 2d 2d 2d |l~l\.X/~|u/------|
|00002390| 2d 2d 2d 2d 2d 2b 2d 2d | 2d 7e 6c 7e 6c 7e 6c 7e |-----+--|-~l~l~l~|
|000023a0| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 6c 7e 6c 7e 6c 7e |l~l~l~l~|l~l~l~l~|
|000023b0| 6c 7e 6c 7e 6c 7e 6c 7e | 6c 7e 64 7e 64 7e 64 7e |l~l~l~l~|l~d~d~d~|
|000023c0| 5c 0a 58 6c 5c 5c 7e 64 | 5c 5c 2d 2d 2d 2d 2d 2d |\.Xl\\~d|\\------|
|000023d0| 2d 2d 2d 2d 2d 7e 6c 7e | 75 5c 5c 7e 64 2b 2d 2d |-----~l~|u\\~d+--|
|000023e0| 2d 22 2c 0a 58 22 31 30 | 20 20 20 2d 2d 2d 45 51 |-",.X"10|   ---EQ|
|000023f0| 2d 2d 2d 44 65 6c 61 79 | 2d 2d 3c 2d 2d 43 68 6f |---Delay|--<--Cho|
|00002400| 72 75 73 2d 2d 2d 3c 7e | 75 2f 7e 6c 7e 6c 7e 6c |rus---<~|u/~l~l~l|
|00002410| 7e 6c 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 7e 6c 7e 6c |~l~l~l~l|~l~l~l~l|
|00002420| 7e 6c 7e 6c 5c 0a 58 2f | 7e 75 2f 2d 2d 2d 2d 2d |~l~l\.X/|~u/-----|
|00002430| 2d 2d 2d 2d 2d 2d 2b 2d | 2d 2d 7e 6c 7e 6c 7e 6c |------+-|--~l~l~l|
|00002440| 7e 6c 7e 6c 7e 6c 7e 6c | 7e 6c 7e 6c 7e 6c 7e 6c |~l~l~l~l|~l~l~l~l|
|00002450| 7e 6c 7e 6c 7e 6c 7e 6c | 7e 6c 7e 64 7e 64 7e 64 |~l~l~l~l|~l~d~d~d|
|00002460| 7e 5c 0a 58 6c 5c 5c 7e | 64 5c 5c 2d 2d 2d 2d 2d |~\.Xl\\~|d\\-----|
|00002470| 2d 2d 2d 2d 2d 2d 7e 6c | 7e 75 5c 5c 7e 64 2b 2d |------~l|~u\\~d+-|
|00002480| 2d 2d 22 2c 0a 58 22 31 | 31 20 20 20 2d 2d 2d 45 |--",.X"1|1   ---E|
|00002490| 51 2d 2d 2d 4e 4c 52 28 | 4d 6f 64 29 2d 2d 2d 3c |Q---NLR(|Mod)---<|
|000024a0| 7e 75 2f 2d 2d 2d 2d 7e | 64 7e 64 7e 6c 7e 6c 7e |~u/----~|d~d~l~l~|
|000024b0| 6c 7e 6c 7e 6c 5c 5c 2d | 2d 2d 2d 22 2c 0a 58 7d |l~l~l\\-|---",.X}|
|000024c0| 3b 0a 58 0a 58 23 64 65 | 66 69 6e 65 20 4e 50 41 |;.X.X#de|fine NPA|
|000024d0| 52 4d 20 31 32 0a 58 63 | 68 61 72 20 41 6c 67 70 |RM 12.Xc|har Algp|
|000024e0| 61 72 6d 73 5b 5d 5b 4e | 50 41 52 4d 5d 20 3d 20 |arms[][N|PARM] = |
|000024f0| 7b 0a 58 31 2c 31 2c 31 | 2c 30 2c 30 2c 30 2c 30 |{.X1,1,1|,0,0,0,0|
|00002500| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 09 2f 2a 20 61 |,1,1,1,1|,1,./* a|
|00002510| 6c 67 20 31 20 2a 2f 0a | 58 30 2c 30 2c 30 2c 31 |lg 1 */.|X0,0,0,1|
|00002520| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1|,1,1,1,1|
|00002530| 2c 09 2f 2a 20 61 6c 67 | 20 32 20 2a 2f 0a 58 30 |,./* alg| 2 */.X0|
|00002540| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1|,1,1,1,1|
|00002550| 2c 31 2c 31 2c 31 2c 09 | 2f 2a 20 61 6c 67 20 33 |,1,1,1,.|/* alg 3|
|00002560| 20 2a 2f 0a 58 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 | */.X1,1|,1,1,1,1|
|00002570| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 09 2f 2a |,1,1,1,1|,1,1,./*|
|00002580| 20 61 6c 67 20 34 20 2a | 2f 0a 58 31 2c 31 2c 31 | alg 4 *|/.X1,1,1|
|00002590| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1|,1,1,1,1|
|000025a0| 2c 31 2c 09 2f 2a 20 61 | 6c 67 20 35 20 2a 2f 0a |,1,./* a|lg 5 */.|
|000025b0| 58 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |X1,1,1,1|,1,1,1,1|
|000025c0| 2c 31 2c 31 2c 31 2c 31 | 2c 09 2f 2a 20 61 6c 67 |,1,1,1,1|,./* alg|
|000025d0| 20 36 20 2a 2f 0a 58 30 | 2c 30 2c 30 2c 31 2c 31 | 6 */.X0|,0,0,1,1|
|000025e0| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 09 |,1,1,1,1|,1,1,1,.|
|000025f0| 2f 2a 20 61 6c 67 20 37 | 20 2a 2f 0a 58 30 2c 31 |/* alg 7| */.X0,1|
|00002600| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1|,1,1,1,1|
|00002610| 2c 31 2c 31 2c 09 2f 2a | 20 61 6c 67 20 38 20 2a |,1,1,./*| alg 8 *|
|00002620| 2f 0a 58 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |/.X1,1,1|,1,1,1,1|
|00002630| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 09 2f 2a 20 61 |,1,1,1,1|,1,./* a|
|00002640| 6c 67 20 39 20 2a 2f 0a | 58 31 2c 31 2c 31 2c 31 |lg 9 */.|X1,1,1,1|
|00002650| 2c 31 2c 31 2c 31 2c 31 | 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1|,1,1,1,1|
|00002660| 2c 09 2f 2a 20 61 6c 67 | 20 31 30 20 2a 2f 0a 58 |,./* alg| 10 */.X|
|00002670| 30 2c 31 2c 31 2c 31 2c | 31 2c 31 2c 31 2c 31 2c |0,1,1,1,|1,1,1,1,|
|00002680| 31 2c 31 2c 31 2c 31 09 | 09 2f 2a 20 61 6c 67 20 |1,1,1,1.|./* alg |
|00002690| 31 31 20 2a 2f 0a 58 7d | 3b 0a 58 2f 2a 20 66 6f |11 */.X}|;.X/* fo|
|000026a0| 72 20 74 68 65 20 70 61 | 72 61 6d 65 74 65 72 73 |r the pa|rameters|
|000026b0| 20 69 6e 20 74 68 65 20 | 61 72 72 61 79 20 61 62 | in the |array ab|
|000026c0| 6f 76 65 2c 20 41 6c 67 | 6d 61 70 20 67 69 76 65 |ove, Alg|map give|
|000026d0| 73 20 74 68 65 20 69 6e | 64 65 78 20 69 6e 20 50 |s the in|dex in P|
|000026e0| 20 2a 2f 0a 58 69 6e 74 | 20 41 6c 67 6d 61 70 5b | */.Xint| Algmap[|
|000026f0| 5d 20 3d 20 7b 31 2c 32 | 2c 33 2c 34 2c 35 2c 36 |] = {1,2|,3,4,5,6|
|00002700| 2c 37 2c 38 2c 39 2c 31 | 30 2c 31 31 2c 31 32 7d |,7,8,9,1|0,11,12}|
|00002710| 3b 0a 58 0a 58 2f 2a 0a | 58 20 2a 20 76 69 73 64 |;.X.X/*.|X * visd|
|00002720| 35 61 6c 67 0a 58 20 2a | 0a 58 20 2a 20 57 68 65 |5alg.X *|.X * Whe|
|00002730| 6e 65 76 65 72 20 74 68 | 65 20 61 6c 67 6f 72 69 |never th|e algori|
|00002740| 74 68 6d 20 69 73 20 63 | 68 61 6e 67 65 64 2c 20 |thm is c|hanged, |
|00002750| 77 65 20 68 61 76 65 20 | 74 6f 20 63 68 61 6e 67 |we have |to chang|
|00002760| 65 20 74 68 65 0a 58 20 | 2a 20 6d 65 61 6e 69 6e |e the.X |* meanin|
|00002770| 67 73 2f 6c 6f 63 61 74 | 69 6f 6e 73 2f 72 61 6e |gs/locat|ions/ran|
|00002780| 67 65 73 20 6f 66 20 76 | 61 72 69 6f 75 73 20 70 |ges of v|arious p|
|00002790| 61 72 61 6d 65 74 65 72 | 73 2e 0a 58 20 2a 2f 0a |arameter|s..X */.|
|000027a0| 58 0a 58 63 68 61 72 20 | 2a 0a 58 76 69 73 64 35 |X.Xchar |*.Xvisd5|
|000027b0| 61 6c 67 28 76 29 0a 58 | 7b 0a 58 09 73 74 61 74 |alg(v).X|{.X.stat|
|000027c0| 69 63 20 69 6e 74 20 72 | 74 20 3d 20 2d 31 2c 20 |ic int r|t = -1, |
|000027d0| 70 64 2c 20 68 66 2c 20 | 72 73 3b 0a 58 09 69 6e |pd, hf, |rs;.X.in|
|000027e0| 74 20 6e 3b 0a 58 0a 58 | 09 69 66 20 28 20 72 74 |t n;.X.X|.if ( rt|
|000027f0| 20 3d 3d 20 2d 31 20 29 | 20 7b 0a 58 09 09 70 64 | == -1 )| {.X..pd|
|00002800| 20 3d 20 70 61 72 6d 69 | 6e 64 65 78 28 22 70 72 | = parmi|ndex("pr|
|00002810| 65 64 65 6c 61 79 22 29 | 3b 0a 58 09 09 68 66 20 |edelay")|;.X..hf |
|00002820| 3d 20 70 61 72 6d 69 6e | 64 65 78 28 22 68 66 64 |= parmin|dex("hfd|
|00002830| 61 6d 70 22 29 3b 0a 58 | 09 09 72 74 20 3d 20 70 |amp");.X|..rt = p|
|00002840| 61 72 6d 69 6e 64 65 78 | 28 22 72 65 76 65 72 62 |armindex|("reverb|
|00002850| 74 69 6d 65 22 29 3b 0a | 58 09 09 72 73 20 3d 20 |time");.|X..rs = |
|00002860| 70 61 72 6d 69 6e 64 65 | 78 28 22 72 65 76 65 72 |parminde|x("rever|
|00002870| 62 73 65 6c 22 29 3b 0a | 58 09 7d 0a 58 09 69 66 |bsel");.|X.}.X.if|
|00002880| 20 28 20 76 20 3e 3d 20 | 30 20 26 26 20 76 20 3c | ( v >= |0 && v <|
|00002890| 3d 20 31 30 20 29 7b 0a | 58 09 09 41 6c 67 20 3d |= 10 ){.|X..Alg =|
|000028a0| 20 76 3b 0a 58 09 09 2f | 2a 20 45 6e 61 62 6c 65 | v;.X../|* Enable|
|000028b0| 20 74 68 65 20 70 61 72 | 61 6d 65 74 65 72 73 20 | the par|ameters |
|000028c0| 74 68 61 74 20 74 68 69 | 73 20 61 6c 67 6f 72 69 |that thi|s algori|
|000028d0| 74 68 6d 20 75 73 65 73 | 20 2a 2f 0a 58 09 09 66 |thm uses| */.X..f|
|000028e0| 6f 72 20 28 20 6e 3d 30 | 3b 20 6e 3c 4e 50 41 52 |or ( n=0|; n<NPAR|
|000028f0| 4d 3b 20 6e 2b 2b 20 29 | 20 7b 0a 58 09 09 09 69 |M; n++ )| {.X...i|
|00002900| 66 20 28 20 41 6c 67 70 | 61 72 6d 73 5b 76 5d 5b |f ( Algp|arms[v][|
|00002910| 6e 5d 20 3d 3d 20 31 20 | 29 0a 58 09 09 09 09 65 |n] == 1 |).X....e|
|00002920| 6e 61 62 6c 65 70 61 72 | 6d 28 41 6c 67 6d 61 70 |nablepar|m(Algmap|
|00002930| 5b 6e 5d 29 3b 0a 58 09 | 09 09 65 6c 73 65 0a 58 |[n]);.X.|..else.X|
|00002940| 09 09 09 09 64 69 73 61 | 62 6c 65 70 61 72 6d 28 |....disa|bleparm(|
|00002950| 41 6c 67 6d 61 70 5b 6e | 5d 29 3b 0a 58 09 09 7d |Algmap[n|]);.X..}|
|00002960| 0a 58 09 09 69 66 20 28 | 20 76 20 3d 3d 20 39 20 |.X..if (| v == 9 |
|00002970| 29 20 7b 0a 58 09 09 09 | 50 5b 70 64 5d 2e 70 5f |) {.X...|P[pd].p_|
|00002980| 76 72 6f 77 3d 50 5b 70 | 64 5d 2e 70 5f 6c 72 6f |vrow=P[p|d].p_lro|
|00002990| 77 3d 32 30 3b 0a 58 09 | 09 09 50 5b 70 64 5d 2e |w=20;.X.|..P[pd].|
|000029a0| 70 5f 6c 61 62 65 6c 20 | 3d 20 22 44 65 6c 61 79 |p_label |= "Delay|
|000029b0| 20 54 69 6d 65 22 3b 0a | 58 0a 58 09 09 09 50 5b | Time";.|X.X...P[|
|000029c0| 72 74 5d 2e 70 5f 76 72 | 6f 77 3d 50 5b 72 74 5d |rt].p_vr|ow=P[rt]|
|000029d0| 2e 70 5f 6c 72 6f 77 3d | 32 31 3b 0a 58 09 09 09 |.p_lrow=|21;.X...|
|000029e0| 50 5b 72 74 5d 2e 70 5f | 6c 61 62 65 6c 20 3d 20 |P[rt].p_|label = |
|000029f0| 22 44 65 6c 61 79 20 46 | 65 65 64 62 61 63 6b 22 |"Delay F|eedback"|
|00002a00| 3b 0a 58 09 09 09 50 5b | 72 74 5d 2e 70 5f 6d 61 |;.X...P[|rt].p_ma|
|00002a10| 78 20 3d 20 32 35 35 3b | 0a 58 0a 58 09 09 09 50 |x = 255;|.X.X...P|
|00002a20| 5b 68 66 5d 2e 70 5f 76 | 72 6f 77 3d 50 5b 68 66 |[hf].p_v|row=P[hf|
|00002a30| 5d 2e 70 5f 6c 72 6f 77 | 3d 32 32 3b 0a 58 09 09 |].p_lrow|=22;.X..|
|00002a40| 09 50 5b 68 66 5d 2e 70 | 5f 6c 61 62 65 6c 20 3d |.P[hf].p|_label =|
|00002a50| 20 22 48 46 20 44 61 6d | 70 22 3b 0a 58 09 09 09 | "HF Dam|p";.X...|
|00002a60| 50 5b 68 66 5d 2e 70 5f | 6d 61 78 20 3d 20 39 35 |P[hf].p_|max = 95|
|00002a70| 3b 0a 58 0a 58 09 09 09 | 50 5b 72 73 5d 2e 70 5f |;.X.X...|P[rs].p_|
|00002a80| 76 72 6f 77 3d 50 5b 72 | 73 5d 2e 70 5f 6c 72 6f |vrow=P[r|s].p_lro|
|00002a90| 77 3d 32 33 3b 0a 58 09 | 09 09 50 5b 72 73 5d 2e |w=23;.X.|..P[rs].|
|00002aa0| 70 5f 6c 61 62 65 6c 20 | 3d 20 22 44 65 6c 61 79 |p_label |= "Delay|
|00002ab0| 20 4f 75 74 70 75 74 22 | 3b 0a 58 09 09 09 50 5b | Output"|;.X...P[|
|00002ac0| 72 73 5d 2e 70 5f 6d 61 | 78 20 3d 20 32 3b 0a 58 |rs].p_ma|x = 2;.X|
|00002ad0| 09 09 7d 0a 58 09 09 65 | 6c 73 65 20 69 66 20 28 |..}.X..e|lse if (|
|00002ae0| 20 76 3c 36 20 29 20 7b | 0a 58 09 09 09 50 5b 70 | v<6 ) {|.X...P[p|
|00002af0| 64 5d 2e 70 5f 76 72 6f | 77 3d 50 5b 70 64 5d 2e |d].p_vro|w=P[pd].|
|00002b00| 70 5f 6c 72 6f 77 3d 31 | 30 3b 0a 58 09 09 09 50 |p_lrow=1|0;.X...P|
|00002b10| 5b 70 64 5d 2e 70 5f 6c | 61 62 65 6c 20 3d 20 22 |[pd].p_l|abel = "|
|00002b20| 50 72 65 2d 44 65 6c 61 | 79 22 3b 0a 58 0a 58 09 |Pre-Dela|y";.X.X.|
|00002b30| 09 09 50 5b 72 74 5d 2e | 70 5f 76 72 6f 77 3d 50 |..P[rt].|p_vrow=P|
|00002b40| 5b 72 74 5d 2e 70 5f 6c | 72 6f 77 3d 31 31 3b 0a |[rt].p_l|row=11;.|
|00002b50| 58 09 09 09 50 5b 72 74 | 5d 2e 70 5f 6c 61 62 65 |X...P[rt|].p_labe|
|00002b60| 6c 20 3d 20 22 52 65 76 | 65 72 62 20 54 69 6d 65 |l = "Rev|erb Time|
|00002b70| 22 3b 0a 58 09 09 09 50 | 5b 72 74 5d 2e 70 5f 6d |";.X...P|[rt].p_m|
|00002b80| 61 78 20 3d 20 31 35 32 | 3b 0a 58 0a 58 09 09 09 |ax = 152|;.X.X...|
|00002b90| 50 5b 68 66 5d 2e 70 5f | 76 72 6f 77 3d 50 5b 68 |P[hf].p_|vrow=P[h|
|00002ba0| 66 5d 2e 70 5f 6c 72 6f | 77 3d 31 32 3b 0a 58 09 |f].p_lro|w=12;.X.|
|00002bb0| 09 09 50 5b 68 66 5d 2e | 70 5f 6c 61 62 65 6c 20 |..P[hf].|p_label |
|00002bc0| 3d 20 22 48 46 20 44 61 | 6d 70 22 3b 0a 58 09 09 |= "HF Da|mp";.X..|
|00002bd0| 09 50 5b 68 66 5d 2e 70 | 5f 6d 61 78 20 3d 20 39 |.P[hf].p|_max = 9|
|00002be0| 35 3b 0a 58 0a 58 09 09 | 09 50 5b 72 73 5d 2e 70 |5;.X.X..|.P[rs].p|
|00002bf0| 5f 76 72 6f 77 3d 50 5b | 72 73 5d 2e 70 5f 6c 72 |_vrow=P[|rs].p_lr|
|00002c00| 6f 77 3d 31 33 3b 0a 58 | 09 09 09 50 5b 72 73 5d |ow=13;.X|...P[rs]|
|00002c10| 2e 70 5f 6c 61 62 65 6c | 20 3d 20 22 52 65 76 65 |.p_label| = "Reve|
|00002c20| 72 62 20 53 65 6c 65 63 | 74 69 6f 6e 22 3b 0a 58 |rb Selec|tion";.X|
|00002c30| 09 09 09 50 5b 72 73 5d | 2e 70 5f 6d 61 78 20 3d |...P[rs]|.p_max =|
|00002c40| 20 32 31 3b 0a 58 09 09 | 7d 0a 58 09 09 65 6c 73 | 21;.X..|}.X..els|
|00002c50| 65 20 7b 0a 58 09 09 09 | 50 5b 70 64 5d 2e 70 5f |e {.X...|P[pd].p_|
|00002c60| 76 72 6f 77 3d 50 5b 70 | 64 5d 2e 70 5f 6c 72 6f |vrow=P[p|d].p_lro|
|00002c70| 77 3d 31 35 3b 0a 58 09 | 09 09 50 5b 70 64 5d 2e |w=15;.X.|..P[pd].|
|00002c80| 70 5f 6c 61 62 65 6c 20 | 3d 20 22 4e 4c 20 50 72 |p_label |= "NL Pr|
|00002c90| 65 2d 44 65 6c 61 79 22 | 3b 0a 58 0a 58 09 09 09 |e-Delay"|;.X.X...|
|00002ca0| 50 5b 72 74 5d 2e 70 5f | 76 72 6f 77 3d 50 5b 72 |P[rt].p_|vrow=P[r|
|00002cb0| 74 5d 2e 70 5f 6c 72 6f | 77 3d 31 36 3b 0a 58 09 |t].p_lro|w=16;.X.|
|00002cc0| 09 09 50 5b 72 74 5d 2e | 70 5f 6c 61 62 65 6c 20 |..P[rt].|p_label |
|00002cd0| 3d 20 22 4e 4c 20 52 65 | 76 65 72 62 20 54 69 6d |= "NL Re|verb Tim|
|00002ce0| 65 22 3b 0a 58 09 09 09 | 50 5b 72 74 5d 2e 70 5f |e";.X...|P[rt].p_|
|00002cf0| 6d 61 78 20 3d 20 31 35 | 30 3b 0a 58 0a 58 09 09 |max = 15|0;.X.X..|
|00002d00| 09 50 5b 68 66 5d 2e 70 | 5f 76 72 6f 77 3d 50 5b |.P[hf].p|_vrow=P[|
|00002d10| 68 66 5d 2e 70 5f 6c 72 | 6f 77 3d 31 37 3b 0a 58 |hf].p_lr|ow=17;.X|
|00002d20| 09 09 09 50 5b 68 66 5d | 2e 70 5f 6c 61 62 65 6c |...P[hf]|.p_label|
|00002d30| 20 3d 20 22 4e 4c 20 47 | 61 74 65 20 54 69 6d 65 | = "NL G|ate Time|
|00002d40| 22 3b 0a 58 09 09 09 50 | 5b 68 66 5d 2e 70 5f 6d |";.X...P|[hf].p_m|
|00002d50| 61 78 20 3d 20 32 35 35 | 3b 0a 58 0a 58 09 09 09 |ax = 255|;.X.X...|
|00002d60| 50 5b 72 73 5d 2e 70 5f | 76 72 6f 77 3d 50 5b 72 |P[rs].p_|vrow=P[r|
|00002d70| 73 5d 2e 70 5f 6c 72 6f | 77 3d 31 38 3b 0a 58 09 |s].p_lro|w=18;.X.|
|00002d80| 09 09 50 5b 72 73 5d 2e | 70 5f 6c 61 62 65 6c 20 |..P[rs].|p_label |
|00002d90| 3d 20 22 4e 4c 20 4f 75 | 74 70 75 74 22 3b 0a 58 |= "NL Ou|tput";.X|
|00002da0| 09 09 09 50 5b 72 73 5d | 2e 70 5f 6d 61 78 20 3d |...P[rs]|.p_max =|
|00002db0| 20 32 3b 0a 58 09 09 7d | 0a 58 09 09 52 65 64 72 | 2;.X..}|.X..Redr|
|00002dc0| 61 77 20 3d 20 31 3b 0a | 58 09 09 72 65 74 75 72 |aw = 1;.|X..retur|
|00002dd0| 6e 28 44 35 61 6c 67 5b | 76 5d 29 3b 0a 58 09 7d |n(D5alg[|v]);.X.}|
|00002de0| 0a 58 09 65 6c 73 65 0a | 58 09 09 72 65 74 75 72 |.X.else.|X..retur|
|00002df0| 6e 28 22 3f 3f 3f 3f 22 | 29 3b 0a 58 7d 0a 58 0a |n("????"|);.X}.X.|
|00002e00| 58 69 6e 74 20 41 6c 67 | 76 61 6c 5b 5d 20 3d 20 |Xint Alg|val[] = |
|00002e10| 7b 20 30 2c 20 33 2c 20 | 33 31 2c 20 35 39 2c 20 |{ 0, 3, |31, 59, |
|00002e20| 38 37 2c 20 31 31 35 2c | 20 31 34 33 2c 20 31 37 |87, 115,| 143, 17|
|00002e30| 31 2c 20 31 39 39 2c 20 | 32 32 37 2c 20 32 35 35 |1, 199, |227, 255|
|00002e40| 20 7d 3b 0a 58 0a 58 64 | 35 61 6c 67 69 6e 28 64 | };.X.Xd|5algin(d|
|00002e50| 29 0a 58 7b 0a 58 09 69 | 6e 74 20 6e 20 3d 20 30 |).X{.X.i|nt n = 0|
|00002e60| 3b 0a 58 0a 58 09 77 68 | 69 6c 65 20 28 20 64 20 |;.X.X.wh|ile ( d |
|00002e70| 3e 3d 20 41 6c 67 76 61 | 6c 5b 6e 5d 20 26 26 20 |>= Algva|l[n] && |
|00002e80| 6e 20 3c 3d 20 31 30 20 | 29 0a 58 09 09 6e 2b 2b |n <= 10 |).X..n++|
|00002e90| 3b 0a 58 09 72 65 74 75 | 72 6e 28 6e 2d 31 29 3b |;.X.retu|rn(n-1);|
|00002ea0| 0a 58 7d 0a 58 0a 58 64 | 35 61 6c 67 6f 75 74 28 |.X}.X.Xd|5algout(|
|00002eb0| 76 29 0a 58 7b 0a 58 09 | 72 65 74 75 72 6e 28 41 |v).X{.X.|return(A|
|00002ec0| 6c 67 76 61 6c 5b 76 5d | 29 3b 0a 58 7d 0a 58 0a |lgval[v]|);.X}.X.|
|00002ed0| 58 64 35 76 69 6e 28 6e | 70 61 72 72 2c 76 29 0a |Xd5vin(n|parr,v).|
|00002ee0| 58 73 74 72 75 63 74 20 | 6e 75 6d 70 61 69 72 20 |Xstruct |numpair |
|00002ef0| 2a 6e 70 61 72 72 3b 0a | 58 7b 0a 58 09 69 6e 74 |*nparr;.|X{.X.int|
|00002f00| 20 6e 3b 0a 58 0a 58 09 | 66 6f 72 20 28 20 6e 3d | n;.X.X.|for ( n=|
|00002f10| 30 3b 20 6e 70 61 72 72 | 5b 6e 5d 2e 6e 70 5f 76 |0; nparr|[n].np_v|
|00002f20| 61 6c 20 3e 3d 20 30 3b | 20 6e 2b 2b 20 29 20 7b |al >= 0;| n++ ) {|
|00002f30| 0a 58 09 09 69 66 20 28 | 20 76 20 3c 3d 20 6e 70 |.X..if (| v <= np|
|00002f40| 61 72 72 5b 6e 5d 2e 6e | 70 5f 62 79 74 65 20 29 |arr[n].n|p_byte )|
|00002f50| 0a 58 09 09 09 72 65 74 | 75 72 6e 28 6e 29 3b 0a |.X...ret|urn(n);.|
|00002f60| 58 09 7d 0a 58 09 72 65 | 74 75 72 6e 28 30 29 3b |X.}.X.re|turn(0);|
|00002f70| 0a 58 7d 0a 58 0a 58 63 | 68 61 72 20 2a 0a 58 76 |.X}.X.Xc|har *.Xv|
|00002f80| 69 73 64 63 72 28 76 29 | 0a 58 7b 0a 58 09 69 66 |isdcr(v)|.X{.X.if|
|00002f90| 20 28 20 76 20 3e 3d 20 | 30 20 26 26 20 76 3c 20 | ( v >= |0 && v< |
|00002fa0| 4e 55 4d 43 52 20 29 20 | 7b 0a 58 09 09 76 20 3d |NUMCR ) |{.X..v =|
|00002fb0| 20 43 68 72 61 74 65 5b | 76 5d 2e 6e 70 5f 76 61 | Chrate[|v].np_va|
|00002fc0| 6c 3b 0a 58 09 09 73 70 | 72 69 6e 74 66 28 44 35 |l;.X..sp|rintf(D5|
|00002fd0| 62 75 66 66 2c 22 25 64 | 2e 25 64 22 2c 76 2f 31 |buff,"%d|.%d",v/1|
|00002fe0| 30 2c 76 25 31 30 29 3b | 0a 58 09 09 72 65 74 75 |0,v%10);|.X..retu|
|00002ff0| 72 6e 28 44 35 62 75 66 | 66 29 3b 0a 58 09 7d 0a |rn(D5buf|f);.X.}.|
|00003000| 58 09 65 6c 73 65 0a 58 | 09 09 72 65 74 75 72 6e |X.else.X|..return|
|00003010| 28 22 3f 3f 22 29 3b 0a | 58 7d 0a 58 0a 58 64 35 |("??");.|X}.X.Xd5|
|00003020| 63 72 6f 75 74 28 76 29 | 0a 58 7b 0a 58 09 69 66 |crout(v)|.X{.X.if|
|00003030| 20 28 20 76 20 3e 3d 20 | 30 20 26 26 20 76 3c 20 | ( v >= |0 && v< |
|00003040| 4e 55 4d 43 52 20 29 0a | 58 09 09 72 65 74 75 72 |NUMCR ).|X..retur|
|00003050| 6e 28 43 68 72 61 74 65 | 5b 76 5d 2e 6e 70 5f 62 |n(Chrate|[v].np_b|
|00003060| 79 74 65 29 3b 0a 58 09 | 65 6c 73 65 0a 58 09 09 |yte);.X.|else.X..|
|00003070| 72 65 74 75 72 6e 28 30 | 29 3b 0a 58 7d 0a 58 0a |return(0|);.X}.X.|
|00003080| 58 63 68 61 72 20 2a 0a | 58 76 69 73 64 63 64 28 |Xchar *.|Xvisdcd(|
|00003090| 76 29 0a 58 7b 0a 58 09 | 69 66 20 28 20 76 20 3e |v).X{.X.|if ( v >|
|000030a0| 3d 20 30 20 26 26 20 76 | 3c 20 4e 55 4d 43 44 20 |= 0 && v|< NUMCD |
|000030b0| 29 20 7b 0a 58 09 09 76 | 20 3d 20 43 68 64 65 70 |) {.X..v| = Chdep|
|000030c0| 74 68 5b 76 5d 2e 6e 70 | 5f 76 61 6c 3b 0a 58 09 |th[v].np|_val;.X.|
|000030d0| 09 73 70 72 69 6e 74 66 | 28 44 35 62 75 66 66 2c |.sprintf|(D5buff,|
|000030e0| 22 25 64 2e 25 64 22 2c | 76 2f 31 30 2c 76 25 31 |"%d.%d",|v/10,v%1|
|000030f0| 30 29 3b 0a 58 09 09 72 | 65 74 75 72 6e 28 44 35 |0);.X..r|eturn(D5|
|00003100| 62 75 66 66 29 3b 0a 58 | 09 7d 0a 58 09 65 6c 73 |buff);.X|.}.X.els|
|00003110| 65 0a 58 09 09 72 65 74 | 75 72 6e 28 22 3f 3f 22 |e.X..ret|urn("??"|
|00003120| 29 3b 0a 58 7d 0a 58 64 | 35 63 64 6f 75 74 28 76 |);.X}.Xd|5cdout(v|
|00003130| 29 0a 58 7b 0a 58 09 69 | 66 20 28 20 76 20 3e 3d |).X{.X.i|f ( v >=|
|00003140| 20 30 20 26 26 20 76 3c | 20 4e 55 4d 43 44 20 29 | 0 && v<| NUMCD )|
|00003150| 0a 58 09 09 72 65 74 75 | 72 6e 28 43 68 64 65 70 |.X..retu|rn(Chdep|
|00003160| 74 68 5b 76 5d 2e 6e 70 | 5f 62 79 74 65 29 3b 0a |th[v].np|_byte);.|
|00003170| 58 09 65 6c 73 65 0a 58 | 09 09 72 65 74 75 72 6e |X.else.X|..return|
|00003180| 28 30 29 3b 0a 58 7d 0a | 58 0a 58 0a 58 63 68 61 |(0);.X}.|X.X.Xcha|
|00003190| 72 20 2a 0a 58 76 69 73 | 64 63 66 28 76 29 0a 58 |r *.Xvis|dcf(v).X|
|000031a0| 7b 0a 58 09 69 66 20 28 | 20 76 20 3e 3d 20 30 20 |{.X.if (| v >= 0 |
|000031b0| 26 26 20 76 3c 20 32 35 | 36 20 29 20 7b 0a 58 09 |&& v< 25|6 ) {.X.|
|000031c0| 09 76 20 3d 20 43 68 66 | 65 65 64 5b 76 5d 3b 0a |.v = Chf|eed[v];.|
|000031d0| 58 09 09 73 70 72 69 6e | 74 66 28 44 35 62 75 66 |X..sprin|tf(D5buf|
|000031e0| 66 2c 22 25 64 2e 25 64 | 22 2c 76 2f 31 30 2c 76 |f,"%d.%d|",v/10,v|
|000031f0| 25 31 30 29 3b 0a 58 09 | 09 72 65 74 75 72 6e 28 |%10);.X.|.return(|
|00003200| 44 35 62 75 66 66 29 3b | 0a 58 09 7d 0a 58 09 65 |D5buff);|.X.}.X.e|
|00003210| 6c 73 65 0a 58 09 09 72 | 65 74 75 72 6e 28 22 3f |lse.X..r|eturn("?|
|00003220| 3f 22 29 3b 0a 58 7d 0a | 58 0a 58 63 68 61 72 20 |?");.X}.|X.Xchar |
|00003230| 2a 0a 58 76 69 73 64 35 | 6e 6f 28 76 29 0a 58 7b |*.Xvisd5|no(v).X{|
|00003240| 0a 58 09 63 68 61 72 20 | 2a 70 3b 0a 58 09 73 77 |.X.char |*p;.X.sw|
|00003250| 69 74 63 68 20 28 76 29 | 20 7b 0a 58 09 63 61 73 |itch (v)| {.X.cas|
|00003260| 65 20 30 3a 20 70 20 3d | 20 22 4e 6f 72 6d 61 6c |e 0: p =| "Normal|
|00003270| 22 3b 20 62 72 65 61 6b | 3b 0a 58 09 63 61 73 65 |"; break|;.X.case|
|00003280| 20 31 3a 20 70 20 3d 20 | 22 50 61 6e 20 42 20 74 | 1: p = |"Pan B t|
|00003290| 6f 20 41 22 3b 20 62 72 | 65 61 6b 3b 0a 58 09 63 |o A"; br|eak;.X.c|
|000032a0| 61 73 65 20 32 3a 20 70 | 20 3d 20 22 50 61 6e 20 |ase 2: p| = "Pan |
|000032b0| 41 20 74 6f 20 42 22 3b | 20 62 72 65 61 6b 3b 0a |A to B";| break;.|
|000032c0| 58 09 7d 0a 58 09 72 65 | 74 75 72 6e 28 70 29 3b |X.}.X.re|turn(p);|
|000032d0| 0a 58 7d 0a 58 0a 58 63 | 68 61 72 20 2a 0a 58 76 |.X}.X.Xc|har *.Xv|
|000032e0| 69 73 64 64 6f 28 76 29 | 0a 58 7b 0a 58 09 63 68 |isddo(v)|.X{.X.ch|
|000032f0| 61 72 20 2a 70 3b 0a 58 | 09 73 77 69 74 63 68 20 |ar *p;.X|.switch |
|00003300| 28 76 29 20 7b 0a 58 09 | 63 61 73 65 20 30 3a 20 |(v) {.X.|case 0: |
|00003310| 70 20 3d 20 22 4e 6f 72 | 6d 61 6c 22 3b 20 62 72 |p = "Nor|mal"; br|
|00003320| 65 61 6b 3b 0a 58 09 63 | 61 73 65 20 31 3a 20 70 |eak;.X.c|ase 1: p|
|00003330| 20 3d 20 22 49 6e 76 65 | 72 74 20 50 68 61 73 65 | = "Inve|rt Phase|
|00003340| 22 3b 20 62 72 65 61 6b | 3b 0a 58 09 63 61 73 65 |"; break|;.X.case|
|00003350| 20 32 3a 20 70 20 3d 20 | 22 50 61 6e 20 41 20 74 | 2: p = |"Pan A t|
|00003360| 6f 20 42 22 3b 20 62 72 | 65 61 6b 3b 0a 58 09 7d |o B"; br|eak;.X.}|
|00003370| 0a 58 09 72 65 74 75 72 | 6e 28 70 29 3b 0a 58 7d |.X.retur|n(p);.X}|
|00003380| 0a 58 0a 58 63 68 61 72 | 20 2a 52 65 76 73 65 6c |.X.Xchar| *Revsel|
|00003390| 5b 5d 20 3d 20 7b 20 22 | 53 70 65 63 69 61 6c 20 |[] = { "|Special |
|000033a0| 31 22 2c 20 22 53 70 65 | 63 69 61 6c 20 32 22 2c |1", "Spe|cial 2",|
|000033b0| 20 22 50 6c 61 74 65 20 | 31 22 2c 20 22 50 6c 61 | "Plate |1", "Pla|
|000033c0| 74 65 20 32 22 2c 0a 58 | 20 20 22 48 61 6c 6c 20 |te 2",.X|  "Hall |
|000033d0| 31 34 27 22 2c 22 48 61 | 6c 6c 20 32 30 27 22 2c |14'","Ha|ll 20'",|
|000033e0| 22 48 61 6c 6c 20 32 37 | 27 22 2c 22 48 61 6c 6c |"Hall 27|'","Hall|
|000033f0| 20 33 36 27 22 2c 22 48 | 61 6c 6c 20 34 38 27 22 | 36'","H|all 48'"|
|00003400| 2c 22 48 61 6c 6c 20 36 | 31 27 22 2c 22 48 61 6c |,"Hall 6|1'","Hal|
|00003410| 6c 20 37 36 27 22 2c 0a | 58 20 20 22 52 6f 6f 6d |l 76'",.|X  "Room|
|00003420| 20 30 2e 33 27 22 2c 22 | 52 6f 6f 6d 20 31 2e 34 | 0.3'","|Room 1.4|
|00003430| 27 22 2c 22 52 6f 6f 6d | 20 33 2e 31 27 22 2c 22 |'","Room| 3.1'","|
|00003440| 52 6f 6f 6d 20 38 2e 32 | 27 22 2c 22 52 6f 6f 6d |Room 8.2|'","Room|
|00003450| 20 31 34 27 22 2c 22 52 | 6f 6f 6d 20 32 30 27 22 | 14'","R|oom 20'"|
|00003460| 2c 0a 58 20 20 22 52 6f | 6f 6d 20 32 37 27 22 2c |,.X  "Ro|om 27'",|
|00003470| 22 52 6f 6f 6d 20 33 36 | 27 22 2c 22 52 6f 6f 6d |"Room 36|'","Room|
|00003480| 20 34 38 27 22 2c 22 52 | 6f 6f 6d 20 36 31 27 22 | 48'","R|oom 61'"|
|00003490| 2c 22 52 6f 6f 6d 20 37 | 36 27 22 0a 58 7d 3b 0a |,"Room 7|6'".X};.|
|000034a0| 58 0a 58 63 68 61 72 20 | 2a 0a 58 76 69 73 64 72 |X.Xchar |*.Xvisdr|
|000034b0| 73 28 76 29 0a 58 7b 0a | 58 09 2f 2a 20 46 6f 72 |s(v).X{.|X./* For|
|000034c0| 20 61 6c 67 6f 72 69 74 | 68 6d 73 20 36 2c 37 2c | algorit|hms 6,7,|
|000034d0| 38 2c 31 30 2c 20 74 68 | 65 20 72 65 76 65 72 62 |8,10, th|e reverb|
|000034e0| 20 73 65 6c 65 63 74 20 | 70 61 72 61 6d 65 74 65 | select |paramete|
|000034f0| 72 20 2a 2f 0a 58 09 2f | 2a 20 69 73 20 74 68 65 |r */.X./|* is the|
|00003500| 20 4e 4c 20 6f 75 74 70 | 75 74 20 2a 2f 0a 58 09 | NL outp|ut */.X.|
|00003510| 69 66 20 28 20 41 6c 67 | 3d 3d 36 20 7c 7c 20 41 |if ( Alg|==6 || A|
|00003520| 6c 67 3d 3d 37 20 7c 7c | 20 41 6c 67 3d 3d 38 20 |lg==7 ||| Alg==8 |
|00003530| 7c 7c 20 41 6c 67 3d 3d | 31 30 20 29 0a 58 09 09 ||| Alg==|10 ).X..|
|00003540| 72 65 74 75 72 6e 28 76 | 69 73 64 35 6e 6f 28 76 |return(v|isd5no(v|
|00003550| 29 29 3b 0a 58 09 69 66 | 20 28 20 41 6c 67 20 3d |));.X.if| ( Alg =|
|00003560| 3d 20 39 20 29 0a 58 09 | 09 72 65 74 75 72 6e 28 |= 9 ).X.|.return(|
|00003570| 76 69 73 64 64 6f 28 76 | 29 29 3b 0a 58 09 69 66 |visddo(v|));.X.if|
|00003580| 20 28 20 76 3e 3d 30 20 | 26 26 20 76 3c 32 32 20 | ( v>=0 |&& v<22 |
|00003590| 29 20 7b 0a 58 09 09 72 | 74 63 6c 69 70 28 29 3b |) {.X..r|tclip();|
|000035a0| 0a 58 09 09 72 65 74 75 | 72 6e 28 52 65 76 73 65 |.X..retu|rn(Revse|
|000035b0| 6c 5b 76 5d 29 3b 0a 58 | 09 7d 0a 58 09 72 65 74 |l[v]);.X|.}.X.ret|
|000035c0| 75 72 6e 28 22 3f 3f 22 | 29 3b 0a 58 7d 0a 58 0a |urn("??"|);.X}.X.|
|000035d0| 58 63 68 61 72 20 2a 0a | 58 76 69 73 64 64 74 28 |Xchar *.|Xvisddt(|
|000035e0| 76 29 0a 58 7b 0a 58 09 | 69 6e 74 20 72 65 6d 3b |v).X{.X.|int rem;|
|000035f0| 0a 58 0a 58 09 69 66 20 | 28 20 76 20 3c 20 30 20 |.X.X.if |( v < 0 |
|00003600| 7c 7c 20 76 20 3e 3d 20 | 4e 55 4d 44 54 20 29 0a ||| v >= |NUMDT ).|
|00003610| 58 09 09 72 65 74 75 72 | 6e 28 22 3f 3f 22 29 3b |X..retur|n("??");|
|00003620| 0a 58 09 76 20 3d 20 44 | 74 69 6d 65 5b 76 5d 3b |.X.v = D|time[v];|
|00003630| 0a 58 09 69 66 20 28 20 | 76 20 3c 20 31 30 30 30 |.X.if ( |v < 1000|
|00003640| 20 29 0a 58 09 09 73 70 | 72 69 6e 74 66 28 44 35 | ).X..sp|rintf(D5|
|00003650| 62 75 66 66 2c 22 25 64 | 22 2c 76 29 3b 0a 58 09 |buff,"%d|",v);.X.|
|00003660| 65 6c 73 65 20 7b 0a 58 | 09 09 72 65 6d 20 3d 20 |else {.X|..rem = |
|00003670| 28 76 25 31 30 30 30 29 | 2f 31 30 3b 0a 58 09 09 |(v%1000)|/10;.X..|
|00003680| 73 70 72 69 6e 74 66 28 | 44 35 62 75 66 66 2c 28 |sprintf(|D5buff,(|
|00003690| 72 65 6d 3c 31 30 29 3f | 22 25 64 2e 30 25 64 22 |rem<10)?|"%d.0%d"|
|000036a0| 3a 22 25 64 2e 25 64 22 | 2c 76 2f 31 30 30 30 2c |:"%d.%d"|,v/1000,|
|000036b0| 72 65 6d 29 3b 0a 58 09 | 7d 0a 58 09 72 65 74 75 |rem);.X.|}.X.retu|
|000036c0| 72 6e 28 44 35 62 75 66 | 66 29 3b 0a 58 7d 0a 58 |rn(D5buf|f);.X}.X|
|000036d0| 0a 58 63 68 61 72 20 2a | 0a 58 76 69 73 64 35 70 |.Xchar *|.Xvisd5p|
|000036e0| 64 28 76 29 0a 58 7b 0a | 58 09 69 66 20 28 20 76 |d(v).X{.|X.if ( v|
|000036f0| 20 3c 20 30 20 7c 7c 20 | 76 20 3e 3d 20 4e 55 4d | < 0 || |v >= NUM|
|00003700| 50 44 20 29 0a 58 09 09 | 72 65 74 75 72 6e 28 22 |PD ).X..|return("|
|00003710| 3f 3f 22 29 3b 0a 58 09 | 2f 2a 20 46 6f 72 20 61 |??");.X.|/* For a|
|00003720| 6c 67 6f 72 69 74 68 6d | 20 39 20 28 61 6b 61 20 |lgorithm| 9 (aka |
|00003730| 31 30 29 2c 20 74 68 65 | 20 70 72 65 64 65 6c 61 |10), the| predela|
|00003740| 79 20 70 61 72 61 6d 65 | 74 65 72 20 69 73 20 74 |y parame|ter is t|
|00003750| 68 65 20 64 65 6c 61 79 | 20 74 69 6d 65 2a 2f 0a |he delay| time*/.|
|00003760| 58 09 69 66 20 28 20 41 | 6c 67 20 3d 3d 20 39 20 |X.if ( A|lg == 9 |
|00003770| 29 0a 58 09 09 72 65 74 | 75 72 6e 28 76 69 73 64 |).X..ret|urn(visd|
|00003780| 64 74 28 76 29 29 3b 0a | 58 09 65 6c 73 65 0a 58 |dt(v));.|X.else.X|
|00003790| 09 09 73 70 72 69 6e 74 | 66 28 44 35 62 75 66 66 |..sprint|f(D5buff|
|000037a0| 2c 22 25 64 22 2c 28 69 | 6e 74 29 50 72 65 64 6c |,"%d",(i|nt)Predl|
|000037b0| 79 5b 76 5d 29 3b 0a 58 | 09 72 65 74 75 72 6e 28 |y[v]);.X|.return(|
|000037c0| 44 35 62 75 66 66 29 3b | 0a 58 7d 0a 58 0a 58 64 |D5buff);|.X}.X.Xd|
|000037d0| 35 72 74 69 6e 28 76 29 | 0a 58 7b 0a 58 09 72 65 |5rtin(v)|.X{.X.re|
|000037e0| 67 69 73 74 65 72 20 69 | 6e 74 20 6e 3b 0a 58 0a |gister i|nt n;.X.|
|000037f0| 58 09 69 66 20 28 20 41 | 6c 67 3d 3d 39 20 29 0a |X.if ( A|lg==9 ).|
|00003800| 58 09 09 72 65 74 75 72 | 6e 28 76 29 3b 0a 58 09 |X..retur|n(v);.X.|
|00003810| 65 6c 73 65 20 69 66 20 | 28 20 41 6c 67 3d 3d 36 |else if |( Alg==6|
|00003820| 20 7c 7c 20 41 6c 67 3d | 3d 37 20 7c 7c 20 41 6c | || Alg=|=7 || Al|
|00003830| 67 3d 3d 38 20 7c 7c 20 | 41 6c 67 3d 3d 31 30 20 |g==8 || |Alg==10 |
|00003840| 29 20 7b 0a 58 09 09 66 | 6f 72 20 28 20 6e 3d 30 |) {.X..f|or ( n=0|
|00003850| 3b 20 6e 3c 4e 55 4d 4e | 4c 52 54 3b 20 6e 2b 2b |; n<NUMN|LRT; n++|
|00003860| 20 29 20 7b 0a 58 09 09 | 09 69 66 20 28 20 76 20 | ) {.X..|.if ( v |
|00003870| 3c 20 4e 6c 72 65 76 74 | 69 6d 65 5b 6e 5d 2e 6e |< Nlrevt|ime[n].n|
|00003880| 70 5f 62 79 74 65 20 29 | 0a 58 09 09 09 09 62 72 |p_byte )|.X....br|
|00003890| 65 61 6b 3b 0a 58 09 09 | 7d 0a 58 09 09 72 65 74 |eak;.X..|}.X..ret|
|000038a0| 75 72 6e 28 6e 2d 31 29 | 3b 0a 58 09 7d 0a 58 09 |urn(n-1)|;.X.}.X.|
|000038b0| 65 6c 73 65 20 7b 0a 58 | 09 09 66 6f 72 20 28 20 |else {.X|..for ( |
|000038c0| 6e 3d 30 3b 20 6e 3c 4e | 55 4d 52 54 3b 20 6e 2b |n=0; n<N|UMRT; n+|
|000038d0| 2b 20 29 20 7b 0a 58 09 | 09 09 69 66 20 28 20 76 |+ ) {.X.|..if ( v|
|000038e0| 20 3c 20 52 65 76 74 69 | 6d 65 5b 6e 5d 2e 6e 70 | < Revti|me[n].np|
|000038f0| 5f 62 79 74 65 20 29 0a | 58 09 09 09 09 62 72 65 |_byte ).|X....bre|
|00003900| 61 6b 3b 0a 58 09 09 7d | 0a 58 09 09 72 65 74 75 |ak;.X..}|.X..retu|
|00003910| 72 6e 28 6e 2d 31 29 3b | 0a 58 09 7d 0a 58 7d 0a |rn(n-1);|.X.}.X}.|
|00003920| 58 0a 58 64 35 72 74 6f | 75 74 28 76 29 0a 58 7b |X.Xd5rto|ut(v).X{|
|00003930| 0a 58 09 69 66 20 28 20 | 41 6c 67 3d 3d 39 20 29 |.X.if ( |Alg==9 )|
|00003940| 0a 58 09 09 72 65 74 75 | 72 6e 28 76 29 3b 0a 58 |.X..retu|rn(v);.X|
|00003950| 09 65 6c 73 65 20 69 66 | 20 28 20 41 6c 67 3d 3d |.else if| ( Alg==|
|00003960| 36 20 7c 7c 20 41 6c 67 | 3d 3d 37 20 7c 7c 20 41 |6 || Alg|==7 || A|
|00003970| 6c 67 3d 3d 38 20 7c 7c | 20 41 6c 67 3d 3d 31 30 |lg==8 ||| Alg==10|
|00003980| 20 29 0a 58 09 09 72 65 | 74 75 72 6e 28 4e 6c 72 | ).X..re|turn(Nlr|
|00003990| 65 76 74 69 6d 65 5b 76 | 5d 2e 6e 70 5f 62 79 74 |evtime[v|].np_byt|
|000039a0| 65 29 3b 0a 58 09 65 6c | 73 65 0a 58 09 09 72 65 |e);.X.el|se.X..re|
|000039b0| 74 75 72 6e 28 52 65 76 | 74 69 6d 65 5b 76 5d 2e |turn(Rev|time[v].|
|000039c0| 6e 70 5f 62 79 74 65 29 | 3b 0a 58 7d 0a 58 0a 58 |np_byte)|;.X}.X.X|
|000039d0| 63 68 61 72 20 2a 0a 58 | 76 69 73 64 35 72 74 28 |char *.X|visd5rt(|
|000039e0| 76 29 0a 58 7b 0a 58 09 | 2f 2a 20 49 6e 20 61 6c |v).X{.X.|/* In al|
|000039f0| 67 6f 72 69 74 68 6d 20 | 39 20 28 61 6b 61 20 31 |gorithm |9 (aka 1|
|00003a00| 30 29 2c 20 74 68 65 20 | 72 65 76 65 72 62 20 74 |0), the |reverb t|
|00003a10| 69 6d 65 20 70 61 72 61 | 6d 65 74 65 72 20 69 73 |ime para|meter is|
|00003a20| 20 2a 2f 0a 58 09 2f 2a | 20 74 68 65 20 64 65 6c | */.X./*| the del|
|00003a30| 61 79 20 66 65 65 64 62 | 61 63 6b 2e 20 2a 2f 0a |ay feedb|ack. */.|
|00003a40| 58 09 69 66 20 28 20 41 | 6c 67 20 3d 3d 20 39 20 |X.if ( A|lg == 9 |
|00003a50| 29 20 7b 0a 58 09 09 69 | 66 20 28 20 76 3c 30 20 |) {.X..i|f ( v<0 |
|00003a60| 7c 7c 20 76 3e 3d 4e 55 | 4d 43 46 20 29 0a 58 09 ||| v>=NU|MCF ).X.|
|00003a70| 09 09 72 65 74 75 72 6e | 28 22 3f 3f 22 29 3b 0a |..return|("??");.|
|00003a80| 58 09 09 65 6c 73 65 0a | 58 09 09 09 72 65 74 75 |X..else.|X...retu|
|00003a90| 72 6e 28 76 69 73 64 63 | 66 28 76 29 29 3b 0a 58 |rn(visdc|f(v));.X|
|00003aa0| 09 7d 0a 58 09 65 6c 73 | 65 20 69 66 20 28 20 41 |.}.X.els|e if ( A|
|00003ab0| 6c 67 3d 3d 36 20 7c 7c | 20 41 6c 67 3d 3d 37 20 |lg==6 ||| Alg==7 |
|00003ac0| 7c 7c 20 41 6c 67 3d 3d | 38 20 7c 7c 20 41 6c 67 ||| Alg==|8 || Alg|
|00003ad0| 20 3d 3d 20 31 30 20 29 | 20 7b 0a 58 09 09 69 66 | == 10 )| {.X..if|
|00003ae0| 20 28 20 76 3c 30 20 7c | 7c 20 76 3e 3d 4e 55 4d | ( v<0 ||| v>=NUM|
|00003af0| 4e 4c 52 54 20 29 0a 58 | 09 09 09 72 65 74 75 72 |NLRT ).X|...retur|
|00003b00| 6e 28 22 3f 3f 22 29 3b | 0a 58 09 09 76 20 3d 20 |n("??");|.X..v = |
|00003b10| 4e 6c 72 65 76 74 69 6d | 65 5b 76 5d 2e 6e 70 5f |Nlrevtim|e[v].np_|
|00003b20| 76 61 6c 3b 0a 58 09 09 | 69 66 20 28 20 76 20 3c |val;.X..|if ( v <|
|00003b30| 20 30 20 29 0a 58 09 09 | 09 73 70 72 69 6e 74 66 | 0 ).X..|.sprintf|
|00003b40| 28 44 35 62 75 66 66 2c | 22 2d 30 2e 25 64 22 2c |(D5buff,|"-0.%d",|
|00003b50| 2d 76 29 3b 0a 58 09 09 | 65 6c 73 65 20 69 66 20 |-v);.X..|else if |
|00003b60| 28 20 76 20 3c 20 31 30 | 20 29 0a 58 09 09 09 73 |( v < 10| ).X...s|
|00003b70| 70 72 69 6e 74 66 28 44 | 35 62 75 66 66 2c 22 30 |printf(D|5buff,"0|
|00003b80| 2e 25 64 22 2c 76 29 3b | 0a 58 09 09 65 6c 73 65 |.%d",v);|.X..else|
|00003b90| 20 69 66 20 28 20 76 20 | 3c 20 31 30 30 20 29 0a | if ( v |< 100 ).|
|00003ba0| 58 09 09 09 73 70 72 69 | 6e 74 66 28 44 35 62 75 |X...spri|ntf(D5bu|
|00003bb0| 66 66 2c 22 25 64 2e 25 | 64 22 2c 76 2f 31 30 2c |ff,"%d.%|d",v/10,|
|00003bc0| 76 25 31 30 29 3b 0a 58 | 09 09 65 6c 73 65 0a 58 |v%10);.X|..else.X|
|00003bd0| 09 09 09 73 70 72 69 6e | 74 66 28 44 35 62 75 66 |...sprin|tf(D5buf|
|00003be0| 66 2c 22 25 64 22 2c 76 | 2f 31 30 29 3b 0a 58 09 |f,"%d",v|/10);.X.|
|00003bf0| 09 72 65 74 75 72 6e 28 | 44 35 62 75 66 66 29 3b |.return(|D5buff);|
|00003c00| 0a 58 09 7d 0a 58 09 65 | 6c 73 65 20 69 66 20 28 |.X.}.X.e|lse if (|
|00003c10| 20 76 20 3e 3d 20 30 20 | 26 26 20 76 20 3c 20 4e | v >= 0 |&& v < N|
|00003c20| 55 4d 52 54 20 29 20 7b | 0a 58 09 09 76 20 3d 20 |UMRT ) {|.X..v = |
|00003c30| 72 74 63 6c 69 70 28 29 | 3b 0a 58 09 09 76 20 3d |rtclip()|;.X..v =|
|00003c40| 20 52 65 76 74 69 6d 65 | 5b 76 5d 2e 6e 70 5f 76 | Revtime|[v].np_v|
|00003c50| 61 6c 3b 0a 58 09 09 69 | 66 20 28 20 76 20 3c 20 |al;.X..i|f ( v < |
|00003c60| 31 30 30 20 29 0a 58 09 | 09 09 73 70 72 69 6e 74 |100 ).X.|..sprint|
|00003c70| 66 28 44 35 62 75 66 66 | 2c 22 25 64 2e 25 64 20 |f(D5buff|,"%d.%d |
|00003c80| 20 22 2c 76 2f 31 30 2c | 76 25 31 30 29 3b 0a 58 | ",v/10,|v%10);.X|
|00003c90| 09 09 65 6c 73 65 0a 58 | 09 09 09 73 70 72 69 6e |..else.X|...sprin|
|00003ca0| 74 66 28 44 35 62 75 66 | 66 2c 22 25 64 20 20 22 |tf(D5buf|f,"%d  "|
|00003cb0| 2c 76 2f 31 30 29 3b 0a | 58 09 09 72 65 74 75 72 |,v/10);.|X..retur|
|00003cc0| 6e 28 44 35 62 75 66 66 | 29 3b 0a 58 09 7d 0a 58 |n(D5buff|);.X.}.X|
|00003cd0| 09 65 6c 73 65 0a 58 09 | 09 72 65 74 75 72 6e 28 |.else.X.|.return(|
|00003ce0| 22 3f 3f 20 20 22 29 3b | 0a 58 7d 0a 58 0a 58 63 |"??  ");|.X}.X.Xc|
|00003cf0| 68 61 72 20 2a 0a 58 76 | 69 73 64 35 67 74 28 76 |har *.Xv|isd5gt(v|
|00003d00| 29 0a 58 7b 0a 58 09 69 | 66 20 28 20 76 20 3e 3d |).X{.X.i|f ( v >=|
|00003d10| 30 20 26 26 20 76 20 3c | 20 4e 55 4d 47 41 54 45 |0 && v <| NUMGATE|
|00003d20| 20 29 20 7b 0a 58 09 09 | 73 70 72 69 6e 74 66 28 | ) {.X..|sprintf(|
|00003d30| 44 35 62 75 66 66 2c 22 | 25 64 22 2c 47 61 74 65 |D5buff,"|%d",Gate|
|00003d40| 74 69 6d 65 5b 76 5d 29 | 3b 0a 58 09 09 72 65 74 |time[v])|;.X..ret|
|00003d50| 75 72 6e 28 44 35 62 75 | 66 66 29 3b 0a 58 09 7d |urn(D5bu|ff);.X.}|
|00003d60| 0a 58 09 65 6c 73 65 0a | 58 09 09 72 65 74 75 72 |.X.else.|X..retur|
|00003d70| 6e 28 22 3f 3f 22 29 3b | 0a 58 7d 0a 58 0a 58 0a |n("??");|.X}.X.X.|
|00003d80| 58 63 68 61 72 20 2a 0a | 58 76 69 73 64 35 68 66 |Xchar *.|Xvisd5hf|
|00003d90| 28 76 29 0a 58 7b 0a 58 | 09 69 66 20 28 20 41 6c |(v).X{.X|.if ( Al|
|00003da0| 67 3d 3d 36 20 7c 7c 20 | 41 6c 67 3d 3d 37 20 7c |g==6 || |Alg==7 ||
|00003db0| 7c 20 41 6c 67 3d 3d 38 | 20 7c 7c 20 41 6c 67 3d || Alg==8| || Alg=|
|00003dc0| 3d 31 30 20 29 20 7b 0a | 58 09 09 72 65 74 75 72 |=10 ) {.|X..retur|
|00003dd0| 6e 28 76 69 73 64 35 67 | 74 28 76 29 29 3b 0a 58 |n(visd5g|t(v));.X|
|00003de0| 09 7d 0a 58 09 65 6c 73 | 65 20 69 66 20 28 20 76 |.}.X.els|e if ( v|
|00003df0| 20 3e 3d 20 30 20 26 26 | 20 76 20 3c 20 4e 55 4d | >= 0 &&| v < NUM|
|00003e00| 48 46 20 29 20 7b 0a 58 | 09 09 76 20 3d 20 48 66 |HF ) {.X|..v = Hf|
|00003e10| 5b 76 5d 2e 68 66 5f 76 | 61 6c 3b 0a 58 09 09 69 |[v].hf_v|al;.X..i|
|00003e20| 66 20 28 20 76 20 3e 3d | 20 31 30 20 29 0a 58 09 |f ( v >=| 10 ).X.|
|00003e30| 09 09 73 70 72 69 6e 74 | 66 28 44 35 62 75 66 66 |..sprint|f(D5buff|
|00003e40| 2c 22 25 64 2e 25 64 22 | 2c 76 2f 31 30 30 2c 76 |,"%d.%d"|,v/100,v|
|00003e50| 25 31 30 30 29 3b 0a 58 | 09 09 65 6c 73 65 0a 58 |%100);.X|..else.X|
|00003e60| 09 09 09 73 70 72 69 6e | 74 66 28 44 35 62 75 66 |...sprin|tf(D5buf|
|00003e70| 66 2c 22 30 2e 30 25 64 | 22 2c 76 25 31 30 30 29 |f,"0.0%d|",v%100)|
|00003e80| 3b 0a 58 09 09 72 65 74 | 75 72 6e 28 44 35 62 75 |;.X..ret|urn(D5bu|
|00003e90| 66 66 29 3b 0a 58 09 7d | 0a 58 09 65 6c 73 65 0a |ff);.X.}|.X.else.|
|00003ea0| 58 09 09 72 65 74 75 72 | 6e 28 22 3f 3f 22 29 3b |X..retur|n("??");|
|00003eb0| 0a 58 7d 0a 58 0a 58 64 | 35 68 66 6f 75 74 28 76 |.X}.X.Xd|5hfout(v|
|00003ec0| 29 0a 58 7b 0a 58 09 69 | 66 20 28 20 41 6c 67 3d |).X{.X.i|f ( Alg=|
|00003ed0| 3d 36 20 7c 7c 20 41 6c | 67 3d 3d 37 20 7c 7c 20 |=6 || Al|g==7 || |
|00003ee0| 41 6c 67 3d 3d 38 20 7c | 7c 20 41 6c 67 3d 3d 31 |Alg==8 ||| Alg==1|
|00003ef0| 30 20 29 0a 58 09 09 72 | 65 74 75 72 6e 28 76 29 |0 ).X..r|eturn(v)|
|00003f00| 3b 0a 58 09 65 6c 73 65 | 0a 58 09 09 72 65 74 75 |;.X.else|.X..retu|
|00003f10| 72 6e 28 48 66 5b 76 5d | 2e 68 66 5f 62 79 74 65 |rn(Hf[v]|.hf_byte|
|00003f20| 29 3b 0a 58 7d 0a 58 0a | 58 64 35 68 66 69 6e 28 |);.X}.X.|Xd5hfin(|
|00003f30| 64 29 0a 58 7b 0a 58 09 | 72 65 67 69 73 74 65 72 |d).X{.X.|register|
|00003f40| 20 69 6e 74 20 6e 3b 0a | 58 0a 58 09 69 66 20 28 | int n;.|X.X.if (|
|00003f50| 20 41 6c 67 3d 3d 36 20 | 7c 7c 20 41 6c 67 3d 3d | Alg==6 ||| Alg==|
|00003f60| 37 20 7c 7c 20 41 6c 67 | 3d 3d 38 20 7c 7c 20 41 |7 || Alg|==8 || A|
|00003f70| 6c 67 3d 3d 31 30 20 29 | 0a 58 09 09 72 65 74 75 |lg==10 )|.X..retu|
|00003f80| 72 6e 28 64 29 3b 0a 58 | 09 66 6f 72 20 28 20 6e |rn(d);.X|.for ( n|
|00003f90| 3d 30 3b 20 48 66 5b 6e | 5d 2e 68 66 5f 62 79 74 |=0; Hf[n|].hf_byt|
|00003fa0| 65 20 3e 3d 20 30 20 3b | 20 6e 2b 2b 20 29 20 7b |e >= 0 ;| n++ ) {|
|00003fb0| 0a 58 09 09 69 66 20 28 | 20 64 20 3c 20 48 66 5b |.X..if (| d < Hf[|
|00003fc0| 6e 5d 2e 68 66 5f 62 79 | 74 65 20 29 0a 58 09 09 |n].hf_by|te ).X..|
|00003fd0| 09 62 72 65 61 6b 3b 0a | 58 09 7d 0a 58 09 72 65 |.break;.|X.}.X.re|
|00003fe0| 74 75 72 6e 28 6e 2d 31 | 29 3b 0a 58 7d 0a 58 0a |turn(n-1|);.X}.X.|
|00003ff0| 58 69 6e 74 20 52 65 76 | 6d 69 6e 5b 5d 20 3d 20 |Xint Rev|min[] = |
|00004000| 7b 20 31 30 2c 31 30 2c | 37 2c 37 2c 31 2c 32 2c |{ 10,10,|7,7,1,2,|
|00004010| 33 2c 34 2c 35 2c 36 2c | 37 2c 31 2c 31 2c 31 2c |3,4,5,6,|7,1,1,1,|
|00004020| 31 2c 31 2c 32 2c 33 2c | 34 2c 35 2c 36 2c 37 20 |1,1,2,3,|4,5,6,7 |
|00004030| 7d 3b 0a 58 69 6e 74 20 | 52 65 76 6d 61 78 5b 5d |};.Xint |Revmax[]|
|00004040| 20 3d 20 7b 20 39 39 30 | 2c 39 39 30 2c 39 39 30 | = { 990|,990,990|
|00004050| 2c 39 39 30 2c 32 30 30 | 2c 34 30 30 2c 37 32 30 |,990,200|,400,720|
|00004060| 2c 39 39 30 2c 39 39 30 | 2c 39 39 30 2c 39 39 30 |,990,990|,990,990|
|00004070| 2c 0a 58 20 20 35 2c 31 | 35 2c 33 35 2c 37 35 2c |,.X  5,1|5,35,75,|
|00004080| 32 30 30 2c 34 30 30 2c | 37 32 30 2c 39 39 30 2c |200,400,|720,990,|
|00004090| 39 39 30 2c 39 39 30 2c | 39 39 30 0a 58 7d 3b 0a |990,990,|990.X};.|
|000040a0| 58 0a 58 72 74 63 6c 69 | 70 28 29 0a 58 7b 0a 58 |X.Xrtcli|p().X{.X|
|000040b0| 09 69 6e 74 20 72 74 76 | 61 6c 2c 20 72 74 79 70 |.int rtv|al, rtyp|
|000040c0| 65 2c 20 6f 72 69 67 72 | 74 76 61 6c 3b 0a 58 0a |e, origr|tval;.X.|
|000040d0| 58 09 6f 72 69 67 72 74 | 76 61 6c 20 3d 20 72 74 |X.origrt|val = rt|
|000040e0| 76 61 6c 20 3d 20 67 65 | 74 76 61 6c 28 22 72 65 |val = ge|tval("re|
|000040f0| 76 65 72 62 74 69 6d 65 | 22 29 3b 0a 58 09 72 74 |verbtime|");.X.rt|
|00004100| 79 70 65 20 3d 20 67 65 | 74 76 61 6c 28 22 72 65 |ype = ge|tval("re|
|00004110| 76 65 72 62 73 65 6c 22 | 29 3b 0a 58 09 77 68 69 |verbsel"|);.X.whi|
|00004120| 6c 65 20 28 20 52 65 76 | 74 69 6d 65 5b 72 74 76 |le ( Rev|time[rtv|
|00004130| 61 6c 5d 2e 6e 70 5f 76 | 61 6c 20 3c 20 52 65 76 |al].np_v|al < Rev|
|00004140| 6d 69 6e 5b 72 74 79 70 | 65 5d 20 29 0a 58 09 09 |min[rtyp|e] ).X..|
|00004150| 72 74 76 61 6c 2b 2b 3b | 0a 58 09 77 68 69 6c 65 |rtval++;|.X.while|
|00004160| 20 28 20 52 65 76 74 69 | 6d 65 5b 72 74 76 61 6c | ( Revti|me[rtval|
|00004170| 5d 2e 6e 70 5f 76 61 6c | 20 3e 20 52 65 76 6d 61 |].np_val| > Revma|
|00004180| 78 5b 72 74 79 70 65 5d | 20 29 0a 58 09 09 72 74 |x[rtype]| ).X..rt|
|00004190| 76 61 6c 2d 2d 3b 0a 58 | 09 69 66 20 28 20 72 74 |val--;.X|.if ( rt|
|000041a0| 76 61 6c 20 21 3d 20 6f | 72 69 67 72 74 76 61 6c |val != o|rigrtval|
|000041b0| 20 29 20 7b 0a 58 09 09 | 73 65 74 76 61 6c 28 22 | ) {.X..|setval("|
|000041c0| 72 65 76 65 72 62 74 69 | 6d 65 22 2c 72 74 76 61 |reverbti|me",rtva|
|000041d0| 6c 29 3b 0a 58 09 09 73 | 68 6f 77 70 61 72 61 6d |l);.X..s|howparam|
|000041e0| 28 70 61 72 6d 69 6e 64 | 65 78 28 22 72 65 76 65 |(parmind|ex("reve|
|000041f0| 72 62 74 69 6d 65 22 29 | 2c 30 29 3b 0a 58 09 7d |rbtime")|,0);.X.}|
|00004200| 0a 58 09 72 65 74 75 72 | 6e 28 72 74 76 61 6c 29 |.X.retur|n(rtval)|
|00004210| 3b 0a 58 7d 0a 58 0a 58 | 23 64 65 66 69 6e 65 20 |;.X}.X.X|#define |
|00004220| 4e 55 4d 42 4f 4f 53 54 | 20 32 35 0a 58 73 74 72 |NUMBOOST| 25.Xstr|
|00004230| 75 63 74 20 6e 75 6d 70 | 61 69 72 20 42 6f 6f 73 |uct nump|air Boos|
|00004240| 74 5b 5d 20 3d 20 7b 0a | 58 30 2c 2d 31 32 2c 20 |t[] = {.|X0,-12, |
|00004250| 31 31 2c 2d 31 31 2c 20 | 32 31 2c 2d 31 30 2c 20 |11,-11, |21,-10, |
|00004260| 33 31 2c 2d 39 2c 20 34 | 31 2c 2d 38 2c 0a 58 35 |31,-9, 4|1,-8,.X5|
|00004270| 32 2c 2d 37 2c 20 36 32 | 2c 2d 36 2c 20 37 32 2c |2,-7, 62|,-6, 72,|
|00004280| 2d 35 2c 20 38 32 2c 2d | 34 2c 20 39 32 2c 2d 33 |-5, 82,-|4, 92,-3|
|00004290| 2c 0a 58 31 30 33 2c 2d | 32 2c 20 31 31 33 2c 2d |,.X103,-|2, 113,-|
|000042a0| 31 2c 20 31 32 33 2c 30 | 2c 20 31 33 33 2c 31 2c |1, 123,0|, 133,1,|
|000042b0| 20 31 34 33 2c 32 2c 0a | 58 31 35 33 2c 33 2c 20 | 143,2,.|X153,3, |
|000042c0| 31 36 34 2c 34 2c 20 31 | 37 34 2c 35 2c 20 31 38 |164,4, 1|74,5, 18|
|000042d0| 34 2c 36 2c 20 31 39 34 | 2c 37 2c 0a 58 32 30 34 |4,6, 194|,7,.X204|
|000042e0| 2c 38 2c 20 32 31 35 2c | 39 2c 20 32 32 35 2c 31 |,8, 215,|9, 225,1|
|000042f0| 30 2c 20 32 33 35 2c 31 | 31 2c 20 32 34 35 2c 31 |0, 235,1|1, 245,1|
|00004300| 32 2c 0a 58 2d 31 2c 20 | 2d 31 0a 58 7d 3b 0a 58 |2,.X-1, |-1.X};.X|
|00004310| 0a 58 64 35 62 63 69 6e | 28 76 29 0a 58 7b 0a 58 |.Xd5bcin|(v).X{.X|
|00004320| 09 72 65 67 69 73 74 65 | 72 20 69 6e 74 20 6e 3b |.registe|r int n;|
|00004330| 0a 58 0a 58 09 66 6f 72 | 20 28 20 6e 3d 30 3b 20 |.X.X.for| ( n=0; |
|00004340| 42 6f 6f 73 74 5b 6e 5d | 2e 6e 70 5f 62 79 74 65 |Boost[n]|.np_byte|
|00004350| 20 3e 3d 20 30 20 3b 20 | 6e 2b 2b 20 29 20 7b 0a | >= 0 ; |n++ ) {.|
|00004360| 58 09 09 69 66 20 28 20 | 76 20 3c 20 42 6f 6f 73 |X..if ( |v < Boos|
|00004370| 74 5b 6e 5d 2e 6e 70 5f | 62 79 74 65 20 29 0a 58 |t[n].np_|byte ).X|
|00004380| 09 09 09 62 72 65 61 6b | 3b 0a 58 09 7d 0a 58 09 |...break|;.X.}.X.|
|00004390| 72 65 74 75 72 6e 28 6e | 2d 31 29 3b 0a 58 7d 0a |return(n|-1);.X}.|
|000043a0| 58 64 35 62 63 6f 75 74 | 28 76 29 0a 58 7b 0a 58 |Xd5bcout|(v).X{.X|
|000043b0| 09 72 65 74 75 72 6e 28 | 42 6f 6f 73 74 5b 76 5d |.return(|Boost[v]|
|000043c0| 2e 6e 70 5f 62 79 74 65 | 29 3b 0a 58 7d 0a 58 0a |.np_byte|);.X}.X.|
|000043d0| 58 63 68 61 72 20 2a 0a | 58 76 69 73 64 35 62 63 |Xchar *.|Xvisd5bc|
|000043e0| 28 76 29 0a 58 7b 0a 58 | 09 69 66 20 28 20 76 20 |(v).X{.X|.if ( v |
|000043f0| 3e 3d 20 30 20 26 26 20 | 76 20 3c 20 4e 55 4d 42 |>= 0 && |v < NUMB|
|00004400| 4f 4f 53 54 20 29 20 7b | 0a 58 09 09 73 70 72 69 |OOST ) {|.X..spri|
|00004410| 6e 74 66 28 44 35 62 75 | 66 66 2c 22 25 64 22 2c |ntf(D5bu|ff,"%d",|
|00004420| 42 6f 6f 73 74 5b 76 5d | 2e 6e 70 5f 76 61 6c 29 |Boost[v]|.np_val)|
|00004430| 3b 0a 58 09 09 72 65 74 | 75 72 6e 28 44 35 62 75 |;.X..ret|urn(D5bu|
|00004440| 66 66 29 3b 0a 58 09 7d | 0a 58 09 65 6c 73 65 0a |ff);.X.}|.X.else.|
|00004450| 58 09 09 72 65 74 75 72 | 6e 28 22 3f 3f 22 29 3b |X..retur|n("??");|
|00004460| 0a 58 7d 0a 58 0a 58 63 | 68 61 72 20 2a 0a 58 76 |.X}.X.Xc|har *.Xv|
|00004470| 69 73 64 35 71 28 76 29 | 0a 58 7b 0a 58 09 69 66 |isd5q(v)|.X{.X.if|
|00004480| 20 28 20 76 3d 3d 30 20 | 29 0a 58 09 09 72 65 74 | ( v==0 |).X..ret|
|00004490| 75 72 6e 28 22 30 2e 32 | 22 29 3b 0a 58 09 65 6c |urn("0.2|");.X.el|
|000044a0| 73 65 20 69 66 20 28 20 | 76 20 3c 3d 20 33 20 29 |se if ( |v <= 3 )|
|000044b0| 0a 58 09 09 72 65 74 75 | 72 6e 28 22 30 2e 33 22 |.X..retu|rn("0.3"|
|000044c0| 29 3b 0a 58 09 65 6c 73 | 65 20 69 66 20 28 20 76 |);.X.els|e if ( v|
|000044d0| 20 3c 3d 20 39 30 20 29 | 20 7b 0a 58 09 09 73 70 | <= 90 )| {.X..sp|
|000044e0| 72 69 6e 74 66 28 44 35 | 62 75 66 66 2c 22 25 64 |rintf(D5|buff,"%d|
|000044f0| 2e 25 64 22 2c 76 2f 31 | 30 2c 76 25 31 30 29 3b |.%d",v/1|0,v%10);|
|00004500| 0a 58 09 09 72 65 74 75 | 72 6e 28 44 35 62 75 66 |.X..retu|rn(D5buf|
|00004510| 66 29 3b 0a 58 09 7d 0a | 58 09 65 6c 73 65 0a 58 |f);.X.}.|X.else.X|
|00004520| 09 09 72 65 74 75 72 6e | 28 22 3f 3f 22 29 3b 0a |..return|("??");.|
|00004530| 58 7d 0a 58 0a 58 63 68 | 61 72 20 2a 0a 58 76 69 |X}.X.Xch|ar *.Xvi|
|00004540| 73 64 35 66 6d 28 76 29 | 0a 58 7b 0a 58 09 69 6e |sd5fm(v)|.X{.X.in|
|00004550| 74 20 72 65 6d 3b 0a 58 | 0a 58 09 69 66 20 28 20 |t rem;.X|.X.if ( |
|00004560| 76 20 3c 20 30 20 7c 7c | 20 76 20 3e 20 31 32 37 |v < 0 ||| v > 127|
|00004570| 20 29 0a 58 09 09 72 65 | 74 75 72 6e 28 22 3f 3f | ).X..re|turn("??|
|00004580| 22 29 3b 0a 58 09 76 20 | 3d 20 46 72 65 71 6d 69 |");.X.v |= Freqmi|
|00004590| 64 5b 76 5d 3b 0a 58 09 | 69 66 20 28 20 76 20 3c |d[v];.X.|if ( v <|
|000045a0| 20 31 30 30 20 29 0a 58 | 09 09 73 70 72 69 6e 74 | 100 ).X|..sprint|
|000045b0| 66 28 44 35 62 75 66 66 | 2c 22 30 2e 25 64 22 2c |f(D5buff|,"0.%d",|
|000045c0| 76 29 3b 0a 58 09 65 6c | 73 65 20 69 66 20 28 20 |v);.X.el|se if ( |
|000045d0| 76 20 3c 20 31 30 30 30 | 20 29 20 7b 0a 58 09 09 |v < 1000| ) {.X..|
|000045e0| 72 65 6d 20 3d 20 76 25 | 31 30 30 3b 0a 58 09 09 |rem = v%|100;.X..|
|000045f0| 73 70 72 69 6e 74 66 28 | 44 35 62 75 66 66 2c 28 |sprintf(|D5buff,(|
|00004600| 72 65 6d 3c 31 30 29 3f | 22 25 64 2e 30 25 64 22 |rem<10)?|"%d.0%d"|
|00004610| 3a 22 25 64 2e 25 64 22 | 2c 76 2f 31 30 30 2c 72 |:"%d.%d"|,v/100,r|
|00004620| 65 6d 29 3b 0a 58 09 7d | 0a 58 09 65 6c 73 65 0a |em);.X.}|.X.else.|
|00004630| 58 09 09 73 70 72 69 6e | 74 66 28 44 35 62 75 66 |X..sprin|tf(D5buf|
|00004640| 66 2c 22 25 64 2e 25 64 | 22 2c 76 2f 31 30 30 2c |f,"%d.%d|",v/100,|
|00004650| 28 76 2f 31 30 29 25 31 | 30 29 3b 0a 58 09 72 65 |(v/10)%1|0);.X.re|
|00004660| 74 75 72 6e 28 44 35 62 | 75 66 66 29 3b 0a 58 7d |turn(D5b|uff);.X}|
|00004670| 0a 58 0a 58 69 6e 69 74 | 64 70 35 28 29 0a 58 7b |.X.Xinit|dp5().X{|
|00004680| 0a 58 09 73 74 61 74 69 | 63 20 69 6e 74 20 69 6e |.X.stati|c int in|
|00004690| 69 74 64 6f 6e 65 20 3d | 20 30 3b 0a 58 09 69 6e |itdone =| 0;.X.in|
|000046a0| 74 20 6e 31 2c 20 6e 32 | 2c 20 6e 3b 0a 58 09 46 |t n1, n2|, n;.X.F|
|000046b0| 49 4c 45 20 2a 66 3b 0a | 58 0a 58 09 69 66 20 28 |ILE *f;.|X.X.if (|
|000046c0| 20 69 6e 69 74 64 6f 6e | 65 20 29 0a 58 09 09 72 | initdon|e ).X..r|
|000046d0| 65 74 75 72 6e 3b 0a 58 | 09 69 6e 69 74 64 6f 6e |eturn;.X|.initdon|
|000046e0| 65 20 3d 20 31 3b 0a 58 | 09 70 72 69 6e 74 66 28 |e = 1;.X|.printf(|
|000046f0| 22 52 65 61 64 69 6e 67 | 20 64 61 74 61 20 66 72 |"Reading| data fr|
|00004700| 6f 6d 20 27 67 6c 69 62 | 69 6e 69 74 2e 64 70 35 |om 'glib|init.dp5|
|00004710| 27 20 2e 2e 2e 5c 6e 22 | 29 3b 0a 58 0a 58 09 43 |' ...\n"|);.X.X.C|
|00004720| 68 64 65 70 74 68 20 3d | 20 28 73 74 72 75 63 74 |hdepth =| (struct|
|00004730| 20 6e 75 6d 70 61 69 72 | 20 2a 29 20 61 6c 6c 6f | numpair| *) allo|
|00004740| 63 28 4e 55 4d 43 44 20 | 2a 20 73 69 7a 65 6f 66 |c(NUMCD |* sizeof|
|00004750| 28 73 74 72 75 63 74 20 | 6e 75 6d 70 61 69 72 29 |(struct |numpair)|
|00004760| 29 3b 0a 58 09 43 68 72 | 61 74 65 20 3d 20 28 73 |);.X.Chr|ate = (s|
|00004770| 74 72 75 63 74 20 6e 75 | 6d 70 61 69 72 20 2a 29 |truct nu|mpair *)|
|00004780| 20 61 6c 6c 6f 63 28 4e | 55 4d 43 52 20 2a 20 73 | alloc(N|UMCR * s|
|00004790| 69 7a 65 6f 66 28 73 74 | 72 75 63 74 20 6e 75 6d |izeof(st|ruct num|
|000047a0| 70 61 69 72 29 29 3b 0a | 58 09 43 68 66 65 65 64 |pair));.|X.Chfeed|
|000047b0| 20 3d 20 28 69 6e 74 20 | 2a 29 20 61 6c 6c 6f 63 | = (int |*) alloc|
|000047c0| 28 4e 55 4d 43 46 20 2a | 20 73 69 7a 65 6f 66 28 |(NUMCF *| sizeof(|
|000047d0| 69 6e 74 29 29 3b 0a 58 | 09 4e 6c 72 65 76 74 69 |int));.X|.Nlrevti|
|000047e0| 6d 65 20 3d 20 28 73 74 | 72 75 63 74 20 6e 75 6d |me = (st|ruct num|
|000047f0| 70 61 69 72 20 2a 29 20 | 61 6c 6c 6f 63 28 4e 55 |pair *) |alloc(NU|
|00004800| 4d 4e 4c 52 54 20 2a 20 | 73 69 7a 65 6f 66 28 73 |MNLRT * |sizeof(s|
|00004810| 74 72 75 63 74 20 6e 75 | 6d 70 61 69 72 29 29 3b |truct nu|mpair));|
|00004820| 0a 58 09 52 65 76 74 69 | 6d 65 20 3d 20 28 73 74 |.X.Revti|me = (st|
|00004830| 72 75 63 74 20 6e 75 6d | 70 61 69 72 20 2a 29 20 |ruct num|pair *) |
|00004840| 61 6c 6c 6f 63 28 4e 55 | 4d 52 54 20 2a 20 73 69 |alloc(NU|MRT * si|
|00004850| 7a 65 6f 66 28 73 74 72 | 75 63 74 20 6e 75 6d 70 |zeof(str|uct nump|
|00004860| 61 69 72 29 29 3b 0a 58 | 09 46 72 65 71 6d 69 64 |air));.X|.Freqmid|
|00004870| 20 3d 20 28 69 6e 74 20 | 2a 29 20 61 6c 6c 6f 63 | = (int |*) alloc|
|00004880| 28 4e 55 4d 46 52 45 51 | 20 2a 20 73 69 7a 65 6f |(NUMFREQ| * sizeo|
|00004890| 66 28 69 6e 74 29 29 3b | 0a 58 09 47 61 74 65 74 |f(int));|.X.Gatet|
|000048a0| 69 6d 65 20 3d 20 28 69 | 6e 74 20 2a 29 20 61 6c |ime = (i|nt *) al|
|000048b0| 6c 6f 63 28 4e 55 4d 47 | 41 54 45 20 2a 20 73 69 |loc(NUMG|ATE * si|
|000048c0| 7a 65 6f 66 28 69 6e 74 | 29 29 3b 0a 58 09 48 66 |zeof(int|));.X.Hf|
|000048d0| 20 3d 20 28 73 74 72 75 | 63 74 20 68 66 70 61 69 | = (stru|ct hfpai|
|000048e0| 72 20 2a 29 20 61 6c 6c | 6f 63 28 4e 55 4d 48 46 |r *) all|oc(NUMHF|
|000048f0| 20 2a 20 73 69 7a 65 6f | 66 28 73 74 72 75 63 74 | * sizeo|f(struct|
|00004900| 20 68 66 70 61 69 72 29 | 29 3b 0a 58 09 44 74 69 | hfpair)|);.X.Dti|
|00004910| 6d 65 20 3d 20 28 69 6e | 74 20 2a 29 20 61 6c 6c |me = (in|t *) all|
|00004920| 6f 63 28 4e 55 4d 44 54 | 20 2a 20 73 69 7a 65 6f |oc(NUMDT| * sizeo|
|00004930| 66 28 69 6e 74 29 29 3b | 0a 58 09 50 72 65 64 6c |f(int));|.X.Predl|
|00004940| 79 20 3d 20 28 69 6e 74 | 20 2a 29 20 61 6c 6c 6f |y = (int| *) allo|
|00004950| 63 28 4e 55 4d 50 44 20 | 2a 20 73 69 7a 65 6f 66 |c(NUMPD |* sizeof|
|00004960| 28 69 6e 74 29 29 3b 0a | 58 0a 58 09 4f 50 45 4e |(int));.|X.X.OPEN|
|00004970| 54 45 58 54 46 49 4c 45 | 28 66 2c 22 67 6c 69 62 |TEXTFILE|(f,"glib|
|00004980| 69 6e 69 74 2e 64 70 35 | 22 2c 22 72 22 29 3b 0a |init.dp5|","r");.|
|00004990| 58 09 69 66 20 28 20 66 | 20 3d 3d 20 4e 55 4c 4c |X.if ( f| == NULL|
|000049a0| 20 29 20 7b 0a 58 09 09 | 66 70 72 69 6e 74 66 28 | ) {.X..|fprintf(|
|000049b0| 73 74 64 65 72 72 2c 22 | 48 65 79 2c 20 27 69 6e |stderr,"|Hey, 'in|
|000049c0| 69 74 64 61 74 61 2e 64 | 70 35 27 20 63 61 6e 27 |itdata.d|p5' can'|
|000049d0| 74 20 62 65 20 6f 70 65 | 6e 65 64 21 5c 6e 22 29 |t be ope|ned!\n")|
|000049e0| 3b 0a 58 09 09 6d 69 6c | 6c 69 73 6c 65 65 70 28 |;.X..mil|lisleep(|
|000049f0| 32 30 30 30 29 3b 0a 58 | 09 09 72 65 74 75 72 6e |2000);.X|..return|
|00004a00| 3b 0a 58 09 7d 0a 58 0a | 58 09 69 66 20 28 20 67 |;.X.}.X.|X.if ( g|
|00004a10| 65 74 63 6f 6d 6d 65 6e | 74 28 66 29 20 29 0a 58 |etcommen|t(f) ).X|
|00004a20| 09 09 67 6f 74 6f 20 65 | 72 72 3b 0a 58 09 66 6f |..goto e|rr;.X.fo|
|00004a30| 72 20 28 20 6e 3d 30 3b | 20 6e 3c 4e 55 4d 43 44 |r ( n=0;| n<NUMCD|
|00004a40| 3b 20 6e 2b 2b 20 29 20 | 7b 0a 58 09 09 69 66 20 |; n++ ) |{.X..if |
|00004a50| 28 20 66 73 63 61 6e 66 | 28 66 2c 22 25 64 2c 25 |( fscanf|(f,"%d,%|
|00004a60| 64 22 2c 26 6e 31 2c 26 | 6e 32 29 20 21 3d 20 32 |d",&n1,&|n2) != 2|
|00004a70| 20 29 0a 58 09 09 09 67 | 6f 74 6f 20 65 72 72 3b | ).X...g|oto err;|
|00004a80| 0a 58 09 09 43 68 64 65 | 70 74 68 5b 6e 5d 2e 6e |.X..Chde|pth[n].n|
|00004a90| 70 5f 62 79 74 65 20 3d | 20 6e 31 3b 0a 58 09 09 |p_byte =| n1;.X..|
|00004aa0| 43 68 64 65 70 74 68 5b | 6e 5d 2e 6e 70 5f 76 61 |Chdepth[|n].np_va|
|00004ab0| 6c 20 3d 20 6e 32 3b 0a | 58 09 7d 0a 58 09 69 66 |l = n2;.|X.}.X.if|
|00004ac0| 20 28 20 67 65 74 63 6f | 6d 6d 65 6e 74 28 66 29 | ( getco|mment(f)|
|00004ad0| 20 29 0a 58 09 09 67 6f | 74 6f 20 65 72 72 3b 0a | ).X..go|to err;.|
|00004ae0| 58 09 66 6f 72 20 28 20 | 6e 3d 30 3b 20 6e 3c 4e |X.for ( |n=0; n<N|
|00004af0| 55 4d 46 52 45 51 3b 20 | 6e 2b 2b 20 29 20 7b 0a |UMFREQ; |n++ ) {.|
|00004b00| 58 09 09 69 66 20 28 20 | 66 73 63 61 6e 66 28 66 |X..if ( |fscanf(f|
|00004b10| 2c 22 25 64 22 2c 26 6e | 31 29 20 21 3d 20 31 20 |,"%d",&n|1) != 1 |
|00004b20| 29 0a 58 09 09 09 67 6f | 74 6f 20 65 72 72 3b 0a |).X...go|to err;.|
|00004b30| 58 09 09 46 72 65 71 6d | 69 64 5b 6e 5d 20 3d 20 |X..Freqm|id[n] = |
|00004b40| 6e 31 3b 0a 58 09 7d 0a | 58 09 69 66 20 28 20 67 |n1;.X.}.|X.if ( g|
|00004b50| 65 74 63 6f 6d 6d 65 6e | 74 28 66 29 20 29 0a 58 |etcommen|t(f) ).X|
|00004b60| 09 09 67 6f 74 6f 20 65 | 72 72 3b 0a 58 09 66 6f |..goto e|rr;.X.fo|
|00004b70| 72 20 28 20 6e 3d 30 3b | 20 6e 3c 4e 55 4d 48 46 |r ( n=0;| n<NUMHF|
|00004b80| 3b 20 6e 2b 2b 20 29 20 | 7b 0a 58 09 09 69 66 20 |; n++ ) |{.X..if |
|00004b90| 28 20 66 73 63 61 6e 66 | 28 66 2c 22 25 64 2c 25 |( fscanf|(f,"%d,%|
|00004ba0| 64 22 2c 26 6e 31 2c 26 | 6e 32 29 20 21 3d 20 32 |d",&n1,&|n2) != 2|
|00004bb0| 20 29 0a 58 09 09 09 67 | 6f 74 6f 20 65 72 72 3b | ).X...g|oto err;|
|00004bc0| 0a 58 09 09 48 66 5b 6e | 5d 2e 68 66 5f 62 79 74 |.X..Hf[n|].hf_byt|
|00004bd0| 65 20 3d 20 6e 31 3b 0a | 58 09 09 48 66 5b 6e 5d |e = n1;.|X..Hf[n]|
|00004be0| 2e 68 66 5f 76 61 6c 20 | 3d 20 6e 32 3b 0a 58 09 |.hf_val |= n2;.X.|
|00004bf0| 7d 0a 58 09 69 66 20 28 | 20 67 65 74 63 6f 6d 6d |}.X.if (| getcomm|
|00004c00| 65 6e 74 28 66 29 20 29 | 0a 58 09 09 67 6f 74 6f |ent(f) )|.X..goto|
|00004c10| 20 65 72 72 3b 0a 58 09 | 66 6f 72 20 28 20 6e 3d | err;.X.|for ( n=|
|00004c20| 30 3b 20 6e 3c 4e 55 4d | 47 41 54 45 3b 20 6e 2b |0; n<NUM|GATE; n+|
|00004c30| 2b 20 29 20 7b 0a 58 09 | 09 69 66 20 28 20 66 73 |+ ) {.X.|.if ( fs|
|00004c40| 63 61 6e 66 28 66 2c 22 | 25 64 22 2c 26 6e 31 29 |canf(f,"|%d",&n1)|
|00004c50| 20 21 3d 20 31 20 29 0a | 58 09 09 09 67 6f 74 6f | != 1 ).|X...goto|
|00004c60| 20 65 72 72 3b 0a 58 09 | 09 47 61 74 65 74 69 6d | err;.X.|.Gatetim|
|00004c70| 65 5b 6e 5d 20 3d 20 6e | 31 3b 0a 58 09 7d 0a 58 |e[n] = n|1;.X.}.X|
|00004c80| 09 69 66 20 28 20 67 65 | 74 63 6f 6d 6d 65 6e 74 |.if ( ge|tcomment|
|00004c90| 28 66 29 20 29 0a 58 09 | 09 67 6f 74 6f 20 65 72 |(f) ).X.|.goto er|
|00004ca0| 72 3b 0a 58 09 66 6f 72 | 20 28 20 6e 3d 30 3b 20 |r;.X.for| ( n=0; |
|00004cb0| 6e 3c 4e 55 4d 43 52 3b | 20 6e 2b 2b 20 29 20 7b |n<NUMCR;| n++ ) {|
|00004cc0| 0a 58 09 09 69 66 20 28 | 20 66 73 63 61 6e 66 28 |.X..if (| fscanf(|
|00004cd0| 66 2c 22 25 64 2c 25 64 | 22 2c 26 6e 31 2c 26 6e |f,"%d,%d|",&n1,&n|
|00004ce0| 32 29 20 21 3d 20 32 20 | 29 0a 58 09 09 09 67 6f |2) != 2 |).X...go|
|00004cf0| 74 6f 20 65 72 72 3b 0a | 58 09 09 43 68 72 61 74 |to err;.|X..Chrat|
|00004d00| 65 5b 6e 5d 2e 6e 70 5f | 62 79 74 65 20 3d 20 6e |e[n].np_|byte = n|
|00004d10| 31 3b 0a 58 09 09 43 68 | 72 61 74 65 5b 6e 5d 2e |1;.X..Ch|rate[n].|
|00004d20| 6e 70 5f 76 61 6c 20 3d | 20 6e 32 3b 0a 58 09 7d |np_val =| n2;.X.}|
|00004d30| 0a 58 09 69 66 20 28 20 | 67 65 74 63 6f 6d 6d 65 |.X.if ( |getcomme|
|00004d40| 6e 74 28 66 29 20 29 0a | 58 09 09 67 6f 74 6f 20 |nt(f) ).|X..goto |
|00004d50| 65 72 72 3b 0a 58 09 66 | 6f 72 20 28 20 6e 3d 30 |err;.X.f|or ( n=0|
|00004d60| 3b 20 6e 3c 4e 55 4d 4e | 4c 52 54 3b 20 6e 2b 2b |; n<NUMN|LRT; n++|
|00004d70| 20 29 20 7b 0a 58 09 09 | 69 66 20 28 20 66 73 63 | ) {.X..|if ( fsc|
|00004d80| 61 6e 66 28 66 2c 22 25 | 64 2c 25 64 22 2c 26 6e |anf(f,"%|d,%d",&n|
|00004d90| 31 2c 26 6e 32 29 20 21 | 3d 20 32 20 29 0a 58 09 |1,&n2) !|= 2 ).X.|
|00004da0| 09 09 67 6f 74 6f 20 65 | 72 72 3b 0a 58 09 09 4e |..goto e|rr;.X..N|
|00004db0| 6c 72 65 76 74 69 6d 65 | 5b 6e 5d 2e 6e 70 5f 62 |lrevtime|[n].np_b|
|00004dc0| 79 74 65 20 3d 20 6e 31 | 3b 0a 58 09 09 4e 6c 72 |yte = n1|;.X..Nlr|
|00004dd0| 65 76 74 69 6d 65 5b 6e | 5d 2e 6e 70 5f 76 61 6c |evtime[n|].np_val|
|00004de0| 20 3d 20 6e 32 3b 0a 58 | 09 7d 0a 58 09 69 66 20 | = n2;.X|.}.X.if |
|00004df0| 28 20 67 65 74 63 6f 6d | 6d 65 6e 74 28 66 29 20 |( getcom|ment(f) |
|00004e00| 29 0a 58 09 09 67 6f 74 | 6f 20 65 72 72 3b 0a 58 |).X..got|o err;.X|
|00004e10| 09 66 6f 72 20 28 20 6e | 3d 30 3b 20 6e 3c 4e 55 |.for ( n|=0; n<NU|
|00004e20| 4d 43 46 3b 20 6e 2b 2b | 20 29 20 7b 0a 58 09 09 |MCF; n++| ) {.X..|
|00004e30| 69 66 20 28 20 66 73 63 | 61 6e 66 28 66 2c 22 25 |if ( fsc|anf(f,"%|
|00004e40| 64 22 2c 26 6e 31 29 20 | 21 3d 20 31 20 29 0a 58 |d",&n1) |!= 1 ).X|
|00004e50| 09 09 09 67 6f 74 6f 20 | 65 72 72 3b 0a 58 09 09 |...goto |err;.X..|
|00004e60| 43 68 66 65 65 64 5b 6e | 5d 20 3d 20 6e 31 3b 0a |Chfeed[n|] = n1;.|
|00004e70| 58 09 7d 0a 58 09 69 66 | 20 28 20 67 65 74 63 6f |X.}.X.if| ( getco|
|00004e80| 6d 6d 65 6e 74 28 66 29 | 20 29 0a 58 09 09 67 6f |mment(f)| ).X..go|
|00004e90| 74 6f 20 65 72 72 3b 0a | 58 09 66 6f 72 20 28 20 |to err;.|X.for ( |
|00004ea0| 6e 3d 30 3b 20 6e 3c 4e | 55 4d 52 54 3b 20 6e 2b |n=0; n<N|UMRT; n+|
|00004eb0| 2b 20 29 20 7b 0a 58 09 | 09 69 66 20 28 20 66 73 |+ ) {.X.|.if ( fs|
|00004ec0| 63 61 6e 66 28 66 2c 22 | 25 64 2c 25 64 22 2c 26 |canf(f,"|%d,%d",&|
|00004ed0| 6e 31 2c 26 6e 32 29 20 | 21 3d 20 32 20 29 0a 58 |n1,&n2) |!= 2 ).X|
|00004ee0| 09 09 09 67 6f 74 6f 20 | 65 72 72 3b 0a 58 09 09 |...goto |err;.X..|
|00004ef0| 52 65 76 74 69 6d 65 5b | 6e 5d 2e 6e 70 5f 62 79 |Revtime[|n].np_by|
|00004f00| 74 65 20 3d 20 6e 31 3b | 0a 58 09 09 52 65 76 74 |te = n1;|.X..Revt|
|00004f10| 69 6d 65 5b 6e 5d 2e 6e | 70 5f 76 61 6c 20 3d 20 |ime[n].n|p_val = |
|00004f20| 6e 32 3b 0a 58 09 7d 0a | 58 09 69 66 20 28 20 67 |n2;.X.}.|X.if ( g|
|00004f30| 65 74 63 6f 6d 6d 65 6e | 74 28 66 29 20 29 0a 58 |etcommen|t(f) ).X|
|00004f40| 09 09 67 6f 74 6f 20 65 | 72 72 3b 0a 58 09 66 6f |..goto e|rr;.X.fo|
|00004f50| 72 20 28 20 6e 3d 30 3b | 20 6e 3c 4e 55 4d 44 54 |r ( n=0;| n<NUMDT|
|00004f60| 3b 20 6e 2b 2b 20 29 20 | 7b 0a 58 09 09 69 66 20 |; n++ ) |{.X..if |
|00004f70| 28 20 66 73 63 61 6e 66 | 28 66 2c 22 25 64 22 2c |( fscanf|(f,"%d",|
|00004f80| 26 6e 31 29 20 21 3d 20 | 31 20 29 0a 58 09 09 09 |&n1) != |1 ).X...|
|00004f90| 67 6f 74 6f 20 65 72 72 | 3b 0a 58 09 09 44 74 69 |goto err|;.X..Dti|
|00004fa0| 6d 65 5b 6e 5d 20 3d 20 | 6e 31 3b 0a 58 09 7d 0a |me[n] = |n1;.X.}.|
|00004fb0| 58 09 69 66 20 28 20 67 | 65 74 63 6f 6d 6d 65 6e |X.if ( g|etcommen|
|00004fc0| 74 28 66 29 20 29 0a 58 | 09 09 67 6f 74 6f 20 65 |t(f) ).X|..goto e|
|00004fd0| 72 72 3b 0a 58 09 66 6f | 72 20 28 20 6e 3d 30 3b |rr;.X.fo|r ( n=0;|
|00004fe0| 20 6e 3c 4e 55 4d 50 44 | 3b 20 6e 2b 2b 20 29 20 | n<NUMPD|; n++ ) |
|00004ff0| 7b 0a 58 09 09 69 66 20 | 28 20 66 73 63 61 6e 66 |{.X..if |( fscanf|
|00005000| 28 66 2c 22 25 64 22 2c | 26 6e 31 29 20 21 3d 20 |(f,"%d",|&n1) != |
|00005010| 31 20 29 0a 58 09 09 09 | 67 6f 74 6f 20 65 72 72 |1 ).X...|goto err|
|00005020| 3b 0a 58 09 09 50 72 65 | 64 6c 79 5b 6e 5d 20 3d |;.X..Pre|dly[n] =|
|00005030| 20 6e 31 3b 0a 58 09 7d | 0a 58 09 69 66 20 28 20 | n1;.X.}|.X.if ( |
|00005040| 67 65 74 63 6f 6d 6d 65 | 6e 74 28 66 29 20 29 0a |getcomme|nt(f) ).|
|00005050| 58 09 09 67 6f 74 6f 20 | 65 72 72 3b 0a 58 0a 58 |X..goto |err;.X.X|
|00005060| 09 72 65 74 75 72 6e 3b | 0a 58 20 20 20 20 65 72 |.return;|.X    er|
|00005070| 72 3a 0a 58 09 66 70 72 | 69 6e 74 66 28 73 74 64 |r:.X.fpr|intf(std|
|00005080| 65 72 72 2c 22 48 65 79 | 2c 20 73 6f 6d 65 74 68 |err,"Hey|, someth|
|00005090| 69 6e 67 27 73 20 77 72 | 6f 6e 67 20 77 69 74 68 |ing's wr|ong with|
|000050a0| 20 69 6e 69 74 64 61 74 | 61 2e 64 70 35 21 5c 6e | initdat|a.dp5!\n|
|000050b0| 22 29 3b 0a 58 09 6d 69 | 6c 6c 69 73 6c 65 65 70 |");.X.mi|llisleep|
|000050c0| 28 32 30 30 30 29 3b 0a | 58 09 72 65 74 75 72 6e |(2000);.|X.return|
|000050d0| 3b 0a 58 7d 0a 58 67 65 | 74 63 6f 6d 6d 65 6e 74 |;.X}.Xge|tcomment|
|000050e0| 28 66 29 0a 58 46 49 4c | 45 20 2a 66 3b 0a 58 7b |(f).XFIL|E *f;.X{|
|000050f0| 0a 58 09 63 68 61 72 20 | 62 75 66 66 5b 42 55 46 |.X.char |buff[BUF|
|00005100| 53 49 5a 5d 3b 0a 58 0a | 58 09 69 66 20 28 20 66 |SIZ];.X.|X.if ( f|
|00005110| 73 63 61 6e 66 28 66 2c | 22 25 73 22 2c 62 75 66 |scanf(f,|"%s",buf|
|00005120| 66 29 20 21 3d 20 31 20 | 7c 7c 20 2a 62 75 66 66 |f) != 1 ||| *buff|
|00005130| 20 21 3d 20 27 23 27 20 | 29 0a 58 09 09 72 65 74 | != '#' |).X..ret|
|00005140| 75 72 6e 28 31 29 3b 0a | 58 09 72 65 74 75 72 6e |urn(1);.|X.return|
|00005150| 28 30 29 3b 0a 58 7d 0a | 45 4e 44 5f 4f 46 5f 46 |(0);.X}.|END_OF_F|
|00005160| 49 4c 45 0a 69 66 20 74 | 65 73 74 20 31 38 38 38 |ILE.if t|est 1888|
|00005170| 32 20 2d 6e 65 20 60 77 | 63 20 2d 63 20 3c 27 64 |2 -ne `w|c -c <'d|
|00005180| 65 70 35 2e 6d 6e 75 27 | 60 3b 20 74 68 65 6e 0a |ep5.mnu'|`; then.|
|00005190| 20 20 20 20 65 63 68 6f | 20 73 68 61 72 3a 20 5c |    echo| shar: \|
|000051a0| 22 27 64 65 70 35 2e 6d | 6e 75 27 5c 22 20 75 6e |"'dep5.m|nu'\" un|
|000051b0| 70 61 63 6b 65 64 20 77 | 69 74 68 20 77 72 6f 6e |packed w|ith wron|
|000051c0| 67 20 73 69 7a 65 21 0a | 66 69 0a 23 20 65 6e 64 |g size!.|fi.# end|
|000051d0| 20 6f 66 20 27 64 65 70 | 35 2e 6d 6e 75 27 0a 66 | of 'dep|5.mnu'.f|
|000051e0| 69 0a 69 66 20 74 65 73 | 74 20 2d 66 20 27 6d 61 |i.if tes|t -f 'ma|
|000051f0| 63 2d 6d 64 72 2e 61 27 | 20 2d 61 20 22 24 7b 31 |c-mdr.a'| -a "${1|
|00005200| 7d 22 20 21 3d 20 22 2d | 63 22 20 3b 20 74 68 65 |}" != "-|c" ; the|
|00005210| 6e 20 0a 20 20 65 63 68 | 6f 20 73 68 61 72 3a 20 |n .  ech|o shar: |
|00005220| 57 69 6c 6c 20 6e 6f 74 | 20 63 6c 6f 62 62 65 72 |Will not| clobber|
|00005230| 20 65 78 69 73 74 69 6e | 67 20 66 69 6c 65 20 5c | existin|g file \|
|00005240| 22 27 6d 61 63 2d 6d 64 | 72 2e 61 27 5c 22 0a 65 |"'mac-md|r.a'\".e|
|00005250| 6c 73 65 0a 65 63 68 6f | 20 73 68 61 72 3a 20 45 |lse.echo| shar: E|
|00005260| 78 74 72 61 63 74 69 6e | 67 20 5c 22 27 6d 61 63 |xtractin|g \"'mac|
|00005270| 2d 6d 64 72 2e 61 27 5c | 22 20 5c 28 31 34 34 33 |-mdr.a'\|" \(1443|
|00005280| 36 20 63 68 61 72 61 63 | 74 65 72 73 5c 29 0a 73 |6 charac|ters\).s|
|00005290| 65 64 20 22 73 2f 5e 58 | 2f 2f 22 20 3e 27 6d 61 |ed "s/^X|//" >'ma|
|000052a0| 63 2d 6d 64 72 2e 61 27 | 20 3c 3c 27 45 4e 44 5f |c-mdr.a'| <<'END_|
|000052b0| 4f 46 5f 46 49 4c 45 27 | 0a 58 3b 3b 3b 3b 3b 3b |OF_FILE'|.X;;;;;;|
|000052c0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000052d0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000052e0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000052f0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00005300| 3b 3b 3b 3b 0a 58 3b 20 | 24 49 64 3a 20 6d 61 63 |;;;;.X; |$Id: mac|
|00005310| 2d 6d 64 72 2e 61 2c 76 | 20 31 2e 36 20 38 39 2f |-mdr.a,v| 1.6 89/|
|00005320| 30 35 2f 30 36 20 31 37 | 3a 31 33 3a 33 33 20 6c |05/06 17|:13:33 l|
|00005330| 65 65 20 45 78 70 20 24 | 0a 58 3b 0a 58 3b 20 6d |ee Exp $|.X;.X; m|
|00005340| 69 64 69 20 64 72 69 76 | 65 72 0a 58 3b 0a 58 3b |idi driv|er.X;.X;|
|00005350| 20 61 6c 73 6f 20 69 6e | 63 6c 75 64 65 73 20 61 | also in|cludes a|
|00005360| 20 6d 69 6c 6c 69 73 65 | 63 6f 6e 64 20 72 65 6c | millise|cond rel|
|00005370| 61 74 69 76 65 2d 74 69 | 6d 65 20 63 6f 75 6e 74 |ative-ti|me count|
|00005380| 65 72 20 77 69 74 68 20 | 35 20 6d 53 20 72 65 73 |er with |5 mS res|
|00005390| 6f 6c 75 74 69 6f 6e 0a | 58 3b 0a 58 3b 20 53 74 |olution.|X;.X; St|
|000053a0| 65 76 65 6e 20 41 2e 20 | 46 61 6c 63 6f 20 20 2d |even A. |Falco  -|
|000053b0| 20 6d 6f 73 73 21 73 61 | 66 0a 58 3b 20 33 2f 36 | moss!sa|f.X; 3/6|
|000053c0| 2f 38 37 0a 58 3b 20 24 | 4c 6f 67 3a 09 6d 61 63 |/87.X; $|Log:.mac|
|000053d0| 2d 6d 64 72 2e 61 2c 76 | 20 24 0a 58 3b 20 52 65 |-mdr.a,v| $.X; Re|
|000053e0| 76 69 73 69 6f 6e 20 31 | 2e 36 20 20 38 39 2f 30 |vision 1|.6  89/0|
|000053f0| 35 2f 30 36 20 20 31 37 | 3a 31 33 3a 33 33 20 20 |5/06  17|:13:33  |
|00005400| 6c 65 65 0a 58 3b 20 72 | 65 6c 2e 20 74 6f 20 63 |lee.X; r|el. to c|
|00005410| 6f 6d 70 2e 73 6f 75 72 | 63 65 73 2e 6d 69 73 63 |omp.sour|ces.misc|
|00005420| 0a 58 3b 20 0a 58 3b 0a | 58 3b 20 70 6f 72 74 69 |.X; .X;.|X; porti|
|00005430| 6f 6e 73 20 74 61 6b 65 | 6e 20 66 72 6f 6d 20 61 |ons take|n from a|
|00005440| 72 74 69 63 6c 65 20 69 | 6e 20 6e 6f 76 20 38 35 |rticle i|n nov 85|
|00005450| 20 6d 61 63 74 75 74 6f | 72 20 62 79 20 4b 69 72 | mactuto|r by Kir|
|00005460| 6b 20 41 75 73 74 69 6e | 0a 58 3b 0a 58 3b 3b 3b |k Austin|.X;.X;;;|
|00005470| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00005480| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|00005490| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000054a0| 3b 3b 3b 3b 3b 3b 3b 3b | 3b 3b 3b 3b 3b 3b 3b 3b |;;;;;;;;|;;;;;;;;|
|000054b0| 3b 3b 3b 3b 3b 3b 3b 0a | 58 3b 0a 58 09 09 42 52 |;;;;;;;.|X;.X..BR|
|000054c0| 41 4e 43 48 09 53 48 4f | 52 54 09 09 3b 20 75 73 |ANCH.SHO|RT..; us|
|000054d0| 65 20 73 68 6f 72 74 20 | 64 69 73 70 6c 61 63 65 |e short |displace|
|000054e0| 6d 65 6e 74 73 0a 58 09 | 09 43 41 53 45 09 4f 4e |ments.X.|.CASE.ON|
|000054f0| 09 09 3b 20 62 65 20 63 | 61 73 65 2d 73 65 6e 73 |..; be c|ase-sens|
|00005500| 69 74 69 76 65 0a 58 09 | 09 53 54 52 49 4e 47 09 |itive.X.|.STRING.|
|00005510| 50 41 53 43 41 4c 09 09 | 3b 20 75 73 65 20 70 61 |PASCAL..|; use pa|
|00005520| 73 63 61 6c 2d 73 74 79 | 6c 65 20 73 74 72 69 6e |scal-sty|le strin|
|00005530| 67 73 0a 58 3b 0a 58 3b | 20 74 69 6d 65 72 20 63 |gs.X;.X;| timer c|
|00005540| 6f 6e 73 74 61 6e 74 73 | 0a 58 3b 0a 58 54 49 4d |onstants|.X;.XTIM|
|00005550| 45 5f 49 4e 43 09 45 51 | 55 09 35 09 09 3b 20 67 |E_INC.EQ|U.5..; g|
|00005560| 72 61 6e 75 6c 61 72 69 | 74 79 20 6f 66 20 74 69 |ranulari|ty of ti|
|00005570| 6d 65 72 0a 58 4d 53 35 | 09 09 45 51 55 09 33 39 |mer.XMS5|..EQU.39|
|00005580| 31 37 09 09 3b 20 56 49 | 41 20 74 69 63 73 20 70 |17..; VI|A tics p|
|00005590| 65 72 20 35 20 6d 73 20 | 28 31 2e 32 37 36 36 20 |er 5 ms |(1.2766 |
|000055a0| 75 53 20 65 61 63 68 29 | 0a 58 3b 0a 58 54 31 56 |uS each)|.X;.XT1V|
|000055b0| 45 43 09 09 45 51 55 09 | 32 34 09 09 3b 20 6c 76 |EC..EQU.|24..; lv|
|000055c0| 6c 31 20 74 72 61 70 20 | 74 61 62 6c 65 20 6f 66 |l1 trap |table of|
|000055d0| 66 73 65 74 0a 58 4d 41 | 58 5f 42 59 54 45 09 45 |fset.XMA|X_BYTE.E|
|000055e0| 51 55 09 24 46 46 09 09 | 3b 20 6c 69 6b 65 20 69 |QU.$FF..|; like i|
|000055f0| 74 20 73 61 79 73 0a 58 | 56 49 41 54 31 45 4e 09 |t says.X|VIAT1EN.|
|00005600| 09 45 51 55 09 24 43 30 | 09 09 3b 20 65 6e 61 62 |.EQU.$C0|..; enab|
|00005610| 6c 65 20 74 69 6d 65 72 | 20 31 20 69 6e 74 65 72 |le timer| 1 inter|
|00005620| 72 75 70 74 73 0a 58 56 | 49 41 54 31 44 49 09 09 |rupts.XV|IAT1DI..|
|00005630| 45 51 55 09 24 34 30 09 | 09 3b 20 64 69 61 62 6c |EQU.$40.|.; diabl|
|00005640| 65 20 74 69 6d 65 72 20 | 31 20 20 69 6e 74 65 72 |e timer |1  inter|
|00005650| 72 75 70 74 73 0a 58 56 | 49 41 52 55 4e 09 09 45 |rupts.XV|IARUN..E|
|00005660| 51 55 09 24 34 30 09 09 | 3b 20 6d 61 6b 65 20 54 |QU.$40..|; make T|
|00005670| 31 20 66 72 65 65 2d 72 | 75 6e 0a 58 56 49 41 53 |1 free-r|un.XVIAS|
|00005680| 54 4f 50 09 09 45 51 55 | 09 24 33 46 09 09 3b 20 |TOP..EQU|.$3F..; |
|00005690| 70 75 74 20 54 31 20 69 | 6e 20 73 69 6e 67 6c 65 |put T1 i|n single|
|000056a0| 2d 73 68 6f 74 20 6d 6f | 64 65 0a 58 3b 0a 58 3b |-shot mo|de.X;.X;|
|000056b0| 20 71 75 65 75 65 20 6c | 65 6e 67 74 68 73 0a 58 | queue l|engths.X|
|000056c0| 3b 0a 58 54 78 51 53 69 | 7a 65 09 09 45 51 55 09 |;.XTxQSi|ze..EQU.|
|000056d0| 24 31 30 30 09 09 3b 20 | 74 72 61 6e 73 6d 69 74 |$100..; |transmit|
|000056e0| 20 62 75 66 66 65 72 20 | 6c 65 6e 67 74 68 0a 58 | buffer |length.X|
|000056f0| 52 78 51 53 69 7a 65 09 | 09 45 51 55 09 24 31 30 |RxQSize.|.EQU.$10|
|00005700| 30 09 09 3b 20 72 65 63 | 65 69 76 65 20 62 75 66 |0..; rec|eive buf|
|00005710| 66 65 72 20 6c 65 6e 67 | 74 68 0a 58 3b 0a 58 3b |fer leng|th.X;.X;|
|00005720| 20 71 75 65 75 65 20 73 | 74 61 74 65 20 66 6c 61 | queue s|tate fla|
|00005730| 67 73 0a 58 3b 0a 58 6d | 69 64 69 5f 65 6d 09 09 |gs.X;.Xm|idi_em..|
|00005740| 45 51 55 09 24 46 46 09 | 09 3b 20 71 75 65 75 65 |EQU.$FF.|.; queue|
|00005750| 20 69 73 20 65 6d 70 74 | 79 0a 58 6d 69 64 69 5f | is empt|y.Xmidi_|
|00005760| 6e 65 09 09 45 51 55 09 | 24 30 30 09 09 3b 20 71 |ne..EQU.|$00..; q|
|00005770| 75 65 75 65 20 69 73 20 | 6e 6f 74 20 65 6d 70 74 |ueue is |not empt|
|00005780| 79 0a 58 3b 0a 58 3b 20 | 54 68 65 20 66 6f 6c 6c |y.X;.X; |The foll|
|00005790| 6f 77 69 6e 67 20 61 72 | 65 20 73 74 61 63 6b 20 |owing ar|e stack |
|000057a0| 6f 66 66 73 65 74 73 20 | 67 69 76 65 6e 20 74 68 |offsets |given th|
|000057b0| 61 74 20 61 6e 20 69 74 | 65 6d 20 69 73 20 70 61 |at an it|em is pa|
|000057c0| 73 73 65 64 0a 58 3b 20 | 62 79 20 74 68 65 20 4d |ssed.X; |by the M|
|000057d0| 50 57 20 43 20 63 6f 6d | 70 69 6c 65 72 20 61 6e |PW C com|piler an|
|000057e0| 64 20 4c 49 4e 4b 2f 55 | 4e 4c 4b 20 69 73 20 75 |d LINK/U|NLK is u|
|000057f0| 73 65 64 2e 20 44 41 4e | 47 45 52 21 21 21 20 20 |sed. DAN|GER!!!  |
|00005800| 4d 50 57 20 43 0a 58 3b | 20 61 6c 77 61 79 73 20 |MPW C.X;| always |
|00005810| 70 61 73 73 65 73 20 69 | 6e 20 61 20 6c 6f 6e 67 |passes i|n a long|
|00005820| 20 76 61 6c 75 65 2e 0a | 58 3b 0a 58 3b 20 4e 6f | value..|X;.X; No|
|00005830| 74 65 20 74 68 61 74 20 | 69 6e 20 50 61 73 63 61 |te that |in Pasca|
|00005840| 6c 2c 20 61 20 62 79 74 | 65 20 69 73 20 70 61 73 |l, a byt|e is pas|
|00005850| 73 65 64 20 61 73 20 61 | 20 73 68 6f 72 74 20 72 |sed as a| short r|
|00005860| 61 74 68 65 72 20 74 68 | 61 6e 20 61 20 6c 6f 6e |ather th|an a lon|
|00005870| 67 2e 2e 2e 0a 58 3b 20 | 73 6f 20 47 65 74 5f 42 |g....X; |so Get_B|
|00005880| 79 74 65 20 77 6f 75 6c | 64 20 62 65 20 24 39 2e |yte woul|d be $9.|
|00005890| 20 20 41 6c 73 6f 2c 20 | 69 6e 20 43 2c 20 74 68 |  Also, |in C, th|
|000058a0| 65 20 63 61 6c 6c 65 72 | 20 63 6c 65 61 6e 73 20 |e caller| cleans |
|000058b0| 75 70 2c 20 77 68 69 6c | 65 20 69 6e 0a 58 3b 20 |up, whil|e in.X; |
|000058c0| 50 61 73 63 61 6c 20 74 | 68 65 20 63 61 6c 6c 65 |Pascal t|he calle|
|000058d0| 65 20 63 6c 65 61 6e 73 | 20 75 70 2e 0a 58 3b 0a |e cleans| up..X;.|
|000058e0| 58 47 65 74 5f 42 79 74 | 65 09 45 51 55 09 24 30 |XGet_Byt|e.EQU.$0|
|000058f0| 30 30 42 0a 58 47 65 74 | 5f 53 68 6f 72 74 09 45 |00B.XGet|_Short.E|
|00005900| 51 55 09 24 30 30 30 41 | 0a 58 47 65 74 5f 4c 6f |QU.$000A|.XGet_Lo|
|00005910| 6e 67 09 45 51 55 09 24 | 30 30 30 38 0a 58 3b 0a |ng.EQU.$|0008.X;.|
|00005920| 58 3b 20 73 65 6c 65 63 | 74 20 6f 6e 65 20 62 61 |X; selec|t one ba|
|00005930| 73 65 64 20 6f 6e 20 6f | 73 63 69 6c 6c 61 74 6f |sed on o|scillato|
|00005940| 72 20 66 72 65 71 75 65 | 6e 63 79 20 75 73 65 64 |r freque|ncy used|
|00005950| 20 69 6e 20 68 61 72 64 | 77 61 72 65 0a 58 3b 0a | in hard|ware.X;.|
|00005960| 58 3b 43 5f 62 61 75 64 | 09 09 45 51 55 09 25 30 |X;C_baud|..EQU.%0|
|00005970| 31 30 30 30 31 30 30 09 | 3b 20 35 30 30 20 4b 48 |1000100.|; 500 KH|
|00005980| 7a 0a 58 43 5f 62 61 75 | 64 09 09 45 51 55 09 25 |z.XC_bau|d..EQU.%|
|00005990| 31 30 30 30 30 31 30 30 | 09 3b 20 31 20 4d 48 7a |10000100|.; 1 MHz|
|000059a0| 0a 58 3b 43 5f 62 61 75 | 64 09 09 45 51 55 09 25 |.X;C_bau|d..EQU.%|
|000059b0| 31 31 30 30 30 31 30 30 | 09 3b 20 32 20 4d 48 7a |11000100|.; 2 MHz|
|000059c0| 0a 58 3b 0a 58 3b 20 6d | 69 73 63 20 63 6f 6e 74 |.X;.X; m|isc cont|
|000059d0| 72 6f 6c 73 20 69 6e 20 | 53 43 43 20 63 68 69 70 |rols in |SCC chip|
|000059e0| 0a 58 3b 0a 58 4e 6f 5f | 57 5f 52 65 71 09 45 51 |.X;.XNo_|W_Req.EQ|
|000059f0| 55 09 30 0a 58 52 78 5f | 6f 66 66 09 09 45 51 55 |U.0.XRx_|off..EQU|
|00005a00| 09 25 31 31 30 30 30 30 | 30 30 0a 58 54 78 5f 6f |.%110000|00.XTx_o|
|00005a10| 66 66 09 09 45 51 55 09 | 25 30 31 31 30 30 30 31 |ff..EQU.|%0110001|
|00005a20| 30 0a 58 54 52 78 43 09 | 09 45 51 55 09 25 30 30 |0.XTRxC.|.EQU.%00|
|00005a30| 31 30 31 30 30 30 0a 58 | 42 72 67 65 6e 5f 6f 66 |101000.X|Brgen_of|
|00005a40| 66 09 45 51 55 09 30 0a | 58 52 78 5f 6f 6e 09 09 |f.EQU.0.|XRx_on..|
|00005a50| 45 51 55 09 25 31 31 30 | 30 30 30 30 31 0a 58 54 |EQU.%110|00001.XT|
|00005a60| 78 5f 6f 6e 09 09 45 51 | 55 09 25 30 31 31 30 31 |x_on..EQ|U.%01101|
|00005a70| 30 31 30 0a 58 44 43 44 | 5f 69 6e 74 09 09 45 51 |010.XDCD|_int..EQ|
|00005a80| 55 09 25 30 30 30 30 31 | 30 30 30 0a 58 52 73 74 |U.%00001|000.XRst|
|00005a90| 45 78 74 53 74 09 45 51 | 55 09 25 30 30 30 31 30 |ExtSt.EQ|U.%00010|
|00005aa0| 30 30 30 0a 58 45 6e 49 | 6e 74 09 09 45 51 55 09 |000.XEnI|nt..EQU.|
|00005ab0| 25 30 30 30 31 30 30 31 | 31 0a 58 4d 49 6e 74 45 |%0001001|1.XMIntE|
|00005ac0| 6e 09 09 45 51 55 09 25 | 30 30 30 30 31 30 31 30 |n..EQU.%|00001010|
|00005ad0| 0a 58 45 6e 4d 6f 49 6e | 74 09 09 45 51 55 09 25 |.XEnMoIn|t..EQU.%|
|00005ae0| 30 30 30 30 30 30 30 31 | 0a 58 4e 6f 5f 56 65 63 |00000001|.XNo_Vec|
|00005af0| 09 09 45 51 55 09 25 30 | 30 30 30 30 30 31 30 0a |..EQU.%0|0000010.|
|00005b00| 58 61 52 65 73 65 74 09 | 09 45 51 55 09 25 31 30 |XaReset.|.EQU.%10|
|00005b10| 30 30 30 30 30 30 0a 58 | 72 73 74 54 42 45 09 09 |000000.X|rstTBE..|
|00005b20| 45 51 55 09 24 32 38 0a | 58 72 73 74 45 45 52 52 |EQU.$28.|XrstEERR|
|00005b30| 09 09 45 51 55 09 24 33 | 30 0a 58 4e 6f 44 61 74 |..EQU.$3|0.XNoDat|
|00005b40| 61 09 09 45 51 55 09 24 | 46 46 46 46 0a 58 3b 0a |a..EQU.$|FFFF.X;.|
|00005b50| 58 3b 20 6d 69 73 63 20 | 6f 66 66 73 65 74 73 20 |X; misc |offsets |
|00005b60| 69 6e 20 74 72 61 70 20 | 74 61 62 6c 65 0a 58 3b |in trap |table.X;|
|00005b70| 0a 58 61 72 78 49 4f 09 | 09 45 51 55 09 32 34 0a |.XarxIO.|.EQU.24.|
|00005b80| 58 61 74 78 49 4f 09 09 | 45 51 55 09 31 36 0a 58 |XatxIO..|EQU.16.X|
|00005b90| 61 73 70 52 43 09 09 45 | 51 55 09 32 38 0a 58 3b |aspRC..E|QU.28.X;|
|00005ba0| 0a 58 3b 20 53 52 20 6d | 61 73 6b 73 20 66 6f 72 |.X; SR m|asks for|
|00005bb0| 20 69 6e 74 65 72 72 75 | 70 74 20 63 6f 6e 74 72 | interru|pt contr|
|00005bc0| 6f 6c 0a 58 3b 0a 58 73 | 70 6c 33 09 09 45 51 55 |ol.X;.Xs|pl3..EQU|
|00005bd0| 09 24 30 33 30 30 09 09 | 3b 73 65 74 20 69 6e 74 |.$0300..|;set int|
|00005be0| 65 72 72 75 70 74 20 6c | 65 76 65 6c 20 74 6f 20 |errupt l|evel to |
|00005bf0| 33 0a 58 3b 0a 58 3b 20 | 53 43 43 20 72 65 67 69 |3.X;.X; |SCC regi|
|00005c00| 73 74 65 72 73 0a 58 3b | 0a 58 53 43 43 30 09 09 |sters.X;|.XSCC0..|
|00005c10| 45 51 55 09 30 0a 58 53 | 43 43 31 09 09 45 51 55 |EQU.0.XS|CC1..EQU|
|00005c20| 09 31 0a 58 53 43 43 32 | 09 09 45 51 55 09 32 0a |.1.XSCC2|..EQU.2.|
|00005c30| 58 53 43 43 33 09 09 45 | 51 55 09 33 0a 58 53 43 |XSCC3..E|QU.3.XSC|
|00005c40| 43 34 09 09 45 51 55 09 | 34 0a 58 53 43 43 35 09 |C4..EQU.|4.XSCC5.|
|00005c50| 09 45 51 55 09 35 0a 58 | 53 43 43 36 09 09 45 51 |.EQU.5.X|SCC6..EQ|
|00005c60| 55 09 36 0a 58 53 43 43 | 37 09 09 45 51 55 09 37 |U.6.XSCC|7..EQU.7|
|00005c70| 0a 58 53 43 43 38 09 09 | 45 51 55 09 38 0a 58 53 |.XSCC8..|EQU.8.XS|
|00005c80| 43 43 39 09 09 45 51 55 | 09 39 0a 58 53 43 43 31 |CC9..EQU|.9.XSCC1|
|00005c90| 30 09 09 45 51 55 09 31 | 30 0a 58 53 43 43 31 31 |0..EQU.1|0.XSCC11|
|00005ca0| 09 09 45 51 55 09 31 31 | 0a 58 53 43 43 31 32 09 |..EQU.11|.XSCC12.|
|00005cb0| 09 45 51 55 09 31 32 0a | 58 53 43 43 31 33 09 09 |.EQU.12.|XSCC13..|
|00005cc0| 45 51 55 09 31 33 0a 58 | 53 43 43 31 34 09 09 45 |EQU.13.X|SCC14..E|
|00005cd0| 51 55 09 31 34 0a 58 53 | 43 43 31 35 09 09 45 51 |QU.14.XS|CC15..EQ|
|00005ce0| 55 09 31 35 0a 58 3b 0a | 58 3b 20 6d 61 63 72 6f |U.15.X;.|X; macro|
|00005cf0| 20 74 6f 20 65 6e 71 75 | 65 75 65 20 61 20 62 79 | to enqu|eue a by|
|00005d00| 74 65 20 74 6f 20 62 65 | 20 74 72 61 6e 73 6d 69 |te to be| transmi|
|00005d10| 74 74 65 64 20 28 63 61 | 6e 27 74 20 75 73 65 20 |tted (ca|n't use |
|00005d20| 61 20 73 75 62 72 6f 75 | 74 69 6e 65 0a 58 3b 20 |a subrou|tine.X; |
|00005d30| 27 63 61 75 73 65 20 77 | 65 20 65 78 70 65 63 74 |'cause w|e expect|
|00005d40| 20 74 68 65 20 73 74 61 | 63 6b 20 74 6f 20 62 65 | the sta|ck to be|
|00005d50| 20 69 6e 20 61 20 63 65 | 72 74 61 69 6e 20 73 74 | in a ce|rtain st|
|00005d60| 61 74 65 21 29 0a 58 3b | 0a 58 09 09 4d 41 43 52 |ate!).X;|.X..MACR|
|00005d70| 4f 0a 58 09 09 54 78 45 | 6e 71 75 65 75 65 0a 58 |O.X..TxE|nqueue.X|
|00005d80| 09 09 4d 4f 56 45 09 54 | 78 42 79 74 65 49 6e 28 |..MOVE.T|xByteIn(|
|00005d90| 41 35 29 2c 44 30 09 09 | 3b 20 77 68 65 72 65 20 |A5),D0..|; where |
|00005da0| 74 6f 20 70 75 74 20 69 | 74 20 28 6f 66 66 73 65 |to put i|t (offse|
|00005db0| 74 29 0a 58 09 09 4c 45 | 41 09 54 78 51 75 65 75 |t).X..LE|A.TxQueu|
|00005dc0| 65 28 41 35 29 2c 41 32 | 09 09 3b 20 62 61 73 65 |e(A5),A2|..; base|
|00005dd0| 20 6f 66 20 71 75 65 75 | 65 0a 58 09 09 4d 4f 56 | of queu|e.X..MOV|
|00005de0| 45 2e 42 09 47 65 74 5f | 42 79 74 65 28 41 36 29 |E.B.Get_|Byte(A6)|
|00005df0| 2c 30 28 41 32 2c 44 30 | 29 09 3b 20 63 6f 70 79 |,0(A2,D0|).; copy|
|00005e00| 20 69 74 20 66 72 6f 6d | 20 74 68 65 20 73 74 61 | it from| the sta|
|00005e10| 63 6b 20 74 6f 20 74 68 | 65 20 71 75 65 75 65 0a |ck to th|e queue.|
|00005e20| 58 09 09 41 44 44 51 09 | 23 31 2c 44 30 09 09 09 |X..ADDQ.|#1,D0...|
|00005e30| 3b 20 62 75 6d 70 20 6f | 66 66 73 65 74 0a 58 09 |; bump o|ffset.X.|
|00005e40| 09 43 4d 50 09 23 54 78 | 51 53 69 7a 65 2c 44 30 |.CMP.#Tx|QSize,D0|
|00005e50| 09 09 3b 20 64 69 64 20 | 69 74 20 77 72 61 70 3f |..; did |it wrap?|
|00005e60| 0a 58 09 09 42 4e 45 09 | 40 31 09 09 09 3b 20 6e |.X..BNE.|@1...; n|
|00005e70| 6f 70 65 0a 58 09 09 4d | 4f 56 45 09 23 30 2c 44 |ope.X..M|OVE.#0,D|
|00005e80| 30 09 09 09 3b 20 79 6f | 75 20 62 65 74 63 68 61 |0...; yo|u betcha|
|00005e90| 27 0a 58 40 31 09 09 4d | 4f 56 45 09 44 30 2c 54 |'.X@1..M|OVE.D0,T|
|00005ea0| 78 42 79 74 65 49 6e 28 | 41 35 29 09 09 3b 20 72 |xByteIn(|A5)..; r|
|00005eb0| 65 70 6c 61 63 65 20 69 | 74 0a 58 09 09 45 4e 44 |eplace i|t.X..END|
|00005ec0| 4d 0a 58 3b 0a 58 3b 20 | 6d 61 63 72 6f 20 66 6f |M.X;.X; |macro fo|
|00005ed0| 72 20 64 65 6c 61 79 20 | 28 53 43 43 20 69 73 20 |r delay |(SCC is |
|00005ee0| 73 6c 6f 77 20 63 6f 6d | 70 61 72 65 64 20 74 6f |slow com|pared to|
|00005ef0| 20 36 38 30 30 30 29 0a | 58 3b 0a 58 09 09 4d 41 | 68000).|X;.X..MA|
|00005f00| 43 52 4f 0a 58 09 09 44 | 65 6c 61 79 0a 58 09 09 |CRO.X..D|elay.X..|
|00005f10| 4d 4f 56 45 2e 4c 09 28 | 53 50 29 2c 28 53 50 29 |MOVE.L.(|SP),(SP)|
|00005f20| 0a 58 09 09 45 4e 44 4d | 0a 58 3b 0a 58 3b 20 6d |.X..ENDM|.X;.X; m|
|00005f30| 61 63 72 6f 20 74 6f 20 | 6c 6f 61 64 20 61 6e 20 |acro to |load an |
|00005f40| 53 43 43 20 72 65 67 69 | 73 74 65 72 20 28 64 6f |SCC regi|ster (do|
|00005f50| 75 62 6c 65 20 6d 6f 76 | 65 73 20 61 72 65 20 6f |uble mov|es are o|
|00005f60| 6e 20 70 75 72 70 6f 73 | 65 20 2d 20 73 6c 6f 77 |n purpos|e - slow|
|00005f70| 20 64 6f 77 6e 29 0a 58 | 3b 0a 58 09 09 4d 41 43 | down).X|;.X..MAC|
|00005f80| 52 4f 0a 58 09 09 4c 73 | 63 63 09 26 73 72 65 67 |RO.X..Ls|cc.&sreg|
|00005f90| 2c 26 76 61 6c 0a 58 09 | 09 4d 4f 56 45 2e 42 09 |,&val.X.|.MOVE.B.|
|00005fa0| 26 73 72 65 67 2c 44 30 | 0a 58 09 09 4d 4f 56 45 |&sreg,D0|.X..MOVE|
|00005fb0| 2e 42 09 44 30 2c 28 41 | 30 29 0a 58 09 09 44 65 |.B.D0,(A|0).X..De|
|00005fc0| 6c 61 79 0a 58 09 09 4d | 4f 56 45 2e 42 09 26 76 |lay.X..M|OVE.B.&v|
|00005fd0| 61 6c 2c 44 30 0a 58 09 | 09 4d 4f 56 45 2e 42 09 |al,D0.X.|.MOVE.B.|
|00005fe0| 44 30 2c 28 41 30 29 0a | 58 09 09 44 65 6c 61 79 |D0,(A0).|X..Delay|
|00005ff0| 0a 58 09 09 45 4e 44 4d | 0a 58 3b 0a 58 3b 20 64 |.X..ENDM|.X;.X; d|
|00006000| 65 62 75 67 20 74 72 61 | 70 73 20 66 6f 72 20 4d |ebug tra|ps for M|
|00006010| 61 63 73 62 75 67 0a 58 | 3b 0a 58 44 62 67 62 09 |acsbug.X|;.XDbgb.|
|00006020| 09 4f 50 57 4f 52 44 09 | 24 41 39 46 46 09 09 3b |.OPWORD.|$A9FF..;|
|00006030| 20 62 72 65 61 6b 70 6f | 69 6e 74 0a 58 44 62 67 | breakpo|int.XDbg|
|00006040| 73 09 09 4f 50 57 4f 52 | 44 09 24 41 42 46 46 09 |s..OPWOR|D.$ABFF.|
|00006050| 09 3b 20 70 72 69 6e 74 | 20 73 74 72 69 6e 67 20 |.; print| string |
|00006060| 61 6e 64 20 62 72 65 61 | 6b 70 6f 69 6e 74 0a 58 |and brea|kpoint.X|
|00006070| 3b 0a 58 3b 20 64 65 62 | 75 67 20 6d 61 63 72 6f |;.X; deb|ug macro|
|00006080| 0a 58 3b 0a 58 09 09 4d | 41 43 52 4f 0a 58 09 09 |.X;.X..M|ACRO.X..|
|00006090| 44 62 73 09 26 73 74 72 | 69 6e 67 0a 58 3b 09 09 |Dbs.&str|ing.X;..|
|000060a0| 50 45 41 09 26 73 74 72 | 69 6e 67 0a 58 3b 09 09 |PEA.&str|ing.X;..|
|000060b0| 44 62 67 73 0a 58 09 09 | 45 4e 44 4d 0a 58 3b 0a |Dbgs.X..|ENDM.X;.|
|000060c0| 58 3b 20 63 68 69 70 20 | 61 64 64 72 65 73 73 65 |X; chip |addresse|
|000060d0| 73 20 61 6e 64 20 6f 66 | 66 73 65 74 73 0a 58 3b |s and of|fsets.X;|
|000060e0| 0a 58 09 09 50 52 49 4e | 54 09 4f 46 46 0a 58 09 |.X..PRIN|T.OFF.X.|
|000060f0| 09 49 4e 43 4c 55 44 45 | 09 27 53 79 73 45 71 75 |.INCLUDE|.'SysEqu|
|00006100| 2e 61 27 0a 58 09 09 50 | 52 49 4e 54 09 4f 4e 0a |.a'.X..P|RINT.ON.|
|00006110| 58 3b 0a 58 3b 20 74 68 | 69 73 20 63 6f 64 65 20 |X;.X; th|is code |
|00006120| 6d 75 73 74 20 61 6c 77 | 61 79 73 20 62 65 20 72 |must alw|ays be r|
|00006130| 65 73 69 64 65 6e 74 20 | 73 6f 20 77 65 20 6c 6f |esident |so we lo|
|00006140| 61 64 20 69 74 20 69 6e | 20 4d 61 69 6e 20 73 65 |ad it in| Main se|
|00006150| 67 6d 65 6e 74 20 74 6f | 0a 58 3b 20 67 75 61 72 |gment to|.X; guar|
|00006160| 61 6e 74 65 65 20 74 68 | 61 74 2e 20 20 28 45 76 |antee th|at.  (Ev|
|00006170| 65 72 20 63 61 6c 6c 20 | 61 6e 20 69 6e 74 65 72 |er call |an inter|
|00006180| 72 75 70 74 20 68 61 6e | 64 6c 65 72 20 74 68 61 |rupt han|dler tha|
|00006190| 74 20 77 61 73 6e 27 74 | 20 72 65 73 69 64 65 6e |t wasn't| residen|
|000061a0| 74 3f 29 0a 58 3b 0a 58 | 09 09 53 45 47 09 27 4d |t?).X;.X|..SEG.'M|
|000061b0| 61 69 6e 27 0a 58 3b 0a | 58 3b 20 67 6c 6f 62 61 |ain'.X;.|X; globa|
|000061c0| 6c 20 61 72 65 61 0a 58 | 3b 0a 58 09 09 45 58 50 |l area.X|;.X..EXP|
|000061d0| 4f 52 54 20 28 6d 69 64 | 69 5f 74 78 73 74 2c 20 |ORT (mid|i_txst, |
|000061e0| 6d 69 64 69 5f 72 78 73 | 74 2c 20 6d 69 64 69 5f |midi_rxs|t, midi_|
|000061f0| 74 69 6d 65 29 3a 44 41 | 54 41 0a 58 3b 0a 58 43 |time):DA|TA.X;.XC|
|00006200| 74 6c 4f 66 66 73 65 74 | 09 44 53 2e 57 09 31 09 |tlOffset|.DS.W.1.|
|00006210| 09 09 3b 20 63 68 61 6e | 6e 65 6c 20 63 6f 6e 74 |..; chan|nel cont|
|00006220| 72 6f 6c 20 6f 66 66 73 | 65 74 0a 58 44 61 74 61 |rol offs|et.XData|
|00006230| 4f 66 66 73 65 74 09 44 | 53 2e 57 09 31 09 09 09 |Offset.D|S.W.1...|
|00006240| 3b 20 63 68 61 6e 6e 65 | 6c 20 64 61 74 61 20 6f |; channe|l data o|
|00006250| 66 66 73 65 74 0a 58 43 | 68 6e 52 65 73 65 74 09 |ffset.XC|hnReset.|
|00006260| 44 53 2e 42 09 31 09 09 | 09 3b 20 53 43 43 20 63 |DS.B.1..|.; SCC c|
|00006270| 68 61 6e 6e 65 6c 20 72 | 65 73 65 74 20 73 65 6c |hannel r|eset sel|
|00006280| 65 63 74 0a 58 52 78 49 | 6e 74 4f 66 66 73 65 74 |ect.XRxI|ntOffset|
|00006290| 09 44 53 2e 57 09 31 09 | 09 09 3b 20 66 6f 72 20 |.DS.W.1.|..; for |
|000062a0| 64 69 73 70 61 74 63 68 | 20 74 61 62 6c 65 0a 58 |dispatch| table.X|
|000062b0| 54 78 49 6e 74 4f 66 66 | 73 65 74 09 44 53 2e 57 |TxIntOff|set.DS.W|
|000062c0| 09 31 09 09 09 3b 20 6c | 69 6b 65 77 69 73 65 0a |.1...; l|ikewise.|
|000062d0| 58 53 70 65 63 52 65 63 | 43 6f 6e 64 09 44 53 2e |XSpecRec|Cond.DS.|
|000062e0| 57 09 31 09 09 09 3b 20 | 61 6e 64 20 6f 6e 65 20 |W.1...; |and one |
|000062f0| 6d 6f 72 65 0a 58 3b 0a | 58 54 78 51 75 65 75 65 |more.X;.|XTxQueue|
|00006300| 09 09 44 53 2e 42 09 54 | 78 51 53 69 7a 65 09 09 |..DS.B.T|xQSize..|
|00006310| 09 3b 20 54 78 20 64 61 | 74 61 20 71 75 65 75 65 |.; Tx da|ta queue|
|00006320| 0a 58 6d 69 64 69 5f 74 | 78 73 74 09 44 53 2e 42 |.Xmidi_t|xst.DS.B|
|00006330| 09 31 09 09 09 3b 20 74 | 68 65 20 71 75 65 75 65 |.1...; t|he queue|
|00006340| 20 73 74 61 74 65 0a 58 | 54 78 42 79 74 65 49 6e | state.X|TxByteIn|
|00006350| 09 44 53 2e 57 09 31 09 | 09 09 3b 20 6f 66 66 73 |.DS.W.1.|..; offs|
|00006360| 65 74 20 66 6f 72 20 65 | 6e 71 75 65 75 65 0a 58 |et for e|nqueue.X|
|00006370| 54 78 42 79 74 65 4f 75 | 74 09 44 53 2e 57 09 31 |TxByteOu|t.DS.W.1|
|00006380| 09 09 09 3b 20 6f 66 66 | 73 65 74 20 66 6f 72 20 |...; off|set for |
|00006390| 64 65 71 75 65 75 65 0a | 58 3b 0a 58 52 78 51 75 |dequeue.|X;.XRxQu|
|000063a0| 65 75 65 09 09 44 53 2e | 42 09 52 78 51 53 69 7a |eue..DS.|B.RxQSiz|
|000063b0| 65 09 09 09 3b 20 61 6e | 64 20 74 68 65 20 52 78 |e...; an|d the Rx|
|000063c0| 20 71 75 65 75 65 0a 58 | 6d 69 64 69 5f 72 78 73 | queue.X|midi_rxs|
|000063d0| 74 09 44 53 2e 42 09 31 | 09 09 09 3b 20 74 68 65 |t.DS.B.1|...; the|
|000063e0| 20 71 75 65 75 65 20 73 | 74 61 74 65 0a 58 52 78 | queue s|tate.XRx|
|000063f0| 42 79 74 65 49 6e 09 44 | 53 2e 57 09 31 09 09 09 |ByteIn.D|S.W.1...|
+--------+-------------------------+-------------------------+--------+--------+