home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: Acorn Spark Compressed Archive
(archive/acornSpark).
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 1a 82 21 52 69 66 66 00 | 01 a0 21 52 69 66 66 d2 |..!Riff.|..!Riff.|
|00000010| 28 00 00 2a 1e fd 58 0b | 60 d2 28 00 00 45 dc fd |(..*..X.|`.(..E..|
|00000020| ff cf 09 cb d1 33 00 00 | 00 1a 82 21 48 65 6c 70 |.....3..|...!Help|
|00000030| 00 01 20 3c 4a 01 20 ff | 41 06 00 00 2a 1e cc 58 |.. <J. .|A...*..X|
|00000040| f5 09 41 06 00 00 45 ff | ff ff d6 e4 ca d1 03 00 |..A...E.|........|
|00000050| 00 00 21 48 65 6c 70 20 | 66 6f 72 20 21 52 69 66 |..!Help |for !Rif|
|00000060| 66 20 30 2e 30 31 20 28 | 31 34 20 44 65 63 20 31 |f 0.01 (|14 Dec 1|
|00000070| 39 39 34 29 0a 0a 21 52 | 69 66 66 20 67 65 6e 65 |994)..!R|iff gene|
|00000080| 72 61 74 65 73 20 72 61 | 6e 64 6f 6d 20 72 65 70 |rates ra|ndom rep|
|00000090| 65 61 74 69 6e 67 20 70 | 61 74 74 65 72 6e 73 20 |eating p|atterns |
|000000a0| 6f 6e 20 61 6e 20 61 74 | 74 61 63 68 65 64 20 4d |on an at|tached M|
|000000b0| 49 44 49 20 69 6e 73 74 | 72 75 6d 65 6e 74 2e 0a |IDI inst|rument..|
|000000c0| 41 20 6e 65 77 20 6e 6f | 74 65 20 69 73 20 61 64 |A new no|te is ad|
|000000d0| 64 65 64 20 65 61 63 68 | 20 74 69 6d 65 20 74 68 |ded each| time th|
|000000e0| 65 20 70 61 74 74 65 72 | 6e 20 69 73 20 70 6c 61 |e patter|n is pla|
|000000f0| 79 65 64 20 75 6e 6c 65 | 73 73 20 74 68 65 20 6e |yed unle|ss the n|
|00000100| 6f 74 65 20 63 68 6f 73 | 65 6e 0a 77 6f 75 6c 64 |ote chos|en.would|
|00000110| 20 62 65 20 75 6e 68 61 | 72 6d 6f 6e 69 6f 75 73 | be unha|rmonious|
|00000120| 20 69 6e 20 74 68 65 20 | 70 6f 73 69 74 69 6f 6e | in the |position|
|00000130| 20 63 68 6f 73 65 6e 20 | 66 6f 72 20 69 74 2e 20 | chosen |for it. |
|00000140| 20 53 6f 6d 65 74 69 6d | 65 73 20 61 20 73 65 63 | Sometim|es a sec|
|00000150| 74 69 6f 6e 0a 6f 66 20 | 74 68 65 20 70 61 74 74 |tion.of |the patt|
|00000160| 65 72 6e 20 69 73 20 63 | 6f 70 69 65 64 20 74 6f |ern is c|opied to|
|00000170| 20 6f 6e 65 20 6f 72 20 | 6d 6f 72 65 20 6f 74 68 | one or |more oth|
|00000180| 65 72 20 6c 6f 63 61 74 | 69 6f 6e 73 20 69 6e 20 |er locat|ions in |
|00000190| 74 68 65 20 70 61 74 74 | 65 72 6e 2c 0a 70 6f 73 |the patt|ern,.pos|
|000001a0| 73 69 62 6c 79 20 77 69 | 74 68 20 61 20 70 69 74 |sibly wi|th a pit|
|000001b0| 63 68 20 73 68 69 66 74 | 20 61 6e 64 20 77 69 74 |ch shift| and wit|
|000001c0| 68 20 63 68 61 6e 6e 65 | 6c 73 20 69 6e 74 65 72 |h channe|ls inter|
|000001d0| 63 68 61 6e 67 65 64 2e | 20 20 56 65 72 79 0a 6f |changed.| Very.o|
|000001e0| 63 63 61 73 69 6f 6e 61 | 6c 6c 79 20 74 68 65 20 |ccasiona|lly the |
|000001f0| 70 61 74 74 65 72 6e 20 | 69 73 20 63 6c 65 61 72 |pattern |is clear|
|00000200| 65 64 20 63 6f 6d 70 6c | 65 74 65 6c 79 20 61 6e |ed compl|etely an|
|00000210| 64 20 74 68 65 20 77 68 | 6f 6c 65 20 67 68 61 73 |d the wh|ole ghas|
|00000220| 74 6c 79 0a 62 75 73 69 | 6e 65 73 73 20 73 74 61 |tly.busi|ness sta|
|00000230| 72 74 73 20 61 67 61 69 | 6e 2c 20 70 72 6f 62 61 |rts agai|n, proba|
|00000240| 62 6c 79 20 70 72 6f 64 | 75 63 69 6e 67 20 61 20 |bly prod|ucing a |
|00000250| 64 69 66 66 65 72 65 6e | 74 20 70 61 74 74 65 72 |differen|t patter|
|00000260| 6e 2e 20 20 54 68 65 20 | 74 65 6d 70 6f 0a 61 6c |n. The |tempo.al|
|00000270| 73 6f 20 63 68 61 6e 67 | 65 73 20 72 61 6e 64 6f |so chang|es rando|
|00000280| 6d 6c 79 20 62 65 74 77 | 65 65 6e 20 63 65 72 74 |mly betw|een cert|
|00000290| 61 69 6e 20 6c 69 6d 69 | 74 73 2e 0a 20 0a 21 52 |ain limi|ts.. .!R|
|000002a0| 69 66 66 20 64 69 73 70 | 6c 61 79 73 20 74 68 65 |iff disp|lays the|
|000002b0| 20 63 75 72 72 65 6e 74 | 20 70 61 74 74 65 72 6e | current| pattern|
|000002c0| 20 69 6e 20 61 20 77 69 | 6e 64 6f 77 2e 20 20 54 | in a wi|ndow. T|
|000002d0| 68 65 72 65 20 61 72 65 | 20 6e 6f 20 63 6f 6e 74 |here are| no cont|
|000002e0| 72 6f 6c 73 0a 65 78 63 | 65 70 74 20 51 75 69 74 |rols.exc|ept Quit|
|000002f0| 2e 20 20 41 6c 6c 20 79 | 6f 75 20 63 61 6e 20 64 |. All y|ou can d|
|00000300| 6f 20 74 6f 20 72 65 6c | 69 65 76 65 20 74 68 65 |o to rel|ieve the|
|00000310| 20 6d 6f 6e 6f 74 6f 6e | 79 20 69 73 20 63 68 61 | monoton|y is cha|
|00000320| 6e 67 65 20 74 68 65 0a | 69 6e 73 74 72 75 6d 65 |nge the.|instrume|
|00000330| 6e 74 73 20 61 73 73 69 | 67 6e 65 64 20 74 6f 20 |nts assi|gned to |
|00000340| 4d 49 44 49 20 63 68 61 | 6e 6e 65 6c 73 20 31 20 |MIDI cha|nnels 1 |
|00000350| 74 6f 20 34 20 6f 72 20 | 63 68 61 6e 67 65 20 74 |to 4 or |change t|
|00000360| 68 65 20 76 61 6c 75 65 | 20 6f 66 20 53 65 65 64 |he value| of Seed|
|00000370| 25 0a 6e 65 61 72 20 74 | 68 65 20 73 74 61 72 74 |%.near t|he start|
|00000380| 20 6f 66 20 21 52 69 66 | 66 2e 21 52 75 6e 49 6d | of !Rif|f.!RunIm|
|00000390| 61 67 65 2e 0a 0a 21 52 | 69 66 66 20 72 65 71 75 |age...!R|iff requ|
|000003a0| 69 72 65 73 20 61 20 76 | 65 72 73 69 6f 6e 20 33 |ires a v|ersion 3|
|000003b0| 20 4d 49 44 49 20 70 6f | 64 75 6c 65 20 77 69 74 | MIDI po|dule wit|
|000003c0| 68 20 74 68 65 20 4d 49 | 44 49 5f 46 61 73 74 43 |h the MI|DI_FastC|
|000003d0| 6c 6f 63 6b 20 53 57 49 | 20 28 6d 69 6e 65 20 69 |lock SWI| (mine i|
|000003e0| 73 0a 76 65 72 73 69 6f | 6e 20 33 2e 31 34 29 2e |s.versio|n 3.14).|
|000003f0| 0a 0a 54 68 69 73 20 70 | 72 6f 67 72 61 6d 20 69 |..This p|rogram i|
|00000400| 73 20 43 6f 70 79 72 69 | 67 68 74 20 31 39 39 34 |s Copyri|ght 1994|
|00000410| 20 44 65 6e 69 73 20 48 | 6f 77 65 2e 20 20 59 6f | Denis H|owe. Yo|
|00000420| 75 20 6d 61 79 20 64 69 | 73 74 72 69 62 75 74 65 |u may di|stribute|
|00000430| 20 76 65 72 62 61 74 69 | 6d 20 6f 72 0a 6d 6f 64 | verbati|m or.mod|
|00000440| 69 66 69 65 64 20 63 6f | 70 69 65 73 20 6f 66 20 |ified co|pies of |
|00000450| 74 68 69 73 20 70 72 6f | 67 72 61 6d 20 70 72 6f |this pro|gram pro|
|00000460| 76 69 64 65 64 20 65 61 | 63 68 20 73 75 63 68 20 |vided ea|ch such |
|00000470| 63 6f 70 79 20 69 73 20 | 64 69 73 74 72 69 62 75 |copy is |distribu|
|00000480| 74 65 64 20 77 69 74 68 | 0a 61 20 63 6f 70 79 72 |ted with|.a copyr|
|00000490| 69 67 68 74 20 6e 6f 74 | 69 63 65 20 61 6e 64 20 |ight not|ice and |
|000004a0| 64 69 73 74 72 69 62 75 | 74 69 6f 6e 20 63 6f 6e |distribu|tion con|
|000004b0| 64 69 74 69 6f 6e 73 20 | 69 64 65 6e 74 69 63 61 |ditions |identica|
|000004c0| 6c 20 74 6f 20 74 68 65 | 73 65 2e 0a 0a 48 69 73 |l to the|se...His|
|000004d0| 74 6f 72 79 0a 3d 3d 3d | 3d 3d 3d 3d 0a 50 6c 65 |tory.===|====.Ple|
|000004e0| 61 73 65 20 73 65 6e 64 | 20 6d 65 20 61 20 63 6f |ase send| me a co|
|000004f0| 70 79 20 6f 66 20 61 6e | 79 20 63 68 61 6e 67 65 |py of an|y change|
|00000500| 73 20 79 6f 75 20 6d 61 | 6b 65 20 61 6e 64 20 61 |s you ma|ke and a|
|00000510| 64 64 20 74 68 65 20 64 | 65 74 61 69 6c 73 20 68 |dd the d|etails h|
|00000520| 65 72 65 2e 0a 0a 30 2e | 30 30 20 31 32 20 4d 61 |ere...0.|00 12 Ma|
|00000530| 79 20 31 39 39 32 20 57 | 72 69 74 74 65 6e 20 62 |y 1992 W|ritten b|
|00000540| 79 20 44 65 6e 69 73 20 | 48 6f 77 65 0a 30 2e 30 |y Denis |Howe.0.0|
|00000550| 31 20 31 34 20 44 65 63 | 20 31 39 39 34 20 57 49 |1 14 Dec| 1994 WI|
|00000560| 4d 50 20 76 65 72 73 69 | 6f 6e 0a 0a 49 66 20 79 |MP versi|on..If y|
|00000570| 6f 75 20 6c 69 6b 65 20 | 74 68 69 73 20 6b 69 6e |ou like |this kin|
|00000580| 64 20 6f 66 20 69 6e 66 | 69 6e 69 74 65 6c 79 20 |d of inf|initely |
|00000590| 62 6f 72 69 6e 67 20 6d | 75 73 69 63 20 28 49 20 |boring m|usic (I |
|000005a0| 6c 6f 76 65 20 69 74 21 | 29 20 79 6f 75 20 73 68 |love it!|) you sh|
|000005b0| 6f 75 6c 64 0a 68 65 61 | 72 20 22 44 72 75 6d 6d |ould.hea|r "Drumm|
|000005c0| 69 6e 67 22 20 62 79 20 | 53 74 65 76 65 20 52 65 |ing" by |Steve Re|
|000005d0| 69 63 68 20 6f 72 20 61 | 6e 79 74 68 69 6e 67 20 |ich or a|nything |
|000005e0| 62 79 20 50 68 69 6c 69 | 70 20 47 6c 61 73 73 20 |by Phili|p Glass |
|000005f0| 6f 72 20 4d 69 63 68 65 | 61 6c 0a 4e 79 6d 61 6e |or Miche|al.Nyman|
|00000600| 2e 20 20 49 66 20 79 6f | 75 20 68 61 76 65 20 61 |. If yo|u have a|
|00000610| 6e 79 20 63 6f 6d 6d 65 | 6e 74 73 20 6f 6e 20 74 |ny comme|nts on t|
|00000620| 68 69 73 20 70 72 6f 67 | 72 61 6d 20 66 65 65 6c |his prog|ram feel|
|00000630| 20 66 72 65 65 20 74 6f | 20 6d 61 69 6c 20 6d 65 | free to| mail me|
|00000640| 2e 0a 0a 44 65 6e 69 73 | 20 48 6f 77 65 20 3c 64 |...Denis| Howe <d|
|00000650| 62 68 40 64 6f 63 2e 69 | 63 2e 61 63 2e 75 6b 3e |bh@doc.i|c.ac.uk>|
|00000660| 0a 34 38 20 41 6e 73 6f | 6e 20 52 6f 61 64 2c 20 |.48 Anso|n Road, |
|00000670| 4c 6f 6e 64 6f 6e 2c 20 | 4e 57 32 20 33 55 55 0a |London, |NW2 3UU.|
|00000680| 2b 34 34 20 28 31 38 31 | 29 20 34 35 30 20 39 34 |+44 (181|) 450 94|
|00000690| 34 38 0a 1a 82 21 52 75 | 6e 00 00 01 20 3c 4a 01 |48...!Ru|n... <J.|
|000006a0| 20 ff 1a 01 00 00 2a 1e | ab 58 6d 54 1a 01 00 00 | .....*.|.XmT....|
|000006b0| 45 eb ff ff 1b cd ca d1 | 03 00 00 00 49 63 6f 6e |E.......|....Icon|
|000006c0| 53 70 72 69 74 65 73 20 | 3c 4f 62 65 79 24 44 69 |Sprites |<Obey$Di|
|000006d0| 72 3e 2e 21 53 70 72 69 | 74 65 73 0a 52 4d 45 6e |r>.!Spri|tes.RMEn|
|000006e0| 73 75 72 65 20 50 6f 64 | 75 6c 65 20 30 20 52 4d |sure Pod|ule 0 RM|
|000006f0| 52 65 69 6e 69 74 20 50 | 6f 64 75 6c 65 0a 52 4d |Reinit P|odule.RM|
|00000700| 45 6e 73 75 72 65 20 50 | 6f 64 75 6c 65 20 30 20 |Ensure P|odule 0 |
|00000710| 45 72 72 6f 72 20 30 20 | 4e 6f 20 50 6f 64 75 6c |Error 0 |No Podul|
|00000720| 65 20 6d 6f 64 75 6c 65 | 21 0a 52 4d 45 6e 73 75 |e module|!.RMEnsu|
|00000730| 72 65 20 4d 69 64 69 20 | 33 2e 30 30 20 52 4d 52 |re Midi |3.00 RMR|
|00000740| 65 69 6e 69 74 20 4d 69 | 64 69 0a 52 4d 45 6e 73 |einit Mi|di.RMEns|
|00000750| 75 72 65 20 4d 69 64 69 | 20 33 2e 30 30 20 45 72 |ure Midi| 3.00 Er|
|00000760| 72 6f 72 20 30 20 21 52 | 69 66 66 20 72 65 71 75 |ror 0 !R|iff requ|
|00000770| 69 72 65 73 20 76 65 72 | 73 69 6f 6e 20 33 2e 30 |ires ver|sion 3.0|
|00000780| 30 20 6f 72 20 6c 61 74 | 65 72 20 6f 66 20 74 68 |0 or lat|er of th|
|00000790| 65 20 4d 49 44 49 20 6d | 6f 64 75 6c 65 0a 57 69 |e MIDI m|odule.Wi|
|000007a0| 6d 70 53 6c 6f 74 20 2d | 6d 69 6e 20 33 32 6b 20 |mpSlot -|min 32k |
|000007b0| 2d 6d 61 78 20 33 32 6b | 0a 52 75 6e 20 3c 4f 62 |-max 32k|.Run <Ob|
|000007c0| 65 79 24 44 69 72 3e 2e | 21 52 75 6e 49 6d 61 67 |ey$Dir>.|!RunImag|
|000007d0| 65 20 25 2a 30 0a 1a 82 | 21 52 75 6e 49 6d 61 67 |e %*0...|!RunImag|
|000007e0| 65 00 01 20 ff f1 1d 00 | 00 94 1d e0 b2 a2 4c f1 |e.. ....|......L.|
|000007f0| 1d 00 00 45 fb ff ff 44 | 49 38 c7 03 00 00 00 0d |...E...D|I8......|
|00000800| 00 01 0c f4 20 3e 20 52 | 69 66 66 0d 00 02 04 0d |.... > R|iff.....|
|00000810| 00 03 39 f4 20 54 68 69 | 73 20 70 72 6f 67 72 61 |..9. Thi|s progra|
|00000820| 6d 20 69 73 20 43 6f 70 | 79 72 69 67 68 74 20 31 |m is Cop|yright 1|
|00000830| 39 39 34 20 44 65 6e 69 | 73 20 48 6f 77 65 2e 20 |994 Deni|s Howe. |
|00000840| 20 59 6f 75 20 6d 61 79 | 0d 00 04 3c f4 20 64 69 | You may|...<. di|
|00000850| 73 74 72 69 62 75 74 65 | 20 76 65 72 62 61 74 69 |stribute| verbati|
|00000860| 6d 20 6f 72 20 6d 6f 64 | 69 66 69 65 64 20 63 6f |m or mod|ified co|
|00000870| 70 69 65 73 20 6f 66 20 | 74 68 69 73 20 70 72 6f |pies of |this pro|
|00000880| 67 72 61 6d 0d 00 05 3d | f4 20 70 72 6f 76 69 64 |gram...=|. provid|
|00000890| 65 64 20 65 61 63 68 20 | 73 75 63 68 20 63 6f 70 |ed each |such cop|
|000008a0| 79 20 69 73 20 64 69 73 | 74 72 69 62 75 74 65 64 |y is dis|tributed|
|000008b0| 20 77 69 74 68 20 61 20 | 63 6f 70 79 72 69 67 68 | with a |copyrigh|
|000008c0| 74 0d 00 06 3c f4 20 6e | 6f 74 69 63 65 20 61 6e |t...<. n|otice an|
|000008d0| 64 20 64 69 73 74 72 69 | 62 75 74 69 6f 6e 20 63 |d distri|bution c|
|000008e0| 6f 6e 64 69 74 69 6f 6e | 73 20 69 64 65 6e 74 69 |ondition|s identi|
|000008f0| 63 61 6c 20 74 6f 20 74 | 68 65 73 65 2e 0d 00 07 |cal to t|hese....|
|00000900| 04 0d 00 08 2e f4 20 50 | 6c 65 61 73 65 20 73 65 |...... P|lease se|
|00000910| 6e 64 20 6d 65 20 61 20 | 63 6f 70 79 20 6f 66 20 |nd me a |copy of |
|00000920| 61 6e 79 20 63 68 61 6e | 67 65 73 20 79 6f 75 0d |any chan|ges you.|
|00000930| 00 09 31 f4 20 6d 61 6b | 65 20 61 6e 64 20 61 64 |..1. mak|e and ad|
|00000940| 64 20 74 68 65 20 64 65 | 74 61 69 6c 73 20 74 6f |d the de|tails to|
|00000950| 20 74 68 65 20 6c 69 73 | 74 20 62 65 6c 6f 77 2e | the lis|t below.|
|00000960| 0d 00 0a 04 0d 00 0b 23 | f4 20 44 65 6e 69 73 20 |.......#|. Denis |
|00000970| 48 6f 77 65 20 3c 64 62 | 68 40 64 6f 63 2e 69 63 |Howe <db|h@doc.ic|
|00000980| 2e 61 63 2e 75 6b 3e 0d | 00 0c 24 f4 20 34 38 20 |.ac.uk>.|..$. 48 |
|00000990| 41 6e 73 6f 6e 20 52 6f | 61 64 2c 20 4c 6f 6e 64 |Anson Ro|ad, Lond|
|000009a0| 6f 6e 2c 20 4e 57 32 20 | 33 55 55 0d 00 0d 18 f4 |on, NW2 |3UU.....|
|000009b0| 20 2b 34 34 20 28 31 38 | 31 29 20 34 35 30 20 39 | +44 (18|1) 450 9|
|000009c0| 34 34 38 0d 00 0e 04 0d | 00 0f 3f f4 20 31 32 20 |448.....|..?. 12 |
|000009d0| 4d 61 79 20 31 39 39 32 | 20 30 2e 30 30 20 57 72 |May 1992| 0.00 Wr|
|000009e0| 69 74 74 65 6e 20 62 79 | 20 44 65 6e 69 73 20 48 |itten by| Denis H|
|000009f0| 6f 77 65 20 3c 64 62 68 | 40 64 6f 63 2e 69 63 2e |owe <dbh|@doc.ic.|
|00000a00| 61 63 2e 75 6b 3e 0d 00 | 10 23 f4 20 31 34 20 44 |ac.uk>..|.#. 14 D|
|00000a10| 65 63 20 31 39 39 34 20 | 30 2e 30 31 20 57 49 4d |ec 1994 |0.01 WIM|
|00000a20| 50 20 76 65 72 73 69 6f | 6e 0d 00 11 04 0d 00 12 |P versio|n.......|
|00000a30| 10 54 61 73 6b 24 3d 22 | 52 69 66 66 22 0d 00 13 |.Task$="|Riff"...|
|00000a40| 23 50 75 72 70 6f 73 65 | 24 3d 22 52 61 6e 64 6f |#Purpose|$="Rando|
|00000a50| 6d 20 4d 49 44 49 20 70 | 61 74 74 65 72 6e 73 22 |m MIDI p|atterns"|
|00000a60| 0d 00 14 1f 41 75 74 68 | 6f 72 24 3d 22 a9 20 44 |....Auth|or$=". D|
|00000a70| 65 6e 69 73 20 48 6f 77 | 65 20 31 39 39 34 22 0d |enis How|e 1994".|
|00000a80| 00 15 21 56 65 72 73 69 | 6f 6e 24 3d 22 30 2e 30 |..!Versi|on$="0.0|
|00000a90| 31 20 28 31 34 20 44 65 | 63 20 31 39 39 34 29 22 |1 (14 De|c 1994)"|
|00000aa0| 0d 00 16 04 0d 00 17 0e | ee 20 85 20 f2 45 72 72 |........|. . .Err|
|00000ab0| 6f 72 0d 00 18 04 0d 00 | 19 48 53 65 65 64 25 3d |or......|.HSeed%=|
|00000ac0| 31 37 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |17 | |
|00000ad0| 20 20 20 20 20 20 20 3a | f4 20 43 68 61 6e 67 65 | :|. Change|
|00000ae0| 20 74 68 69 73 20 74 6f | 20 67 65 74 20 64 69 66 | this to| get dif|
|00000af0| 66 65 72 65 6e 74 20 22 | 74 75 6e 65 73 22 0d 00 |ferent "|tunes"..|
|00000b00| 1a 04 0d 00 1b 14 44 75 | 6d 6d 79 25 3d b3 28 2d |......Du|mmy%=.(-|
|00000b10| 53 65 65 64 25 29 0d 00 | 1c 2f 42 65 61 74 4c 65 |Seed%)..|./BeatLe|
|00000b20| 6e 67 74 68 25 3d 31 30 | 30 2b b3 28 32 30 30 29 |ngth%=10|0+.(200)|
|00000b30| 20 20 20 20 20 3a f4 20 | 49 6e 69 74 69 61 6c 20 | :. |Initial |
|00000b40| 74 65 6d 70 6f 0d 00 1d | 15 52 68 79 74 68 6d 43 |tempo...|.RhythmC|
|00000b50| 68 61 6e 6e 65 6c 25 3d | 2d 33 0d 00 1e 0d f2 57 |hannel%=|-3.....W|
|00000b60| 69 6d 70 49 6e 69 74 0d | 00 1f 0f f2 4d 61 6a 6f |impInit.|....Majo|
|00000b70| 72 4d 69 6e 6f 72 0d 00 | 20 08 f2 4e 65 77 0d 00 |rMinor..| ..New..|
|00000b80| 21 0d f2 4d 69 64 69 49 | 6e 69 74 0d 00 22 05 f5 |!..MidiI|nit.."..|
|00000b90| 0d 00 23 17 20 20 e7 20 | b3 28 32 30 30 29 3d 31 |..#. . |.(200)=1|
|00000ba0| 20 f2 52 65 73 65 74 0d | 00 24 1b 20 20 e7 20 b3 | .Reset.|.$. . .|
|00000bb0| 28 35 29 3d 31 20 f2 43 | 6f 70 79 20 8b 20 f2 4e |(5)=1 .C|opy . .N|
|00000bc0| 65 77 0d 00 25 22 20 20 | 54 69 6d 65 25 3d a4 54 |ew..%" |Time%=.T|
|00000bd0| 69 6d 65 3a 53 74 61 72 | 74 54 69 6d 65 25 3d 54 |ime:Star|tTime%=T|
|00000be0| 69 6d 65 25 0d 00 26 14 | 20 20 e3 20 54 25 3d 30 |ime%..&.| . T%=0|
|00000bf0| 20 b8 20 4e 54 25 2d 31 | 0d 00 27 2d 20 20 20 20 | . NT%-1|..'- |
|00000c00| e7 20 54 25 20 80 20 33 | 20 56 65 6c 6f 63 69 74 |. T% . 3| Velocit|
|00000c10| 79 25 3d 38 30 20 8b 20 | 56 65 6c 6f 63 69 74 79 |y%=80 . |Velocity|
|00000c20| 25 3d 31 32 30 0d 00 28 | 1c 20 20 20 20 e3 20 43 |%=120..(|. . C|
|00000c30| 68 61 6e 25 3d 30 20 b8 | 20 4e 43 68 61 6e 25 2d |han%=0 .| NChan%-|
|00000c40| 31 0d 00 29 1e 20 20 20 | 20 20 20 e7 20 50 69 74 |1..). | . Pit|
|00000c50| 63 68 25 28 54 25 2c 43 | 68 61 6e 25 29 20 8c 0d |ch%(T%,C|han%) ..|
|00000c60| 00 2a 22 20 20 20 20 20 | 20 20 20 f2 4e 6f 74 65 |.*" | .Note|
|00000c70| 28 43 68 61 6e 25 2c 30 | 2c 30 2c 54 69 6d 65 25 |(Chan%,0|,0,Time%|
|00000c80| 29 0d 00 2b 39 20 20 20 | 20 20 20 20 20 f2 4e 6f |)..+9 | .No|
|00000c90| 74 65 28 43 68 61 6e 25 | 2c 50 69 74 63 68 25 28 |te(Chan%|,Pitch%(|
|00000ca0| 54 25 2c 43 68 61 6e 25 | 29 2c 56 65 6c 6f 63 69 |T%,Chan%|),Veloci|
|00000cb0| 74 79 25 2c 54 69 6d 65 | 25 29 0d 00 2c 0b 20 20 |ty%,Time|%)..,. |
|00000cc0| 20 20 20 20 cd 0d 00 2d | 0f 20 20 20 20 ed 20 43 | ...-|. . C|
|00000cd0| 68 61 6e 25 0d 00 2e 1a | 20 20 20 20 54 69 6d 65 |han%....| Time|
|00000ce0| 25 2b 3d 42 65 61 74 4c | 65 6e 67 74 68 25 0d 00 |%+=BeatL|ength%..|
|00000cf0| 2f 0a 20 20 ed 20 54 25 | 0d 00 30 14 20 20 f2 41 |/. . T%|..0. .A|
|00000d00| 6c 6c 4f 66 66 28 54 69 | 6d 65 25 29 0d 00 31 30 |llOff(Ti|me%)..10|
|00000d10| 20 20 f5 20 f2 57 61 69 | 74 3a fd 20 a4 54 69 6d | . .Wai|t:. .Tim|
|00000d20| 65 3e 53 74 61 72 74 54 | 69 6d 65 25 2b 4e 54 25 |e>StartT|ime%+NT%|
|00000d30| 2a 42 65 61 74 4c 65 6e | 67 74 68 25 0d 00 32 36 |*BeatLen|gth%..26|
|00000d40| 20 20 e7 20 b3 28 31 30 | 29 3d 31 20 42 65 61 74 | . .(10|)=1 Beat|
|00000d50| 4c 65 6e 67 74 68 25 2b | 3d 2e 31 2a 42 65 61 74 |Length%+|=.1*Beat|
|00000d60| 4c 65 6e 67 74 68 25 2a | 28 b3 28 32 29 2d 31 2e |Length%*|(.(2)-1.|
|00000d70| 35 29 0d 00 33 27 20 20 | e7 20 42 65 61 74 4c 65 |5)..3' |. BeatLe|
|00000d80| 6e 67 74 68 25 3c 31 30 | 30 20 42 65 61 74 4c 65 |ngth%<10|0 BeatLe|
|00000d90| 6e 67 74 68 25 3d 31 30 | 30 0d 00 34 27 20 20 e7 |ngth%=10|0..4' .|
|00000da0| 20 42 65 61 74 4c 65 6e | 67 74 68 25 3e 33 30 30 | BeatLen|gth%>300|
|00000db0| 20 42 65 61 74 4c 65 6e | 67 74 68 25 3d 33 30 30 | BeatLen|gth%=300|
|00000dc0| 0d 00 35 07 fd 20 a3 0d | 00 36 04 0d 00 37 17 dd |..5.. ..|.6...7..|
|00000dd0| 20 f2 53 65 74 28 54 25 | 2c 43 68 61 6e 25 2c 50 | .Set(T%|,Chan%,P|
|00000de0| 25 29 0d 00 38 17 50 69 | 74 63 68 25 28 54 25 2c |%)..8.Pi|tch%(T%,|
|00000df0| 43 68 61 6e 25 29 3d 50 | 25 0d 00 39 17 f2 44 72 |Chan%)=P|%..9..Dr|
|00000e00| 61 77 4e 6f 74 65 28 54 | 25 2c 43 68 61 6e 25 29 |awNote(T|%,Chan%)|
|00000e10| 0d 00 3a 05 e1 0d 00 3b | 04 0d 00 3c 0c dd 20 f2 |..:....;|...<.. .|
|00000e20| 52 65 73 65 74 0d 00 3d | 0e 50 69 74 63 68 25 28 |Reset..=|.Pitch%(|
|00000e30| 29 3d 30 0d 00 3e 0a f2 | 46 6f 72 63 65 0d 00 3f |)=0..>..|Force..?|
|00000e40| 05 e1 0d 00 40 04 0d 00 | 41 3f f4 20 3d 3d 3d 3d |....@...|A?. ====|
|00000e50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000e60| 3d 3d 3d 3d 3d 3d 20 57 | 49 4d 50 20 3d 3d 3d 3d |====== W|IMP ====|
|00000e70| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000e80| 3d 3d 3d 3d 3d 0d 00 42 | 05 20 0d 00 43 0f dd 20 |=====..B|. ..C.. |
|00000e90| f2 57 69 6d 70 49 6e 69 | 74 0d 00 44 12 de 20 62 |.WimpIni|t..D.. b|
|00000ea0| 25 20 32 36 30 3a 62 25 | 2b 3d 34 0d 00 45 0c 4e |% 260:b%|+=4..E.N|
|00000eb0| 43 68 61 6e 25 3d 34 0d | 00 46 1c 4c 6f 67 32 4e |Chan%=4.|.F.Log2N|
|00000ec0| 54 25 3d 35 3a 4e 54 25 | 3d 31 3c 3c 4c 6f 67 32 |T%=5:NT%|=1<<Log2|
|00000ed0| 4e 54 25 0d 00 47 13 de | 20 50 25 28 36 29 2c 55 |NT%..G..| P%(6),U|
|00000ee0| 48 25 28 31 31 29 0d 00 | 48 44 de 20 50 69 74 63 |H%(11)..|HD. Pitc|
|00000ef0| 68 25 28 4e 54 25 2d 31 | 2c 4e 43 68 61 6e 25 2d |h%(NT%-1|,NChan%-|
|00000f00| 31 29 2c 43 75 72 72 65 | 6e 74 50 69 74 63 68 25 |1),Curre|ntPitch%|
|00000f10| 28 4e 43 68 61 6e 25 2d | 31 29 2c 53 77 61 70 25 |(NChan%-|1),Swap%|
|00000f20| 28 4e 43 68 61 6e 25 2d | 31 29 0d 00 49 17 50 25 |(NChan%-|1)..I.P%|
|00000f30| 28 29 3d 30 2c 32 2c 34 | 2c 35 2c 37 2c 39 2c 31 |()=0,2,4|,5,7,9,1|
|00000f40| 31 0d 00 4a 46 55 48 25 | 28 29 3d 30 2c 31 2c 31 |1..JFUH%|()=0,1,1|
|00000f50| 2c 30 2c 30 2c 30 2c 31 | 2c 30 2c 30 2c 30 2c 31 |,0,0,0,1|,0,0,0,1|
|00000f60| 2c 31 20 3a f4 20 75 6e | 68 61 72 6d 6f 6e 69 75 |,1 :. un|harmoniu|
|00000f70| 73 20 69 6e 74 65 72 76 | 61 6c 73 20 28 73 65 6d |s interv|als (sem|
|00000f80| 69 74 6f 6e 65 73 29 0d | 00 4b 04 0d 00 4c 1b 53 |itones).|.K...L.S|
|00000f90| 74 61 72 74 54 69 6d 65 | 25 3d 30 3a 4f 6c 64 59 |tartTime|%=0:OldY|
|00000fa0| 25 3d 2d 39 39 39 0d 00 | 4d 04 0d 00 4e 39 24 62 |%=-999..|M...N9$b|
|00000fb0| 25 3d 22 54 41 53 4b 22 | 3a c8 99 20 22 57 69 6d |%="TASK"|:.. "Wim|
|00000fc0| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|00000fd0| 30 2c 21 62 25 2c 54 61 | 73 6b 24 20 b8 2c 54 61 |0,!b%,Ta|sk$ .,Ta|
|00000fe0| 73 6b 25 0d 00 4f 04 0d | 00 50 0e f4 20 42 61 72 |sk%..O..|.P.. Bar|
|00000ff0| 20 69 63 6f 6e 0d 00 51 | 19 62 25 21 30 3d 2d 31 | icon..Q|.b%!0=-1|
|00001000| 3a 62 25 21 34 3d 30 3a | 62 25 21 38 3d 30 0d 00 |:b%!4=0:|b%!8=0..|
|00001010| 52 21 62 25 21 31 32 3d | 36 38 3a 62 25 21 31 36 |R!b%!12=|68:b%!16|
|00001020| 3d 36 38 3a 62 25 21 32 | 30 3d 26 33 30 30 32 0d |=68:b%!2|0=&3002.|
|00001030| 00 53 14 24 28 62 25 2b | 32 34 29 3d 22 21 52 69 |.S.$(b%+|24)="!Ri|
|00001040| 66 66 22 0d 00 54 1c c8 | 99 20 22 57 69 6d 70 5f |ff"..T..|. "Wimp_|
|00001050| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 62 25 0d |CreateIc|on",,b%.|
|00001060| 00 55 04 0d 00 56 0a f4 | 20 4d 65 6e 75 0d 00 57 |.U...V..| Menu..W|
|00001070| 0f de 20 4d 65 6e 75 25 | 20 31 30 30 0d 00 58 10 |.. Menu%| 100..X.|
|00001080| 24 4d 65 6e 75 25 3d 54 | 61 73 6b 24 0d 00 59 2f |$Menu%=T|ask$..Y/|
|00001090| 4d 65 6e 75 25 3f 31 32 | 3d 37 3a 4d 65 6e 75 25 |Menu%?12|=7:Menu%|
|000010a0| 3f 31 33 3d 32 3a 4d 65 | 6e 75 25 3f 31 34 3d 37 |?13=2:Me|nu%?14=7|
|000010b0| 3a 4d 65 6e 75 25 3f 31 | 35 3d 30 0d 00 5a 27 4d |:Menu%?1|5=0..Z'M|
|000010c0| 65 6e 75 25 21 31 36 3d | 31 30 30 3a 4d 65 6e 75 |enu%!16=|100:Menu|
|000010d0| 25 21 32 30 3d 34 34 3a | 4d 65 6e 75 25 21 32 34 |%!20=44:|Menu%!24|
|000010e0| 3d 30 0d 00 5b 0c f4 20 | 49 74 65 6d 20 30 0d 00 |=0..[.. |Item 0..|
|000010f0| 5c 19 4d 65 6e 75 25 21 | 32 38 3d 31 3c 3c 37 20 |\.Menu%!|28=1<<7 |
|00001100| 3a f4 20 6c 61 73 74 0d | 00 5d 0f 4d 65 6e 75 25 |:. last.|.].Menu%|
|00001110| 21 33 32 3d 2d 31 0d 00 | 5e 25 4d 65 6e 75 25 21 |!32=-1..|^%Menu%!|
|00001120| 33 36 3d 31 20 84 20 31 | 3c 3c 35 20 84 20 37 3c |36=1 . 1|<<5 . 7<|
|00001130| 3c 32 34 20 84 20 30 3c | 3c 32 38 0d 00 5f 16 24 |<24 . 0<|<28.._.$|
|00001140| 28 4d 65 6e 75 25 2b 34 | 30 29 3d 22 51 75 69 74 |(Menu%+4|0)="Quit|
|00001150| 22 0d 00 60 04 0d 00 61 | 0c f4 20 57 69 6e 64 6f |"..`...a|.. Windo|
|00001160| 77 0d 00 62 17 43 68 61 | 72 57 25 3d 31 36 3a 43 |w..b.Cha|rW%=16:C|
|00001170| 68 61 72 48 25 3d 33 32 | 0d 00 63 13 43 68 61 6e |harH%=32|..c.Chan|
|00001180| 57 25 3d 33 2a 43 68 61 | 72 57 25 0d 00 64 1e 57 |W%=3*Cha|rW%..d.W|
|00001190| 69 6e 57 25 3d 43 68 61 | 6e 57 25 2a 4e 43 68 61 |inW%=Cha|nW%*NCha|
|000011a0| 6e 25 2b 43 68 61 72 57 | 25 0d 00 65 16 57 69 6e |n%+CharW|%..e.Win|
|000011b0| 48 25 3d 43 68 61 72 48 | 25 2a 4e 54 25 2b 38 0d |H%=CharH|%*NT%+8.|
|000011c0| 00 66 1c 54 69 74 6c 65 | 24 3d 54 61 73 6b 24 2b |.f.Title|$=Task$+|
|000011d0| 22 20 22 2b c3 20 53 65 | 65 64 25 0d 00 67 20 54 |" "+. Se|ed%..g T|
|000011e0| 69 74 6c 65 57 25 3d 43 | 68 61 72 57 25 2a a9 28 |itleW%=C|harW%*.(|
|000011f0| 54 69 74 6c 65 24 29 2b | 31 30 30 0d 00 68 21 e7 |Title$)+|100..h!.|
|00001200| 20 54 69 74 6c 65 57 25 | 3e 57 69 6e 57 25 20 57 | TitleW%|>WinW% W|
|00001210| 69 6e 57 25 3d 54 69 74 | 6c 65 57 25 0d 00 69 31 |inW%=Tit|leW%..i1|
|00001220| 62 25 21 30 3d 39 39 39 | 39 3a 62 25 21 34 3d 2d |b%!0=999|9:b%!4=-|
|00001230| 57 69 6e 48 25 3a 62 25 | 21 38 3d 62 25 21 30 2b |WinH%:b%|!8=b%!0+|
|00001240| 57 69 6e 57 25 3a 62 25 | 21 31 32 3d 30 0d 00 6a |WinW%:b%|!12=0..j|
|00001250| 2c 62 25 21 31 36 3d 30 | 3a 62 25 21 32 30 3d 30 |,b%!16=0|:b%!20=0|
|00001260| 3a 62 25 21 32 34 3d 2d | 31 3a 62 25 21 32 38 3d |:b%!24=-|1:b%!28=|
|00001270| 26 46 46 30 30 30 30 30 | 32 0d 00 6b 23 62 25 3f |&FF00000|2..k#b%?|
|00001280| 33 32 3d 37 3a 62 25 3f | 33 33 3d 32 3a 62 25 3f |32=7:b%?|33=2:b%?|
|00001290| 33 34 3d 37 3a 62 25 3f | 33 35 3d 30 0d 00 6c 24 |34=7:b%?|35=0..l$|
|000012a0| 62 25 3f 33 36 3d 33 3a | 62 25 3f 33 37 3d 31 3a |b%?36=3:|b%?37=1:|
|000012b0| 62 25 3f 33 38 3d 31 32 | 3a 62 25 3f 33 39 3d 30 |b%?38=12|:b%?39=0|
|000012c0| 0d 00 6d 2c 62 25 21 34 | 30 3d 30 3a 62 25 21 34 |..m,b%!4|0=0:b%!4|
|000012d0| 34 3d 2d 57 69 6e 48 25 | 3a 62 25 21 34 38 3d 57 |4=-WinH%|:b%!48=W|
|000012e0| 69 6e 57 25 3a 62 25 21 | 35 32 3d 30 0d 00 6e 30 |inW%:b%!|52=0..n0|
|000012f0| 62 25 21 35 36 3d 26 30 | 37 30 30 30 30 33 39 3a |b%!56=&0|7000039:|
|00001300| 62 25 21 36 30 3d 30 3a | 62 25 21 36 34 3d 31 3a |b%!60=0:|b%!64=1:|
|00001310| 62 25 21 36 38 3d 26 31 | 30 30 30 31 0d 00 6f 1b |b%!68=&1|0001..o.|
|00001320| 24 28 62 25 2b 37 32 29 | 3d 54 69 74 6c 65 24 3a |$(b%+72)|=Title$:|
|00001330| 62 25 21 38 34 3d 30 0d | 00 70 24 c8 99 20 22 57 |b%!84=0.|.p$.. "W|
|00001340| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00001350| 22 2c 2c 62 25 20 b8 20 | 57 48 25 0d 00 71 0d 62 |",,b% . |WH%..q.b|
|00001360| 25 21 2d 34 3d 57 48 25 | 0d 00 72 1e c8 99 20 22 |%!-4=WH%|..r... "|
|00001370| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00001380| 2c 2c 62 25 2d 34 0d 00 | 73 1b 54 25 3d 91 2b 31 |,,b%-4..|s.T%=.+1|
|00001390| 30 30 3a f5 20 f2 57 61 | 69 74 3a fd 20 91 3e 54 |00:. .Wa|it:. .>T|
|000013a0| 25 0d 00 74 05 e1 0d 00 | 75 04 0d 00 76 0b dd 20 |%..t....|u...v.. |
|000013b0| f2 50 6f 6c 6c 0d 00 77 | 11 ea 20 4d 6f 72 65 25 |.Poll..w|.. More%|
|000013c0| 2c 52 25 2c 59 25 0d 00 | 78 24 c8 99 20 22 57 69 |,R%,Y%..|x$.. "Wi|
|000013d0| 6d 70 5f 50 6f 6c 6c 22 | 2c 26 46 46 46 39 46 44 |mp_Poll"|,&FFF9FD|
|000013e0| 42 43 2c 62 25 20 b8 20 | 52 25 0d 00 79 0b c8 8e |BC,b% . |R%..y...|
|000013f0| 20 52 25 20 ca 0d 00 7a | 13 c9 20 30 3a f2 4d 6f | R% ...z|.. 0:.Mo|
|00001400| 76 65 43 75 72 73 6f 72 | 0d 00 7b 07 c9 20 31 0d |veCursor|..{.. 1.|
|00001410| 00 7c 28 20 20 c8 99 20 | 22 57 69 6d 70 5f 52 65 |.|( .. |"Wimp_Re|
|00001420| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 25 20 |drawWind|ow",,b% |
|00001430| b8 20 4d 6f 72 65 25 0d | 00 7d 2a 20 20 57 6b 4f |. More%.|.}* WkO|
|00001440| 72 58 25 3d 62 25 21 34 | 2d 62 25 21 32 30 3a 57 |rX%=b%!4|-b%!20:W|
|00001450| 6b 4f 72 59 25 3d 62 25 | 21 31 36 2d 62 25 21 32 |kOrY%=b%|!16-b%!2|
|00001460| 34 0d 00 7e 0e 20 20 c8 | 95 20 4d 6f 72 65 25 0d |4..~. .|. More%.|
|00001470| 00 7f 1e 20 20 20 20 f2 | 52 65 64 72 61 77 28 57 |... .|Redraw(W|
|00001480| 6b 4f 72 58 25 2c 57 6b | 4f 72 59 25 29 0d 00 80 |kOrX%,Wk|OrY%)...|
|00001490| 2a 20 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |* .. |"Wimp_Ge|
|000014a0| 74 52 65 63 74 61 6e 67 | 6c 65 22 2c 2c 62 25 20 |tRectang|le",,b% |
|000014b0| b8 20 4d 6f 72 65 25 0d | 00 81 07 20 20 ce 0d 00 |. More%.|... ...|
|000014c0| 82 20 c9 20 32 3a c8 99 | 20 22 57 69 6d 70 5f 4f |. . 2:..| "Wimp_O|
|000014d0| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 25 0d 00 |penWindo|w",,b%..|
|000014e0| 83 21 c9 20 33 3a c8 99 | 20 22 57 69 6d 70 5f 43 |.!. 3:..| "Wimp_C|
|000014f0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 25 0d |loseWind|ow",,b%.|
|00001500| 00 84 07 c9 20 36 0d 00 | 85 0f 20 20 c8 8e 20 62 |.... 6..|.. .. b|
|00001510| 25 21 38 20 ca 0d 00 86 | 09 20 20 c9 20 32 0d 00 |%!8 ....|. . 2..|
|00001520| 87 2a 20 20 20 20 e7 20 | 62 25 21 31 32 3d 2d 32 |.* . |b%!12=-2|
|00001530| 20 59 25 3d 31 2a 34 34 | 2b 39 36 20 8b 20 59 25 | Y%=1*44|+96 . Y%|
|00001540| 3d 62 25 21 34 2b 32 38 | 0d 00 88 2e 20 20 20 20 |=b%!4+28|.... |
|00001550| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|00001560| 65 6e 75 22 2c 2c 4d 65 | 6e 75 25 2c 62 25 21 30 |enu",,Me|nu%,b%!0|
|00001570| 2d 36 34 2c 59 25 0d 00 | 89 09 20 20 c9 20 34 0d |-64,Y%..|.. . 4.|
|00001580| 00 8a 2c 20 20 20 20 21 | 62 25 3d 57 48 25 3a c8 |.., !|b%=WH%:.|
|00001590| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|000015a0| 77 53 74 61 74 65 22 2c | 2c 62 25 0d 00 8b 19 20 |wState",|,b%.... |
|000015b0| 20 20 20 e7 20 62 25 21 | 33 32 20 80 20 31 3c 3c | . b%!|32 . 1<<|
|000015c0| 31 36 20 8c 0d 00 8c 23 | 20 20 20 20 20 20 c8 99 |16 ....#| ..|
|000015d0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|000015e0| 6f 77 22 2c 2c 62 25 0d | 00 8d 09 20 20 20 20 cc |ow",,b%.|... .|
|000015f0| 0d 00 8e 22 20 20 20 20 | 20 20 c8 99 20 22 57 69 |..." | .. "Wi|
|00001600| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00001610| 62 25 0d 00 8f 09 20 20 | 20 20 cd 0d 00 90 07 20 |b%.... | ..... |
|00001620| 20 cb 0d 00 91 0d c9 20 | 39 3a f2 51 75 69 74 0d | ...... |9:.Quit.|
|00001630| 00 92 0b c9 20 31 37 2c | 31 38 0d 00 93 10 20 20 |.... 17,|18.... |
|00001640| c8 8e 20 62 25 21 31 36 | 20 ca 0d 00 94 11 20 20 |.. b%!16| ..... |
|00001650| c9 20 30 2c 38 3a f2 51 | 75 69 74 0d 00 95 39 20 |. 0,8:.Q|uit...9 |
|00001660| 20 c9 20 26 34 30 30 43 | 32 3a e7 20 62 25 21 34 | . &400C|2:. b%!4|
|00001670| 3c 3e 54 61 73 6b 25 20 | 80 20 a4 53 74 72 69 6e |<>Task% |. .Strin|
|00001680| 67 28 62 25 2b 32 38 29 | 3d 54 61 73 6b 24 20 f2 |g(b%+28)|=Task$ .|
|00001690| 51 75 69 74 0d 00 96 07 | 20 20 cb 0d 00 97 05 cb |Quit....| ......|
|000016a0| 0d 00 98 05 e1 0d 00 99 | 04 0d 00 9a 19 dd 20 f2 |........|...... .|
|000016b0| 44 72 61 77 4e 6f 74 65 | 28 54 25 2c 43 68 61 6e |DrawNote|(T%,Chan|
|000016c0| 25 29 0d 00 9b 0b ea 20 | 58 25 2c 59 25 0d 00 9c |%)..... |X%,Y%...|
|000016d0| 21 58 25 3d 43 68 61 6e | 25 2a 43 68 61 6e 57 25 |!X%=Chan|%*ChanW%|
|000016e0| 3a 59 25 3d 2d 54 25 2a | 43 68 61 72 48 25 0d 00 |:Y%=-T%*|CharH%..|
|000016f0| 9d 45 c8 99 20 22 57 69 | 6d 70 5f 46 6f 72 63 65 |.E.. "Wi|mp_Force|
|00001700| 52 65 64 72 61 77 22 2c | 57 48 25 2c 58 25 2b 43 |Redraw",|WH%,X%+C|
|00001710| 68 61 72 57 25 2c 59 25 | 2d 43 68 61 72 48 25 2c |harW%,Y%|-CharH%,|
|00001720| 58 25 2b 43 68 61 6e 57 | 25 2b 43 68 61 72 57 25 |X%+ChanW|%+CharW%|
|00001730| 2c 59 25 0d 00 9e 05 e1 | 0d 00 9f 04 0d 00 a0 0c |,Y%.....|........|
|00001740| dd 20 f2 46 6f 72 63 65 | 0d 00 a1 2e c8 99 20 22 |. .Force|...... "|
|00001750| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00001760| 22 2c 57 48 25 2c 30 2c | 2d 57 69 6e 48 25 2c 57 |",WH%,0,|-WinH%,W|
|00001770| 69 6e 57 25 2c 30 0d 00 | a2 05 e1 0d 00 a3 04 0d |inW%,0..|........|
|00001780| 00 a4 11 dd 20 f2 4d 6f | 76 65 43 75 72 73 6f 72 |.... .Mo|veCursor|
|00001790| 0d 00 a5 1f ea 20 4d 6f | 72 65 25 2c 4e 6f 77 25 |..... Mo|re%,Now%|
|000017a0| 2c 58 25 2c 59 25 2c 79 | 25 2c 6f 6c 64 79 25 0d |,X%,Y%,y|%,oldy%.|
|000017b0| 00 a6 0e 4e 6f 77 25 3d | a4 54 69 6d 65 0d 00 a7 |...Now%=|.Time...|
|000017c0| 2f 59 25 3d 28 53 74 61 | 72 74 54 69 6d 65 25 2d |/Y%=(Sta|rtTime%-|
|000017d0| 4e 6f 77 25 29 2a 43 68 | 61 72 48 25 20 81 20 42 |Now%)*Ch|arH% . B|
|000017e0| 65 61 74 4c 65 6e 67 74 | 68 25 2d 38 0d 00 a8 15 |eatLengt|h%-8....|
|000017f0| e7 20 94 28 59 25 2d 4f | 6c 64 59 25 29 3c 34 20 |. .(Y%-O|ldY%)<4 |
|00001800| e1 0d 00 a9 34 62 25 21 | 30 3d 57 48 25 3a 62 25 |....4b%!|0=WH%:b%|
|00001810| 21 34 3d 30 3a 62 25 21 | 38 3d 2d 57 69 6e 48 25 |!4=0:b%!|8=-WinH%|
|00001820| 3a 62 25 21 31 32 3d 43 | 68 61 72 57 25 3a 62 25 |:b%!12=C|harW%:b%|
|00001830| 21 31 36 3d 30 0d 00 aa | 26 c8 99 20 22 57 69 6d |!16=0...|&.. "Wim|
|00001840| 70 5f 55 70 64 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Update|Window",|
|00001850| 2c 62 25 20 b8 20 4d 6f | 72 65 25 0d 00 ab 3c 58 |,b% . Mo|re%...<X|
|00001860| 25 2b 3d 62 25 21 34 2d | 62 25 21 32 30 3a 79 25 |%+=b%!4-|b%!20:y%|
|00001870| 3d 59 25 2b 62 25 21 31 | 36 2d 62 25 21 32 34 3a |=Y%+b%!1|6-b%!24:|
|00001880| 6f 6c 64 79 25 3d 4f 6c | 64 59 25 2b 62 25 21 31 |oldy%=Ol|dY%+b%!1|
|00001890| 36 2d 62 25 21 32 34 0d | 00 ac 0c c8 95 20 4d 6f |6-b%!24.|..... Mo|
|000018a0| 72 65 25 0d 00 ad 2d 20 | 20 c8 99 20 22 57 69 6d |re%...- | .. "Wim|
|000018b0| 70 5f 53 65 74 43 6f 6c | 6f 75 72 22 2c 30 3a ec |p_SetCol|our",0:.|
|000018c0| 20 58 25 2c 6f 6c 64 79 | 25 3a f1 20 22 89 22 3b | X%,oldy|%:. ".";|
|000018d0| 0d 00 ae 2b 20 20 c8 99 | 20 22 57 69 6d 70 5f 53 |...+ ..| "Wimp_S|
|000018e0| 65 74 43 6f 6c 6f 75 72 | 22 2c 31 31 3a ec 20 58 |etColour|",11:. X|
|000018f0| 25 2c 79 25 3a f1 20 22 | 89 22 3b 0d 00 af 28 20 |%,y%:. "|.";...( |
|00001900| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 52 65 63 | .. "Wim|p_GetRec|
|00001910| 74 61 6e 67 6c 65 22 2c | 2c 62 25 20 b8 20 4d 6f |tangle",|,b% . Mo|
|00001920| 72 65 25 0d 00 b0 05 ce | 0d 00 b1 0c 4f 6c 64 59 |re%.....|....OldY|
|00001930| 25 3d 59 25 0d 00 b2 05 | e1 0d 00 b3 04 0d 00 b4 |%=Y%....|........|
|00001940| 1c dd 20 f2 52 65 64 72 | 61 77 28 57 6b 4f 72 58 |.. .Redr|aw(WkOrX|
|00001950| 25 2c 57 6b 4f 72 59 25 | 29 0d 00 b5 11 ea 20 43 |%,WkOrY%|)..... C|
|00001960| 68 61 6e 25 2c 54 25 2c | 50 25 0d 00 b6 12 e3 20 |han%,T%,|P%..... |
|00001970| 54 25 3d 30 20 b8 20 4e | 54 25 2d 31 0d 00 b7 1a |T%=0 . N|T%-1....|
|00001980| 20 20 e3 20 43 68 61 6e | 25 3d 30 20 b8 20 4e 43 | . Chan|%=0 . NC|
|00001990| 68 61 6e 25 2d 31 0d 00 | b8 37 20 20 20 20 ec 20 |han%-1..|.7 . |
|000019a0| 57 6b 4f 72 58 25 2b 43 | 68 61 6e 25 2a 43 68 61 |WkOrX%+C|han%*Cha|
|000019b0| 6e 57 25 2b 43 68 61 72 | 57 25 2c 57 6b 4f 72 59 |nW%+Char|W%,WkOrY|
|000019c0| 25 2d 54 25 2a 43 68 61 | 72 48 25 2d 38 0d 00 b9 |%-T%*Cha|rH%-8...|
|000019d0| 1b 20 20 20 20 50 25 3d | 50 69 74 63 68 25 28 54 |. P%=|Pitch%(T|
|000019e0| 25 2c 43 68 61 6e 25 29 | 0d 00 ba 38 20 20 20 20 |%,Chan%)|...8 |
|000019f0| e7 20 50 25 20 f1 20 c1 | 22 43 44 45 46 47 41 42 |. P% . .|"CDEFGAB|
|00001a00| 22 2c 20 50 25 20 83 20 | 37 2b 31 2c 31 29 3b 50 |", P% . |7+1,1);P|
|00001a10| 25 20 81 20 37 3b 20 8b | 20 f1 20 22 b7 b7 22 3b |% . 7; .| . "..";|
|00001a20| 0d 00 bb 07 20 20 ed 0d | 00 bc 07 ed 20 20 0d 00 |.... ..|.... ..|
|00001a30| bd 05 e1 0d 00 be 04 0d | 00 bf 3f f4 20 3d 3d 3d |........|..?. ===|
|00001a40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001a50| 3d 3d 3d 3d 3d 3d 3d 20 | 4d 49 44 49 20 3d 3d 3d |======= |MIDI ===|
|00001a60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001a70| 3d 3d 3d 3d 3d 3d 0d 00 | c0 04 0d 00 c1 0f dd 20 |======..|....... |
|00001a80| f2 4d 69 64 69 49 6e 69 | 74 0d 00 c2 12 c8 99 20 |.MidiIni|t...... |
|00001a90| 22 4d 49 44 49 5f 49 6e | 69 74 22 0d 00 c3 19 c8 |"MIDI_In|it".....|
|00001aa0| 99 20 22 4d 49 44 49 5f | 46 61 73 74 43 6c 6f 63 |. "MIDI_|FastCloc|
|00001ab0| 6b 22 2c 31 0d 00 c4 0e | f2 41 6c 6c 4f 66 66 4e |k",1....|.AllOffN|
|00001ac0| 6f 77 0d 00 c5 05 e1 0d | 00 c6 04 0d 00 c7 0b dd |ow......|........|
|00001ad0| 20 a4 54 69 6d 65 0d 00 | c8 08 ea 20 54 25 0d 00 | .Time..|... T%..|
|00001ae0| c9 1f c8 99 20 22 4d 49 | 44 49 5f 46 61 73 74 43 |.... "MI|DI_FastC|
|00001af0| 6c 6f 63 6b 22 2c 2d 31 | 20 b8 2c 54 25 0d 00 ca |lock",-1| .,T%...|
|00001b00| 07 3d 54 25 0d 00 cb 04 | 0d 00 cc 0b dd 20 f2 57 |.=T%....|..... .W|
|00001b10| 61 69 74 0d 00 cd 08 ea | 20 46 25 0d 00 ce 05 f5 |ait.....| F%.....|
|00001b20| 0d 00 cf 0b 20 20 f2 50 | 6f 6c 6c 0d 00 d0 24 20 |.... .P|oll...$ |
|00001b30| 20 c8 99 20 22 4d 49 44 | 49 5f 49 6e 71 42 75 66 | .. "MID|I_InqBuf|
|00001b40| 66 65 72 53 69 7a 65 22 | 2c 31 20 b8 20 46 25 0d |ferSize"|,1 . F%.|
|00001b50| 00 d1 08 fd 20 46 25 0d | 00 d2 05 e1 0d 00 d3 04 |.... F%.|........|
|00001b60| 0d 00 d4 1e dd 20 f2 4e | 6f 74 65 28 43 68 61 6e |..... .N|ote(Chan|
|00001b70| 25 2c 50 25 2c 56 25 2c | 54 69 6d 65 25 29 0d 00 |%,P%,V%,|Time%)..|
|00001b80| d5 0e ea 20 43 6f 6d 6d | 61 6e 64 25 0d 00 d6 3e |... Comm|and%...>|
|00001b90| e7 20 56 25 20 43 75 72 | 72 65 6e 74 50 69 74 63 |. V% Cur|rentPitc|
|00001ba0| 68 25 28 43 68 61 6e 25 | 29 3d a4 50 28 50 25 29 |h%(Chan%|)=.P(P%)|
|00001bb0| 20 8b 20 50 25 3d 43 75 | 72 72 65 6e 74 50 69 74 | . P%=Cu|rrentPit|
|00001bc0| 63 68 25 28 43 68 61 6e | 25 29 0d 00 d7 3b 43 6f |ch%(Chan|%)...;Co|
|00001bd0| 6d 6d 61 6e 64 25 3d 26 | 39 30 20 84 20 43 68 61 |mmand%=&|90 . Cha|
|00001be0| 6e 25 20 84 20 43 75 72 | 72 65 6e 74 50 69 74 63 |n% . Cur|rentPitc|
|00001bf0| 68 25 28 43 68 61 6e 25 | 29 3c 3c 38 20 84 20 56 |h%(Chan%|)<<8 . V|
|00001c00| 25 3c 3c 31 36 0d 00 d8 | 26 c8 99 20 22 4d 49 44 |%<<16...|&.. "MID|
|00001c10| 49 5f 54 78 43 6f 6d 6d | 61 6e 64 22 2c 43 6f 6d |I_TxComm|and",Com|
|00001c20| 6d 61 6e 64 25 2c 54 69 | 6d 65 25 0d 00 d9 05 e1 |mand%,Ti|me%.....|
|00001c30| 0d 00 da 04 0d 00 db 14 | dd 20 f2 41 6c 6c 4f 66 |........|. .AllOf|
|00001c40| 66 28 54 69 6d 65 25 29 | 0d 00 dc 0b ea 20 43 68 |f(Time%)|..... Ch|
|00001c50| 61 6e 25 0d 00 dd 18 e3 | 20 43 68 61 6e 25 3d 30 |an%.....| Chan%=0|
|00001c60| 20 b8 20 4e 43 68 61 6e | 25 2d 31 0d 00 de 1c 20 | . NChan|%-1.... |
|00001c70| 20 f2 4e 6f 74 65 28 43 | 68 61 6e 25 2c 30 2c 30 | .Note(C|han%,0,0|
|00001c80| 2c 54 69 6d 65 25 29 0d | 00 df 0b ed 20 43 68 61 |,Time%).|.... Cha|
|00001c90| 6e 25 0d 00 e0 05 e1 0d | 00 e1 04 0d 00 e2 10 dd |n%......|........|
|00001ca0| 20 f2 41 6c 6c 4f 66 66 | 4e 6f 77 0d 00 e3 0b ea | .AllOff|Now.....|
|00001cb0| 20 43 68 61 6e 25 0d 00 | e4 15 41 6c 6c 4f 66 66 | Chan%..|..AllOff|
|00001cc0| 25 3d 26 30 33 30 30 37 | 42 42 30 0d 00 e5 18 e3 |%=&03007|BB0.....|
|00001cd0| 20 43 68 61 6e 25 3d 30 | 20 b8 20 4e 43 68 61 6e | Chan%=0| . NChan|
|00001ce0| 25 2d 31 0d 00 e6 27 20 | 20 c8 99 20 22 4d 49 44 |%-1...' | .. "MID|
|00001cf0| 49 5f 54 78 43 6f 6d 6d | 61 6e 64 22 2c 41 6c 6c |I_TxComm|and",All|
|00001d00| 4f 66 66 25 2b 43 68 61 | 6e 25 0d 00 e7 05 ed 0d |Off%+Cha|n%......|
|00001d10| 00 e8 05 e1 0d 00 e9 04 | 0d 00 ea 11 dd 20 f2 4d |........|..... .M|
|00001d20| 61 6a 6f 72 4d 69 6e 6f | 72 0d 00 eb 2b e7 20 b3 |ajorMino|r...+. .|
|00001d30| 3c 30 20 50 25 28 32 29 | 3d 33 3a 50 25 28 35 29 |<0 P%(2)|=3:P%(5)|
|00001d40| 3d 38 20 8b 20 50 25 28 | 32 29 3d 34 3a 50 25 28 |=8 . P%(|2)=4:P%(|
|00001d50| 35 29 3d 39 0d 00 ec 05 | e1 0d 00 ed 05 20 0d 00 |5)=9....|..... ..|
|00001d60| ee 0a dd 20 f2 4e 65 77 | 0d 00 ef 1d ea 20 44 25 |... .New|..... D%|
|00001d70| 2c 54 25 2c 4d 25 2c 50 | 25 2c 54 54 25 2c 43 43 |,T%,M%,P|%,TT%,CC|
|00001d80| 25 2c 4d 50 25 0d 00 f0 | 15 43 68 61 6e 25 3d b3 |%,MP%...|.Chan%=.|
|00001d90| 28 4e 43 68 61 6e 25 29 | 2d 31 0d 00 f1 24 e7 20 |(NChan%)|-1...$. |
|00001da0| 43 68 61 6e 25 3d 52 68 | 79 74 68 6d 43 68 61 6e |Chan%=Rh|ythmChan|
|00001db0| 6e 65 6c 25 20 f2 52 68 | 79 74 68 6d 3a e1 0d 00 |nel% .Rh|ythm:...|
|00001dc0| f2 0f 54 25 3d b3 28 4e | 54 25 29 2d 31 0d 00 f3 |..T%=.(N|T%)-1...|
|00001dd0| 31 e7 20 50 69 74 63 68 | 25 28 54 25 2c 43 68 61 |1. Pitch|%(T%,Cha|
|00001de0| 6e 25 29 20 80 20 b3 3e | 30 20 50 69 74 63 68 25 |n%) . .>|0 Pitch%|
|00001df0| 28 54 25 2c 43 68 61 6e | 25 29 3d 30 3a e1 0d 00 |(T%,Chan|%)=0:...|
|00001e00| f4 32 f4 20 52 6f 75 6e | 64 20 54 25 20 64 6f 77 |.2. Roun|d T% dow|
|00001e10| 6e 20 74 6f 20 62 69 67 | 67 65 73 74 20 73 69 6c |n to big|gest sil|
|00001e20| 65 6e 74 20 70 6f 77 65 | 72 20 6f 66 20 74 77 6f |ent powe|r of two|
|00001e30| 0d 00 f5 0a 4d 25 3d ac | 20 31 0d 00 f6 05 f5 0d |....M%=.| 1......|
|00001e40| 00 f7 11 20 20 54 54 25 | 3d 54 25 20 80 20 4d 25 |... TT%|=T% . M%|
|00001e50| 0d 00 f8 32 20 20 e7 20 | 50 69 74 63 68 25 28 54 |...2 . |Pitch%(T|
|00001e60| 54 25 2c 43 68 61 6e 25 | 29 3d 30 20 54 25 3d 54 |T%,Chan%|)=0 T%=T|
|00001e70| 54 25 3a 4d 25 3d 4d 25 | 3c 3c 31 20 8b 20 4d 25 |T%:M%=M%|<<1 . M%|
|00001e80| 3d 30 0d 00 f9 12 fd 20 | 28 4e 54 25 20 80 20 4d |=0..... |(NT% . M|
|00001e90| 25 29 3d 30 0d 00 fa 19 | 50 25 3d b3 28 31 35 29 |%)=0....|P%=.(15)|
|00001ea0| 2b 36 3a 4d 50 25 3d a4 | 50 28 50 25 29 0d 00 fb |+6:MP%=.|P(P%)...|
|00001eb0| 16 e3 20 43 43 25 3d 30 | 20 b8 20 4e 43 68 61 6e |.. CC%=0| . NChan|
|00001ec0| 25 2d 31 0d 00 fc 25 20 | 20 e7 20 43 43 25 3c 3e |%-1...% | . CC%<>|
|00001ed0| 43 68 61 6e 25 20 80 20 | 50 69 74 63 68 25 28 54 |Chan% . |Pitch%(T|
|00001ee0| 25 2c 43 43 25 29 20 8c | 0d 00 fd 24 20 20 20 20 |%,CC%) .|...$ |
|00001ef0| 44 25 3d 94 28 4d 50 25 | 2d a4 50 28 50 69 74 63 |D%=.(MP%|-.P(Pitc|
|00001f00| 68 25 28 54 25 2c 43 43 | 25 29 29 29 0d 00 fe 18 |h%(T%,CC|%)))....|
|00001f10| 20 20 20 20 e7 20 55 48 | 25 28 44 25 20 83 20 31 | . UH|%(D% . 1|
|00001f20| 32 29 20 e1 0d 00 ff 07 | 20 20 cd 0d 01 00 05 ed |2) .....| ......|
|00001f30| 0d 01 01 15 f2 53 65 74 | 28 54 25 2c 43 68 61 6e |.....Set|(T%,Chan|
|00001f40| 25 2c 50 25 29 0d 01 02 | 05 e1 0d 01 03 04 0d 01 |%,P%)...|........|
|00001f50| 04 0d dd 20 f2 52 68 79 | 74 68 6d 0d 01 05 0e ea |... .Rhy|thm.....|
|00001f60| 20 44 25 2c 54 25 2c 50 | 25 0d 01 06 1a 44 25 3d | D%,T%,P|%....D%=|
|00001f70| 31 3c 3c 28 b3 28 4c 6f | 67 32 4e 54 25 2b 31 29 |1<<(.(Lo|g2NT%+1)|
|00001f80| 2d 31 29 0d 01 07 0f 54 | 25 3d b3 28 4e 54 25 29 |-1)....T|%=.(NT%)|
|00001f90| 2d 31 0d 01 08 0e 50 25 | 3d b3 28 32 32 29 2b 36 |-1....P%|=.(22)+6|
|00001fa0| 0d 01 09 0d c8 95 20 54 | 25 3c 4e 54 25 0d 01 0a |...... T|%<NT%...|
|00001fb0| 20 20 20 f2 53 65 74 28 | 54 25 2c 52 68 79 74 68 | .Set(|T%,Rhyth|
|00001fc0| 6d 43 68 61 6e 6e 65 6c | 25 2c 50 25 29 0d 01 0b |mChannel|%,P%)...|
|00001fd0| 0c 20 20 54 25 2b 3d 44 | 25 0d 01 0c 05 ce 0d 01 |. T%+=D|%.......|
|00001fe0| 0d 05 e1 0d 01 0e 04 0d | 01 0f 0b dd 20 f2 43 6f |........|.... .Co|
|00001ff0| 70 79 0d 01 10 0f ea 20 | 43 25 2c 43 43 25 2c 50 |py..... |C%,CC%,P|
|00002000| 25 0d 01 11 0a 50 25 3d | b3 3e 30 0d 01 12 15 e3 |%....P%=|.>0.....|
|00002010| 20 43 25 3d 30 20 b8 20 | 4e 43 68 61 6e 25 2d 31 | C%=0 . |NChan%-1|
|00002020| 0d 01 13 0c 20 20 e7 20 | 50 25 20 8c 0d 01 14 09 |.... . |P% .....|
|00002030| 20 20 20 20 f5 0d 01 15 | 1f 20 20 20 20 20 20 53 | ....|. S|
|00002040| 77 61 70 25 28 43 25 29 | 3d b3 28 4e 43 68 61 6e |wap%(C%)|=.(NChan|
|00002050| 25 29 2d 31 0d 01 16 31 | 20 20 20 20 20 20 43 43 |%)-1...1| CC|
|00002060| 25 3d 30 3a c8 95 20 53 | 77 61 70 25 28 43 43 25 |%=0:.. S|wap%(CC%|
|00002070| 29 3c 3e 53 77 61 70 25 | 28 43 25 29 20 43 43 25 |)<>Swap%|(C%) CC%|
|00002080| 2b 3d 31 3a ce 0d 01 17 | 10 20 20 20 20 fd 20 43 |+=1:....|. . C|
|00002090| 43 25 3d 43 25 0d 01 18 | 07 20 20 cc 0d 01 19 14 |C%=C%...|. .....|
|000020a0| 20 20 20 20 53 77 61 70 | 25 28 43 25 29 3d 43 25 | Swap|%(C%)=C%|
|000020b0| 0d 01 1a 07 20 20 cd 0d | 01 1b 05 ed 0d 01 1c 1b |.... ..|........|
|000020c0| 4c 53 25 3d 31 3c 3c b3 | 28 ab 28 4e 54 25 2d 31 |LS%=1<<.|(.(NT%-1|
|000020d0| 29 2f ab 32 2d 31 29 0d | 01 1d 28 e7 20 4c 53 25 |)/.2-1).|..(. LS%|
|000020e0| 2a 34 3c 4e 54 25 2d 31 | 20 4c 44 25 3d b3 28 33 |*4<NT%-1| LD%=.(3|
|000020f0| 29 2a 4c 53 25 20 8b 20 | 4c 44 25 3d 4c 53 25 0d |)*LS% . |LD%=LS%.|
|00002100| 01 1e 1a 54 53 25 3d 28 | b3 28 4e 54 25 2f 4c 53 |...TS%=(|.(NT%/LS|
|00002110| 25 29 2d 31 29 2a 4c 53 | 25 0d 01 1f 1a 54 44 25 |%)-1)*LS|%....TD%|
|00002120| 3d 28 b3 28 4e 54 25 2f | 4c 44 25 29 2d 31 29 2a |=(.(NT%/|LD%)-1)*|
|00002130| 4c 44 25 0d 01 20 19 50 | 53 25 3d b3 28 37 29 2d |LD%.. .P|S%=.(7)-|
|00002140| 31 3a 44 53 25 3d b3 28 | 33 29 2d 32 0d 01 21 12 |1:DS%=.(|3)-2..!.|
|00002150| e3 20 54 25 3d 30 20 b8 | 20 4c 44 25 2d 31 0d 01 |. T%=0 .| LD%-1..|
|00002160| 22 26 20 20 e7 20 54 44 | 25 2b 54 25 3c 54 53 25 |"& . TD|%+T%<TS%|
|00002170| 20 84 20 54 44 25 2b 54 | 25 3e 3d 54 53 25 2b 4c | . TD%+T|%>=TS%+L|
|00002180| 53 25 20 8c 0d 01 23 19 | 20 20 20 20 e3 20 43 25 |S% ...#.| . C%|
|00002190| 3d 30 20 b8 20 4e 43 68 | 61 6e 25 2d 31 0d 01 24 |=0 . NCh|an%-1..$|
|000021a0| 25 20 20 20 20 20 20 50 | 25 3d 50 69 74 63 68 25 |% P|%=Pitch%|
|000021b0| 28 54 53 25 2b 54 25 20 | 83 20 4c 53 25 2c 20 43 |(TS%+T% |. LS%, C|
|000021c0| 25 29 0d 01 25 10 20 20 | 20 20 20 20 e7 20 50 25 |%)..%. | . P%|
|000021d0| 20 8c 0d 01 26 22 20 20 | 20 20 20 20 20 20 50 25 | ...&" | P%|
|000021e0| 2b 3d 50 53 25 2b 44 53 | 25 2a 28 54 25 20 81 20 |+=PS%+DS|%*(T% . |
|000021f0| 4c 53 25 29 0d 01 27 1c | 20 20 20 20 20 20 20 20 |LS%)..'.| |
|00002200| c8 95 20 50 25 3e 32 38 | 20 50 25 2d 3d 37 3a ce |.. P%>28| P%-=7:.|
|00002210| 0d 01 28 0b 20 20 20 20 | 20 20 cd 0d 01 29 2b 20 |..(. | ...)+ |
|00002220| 20 20 20 20 20 f2 53 65 | 74 28 28 54 44 25 2b 54 | .Se|t((TD%+T|
|00002230| 25 29 20 83 20 4e 54 25 | 2c 53 77 61 70 25 28 43 |%) . NT%|,Swap%(C|
|00002240| 25 29 2c 50 25 29 0d 01 | 2a 09 20 20 20 20 ed 0d |%),P%)..|*. ..|
|00002250| 01 2b 07 20 20 cd 0d 01 | 2c 05 ed 0d 01 2d 05 e1 |.+. ...|,....-..|
|00002260| 0d 01 2e 04 0d 01 2f 26 | dd 20 a4 50 28 50 25 29 |....../&|. .P(P%)|
|00002270| 3d 31 32 2a 28 50 25 20 | 81 20 37 29 2b 50 25 28 |=12*(P% |. 7)+P%(|
|00002280| 50 25 20 83 20 37 29 2b | 33 36 0d 01 30 04 0d 01 |P% . 7)+|36..0...|
|00002290| 31 3f f4 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |1?. ====|========|
|000022a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 20 4d |========|====== M|
|000022b0| 69 73 63 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |isc ====|========|
|000022c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 0d 01 32 |========|=====..2|
|000022d0| 04 0d 01 33 11 dd 20 a4 | 53 74 72 69 6e 67 28 53 |...3.. .|String(S|
|000022e0| 25 29 0d 01 34 0e ea 20 | 50 25 3a 50 25 3d 53 25 |%)..4.. |P%:P%=S%|
|000022f0| 0d 01 35 17 c8 95 20 3f | 50 25 3e 97 22 20 22 3a |..5... ?|P%>." ":|
|00002300| 50 25 2b 3d 31 3a ce 0d | 01 36 0a 24 50 25 3d 22 |P%+=1:..|.6.$P%="|
|00002310| 22 0d 01 37 08 3d 24 53 | 25 0d 01 38 04 0d 01 39 |"..7.=$S|%..8...9|
|00002320| 0c dd 20 f2 45 72 72 6f | 72 0d 01 3a 09 ee 20 85 |.. .Erro|r..:.. .|
|00002330| 20 87 0d 01 3b 0e f2 41 | 6c 6c 4f 66 66 4e 6f 77 | ...;..A|llOffNow|
|00002340| 0d 01 3c 14 e7 20 9f 3c | 3e 30 20 80 20 9f 3c 3e |..<.. .<|>0 . .<>|
|00002350| 31 37 20 8c 0d 01 3d 20 | 20 20 21 62 25 3d 9f 3a |17 ...= | !b%=.:|
|00002360| 24 28 62 25 2b 34 29 3d | f6 24 2b 22 20 40 20 22 |$(b%+4)=|.$+" @ "|
|00002370| 2b c3 20 9e 0d 01 3e 26 | 20 20 c8 99 22 57 69 6d |+. ...>&| .."Wim|
|00002380| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|00002390| 25 2c 31 2c 22 52 69 66 | 66 22 0d 01 3f 05 cd 0d |%,1,"Rif|f"..?...|
|000023a0| 01 40 09 f2 51 75 69 74 | 0d 01 41 05 e1 0d 01 42 |.@..Quit|..A....B|
|000023b0| 04 0d 01 43 0b dd 20 f2 | 51 75 69 74 0d 01 44 0d |...C.. .|Quit..D.|
|000023c0| f2 4d 69 64 69 49 6e 69 | 74 0d 01 45 21 c8 99 20 |.MidiIni|t..E!.. |
|000023d0| 22 4d 49 44 49 5f 46 61 | 73 74 43 6c 6f 63 6b 22 |"MIDI_Fa|stClock"|
|000023e0| 2c 30 20 3a f4 20 53 74 | 6f 70 0d 01 46 2b 24 62 |,0 :. St|op..F+$b|
|000023f0| 25 3d 22 54 41 53 4b 22 | 3a c8 99 22 57 69 6d 70 |%="TASK"|:.."Wimp|
|00002400| 5f 43 6c 6f 73 65 44 6f | 77 6e 22 2c 54 61 73 6b |_CloseDo|wn",Task|
|00002410| 25 2c 21 62 25 0d 01 47 | 06 c8 98 0d 01 48 04 0d |%,!b%..G|.....H..|
|00002420| 01 49 2c f4 20 59 61 6d | 61 68 61 20 54 58 38 31 |.I,. Yam|aha TX81|
|00002430| 5a 2d 73 70 65 63 69 66 | 69 63 20 73 74 75 66 66 |Z-specif|ic stuff|
|00002440| 20 28 6e 6f 74 20 75 73 | 65 64 29 0d 01 4a 04 0d | (not us|ed)..J..|
|00002450| 01 4b 19 f4 20 44 45 46 | 20 50 52 4f 43 50 65 72 |.K.. DEF| PROCPer|
|00002460| 66 28 43 68 61 6e 25 29 | 0d 01 4c 20 f4 20 4c 4f |f(Chan%)|..L . LO|
|00002470| 43 41 4c 20 43 25 2c 54 | 25 3a 43 25 3d 43 68 61 |CAL C%,T|%:C%=Cha|
|00002480| 6e 25 20 41 4e 44 20 37 | 0d 01 4d 31 f4 20 52 45 |n% AND 7|..M1. RE|
|00002490| 50 45 41 54 20 56 25 3d | 52 4e 44 28 31 36 30 29 |PEAT V%=|RND(160)|
|000024a0| 2d 31 3a 55 4e 54 49 4c | 20 56 25 3c 31 33 36 20 |-1:UNTIL| V%<136 |
|000024b0| 4f 52 20 56 25 3e 31 34 | 39 0d 01 4e 1e f4 20 50 |OR V%>14|9..N.. P|
|000024c0| 52 4f 43 50 41 52 28 30 | 2c 31 32 2a 43 25 2b 31 |ROCPAR(0|,12*C%+1|
|000024d0| 2c 56 25 3e 3e 37 29 0d | 01 4f 23 f4 20 50 52 4f |,V%>>7).|.O#. PRO|
|000024e0| 43 50 41 52 28 30 2c 31 | 32 2a 43 25 2b 32 2c 56 |CPAR(0,1|2*C%+2,V|
|000024f0| 25 20 41 4e 44 20 31 32 | 37 29 0d 01 50 0d f4 20 |% AND 12|7)..P.. |
|00002500| 45 4e 44 50 52 4f 43 0d | 01 51 07 f4 20 20 0d 01 |ENDPROC.|.Q.. ..|
|00002510| 52 1b f4 20 44 45 46 20 | 50 52 4f 43 50 41 52 28 |R.. DEF |PROCPAR(|
|00002520| 53 25 2c 50 25 2c 44 25 | 29 0d 01 53 26 f4 20 50 |S%,P%,D%|)..S&. P|
|00002530| 52 4f 43 4d 28 26 46 30 | 29 3a 50 52 4f 43 4d 28 |ROCM(&F0|):PROCM(|
|00002540| 26 34 33 29 3a 50 52 4f | 43 4d 28 26 31 30 29 0d |&43):PRO|CM(&10).|
|00002550| 01 54 27 f4 20 50 52 4f | 43 4d 28 26 31 30 2b 53 |.T'. PRO|CM(&10+S|
|00002560| 25 29 3a 50 52 4f 43 4d | 28 50 25 29 3a 50 52 4f |%):PROCM|(P%):PRO|
|00002570| 43 4d 28 44 25 29 0d 01 | 55 10 f4 20 50 52 4f 43 |CM(D%)..|U.. PROC|
|00002580| 4d 28 26 46 37 29 0d 01 | 56 0d f4 20 45 4e 44 50 |M(&F7)..|V.. ENDP|
|00002590| 52 4f 43 0d 01 57 07 f4 | 20 20 0d 01 58 2d f4 20 |ROC..W..| ..X-. |
|000025a0| 44 45 46 20 50 52 4f 43 | 4d 28 41 25 29 20 20 20 |DEF PROC|M(A%) |
|000025b0| 20 20 20 3a 52 45 4d 20 | 53 65 6e 64 20 41 25 20 | :REM |Send A% |
|000025c0| 74 6f 20 4d 49 44 49 0d | 01 59 1a f4 20 53 59 53 |to MIDI.|.Y.. SYS|
|000025d0| 20 22 4d 49 44 49 5f 54 | 78 42 79 74 65 22 2c 41 | "MIDI_T|xByte",A|
|000025e0| 25 0d 01 5a 0d f4 20 45 | 4e 44 50 52 4f 43 0d ff |%..Z.. E|NDPROC..|
|000025f0| 1a 82 21 53 70 72 69 74 | 65 73 00 00 01 20 ff e0 |..!Sprit|es... ..|
|00002600| 02 00 00 8a 1d d2 b6 67 | bf e0 02 00 00 45 f9 ff |.......g|.....E..|
|00002610| ff 57 d1 14 c2 03 00 00 | 00 01 00 00 00 10 00 00 |.W......|........|
|00002620| 00 e4 02 00 00 d4 02 00 | 00 21 72 69 66 66 00 00 |........|.!riff..|
|00002630| 00 00 00 00 00 04 00 00 | 00 10 00 00 00 00 00 00 |........|........|
|00002640| 00 07 00 00 00 2c 00 00 | 00 80 01 00 00 0c 00 00 |.....,..|........|
|00002650| 00 00 44 45 44 54 44 d4 | d7 dd 5d dd dd d5 dd 5d |..DEDTD.|..]....]|
|00002660| 05 00 00 00 00 00 e4 e5 | ee 5c 88 d8 d7 dd 5d dd |........|.\....].|
|00002670| dd d5 dd 5d 55 00 00 00 | 00 55 55 55 55 55 55 dd |...]U...|.UUUUUU.|
|00002680| dd dd 55 55 55 55 55 55 | 55 55 00 00 00 00 c4 65 |..UUUUUU|UU.....e|
|00002690| cc 5c e5 ad aa aa da da | dd dd dd 5d 55 00 00 00 |.\......|...]U...|
|000026a0| 00 44 94 15 11 51 15 ad | dd dd ad ad aa aa da 5d |.D...Q..|.......]|
|000026b0| 05 00 00 00 00 55 55 55 | 55 55 55 ad 5d 55 55 55 |.....UUU|UUU.]UUU|
|000026c0| 55 dd da 55 55 55 00 00 | 00 44 44 45 44 54 45 ad |U..UUU..|.DDEDTE.|
|000026d0| dd 45 50 bb 5b d5 da 5d | 05 00 00 00 00 ec ff c5 |.EP.[..]|........|
|000026e0| ca 5c c5 ad dd 45 5b 55 | 55 d5 da 5d 05 00 00 00 |.\...E[U|U..]....|
|000026f0| 00 55 55 55 55 55 55 ad | 5d 55 55 55 55 d5 da 55 |.UUUUUU.|]UUUU..U|
|00002700| 55 55 00 00 00 00 00 05 | 00 dd dd ad dd 55 5b bb |UU......|.....U[.|
|00002710| 5b d5 da 5d 00 00 00 00 | 00 aa aa d5 dd aa aa aa |[..]....|........|
|00002720| 5d b5 5b bb 5b d5 da 5d | aa 00 00 00 00 55 55 55 |].[.[..]|.....UUU|
|00002730| ad aa aa aa 5d 55 55 55 | 55 d5 da 55 55 55 00 00 |....]UUU|U..UUU..|
|00002740| 00 55 05 55 dd aa aa da | 5d 55 55 dd dd dd da 5d |.U.U....|]UU....]|
|00002750| 50 05 00 00 00 55 05 55 | 55 dd dd 0d 45 05 5d dd |P....U.U|U...E.].|
|00002760| aa aa da 5d 50 05 00 00 | 00 55 55 55 55 55 55 55 |...]P...|.UUUUUUU|
|00002770| 55 55 55 ad aa aa da 55 | 55 55 00 00 00 55 05 55 |UUU....U|UU...U.U|
|00002780| 55 55 55 55 55 55 5d dd | aa aa da 5d 50 05 00 00 |UUUUUU].|...]P...|
|00002790| 00 40 00 55 04 50 40 00 | 45 00 50 dd dd dd dd 54 |.@.U.P@.|E.P....T|
|000027a0| 00 00 00 00 00 00 00 0f | 00 f0 00 00 0f 00 f0 00 |........|........|
|000027b0| 00 0f 00 f0 00 00 00 00 | 00 00 00 0f 00 f0 00 00 |........|........|
|000027c0| 0f 00 f0 00 00 0f 00 f0 | 00 00 00 00 00 ff ff ff |........|........|
|000027d0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff 00 00 |........|........|
|000027e0| 00 00 00 0f 00 f0 00 ff | ff ff ff ff ff ff 0f f0 |........|........|
|000027f0| 00 00 00 00 00 00 00 0f | 00 f0 00 ff ff ff ff ff |........|........|
|00002800| ff ff ff f0 00 00 00 00 | 00 ff ff ff ff ff ff ff |........|........|
|00002810| ff ff ff ff ff ff ff ff | ff ff 00 00 00 00 00 0f |........|........|
|00002820| 00 f0 00 ff 0f 00 f0 00 | 00 ff ff f0 00 00 00 00 |........|........|
|00002830| 00 00 00 0f 00 f0 00 ff | 0f 00 f0 00 00 ff ff f0 |........|........|
|00002840| 00 00 00 00 00 ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002850| ff ff ff ff ff ff 00 00 | 00 00 00 0f 00 ff ff ff |........|........|
|00002860| 0f 00 f0 00 00 ff ff f0 | 00 00 00 00 00 00 00 0f |........|........|
|00002870| ff ff ff ff 0f 00 f0 00 | 00 ff ff f0 00 00 00 00 |........|........|
|00002880| 00 ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002890| ff ff 00 00 00 00 00 0f | ff ff ff ff 0f 00 f0 f0 |........|........|
|000028a0| ff ff ff f0 00 00 00 00 | 00 00 00 0f 00 ff ff 0f |........|........|
|000028b0| 0f 00 f0 ff ff ff ff f0 | 00 00 00 00 00 ff ff ff |........|........|
|000028c0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff 00 00 |........|........|
|000028d0| 00 00 00 0f 00 f0 00 00 | 0f 00 f0 ff ff ff ff f0 |........|........|
|000028e0| 00 00 00 00 00 00 00 0f | 00 f0 00 00 0f 00 f0 f0 |........|........|
|000028f0| ff ff 0f f0 00 00 00 00 | 00 1a 80 1a 82 52 65 61 |........|.....Rea|
|00002900| 64 4d 65 00 63 ff ff ff | ff 00 41 06 00 00 2a 1e |dMe.c...|..A...*.|
|00002910| cc 58 f5 09 41 06 00 00 | 45 ff ff ff d6 e4 ca d1 |.X..A...|E.......|
|00002920| 03 00 00 00 21 48 65 6c | 70 20 66 6f 72 20 21 52 |....!Hel|p for !R|
|00002930| 69 66 66 20 30 2e 30 31 | 20 28 31 34 20 44 65 63 |iff 0.01| (14 Dec|
|00002940| 20 31 39 39 34 29 0a 0a | 21 52 69 66 66 20 67 65 | 1994)..|!Riff ge|
|00002950| 6e 65 72 61 74 65 73 20 | 72 61 6e 64 6f 6d 20 72 |nerates |random r|
|00002960| 65 70 65 61 74 69 6e 67 | 20 70 61 74 74 65 72 6e |epeating| pattern|
|00002970| 73 20 6f 6e 20 61 6e 20 | 61 74 74 61 63 68 65 64 |s on an |attached|
|00002980| 20 4d 49 44 49 20 69 6e | 73 74 72 75 6d 65 6e 74 | MIDI in|strument|
|00002990| 2e 0a 41 20 6e 65 77 20 | 6e 6f 74 65 20 69 73 20 |..A new |note is |
|000029a0| 61 64 64 65 64 20 65 61 | 63 68 20 74 69 6d 65 20 |added ea|ch time |
|000029b0| 74 68 65 20 70 61 74 74 | 65 72 6e 20 69 73 20 70 |the patt|ern is p|
|000029c0| 6c 61 79 65 64 20 75 6e | 6c 65 73 73 20 74 68 65 |layed un|less the|
|000029d0| 20 6e 6f 74 65 20 63 68 | 6f 73 65 6e 0a 77 6f 75 | note ch|osen.wou|
|000029e0| 6c 64 20 62 65 20 75 6e | 68 61 72 6d 6f 6e 69 6f |ld be un|harmonio|
|000029f0| 75 73 20 69 6e 20 74 68 | 65 20 70 6f 73 69 74 69 |us in th|e positi|
|00002a00| 6f 6e 20 63 68 6f 73 65 | 6e 20 66 6f 72 20 69 74 |on chose|n for it|
|00002a10| 2e 20 20 53 6f 6d 65 74 | 69 6d 65 73 20 61 20 73 |. Somet|imes a s|
|00002a20| 65 63 74 69 6f 6e 0a 6f | 66 20 74 68 65 20 70 61 |ection.o|f the pa|
|00002a30| 74 74 65 72 6e 20 69 73 | 20 63 6f 70 69 65 64 20 |ttern is| copied |
|00002a40| 74 6f 20 6f 6e 65 20 6f | 72 20 6d 6f 72 65 20 6f |to one o|r more o|
|00002a50| 74 68 65 72 20 6c 6f 63 | 61 74 69 6f 6e 73 20 69 |ther loc|ations i|
|00002a60| 6e 20 74 68 65 20 70 61 | 74 74 65 72 6e 2c 0a 70 |n the pa|ttern,.p|
|00002a70| 6f 73 73 69 62 6c 79 20 | 77 69 74 68 20 61 20 70 |ossibly |with a p|
|00002a80| 69 74 63 68 20 73 68 69 | 66 74 20 61 6e 64 20 77 |itch shi|ft and w|
|00002a90| 69 74 68 20 63 68 61 6e | 6e 65 6c 73 20 69 6e 74 |ith chan|nels int|
|00002aa0| 65 72 63 68 61 6e 67 65 | 64 2e 20 20 56 65 72 79 |erchange|d. Very|
|00002ab0| 0a 6f 63 63 61 73 69 6f | 6e 61 6c 6c 79 20 74 68 |.occasio|nally th|
|00002ac0| 65 20 70 61 74 74 65 72 | 6e 20 69 73 20 63 6c 65 |e patter|n is cle|
|00002ad0| 61 72 65 64 20 63 6f 6d | 70 6c 65 74 65 6c 79 20 |ared com|pletely |
|00002ae0| 61 6e 64 20 74 68 65 20 | 77 68 6f 6c 65 20 67 68 |and the |whole gh|
|00002af0| 61 73 74 6c 79 0a 62 75 | 73 69 6e 65 73 73 20 73 |astly.bu|siness s|
|00002b00| 74 61 72 74 73 20 61 67 | 61 69 6e 2c 20 70 72 6f |tarts ag|ain, pro|
|00002b10| 62 61 62 6c 79 20 70 72 | 6f 64 75 63 69 6e 67 20 |bably pr|oducing |
|00002b20| 61 20 64 69 66 66 65 72 | 65 6e 74 20 70 61 74 74 |a differ|ent patt|
|00002b30| 65 72 6e 2e 20 20 54 68 | 65 20 74 65 6d 70 6f 0a |ern. Th|e tempo.|
|00002b40| 61 6c 73 6f 20 63 68 61 | 6e 67 65 73 20 72 61 6e |also cha|nges ran|
|00002b50| 64 6f 6d 6c 79 20 62 65 | 74 77 65 65 6e 20 63 65 |domly be|tween ce|
|00002b60| 72 74 61 69 6e 20 6c 69 | 6d 69 74 73 2e 0a 20 0a |rtain li|mits.. .|
|00002b70| 21 52 69 66 66 20 64 69 | 73 70 6c 61 79 73 20 74 |!Riff di|splays t|
|00002b80| 68 65 20 63 75 72 72 65 | 6e 74 20 70 61 74 74 65 |he curre|nt patte|
|00002b90| 72 6e 20 69 6e 20 61 20 | 77 69 6e 64 6f 77 2e 20 |rn in a |window. |
|00002ba0| 20 54 68 65 72 65 20 61 | 72 65 20 6e 6f 20 63 6f | There a|re no co|
|00002bb0| 6e 74 72 6f 6c 73 0a 65 | 78 63 65 70 74 20 51 75 |ntrols.e|xcept Qu|
|00002bc0| 69 74 2e 20 20 41 6c 6c | 20 79 6f 75 20 63 61 6e |it. All| you can|
|00002bd0| 20 64 6f 20 74 6f 20 72 | 65 6c 69 65 76 65 20 74 | do to r|elieve t|
|00002be0| 68 65 20 6d 6f 6e 6f 74 | 6f 6e 79 20 69 73 20 63 |he monot|ony is c|
|00002bf0| 68 61 6e 67 65 20 74 68 | 65 0a 69 6e 73 74 72 75 |hange th|e.instru|
|00002c00| 6d 65 6e 74 73 20 61 73 | 73 69 67 6e 65 64 20 74 |ments as|signed t|
|00002c10| 6f 20 4d 49 44 49 20 63 | 68 61 6e 6e 65 6c 73 20 |o MIDI c|hannels |
|00002c20| 31 20 74 6f 20 34 20 6f | 72 20 63 68 61 6e 67 65 |1 to 4 o|r change|
|00002c30| 20 74 68 65 20 76 61 6c | 75 65 20 6f 66 20 53 65 | the val|ue of Se|
|00002c40| 65 64 25 0a 6e 65 61 72 | 20 74 68 65 20 73 74 61 |ed%.near| the sta|
|00002c50| 72 74 20 6f 66 20 21 52 | 69 66 66 2e 21 52 75 6e |rt of !R|iff.!Run|
|00002c60| 49 6d 61 67 65 2e 0a 0a | 21 52 69 66 66 20 72 65 |Image...|!Riff re|
|00002c70| 71 75 69 72 65 73 20 61 | 20 76 65 72 73 69 6f 6e |quires a| version|
|00002c80| 20 33 20 4d 49 44 49 20 | 70 6f 64 75 6c 65 20 77 | 3 MIDI |podule w|
|00002c90| 69 74 68 20 74 68 65 20 | 4d 49 44 49 5f 46 61 73 |ith the |MIDI_Fas|
|00002ca0| 74 43 6c 6f 63 6b 20 53 | 57 49 20 28 6d 69 6e 65 |tClock S|WI (mine|
|00002cb0| 20 69 73 0a 76 65 72 73 | 69 6f 6e 20 33 2e 31 34 | is.vers|ion 3.14|
|00002cc0| 29 2e 0a 0a 54 68 69 73 | 20 70 72 6f 67 72 61 6d |)...This| program|
|00002cd0| 20 69 73 20 43 6f 70 79 | 72 69 67 68 74 20 31 39 | is Copy|right 19|
|00002ce0| 39 34 20 44 65 6e 69 73 | 20 48 6f 77 65 2e 20 20 |94 Denis| Howe. |
|00002cf0| 59 6f 75 20 6d 61 79 20 | 64 69 73 74 72 69 62 75 |You may |distribu|
|00002d00| 74 65 20 76 65 72 62 61 | 74 69 6d 20 6f 72 0a 6d |te verba|tim or.m|
|00002d10| 6f 64 69 66 69 65 64 20 | 63 6f 70 69 65 73 20 6f |odified |copies o|
|00002d20| 66 20 74 68 69 73 20 70 | 72 6f 67 72 61 6d 20 70 |f this p|rogram p|
|00002d30| 72 6f 76 69 64 65 64 20 | 65 61 63 68 20 73 75 63 |rovided |each suc|
|00002d40| 68 20 63 6f 70 79 20 69 | 73 20 64 69 73 74 72 69 |h copy i|s distri|
|00002d50| 62 75 74 65 64 20 77 69 | 74 68 0a 61 20 63 6f 70 |buted wi|th.a cop|
|00002d60| 79 72 69 67 68 74 20 6e | 6f 74 69 63 65 20 61 6e |yright n|otice an|
|00002d70| 64 20 64 69 73 74 72 69 | 62 75 74 69 6f 6e 20 63 |d distri|bution c|
|00002d80| 6f 6e 64 69 74 69 6f 6e | 73 20 69 64 65 6e 74 69 |ondition|s identi|
|00002d90| 63 61 6c 20 74 6f 20 74 | 68 65 73 65 2e 0a 0a 48 |cal to t|hese...H|
|00002da0| 69 73 74 6f 72 79 0a 3d | 3d 3d 3d 3d 3d 3d 0a 50 |istory.=|======.P|
|00002db0| 6c 65 61 73 65 20 73 65 | 6e 64 20 6d 65 20 61 20 |lease se|nd me a |
|00002dc0| 63 6f 70 79 20 6f 66 20 | 61 6e 79 20 63 68 61 6e |copy of |any chan|
|00002dd0| 67 65 73 20 79 6f 75 20 | 6d 61 6b 65 20 61 6e 64 |ges you |make and|
|00002de0| 20 61 64 64 20 74 68 65 | 20 64 65 74 61 69 6c 73 | add the| details|
|00002df0| 20 68 65 72 65 2e 0a 0a | 30 2e 30 30 20 31 32 20 | here...|0.00 12 |
|00002e00| 4d 61 79 20 31 39 39 32 | 20 57 72 69 74 74 65 6e |May 1992| Written|
|00002e10| 20 62 79 20 44 65 6e 69 | 73 20 48 6f 77 65 0a 30 | by Deni|s Howe.0|
|00002e20| 2e 30 31 20 31 34 20 44 | 65 63 20 31 39 39 34 20 |.01 14 D|ec 1994 |
|00002e30| 57 49 4d 50 20 76 65 72 | 73 69 6f 6e 0a 0a 49 66 |WIMP ver|sion..If|
|00002e40| 20 79 6f 75 20 6c 69 6b | 65 20 74 68 69 73 20 6b | you lik|e this k|
|00002e50| 69 6e 64 20 6f 66 20 69 | 6e 66 69 6e 69 74 65 6c |ind of i|nfinitel|
|00002e60| 79 20 62 6f 72 69 6e 67 | 20 6d 75 73 69 63 20 28 |y boring| music (|
|00002e70| 49 20 6c 6f 76 65 20 69 | 74 21 29 20 79 6f 75 20 |I love i|t!) you |
|00002e80| 73 68 6f 75 6c 64 0a 68 | 65 61 72 20 22 44 72 75 |should.h|ear "Dru|
|00002e90| 6d 6d 69 6e 67 22 20 62 | 79 20 53 74 65 76 65 20 |mming" b|y Steve |
|00002ea0| 52 65 69 63 68 20 6f 72 | 20 61 6e 79 74 68 69 6e |Reich or| anythin|
|00002eb0| 67 20 62 79 20 50 68 69 | 6c 69 70 20 47 6c 61 73 |g by Phi|lip Glas|
|00002ec0| 73 20 6f 72 20 4d 69 63 | 68 65 61 6c 0a 4e 79 6d |s or Mic|heal.Nym|
|00002ed0| 61 6e 2e 20 20 49 66 20 | 79 6f 75 20 68 61 76 65 |an. If |you have|
|00002ee0| 20 61 6e 79 20 63 6f 6d | 6d 65 6e 74 73 20 6f 6e | any com|ments on|
|00002ef0| 20 74 68 69 73 20 70 72 | 6f 67 72 61 6d 20 66 65 | this pr|ogram fe|
|00002f00| 65 6c 20 66 72 65 65 20 | 74 6f 20 6d 61 69 6c 20 |el free |to mail |
|00002f10| 6d 65 2e 0a 0a 44 65 6e | 69 73 20 48 6f 77 65 20 |me...Den|is Howe |
|00002f20| 3c 64 62 68 40 64 6f 63 | 2e 69 63 2e 61 63 2e 75 |<dbh@doc|.ic.ac.u|
|00002f30| 6b 3e 0a 34 38 20 41 6e | 73 6f 6e 20 52 6f 61 64 |k>.48 An|son Road|
|00002f40| 2c 20 4c 6f 6e 64 6f 6e | 2c 20 4e 57 32 20 33 55 |, London|, NW2 3U|
|00002f50| 55 0a 2b 34 34 20 28 31 | 38 31 29 20 34 35 30 20 |U.+44 (1|81) 450 |
|00002f60| 39 34 34 38 0a 1a 80 | |9448... | |
+--------+-------------------------+-------------------------+--------+--------+
