home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1989-01-04 | 92.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 15 f4 20 3e 20 | 4d 75 73 69 63 2e 4d 61 |..... > |Music.Ma|
|00000010| 65 73 74 78 74 0d 00 14 | 1e f4 20 28 63 29 20 41 |estxt...|.. (c) A|
|00000020| 63 6f 72 6e 20 43 6f 6d | 70 75 74 65 72 73 20 31 |corn Com|puters 1|
|00000030| 39 38 38 0d 00 1e 04 0d | 00 28 21 56 65 72 73 69 |988.....|.(!Versi|
|00000040| 6f 6e 53 74 72 24 3d 22 | 31 2e 36 35 20 28 34 2d |onStr$="|1.65 (4-|
|00000050| 4a 61 6e 2d 38 39 29 22 | 0d 00 32 04 0d 00 3c 0d |Jan-89)"|..2...<.|
|00000060| 54 61 73 6b 5f 68 25 3d | 30 0d 00 46 17 4d 75 73 |Task_h%=|0..F.Mus|
|00000070| 69 63 46 69 6c 65 54 79 | 70 65 25 3d 26 41 46 31 |icFileTy|pe%=&AF1|
|00000080| 0d 00 50 12 49 4e 49 54 | 49 41 4c 49 53 45 44 25 |..P.INIT|IALISED%|
|00000090| 3d a3 0d 00 5a 13 de 20 | 45 52 52 42 4c 4f 43 4b |=...Z.. |ERRBLOCK|
|000000a0| 25 20 32 30 30 0d 00 64 | 1f f4 20 73 70 61 63 65 |% 200..d|.. space|
|000000b0| 20 66 6f 72 20 61 6e 20 | 65 72 72 6f 72 20 77 69 | for an |error wi|
|000000c0| 6e 64 6f 77 0d 00 6e 2e | 53 50 41 43 45 25 3d 93 |ndow..n.|SPACE%=.|
|000000d0| 2d e0 20 3a f4 20 63 68 | 65 63 6b 20 65 6e 6f 75 |-. :. ch|eck enou|
|000000e0| 67 68 20 73 70 61 63 65 | 20 61 76 61 69 6c 61 62 |gh space| availab|
|000000f0| 6c 65 0d 00 78 15 e7 20 | 53 50 41 43 45 25 3c 31 |le..x.. |SPACE%<1|
|00000100| 30 30 30 30 30 20 fa 0d | 00 82 1e f4 64 65 62 75 |00000 ..|....debu|
|00000110| 67 3d 4f 50 45 4e 4f 55 | 54 20 22 64 65 62 75 67 |g=OPENOU|T "debug|
|00000120| 66 69 6c 65 22 0d 00 8c | 10 ee 20 85 20 f2 65 72 |file"...|.. . .er|
|00000130| 72 6f 72 3a e0 0d 00 96 | 1e f4 20 67 65 74 20 6e |ror:....|.. get n|
|00000140| 61 6d 65 20 6f 66 20 66 | 69 6c 65 20 74 6f 20 6c |ame of f|ile to l|
|00000150| 6f 61 64 0d 00 a0 1c c8 | 99 20 22 4f 53 5f 47 65 |oad.....|. "OS_Ge|
|00000160| 74 45 6e 76 22 20 b8 20 | 45 6e 76 53 74 72 24 0d |tEnv" . |EnvStr$.|
|00000170| 00 aa 1b e7 20 a7 45 6e | 76 53 74 72 24 2c 22 20 |.... .En|vStr$," |
|00000180| 2d 71 75 69 74 20 22 29 | 20 8c 0d 00 b4 17 20 20 |-quit ")| ..... |
|00000190| 49 25 3d a7 45 6e 76 53 | 74 72 24 2c 22 22 22 22 |I%=.EnvS|tr$,""""|
|000001a0| 29 0d 00 be 1c 20 20 49 | 25 3d a7 45 6e 76 53 74 |).... I|%=.EnvSt|
|000001b0| 72 24 2c 22 22 22 22 2c | 49 25 2b 31 29 0d 00 c8 |r$,"""",|I%+1)...|
|000001c0| 21 20 20 f5 49 25 2b 3d | 31 3a fd c1 45 6e 76 53 |! .I%+=|1:..EnvS|
|000001d0| 74 72 24 2c 49 25 2c 31 | 29 3c 3e 22 20 22 0d 00 |tr$,I%,1|)<>" "..|
|000001e0| d2 15 20 20 66 24 3d c1 | 45 6e 76 53 74 72 24 2c |.. f$=.|EnvStr$,|
|000001f0| 49 25 29 0d 00 dc 07 20 | 20 cd 0d 00 e6 1c 49 4e |I%).... | .....IN|
|00000200| 49 54 49 41 4c 49 53 45 | 44 25 3d a4 69 6e 69 74 |ITIALISE|D%=.init|
|00000210| 69 61 6c 69 73 65 0d 00 | f0 2e 6d 61 73 6b 25 3d |ialise..|..mask%=|
|00000220| 30 20 3a 20 f4 20 6d 61 | 73 6b 20 6f 75 74 20 75 |0 : . ma|sk out u|
|00000230| 6e 77 61 6e 74 65 64 20 | 72 65 61 73 6f 6e 20 63 |nwanted |reason c|
|00000240| 6f 64 65 73 0d 00 fa 0e | ee 20 85 20 f2 65 72 72 |odes....|. . .err|
|00000250| 6f 72 0d 01 04 05 f5 0d | 01 0e 18 20 20 e7 20 50 |or......|... . P|
|00000260| 4c 41 59 49 4e 47 25 20 | f2 43 68 65 63 6b 51 0d |LAYING% |.CheckQ.|
|00000270| 01 18 29 20 20 c8 99 20 | 50 6f 6c 6c 25 2c 6d 61 |..) .. |Poll%,ma|
|00000280| 73 6b 25 2c 57 69 6e 64 | 6f 77 25 2b 68 61 6e 64 |sk%,Wind|ow%+hand|
|00000290| 6c 65 25 20 b8 20 52 25 | 0d 01 22 51 20 20 e7 20 |le% . R%|.."Q . |
|000002a0| 50 4c 41 59 49 4e 47 25 | 20 f2 43 68 65 63 6b 51 |PLAYING%| .CheckQ|
|000002b0| 3a 20 f4 20 72 65 63 68 | 65 63 6b 20 73 69 6e 63 |: . rech|eck sinc|
|000002c0| 65 20 70 6f 6c 6c 20 6d | 69 67 68 74 20 68 61 76 |e poll m|ight hav|
|000002d0| 65 20 73 74 61 79 65 64 | 20 61 77 61 79 20 66 6f |e stayed| away fo|
|000002e0| 72 20 61 20 77 68 69 6c | 65 0d 01 2c 0d 20 20 c8 |r a whil|e..,. .|
|000002f0| 8e 20 52 25 20 ca 0d 01 | 36 09 20 20 c9 20 30 0d |. R% ...|6. . 0.|
|00000300| 01 40 6c 20 20 20 e7 20 | 41 77 61 69 74 69 6e 67 |.@l . |Awaiting|
|00000310| 41 63 6b 25 20 e7 a4 43 | 68 65 63 6b 4f 4b 28 22 |Ack% ..C|heckOK("|
|00000320| 42 61 64 20 44 61 74 61 | 20 54 72 61 6e 73 66 65 |Bad Data| Transfe|
|00000330| 72 2c 20 52 65 63 65 69 | 76 65 72 20 44 65 61 64 |r, Recei|ver Dead|
|00000340| 22 2c 33 29 20 3a 41 77 | 61 69 74 69 6e 67 41 63 |",3) :Aw|aitingAc|
|00000350| 6b 25 3d a3 20 3a 20 43 | 48 41 4e 47 45 44 25 3d |k%=. : C|HANGED%=|
|00000360| 77 61 73 43 48 41 4e 47 | 45 44 25 0d 01 4a 21 20 |wasCHANG|ED%..J! |
|00000370| 20 20 e7 20 53 43 4f 52 | 49 4e 47 25 20 f2 73 79 | . SCOR|ING% .sy|
|00000380| 6d 62 6f 6c 5f 70 6f 69 | 6e 74 65 72 0d 01 54 27 |mbol_poi|nter..T'|
|00000390| 20 20 20 e7 20 66 24 3c | 3e 22 22 20 f2 6c 6f 61 | . f$<|>"" .loa|
|000003a0| 64 5f 6d 75 73 69 63 28 | 66 24 29 20 3a 20 66 24 |d_music(|f$) : f$|
|000003b0| 3d 22 22 0d 01 5e 32 20 | 20 20 e7 20 53 43 52 4f |=""..^2 | . SCRO|
|000003c0| 4c 4c 49 4e 47 25 20 f2 | 43 68 65 63 6b 53 63 72 |LLING% .|CheckScr|
|000003d0| 6f 6c 6c 20 3a f4 20 61 | 75 74 6f 2d 73 63 72 6f |oll :. a|uto-scro|
|000003e0| 6c 6c 69 6e 67 0d 01 68 | 20 20 20 c9 20 31 3a f2 |lling..h| . 1:.|
|000003f0| 72 65 64 72 61 77 5f 77 | 69 6e 64 6f 77 5f 72 65 |redraw_w|indow_re|
|00000400| 71 75 65 73 74 0d 01 72 | 1e 20 20 c9 20 32 3a f2 |quest..r|. . 2:.|
|00000410| 6f 70 65 6e 5f 77 69 6e | 64 6f 77 5f 72 65 71 75 |open_win|dow_requ|
|00000420| 65 73 74 0d 01 7c 1f 20 | 20 c9 20 33 3a f2 63 6c |est..|. | . 3:.cl|
|00000430| 6f 73 65 5f 77 69 6e 64 | 6f 77 5f 72 65 71 75 65 |ose_wind|ow_reque|
|00000440| 73 74 0d 01 86 2c 20 20 | c9 20 34 20 20 20 20 20 |st..., |. 4 |
|00000450| 20 20 20 20 20 3a f4 20 | 70 6f 69 6e 74 65 72 20 | :. |pointer |
|00000460| 6c 65 61 76 69 6e 67 20 | 77 69 6e 64 6f 77 0d 01 |leaving |window..|
|00000470| 90 27 20 20 20 e7 20 57 | 69 6e 64 6f 77 25 21 68 |.' . W|indow%!h|
|00000480| 61 6e 64 6c 65 25 3d 53 | 63 6f 72 65 57 69 6e 64 |andle%=S|coreWind|
|00000490| 5f 68 25 20 8c 0d 01 9a | 11 20 20 20 20 20 f2 72 |_h% ....|. .r|
|000004a0| 65 6c 65 61 73 65 0d 01 | a4 1d 20 20 20 20 20 77 |elease..|.. w|
|000004b0| 61 73 53 43 4f 52 49 4e | 47 25 3d 53 43 4f 52 49 |asSCORIN|G%=SCORI|
|000004c0| 4e 47 25 0d 01 ae 13 20 | 20 20 20 20 53 43 4f 52 |NG%.... | SCOR|
|000004d0| 49 4e 47 25 3d a3 0d 01 | b8 08 20 20 20 cc 0d 01 |ING%=...|.. ...|
|000004e0| c2 44 20 20 20 20 20 e7 | 20 57 69 6e 64 6f 77 25 |.D .| Window%|
|000004f0| 21 68 61 6e 64 6c 65 25 | 3d 41 62 6f 72 74 51 75 |!handle%|=AbortQu|
|00000500| 65 72 79 5f 68 25 20 f2 | 43 6c 6f 73 65 57 69 6e |ery_h% .|CloseWin|
|00000510| 64 6f 77 28 41 62 6f 72 | 74 51 75 65 72 79 5f 68 |dow(Abor|tQuery_h|
|00000520| 25 29 0d 01 cc 0a 20 20 | 20 20 20 cd 0d 01 d6 55 |%).... | ....U|
|00000530| 20 20 c9 20 35 3a 20 e7 | 20 57 69 6e 64 6f 77 25 | . 5: .| Window%|
|00000540| 21 68 61 6e 64 6c 65 25 | 3d 53 63 6f 72 65 57 69 |!handle%|=ScoreWi|
|00000550| 6e 64 5f 68 25 20 53 43 | 4f 52 49 4e 47 25 20 3d |nd_h% SC|ORING% =|
|00000560| 20 28 77 61 73 53 43 4f | 52 49 4e 47 25 20 80 20 | (wasSCO|RING% . |
|00000570| ac 20 73 74 6f 70 53 43 | 4f 52 49 4e 47 25 29 3d |. stopSC|ORING%)=|
|00000580| b9 0d 01 e0 1d 20 20 c9 | 20 36 3a f2 6d 6f 75 73 |..... .| 6:.mous|
|00000590| 65 5f 62 75 74 74 6f 6e | 5f 63 6c 69 63 6b 0d 01 |e_button|_click..|
|000005a0| ea 16 20 20 c9 20 37 3a | f2 55 73 65 72 44 72 61 |.. . 7:|.UserDra|
|000005b0| 67 42 6f 78 0d 01 f4 15 | 20 20 c9 20 38 3a f2 4b |gBox....| . 8:.K|
|000005c0| 65 79 50 72 65 73 73 65 | 64 0d 01 fe 15 20 20 c9 |eyPresse|d.... .|
|000005d0| 20 39 3a f2 4d 65 6e 75 | 53 65 6c 65 63 74 0d 02 | 9:.Menu|Select..|
|000005e0| 08 42 20 20 c9 20 31 30 | 3a 20 f2 53 63 72 6f 6c |.B . 10|: .Scrol|
|000005f0| 6c 52 65 71 28 57 69 6e | 64 6f 77 25 21 28 68 61 |lReq(Win|dow%!(ha|
|00000600| 6e 64 6c 65 25 2b 33 32 | 29 2c 20 57 69 6e 64 6f |ndle%+32|), Windo|
|00000610| 77 25 21 28 68 61 6e 64 | 6c 65 25 2b 33 36 29 29 |w%!(hand|le%+36))|
|00000620| 0d 02 12 16 20 20 c9 20 | 31 37 2c 31 38 3a f2 72 |.... . |17,18:.r|
|00000630| 65 63 65 69 76 65 0d 02 | 1c 07 20 20 cb 0d 02 26 |eceive..|.. ...&|
|00000640| 09 20 20 fd 20 a3 0d 02 | 30 05 e0 0d 02 3a 04 0d |. . ...|0....:..|
|00000650| 02 44 0d dd 20 f2 43 68 | 65 63 6b 51 0d 02 4e 13 |.D.. .Ch|eckQ..N.|
|00000660| 42 31 25 3d 42 32 25 3a | 20 42 32 25 3d c6 8f 0d |B1%=B2%:| B2%=...|
|00000670| 02 58 16 e7 42 32 25 3c | 42 31 25 20 f2 70 6c 61 |.X..B2%<|B1% .pla|
|00000680| 79 5f 62 61 72 0d 02 62 | 05 e1 0d 02 6c 04 0d 02 |y_bar..b|....l...|
|00000690| 76 0e dd 20 f2 72 65 63 | 65 69 76 65 0d 02 80 1b |v.. .rec|eive....|
|000006a0| ea 20 74 61 73 6b 25 2c | 20 72 65 66 25 2c 20 62 |. task%,| ref%, b|
|000006b0| 6c 6f 63 6b 2c 46 24 0d | 02 8a 25 62 6c 6f 63 6b |lock,F$.|..%block|
|000006c0| 3d 57 69 6e 64 6f 77 25 | 20 3a f4 20 74 65 6d 70 |=Window%| :. temp|
|000006d0| 6f 72 61 72 79 20 62 75 | 66 66 65 72 0d 02 94 1d |orary bu|ffer....|
|000006e0| 72 65 66 25 3d 21 28 57 | 69 6e 64 6f 77 25 2b 68 |ref%=!(W|indow%+h|
|000006f0| 61 6e 64 6c 65 25 2b 38 | 29 0d 02 9e 1e 74 61 73 |andle%+8|)....tas|
|00000700| 6b 25 3d 21 28 57 69 6e | 64 6f 77 25 2b 68 61 6e |k%=!(Win|dow%+han|
|00000710| 64 6c 65 25 2b 34 29 0d | 02 a8 38 e7 20 74 61 73 |dle%+4).|..8. tas|
|00000720| 6b 25 3d 54 61 73 6b 5f | 68 25 20 e1 20 3a 20 f4 |k%=Task_|h% . : .|
|00000730| 20 69 67 6e 6f 72 65 20 | 6d 65 73 73 61 67 65 73 | ignore |messages|
|00000740| 20 66 72 6f 6d 20 74 68 | 69 73 20 74 61 73 6b 0d | from th|is task.|
|00000750| 02 b2 1d c8 8e 20 57 69 | 6e 64 6f 77 25 21 28 68 |..... Wi|ndow%!(h|
|00000760| 61 6e 64 6c 65 25 2b 31 | 36 29 20 ca 0d 02 bc 09 |andle%+1|6) .....|
|00000770| 20 20 c9 20 30 0d 02 c6 | 15 20 20 20 e7 20 ac 20 | . 0...|. . . |
|00000780| 43 48 41 4e 47 45 44 25 | 20 8c 0d 02 d0 12 20 20 |CHANGED%| ..... |
|00000790| 20 20 f2 74 65 72 6d 69 | 6e 61 74 65 0d 02 da 08 | .termi|nate....|
|000007a0| 20 20 20 cc 0d 02 e4 11 | 20 20 20 20 21 62 6c 6f | .....| !blo|
|000007b0| 63 6b 3d 32 30 0d 02 ee | 15 20 20 20 20 62 6c 6f |ck=20...|. blo|
|000007c0| 63 6b 21 31 32 3d 72 65 | 66 25 0d 02 f8 23 20 20 |ck!12=re|f%...# |
|000007d0| 20 20 62 6c 6f 63 6b 21 | 31 36 3d 30 20 20 20 20 | block!|16=0 |
|000007e0| 3a f4 20 71 75 69 74 20 | 62 6c 6f 63 6b 0d 03 02 |:. quit |block...|
|000007f0| 47 20 20 20 20 c8 99 20 | 53 65 6e 64 4d 65 73 73 |G .. |SendMess|
|00000800| 61 67 65 2c 31 39 2c 62 | 6c 6f 63 6b 20 3a f4 20 |age,19,b|lock :. |
|00000810| 61 63 6b 6e 6f 77 6c 65 | 64 67 65 2c 20 61 6e 64 |acknowle|dge, and|
|00000820| 20 72 65 66 75 73 65 20 | 71 75 69 74 20 72 65 71 | refuse |quit req|
|00000830| 75 65 73 74 0d 03 0c 44 | 20 20 20 20 e7 20 a4 43 |uest...D| . .C|
|00000840| 68 65 63 6b 4f 4b 28 22 | 55 6e 73 61 76 65 64 20 |heckOK("|Unsaved |
|00000850| 6d 75 73 69 63 2e 20 44 | 6f 20 79 6f 75 20 72 65 |music. D|o you re|
|00000860| 61 6c 6c 79 20 77 61 6e | 74 20 74 6f 20 71 75 69 |ally wan|t to qui|
|00000870| 74 3f 22 2c 33 29 20 8c | 0d 03 16 13 20 20 20 20 |t?",3) .|.... |
|00000880| 20 f2 74 65 72 6d 69 6e | 61 74 65 0d 03 20 09 20 | .termin|ate.. . |
|00000890| 20 20 20 cc 0d 03 2a 23 | 20 20 20 20 20 c8 99 20 | ...*#| .. |
|000008a0| 47 65 74 50 6f 69 6e 74 | 65 72 49 6e 66 6f 25 2c |GetPoint|erInfo%,|
|000008b0| 2c 4d 6f 75 73 65 25 0d | 03 34 35 20 20 20 20 20 |,Mouse%.|.45 |
|000008c0| f2 4f 70 65 6e 57 69 6e | 64 6f 77 28 53 61 76 65 |.OpenWin|dow(Save|
|000008d0| 5f 68 25 2c 20 4d 6f 75 | 73 65 25 21 78 30 25 2c |_h%, Mou|se%!x0%,|
|000008e0| 20 4d 6f 75 73 65 25 21 | 79 30 25 29 0d 03 3e 0a | Mouse%!|y0%)..>.|
|000008f0| 20 20 20 20 20 cd 0d 03 | 48 09 20 20 20 20 cd 0d | ...|H. ..|
|00000900| 03 52 17 20 20 c9 20 32 | 20 3a 20 f4 20 73 61 76 |.R. . 2| : . sav|
|00000910| 65 20 66 69 6c 65 0d 03 | 5c 12 20 20 20 e7 20 53 |e file..|\. . S|
|00000920| 41 56 49 4e 47 25 20 8c | 0d 03 66 1c 20 20 20 20 |AVING% .|..f. |
|00000930| 77 61 73 43 48 41 4e 47 | 45 44 25 3d 43 48 41 4e |wasCHANG|ED%=CHAN|
|00000940| 47 45 44 25 0d 03 70 30 | 20 20 20 20 f2 73 61 76 |GED%..p0| .sav|
|00000950| 65 5f 6d 75 73 69 63 28 | a4 47 65 74 53 74 72 28 |e_music(|.GetStr(|
|00000960| 57 69 6e 64 6f 77 25 2b | 68 61 6e 64 6c 65 25 2b |Window%+|handle%+|
|00000970| 34 34 29 29 0d 03 7a 11 | 20 20 20 20 53 41 56 49 |44))..z.| SAVI|
|00000980| 4e 47 25 3d a3 0d 03 84 | 22 20 20 20 20 c8 99 20 |NG%=....|" .. |
|00000990| 47 65 74 50 6f 69 6e 74 | 65 72 49 6e 66 6f 25 2c |GetPoint|erInfo%,|
|000009a0| 20 2c 62 6c 6f 63 6b 0d | 03 8e 19 20 20 20 20 62 | ,block.|... b|
|000009b0| 6c 6f 63 6b 21 32 30 3d | 62 6c 6f 63 6b 21 31 32 |lock!20=|block!12|
|000009c0| 0d 03 98 19 20 20 20 20 | 62 6c 6f 63 6b 21 32 34 |.... |block!24|
|000009d0| 3d 62 6c 6f 63 6b 21 31 | 36 0d 03 a2 18 20 20 20 |=block!1|6.... |
|000009e0| 20 62 6c 6f 63 6b 21 32 | 38 3d 62 6c 6f 63 6b 21 | block!2|8=block!|
|000009f0| 30 0d 03 ac 18 20 20 20 | 20 62 6c 6f 63 6b 21 33 |0.... | block!3|
|00000a00| 32 3d 62 6c 6f 63 6b 21 | 34 0d 03 b6 12 20 20 20 |2=block!|4.... |
|00000a10| 20 62 6c 6f 63 6b 21 30 | 3d 34 34 0d 03 c0 15 20 | block!0|=44.... |
|00000a20| 20 20 20 62 6c 6f 63 6b | 21 31 32 3d 72 65 66 25 | block|!12=ref%|
|00000a30| 0d 03 ca 33 20 20 20 20 | 62 6c 6f 63 6b 21 31 36 |...3 |block!16|
|00000a40| 3d 33 20 3a f4 20 44 61 | 74 61 4c 6f 61 64 20 61 |=3 :. Da|taLoad a|
|00000a50| 70 70 6c 69 63 61 74 69 | 6f 6e 20 74 6f 20 66 69 |pplicati|on to fi|
|00000a60| 6c 65 72 0d 03 d4 1f 20 | 20 20 20 62 6c 6f 63 6b |ler.... | block|
|00000a70| 21 34 30 3d 4d 75 73 69 | 63 46 69 6c 65 54 79 70 |!40=Musi|cFileTyp|
|00000a80| 65 25 0d 03 de 1f 20 20 | 20 20 c8 99 20 53 65 6e |e%.... | .. Sen|
|00000a90| 64 4d 65 73 73 61 67 65 | 2c 31 37 2c 62 6c 6f 63 |dMessage|,17,bloc|
|00000aa0| 6b 0d 03 e8 16 20 20 20 | 20 41 77 61 69 74 69 6e |k.... | Awaitin|
|00000ab0| 67 41 63 6b 25 3d b9 0d | 03 f2 12 20 20 20 20 f2 |gAck%=..|... .|
|00000ac0| 43 6c 6f 73 65 4d 65 6e | 75 0d 03 fc 09 20 20 20 |CloseMen|u.... |
|00000ad0| 20 cd 0d 04 06 16 20 c9 | 20 33 20 3a 20 f4 20 6c | ..... .| 3 : . l|
|00000ae0| 6f 61 64 20 66 69 6c 65 | 0d 04 10 2e 20 20 f2 6c |oad file|.... .l|
|00000af0| 6f 61 64 5f 6d 75 73 69 | 63 28 a4 47 65 74 53 74 |oad_musi|c(.GetSt|
|00000b00| 72 28 57 69 6e 64 6f 77 | 25 2b 68 61 6e 64 6c 65 |r(Window|%+handle|
|00000b10| 25 2b 34 34 29 29 0d 04 | 1a 18 20 20 f2 44 61 74 |%+44))..|.. .Dat|
|00000b20| 61 4c 6f 61 64 41 63 6b | 28 72 65 66 25 29 0d 04 |aLoadAck|(ref%)..|
|00000b30| 24 42 20 c9 20 34 20 3a | 41 77 61 69 74 69 6e 67 |$B . 4 :|Awaiting|
|00000b40| 41 63 6b 25 3d a3 20 3a | 20 f4 20 44 61 74 61 4c |Ack%=. :| . DataL|
|00000b50| 6f 61 64 41 63 6b 2e 20 | 45 6e 64 20 6f 66 20 44 |oadAck. |End of D|
|00000b60| 61 74 61 53 61 76 65 20 | 70 72 6f 74 6f 63 6f 6c |ataSave |protocol|
|00000b70| 0d 04 2e 25 20 c9 20 35 | 20 3a 20 f4 20 6f 70 65 |...% . 5| : . ope|
|00000b80| 6e 20 64 6f 75 62 6c 65 | 2d 63 6c 69 63 6b 65 64 |n double|-clicked|
|00000b90| 20 66 69 6c 65 0d 04 38 | 30 20 20 e7 20 21 28 57 | file..8|0 . !(W|
|00000ba0| 69 6e 64 6f 77 25 2b 68 | 61 6e 64 6c 65 25 2b 34 |indow%+h|andle%+4|
|00000bb0| 30 29 20 3d 20 4d 75 73 | 69 63 46 69 6c 65 54 79 |0) = Mus|icFileTy|
|00000bc0| 70 65 25 20 8c 0d 04 42 | 30 20 20 20 20 f2 6c 6f |pe% ...B|0 .lo|
|00000bd0| 61 64 5f 6d 75 73 69 63 | 28 a4 47 65 74 53 74 72 |ad_music|(.GetStr|
|00000be0| 28 57 69 6e 64 6f 77 25 | 2b 68 61 6e 64 6c 65 25 |(Window%|+handle%|
|00000bf0| 2b 34 34 29 29 0d 04 4c | 1a 20 20 20 20 f2 44 61 |+44))..L|. .Da|
|00000c00| 74 61 4c 6f 61 64 41 63 | 6b 28 72 65 66 25 29 0d |taLoadAc|k(ref%).|
|00000c10| 04 56 09 20 20 20 20 cd | 0d 04 60 17 20 c9 20 26 |.V. .|..`. . &|
|00000c20| 35 30 32 3a f2 48 65 6c | 70 28 72 65 66 25 29 0d |502:.Hel|p(ref%).|
|00000c30| 04 6a 1d 20 c9 20 26 34 | 30 30 43 31 3a f2 67 65 |.j. . &4|00C1:.ge|
|00000c40| 74 6d 6f 64 65 69 6e 66 | 6f 28 a3 29 0d 04 74 06 |tmodeinf|o(.)..t.|
|00000c50| 20 cb 0d 04 7e 05 e1 0d | 04 88 04 0d 04 92 11 dd | ...~...|........|
|00000c60| 20 f2 48 65 6c 70 28 72 | 65 66 25 29 0d 04 9c 12 | .Help(r|ef%)....|
|00000c70| ea 20 62 6c 6f 63 6b 25 | 2c 74 65 78 74 24 0d 04 |. block%|,text$..|
|00000c80| a6 1a 62 6c 6f 63 6b 25 | 3d 57 69 6e 64 6f 77 25 |..block%|=Window%|
|00000c90| 2b 68 61 6e 64 6c 65 25 | 0d 04 b0 14 62 6c 6f 63 |+handle%|....bloc|
|00000ca0| 6b 25 21 31 32 20 3d 20 | 72 65 66 25 0d 04 ba 29 |k%!12 = |ref%...)|
|00000cb0| 62 6c 6f 63 6b 25 21 31 | 36 20 3d 20 26 35 30 33 |block%!1|6 = &503|
|00000cc0| 20 3a f4 20 53 65 6e 64 | 20 68 65 6c 70 20 6d 65 | :. Send| help me|
|00000cd0| 73 73 61 67 65 0d 04 c4 | 0c 74 65 78 74 24 3d 22 |ssage...|.text$="|
|00000ce0| 22 0d 04 ce 12 c8 8e 20 | 62 6c 6f 63 6b 25 21 33 |"...... |block%!3|
|00000cf0| 32 20 ca 0d 04 d8 4a 20 | c9 20 2d 32 20 3a 20 74 |2 ....J |. -2 : t|
|00000d00| 65 78 74 24 3d 22 54 68 | 69 73 20 69 73 20 74 68 |ext$="Th|is is th|
|00000d10| 65 20 4d 61 65 73 74 72 | 6f 20 69 63 6f 6e 2e 7c |e Maestr|o icon.||
|00000d20| 4d 43 6c 69 63 6b 20 53 | 45 4c 45 43 54 20 74 6f |MClick S|ELECT to|
|00000d30| 20 6f 70 65 6e 20 73 63 | 6f 72 65 2e 22 0d 04 e2 | open sc|ore."...|
|00000d40| 13 20 c9 20 53 63 6f 72 | 65 57 69 6e 64 5f 68 25 |. . Scor|eWind_h%|
|00000d50| 0d 04 ec 21 20 20 e7 53 | 43 4f 52 49 4e 47 25 80 |...! .S|CORING%.|
|00000d60| 53 43 52 49 42 45 25 28 | 64 72 61 77 6e 25 29 20 |SCRIBE%(|drawn%) |
|00000d70| 8c 0d 04 f6 32 20 20 20 | 74 65 78 74 24 3d 22 43 |....2 |text$="C|
|00000d80| 6c 69 63 6b 20 53 45 4c | 45 43 54 20 74 6f 20 70 |lick SEL|ECT to p|
|00000d90| 6c 61 63 65 20 69 74 65 | 6d 20 69 6e 20 73 63 6f |lace ite|m in sco|
|00000da0| 72 65 22 0d 05 00 07 20 | 20 cc 0d 05 0a 3d 20 20 |re".... | ....= |
|00000db0| 20 74 65 78 74 24 3d 22 | 53 65 6c 65 63 74 20 61 | text$="|Select a|
|00000dc0| 6e 20 69 74 65 6d 20 69 | 6e 20 61 20 70 61 6e 65 |n item i|n a pane|
|00000dd0| 20 74 6f 20 70 6c 61 63 | 65 20 6f 6e 20 74 68 65 | to plac|e on the|
|00000de0| 20 73 63 6f 72 65 22 0d | 05 14 07 20 20 cd 0d 05 | score".|... ...|
|00000df0| 1e 13 20 c9 20 4e 6f 74 | 65 73 50 61 6e 65 5f 68 |.. . Not|esPane_h|
|00000e00| 25 0d 05 28 27 20 20 74 | 65 78 74 24 3d 22 43 6c |%..(' t|ext$="Cl|
|00000e10| 69 63 6b 20 53 45 4c 45 | 43 54 20 74 6f 20 73 65 |ick SELE|CT to se|
|00000e20| 6c 65 63 74 20 61 20 22 | 0d 05 32 14 20 20 c8 8e |lect a "|..2. ..|
|00000e30| 20 62 6c 6f 63 6b 25 21 | 33 36 20 ca 0d 05 3c 22 | block%!|36 ...<"|
|00000e40| 20 20 20 20 c9 20 30 20 | 3a 20 74 65 78 74 24 3d | . 0 |: text$=|
|00000e50| 74 65 78 74 24 2b 22 62 | 72 65 76 65 2e 22 0d 05 |text$+"b|reve."..|
|00000e60| 46 26 20 20 20 20 c9 20 | 31 20 3a 20 74 65 78 74 |F& . |1 : text|
|00000e70| 24 3d 74 65 78 74 24 2b | 22 73 65 6d 69 62 72 65 |$=text$+|"semibre|
|00000e80| 76 65 2e 22 0d 05 50 22 | 20 20 20 20 c9 20 32 20 |ve."..P"| . 2 |
|00000e90| 3a 20 74 65 78 74 24 3d | 74 65 78 74 24 2b 22 6d |: text$=|text$+"m|
|00000ea0| 69 6e 69 6d 2e 22 0d 05 | 5a 24 20 20 20 20 c9 20 |inim."..|Z$ . |
|00000eb0| 33 20 3a 20 74 65 78 74 | 24 3d 74 65 78 74 24 2b |3 : text|$=text$+|
|00000ec0| 22 63 72 6f 63 68 65 74 | 2e 22 0d 05 64 23 20 20 |"crochet|."..d# |
|00000ed0| 20 20 c9 20 34 20 3a 20 | 74 65 78 74 24 3d 74 65 | . 4 : |text$=te|
|00000ee0| 78 74 24 2b 22 71 75 61 | 76 65 72 2e 22 0d 05 6e |xt$+"qua|ver."..n|
|00000ef0| 27 20 20 20 20 c9 20 35 | 20 3a 20 74 65 78 74 24 |' . 5| : text$|
|00000f00| 3d 74 65 78 74 24 2b 22 | 73 65 6d 69 71 75 61 76 |=text$+"|semiquav|
|00000f10| 65 72 2e 22 0d 05 78 2b | 20 20 20 20 c9 20 36 20 |er."..x+| . 6 |
|00000f20| 3a 20 74 65 78 74 24 3d | 74 65 78 74 24 2b 22 64 |: text$=|text$+"d|
|00000f30| 65 6d 69 73 65 6d 69 71 | 75 61 76 65 72 2e 22 0d |emisemiq|uaver.".|
|00000f40| 05 82 2f 20 20 20 20 c9 | 20 37 20 3a 20 74 65 78 |../ .| 7 : tex|
|00000f50| 74 24 3d 74 65 78 74 24 | 2b 22 68 65 6d 69 64 65 |t$=text$|+"hemide|
|00000f60| 6d 69 73 65 6d 69 71 75 | 61 76 65 72 2e 22 0d 05 |misemiqu|aver."..|
|00000f70| 8c 12 20 20 20 20 7f 20 | 74 65 78 74 24 3d 22 22 |.. . |text$=""|
|00000f80| 0d 05 96 09 20 20 20 20 | cb 0d 05 a0 14 20 c9 20 |.... |..... . |
|00000f90| 53 68 61 72 70 73 50 61 | 6e 65 5f 68 25 0d 05 aa |SharpsPa|ne_h%...|
|00000fa0| 27 20 20 74 65 78 74 24 | 3d 22 43 6c 69 63 6b 20 |' text$|="Click |
|00000fb0| 53 45 4c 45 43 54 20 74 | 6f 20 73 65 6c 65 63 74 |SELECT t|o select|
|00000fc0| 20 61 20 22 0d 05 b4 14 | 20 20 c8 8e 20 62 6c 6f | a "....| .. blo|
|00000fd0| 63 6b 25 21 33 36 20 ca | 0d 05 be 24 20 20 20 20 |ck%!36 .|...$ |
|00000fe0| c9 20 30 20 3a 20 74 65 | 78 74 24 3d 74 65 78 74 |. 0 : te|xt$=text|
|00000ff0| 24 2b 22 6e 61 74 75 72 | 61 6c 2e 22 0d 05 c8 22 |$+"natur|al."..."|
|00001000| 20 20 20 20 c9 20 31 20 | 3a 20 74 65 78 74 24 3d | . 1 |: text$=|
|00001010| 74 65 78 74 24 2b 22 73 | 68 61 72 70 2e 22 0d 05 |text$+"s|harp."..|
|00001020| d2 21 20 20 20 20 c9 20 | 32 20 3a 20 74 65 78 74 |.! . |2 : text|
|00001030| 24 3d 74 65 78 74 24 2b | 22 66 6c 61 74 2e 22 0d |$=text$+|"flat.".|
|00001040| 05 dc 29 20 20 20 20 c9 | 20 33 20 3a 20 74 65 78 |..) .| 3 : tex|
|00001050| 74 24 3d 74 65 78 74 24 | 2b 22 64 6f 75 62 6c 65 |t$=text$|+"double|
|00001060| 2d 73 68 61 72 70 2e 22 | 0d 05 e6 28 20 20 20 20 |-sharp."|...( |
|00001070| c9 20 34 20 3a 20 74 65 | 78 74 24 3d 74 65 78 74 |. 4 : te|xt$=text|
|00001080| 24 2b 22 64 6f 75 62 6c | 65 2d 66 6c 61 74 2e 22 |$+"doubl|e-flat."|
|00001090| 0d 05 f0 2e 20 20 20 20 | c9 20 35 20 3a 20 74 65 |.... |. 5 : te|
|000010a0| 78 74 24 3d 74 65 78 74 | 24 2b 22 6e 61 74 75 72 |xt$=text|$+"natur|
|000010b0| 61 6c 69 73 65 64 20 73 | 68 61 72 70 2e 22 0d 05 |alised s|harp."..|
|000010c0| fa 2d 20 20 20 20 c9 20 | 36 20 3a 20 74 65 78 74 |.- . |6 : text|
|000010d0| 24 3d 74 65 78 74 24 2b | 22 6e 61 74 75 72 61 6c |$=text$+|"natural|
|000010e0| 69 73 65 64 20 66 6c 61 | 74 2e 22 0d 06 04 20 20 |ised fla|t."... |
|000010f0| 20 20 20 c9 20 37 20 3a | 20 74 65 78 74 24 3d 74 | . 7 :| text$=t|
|00001100| 65 78 74 24 2b 22 64 6f | 74 2e 22 0d 06 0e 27 20 |ext$+"do|t."...' |
|00001110| 20 20 20 c9 20 38 20 3a | 20 74 65 78 74 24 3d 74 | . 8 :| text$=t|
|00001120| 65 78 74 24 2b 22 64 6f | 75 62 6c 65 2d 64 6f 74 |ext$+"do|uble-dot|
|00001130| 2e 22 0d 06 18 27 20 20 | 20 20 c9 20 39 20 3a 20 |."...' | . 9 : |
|00001140| 74 65 78 74 24 3d 74 65 | 78 74 24 2b 22 74 72 69 |text$=te|xt$+"tri|
|00001150| 70 6c 65 2d 64 6f 74 2e | 22 0d 06 22 21 20 20 20 |ple-dot.|".."! |
|00001160| 20 c9 20 31 30 20 3a 20 | 74 65 78 74 24 3d 74 65 | . 10 : |text$=te|
|00001170| 78 74 24 2b 22 74 69 65 | 2e 22 0d 06 2c 26 20 20 |xt$+"tie|."..,& |
|00001180| 20 20 c9 20 31 31 20 3a | 20 74 65 78 74 24 3d 74 | . 11 :| text$=t|
|00001190| 65 78 74 24 2b 22 62 61 | 72 20 6c 69 6e 65 2e 22 |ext$+"ba|r line."|
|000011a0| 0d 06 36 29 20 20 20 20 | c9 20 31 32 20 3a 20 74 |..6) |. 12 : t|
|000011b0| 65 78 74 24 3d 74 65 78 | 74 24 2b 22 74 72 65 62 |ext$=tex|t$+"treb|
|000011c0| 6c 65 20 63 6c 65 66 2e | 22 0d 06 40 27 20 20 20 |le clef.|"..@' |
|000011d0| 20 c9 20 31 33 20 3a 20 | 74 65 78 74 24 3d 74 65 | . 13 : |text$=te|
|000011e0| 78 74 24 2b 22 62 61 73 | 73 20 63 6c 65 66 2e 22 |xt$+"bas|s clef."|
|000011f0| 0d 06 4a 2b 20 20 20 20 | c9 20 31 34 20 3a 20 74 |..J+ |. 14 : t|
|00001200| 65 78 74 24 3d 74 65 78 | 74 24 2b 22 6b 65 79 20 |ext$=tex|t$+"key |
|00001210| 73 69 67 6e 61 74 75 72 | 65 2e 22 0d 06 54 2c 20 |signatur|e."..T, |
|00001220| 20 20 20 c9 20 31 35 20 | 3a 20 74 65 78 74 24 3d | . 15 |: text$=|
|00001230| 74 65 78 74 24 2b 22 74 | 69 6d 65 20 73 69 67 6e |text$+"t|ime sign|
|00001240| 61 74 75 72 65 2e 22 0d | 06 5e 12 20 20 20 20 7f |ature.".|.^. .|
|00001250| 20 74 65 78 74 24 3d 22 | 22 0d 06 68 09 20 20 20 | text$="|"..h. |
|00001260| 20 cb 0d 06 72 13 20 c9 | 20 52 65 73 74 73 50 61 | ...r. .| RestsPa|
|00001270| 6e 65 5f 68 25 0d 06 7c | 27 20 20 74 65 78 74 24 |ne_h%..||' text$|
|00001280| 3d 22 43 6c 69 63 6b 20 | 53 45 4c 45 43 54 20 74 |="Click |SELECT t|
|00001290| 6f 20 73 65 6c 65 63 74 | 20 61 20 22 0d 06 86 14 |o select| a "....|
|000012a0| 20 20 c8 8e 20 62 6c 6f | 63 6b 25 21 33 36 20 ca | .. blo|ck%!36 .|
|000012b0| 0d 06 90 27 20 20 20 20 | c9 20 30 20 3a 20 74 65 |...' |. 0 : te|
|000012c0| 78 74 24 3d 74 65 78 74 | 24 2b 22 62 72 65 76 65 |xt$=text|$+"breve|
|000012d0| 20 72 65 73 74 2e 22 0d | 06 9a 2b 20 20 20 20 c9 | rest.".|..+ .|
|000012e0| 20 31 20 3a 20 74 65 78 | 74 24 3d 74 65 78 74 24 | 1 : tex|t$=text$|
|000012f0| 2b 22 73 65 6d 69 62 72 | 65 76 65 20 72 65 73 74 |+"semibr|eve rest|
|00001300| 2e 22 0d 06 a4 27 20 20 | 20 20 c9 20 32 20 3a 20 |."...' | . 2 : |
|00001310| 74 65 78 74 24 3d 74 65 | 78 74 24 2b 22 6d 69 6e |text$=te|xt$+"min|
|00001320| 69 6d 20 72 65 73 74 2e | 22 0d 06 ae 29 20 20 20 |im rest.|"...) |
|00001330| 20 c9 20 33 20 3a 20 74 | 65 78 74 24 3d 74 65 78 | . 3 : t|ext$=tex|
|00001340| 74 24 2b 22 63 72 6f 63 | 68 65 74 20 72 65 73 74 |t$+"croc|het rest|
|00001350| 2e 22 0d 06 b8 28 20 20 | 20 20 c9 20 34 20 3a 20 |."...( | . 4 : |
|00001360| 74 65 78 74 24 3d 74 65 | 78 74 24 2b 22 71 75 61 |text$=te|xt$+"qua|
|00001370| 76 65 72 20 72 65 73 74 | 2e 22 0d 06 c2 2c 20 20 |ver rest|."..., |
|00001380| 20 20 c9 20 35 20 3a 20 | 74 65 78 74 24 3d 74 65 | . 5 : |text$=te|
|00001390| 78 74 24 2b 22 73 65 6d | 69 71 75 61 76 65 72 20 |xt$+"sem|iquaver |
|000013a0| 72 65 73 74 2e 22 0d 06 | cc 30 20 20 20 20 c9 20 |rest."..|.0 . |
|000013b0| 36 20 3a 20 74 65 78 74 | 24 3d 74 65 78 74 24 2b |6 : text|$=text$+|
|000013c0| 22 64 65 6d 69 73 65 6d | 69 71 75 61 76 65 72 20 |"demisem|iquaver |
|000013d0| 72 65 73 74 2e 22 0d 06 | d6 34 20 20 20 20 c9 20 |rest."..|.4 . |
|000013e0| 37 20 3a 20 74 65 78 74 | 24 3d 74 65 78 74 24 2b |7 : text|$=text$+|
|000013f0| 22 68 65 6d 69 64 65 6d | 69 73 65 6d 69 71 75 61 |"hemidem|isemiqua|
|00001400| 76 65 72 20 72 65 73 74 | 2e 22 0d 06 e0 12 20 20 |ver rest|.".... |
|00001410| 20 20 7f 20 74 65 78 74 | 24 3d 22 22 0d 06 ea 09 | . text|$=""....|
|00001420| 20 20 20 20 cb 0d 06 f4 | 13 20 c9 20 49 6e 73 74 | ....|. . Inst|
|00001430| 72 57 69 6e 64 5f 68 25 | 0d 06 fe 17 20 20 e7 20 |rWind_h%|.... . |
|00001440| 28 62 6c 6f 63 6b 25 21 | 33 36 3e 37 29 20 8c 0d |(block%!|36>7) ..|
|00001450| 07 08 19 20 20 20 e7 20 | 28 62 6c 6f 63 6b 25 21 |... . |(block%!|
|00001460| 33 36 3c 31 36 29 20 8c | 0d 07 12 4d 20 20 20 20 |36<16) .|...M |
|00001470| 74 65 78 74 24 3d 22 43 | 6c 69 63 6b 20 53 45 4c |text$="C|lick SEL|
|00001480| 45 43 54 20 6f 72 20 41 | 44 4a 55 53 54 20 74 6f |ECT or A|DJUST to|
|00001490| 20 73 65 6c 65 63 74 20 | 61 6e 20 69 6e 73 74 72 | select |an instr|
|000014a0| 75 6d 65 6e 74 20 66 6f | 72 20 74 68 69 73 20 73 |ument fo|r this s|
|000014b0| 74 61 76 65 22 0d 07 1c | 09 20 20 20 20 cc 0d 07 |tave"...|. ...|
|000014c0| 26 1a 20 20 20 20 e7 20 | 28 62 6c 6f 63 6b 25 21 |&. . |(block%!|
|000014d0| 33 36 3c 32 34 29 20 8c | 0d 07 30 49 20 20 20 20 |36<24) .|..0I |
|000014e0| 20 74 65 78 74 24 3d 22 | 43 6c 69 63 6b 20 53 45 | text$="|Click SE|
|000014f0| 4c 45 43 54 20 6f 72 20 | 41 44 4a 55 53 54 20 74 |LECT or |ADJUST t|
|00001500| 6f 20 73 65 74 20 74 68 | 65 20 76 6f 6c 75 6d 65 |o set th|e volume|
|00001510| 20 6f 66 20 74 68 69 73 | 20 63 68 61 6e 6e 65 6c | of this| channel|
|00001520| 22 0d 07 3a 65 20 20 20 | 20 20 cc 20 e7 20 28 62 |"..:e | . . (b|
|00001530| 6c 6f 63 6b 25 21 33 36 | 3c 33 32 29 20 74 65 78 |lock%!36|<32) tex|
|00001540| 74 24 3d 22 43 6c 69 63 | 6b 20 53 45 4c 45 43 54 |t$="Clic|k SELECT|
|00001550| 20 6f 72 20 41 44 4a 55 | 53 54 20 74 6f 20 73 65 | or ADJU|ST to se|
|00001560| 74 20 74 68 65 20 73 74 | 65 72 65 6f 20 70 6f 73 |t the st|ereo pos|
|00001570| 69 74 69 6f 6e 20 6f 66 | 20 74 68 69 73 20 63 68 |ition of| this ch|
|00001580| 61 6e 6e 65 6c 22 0d 07 | 44 0a 20 20 20 20 20 cd |annel"..|D. .|
|00001590| 0d 07 4e 09 20 20 20 20 | cd 0d 07 58 08 20 20 20 |..N. |...X. |
|000015a0| cd 0d 07 62 0e 20 c9 20 | 53 61 76 65 5f 68 25 0d |...b. . |Save_h%.|
|000015b0| 07 6c bf 20 20 e7 20 62 | 6c 6f 63 6b 25 21 33 36 |.l. . b|lock%!36|
|000015c0| 3d 32 20 74 65 78 74 24 | 3d 22 44 72 61 67 20 74 |=2 text$|="Drag t|
|000015d0| 68 69 73 20 69 63 6f 6e | 20 69 6e 74 6f 20 61 20 |his icon| into a |
|000015e0| 64 69 72 65 63 74 6f 72 | 79 20 77 69 6e 64 6f 77 |director|y window|
|000015f0| 20 74 6f 20 73 61 76 65 | 20 69 74 20 69 6e 20 74 | to save| it in t|
|00001600| 68 61 74 20 64 69 72 65 | 63 74 6f 72 79 22 20 8b |hat dire|ctory" .|
|00001610| 20 74 65 78 74 24 3d 22 | 46 69 6c 6c 20 69 6e 20 | text$="|Fill in |
|00001620| 74 68 65 20 66 69 6c 65 | 20 6e 61 6d 65 20 61 6e |the file| name an|
|00001630| 64 20 74 68 65 6e 20 64 | 72 61 67 20 74 68 65 20 |d then d|rag the |
|00001640| 69 63 6f 6e 20 69 6e 74 | 6f 20 61 20 66 69 6c 65 |icon int|o a file|
|00001650| 72 20 64 69 72 65 63 74 | 6f 72 79 20 77 69 6e 64 |r direct|ory wind|
|00001660| 6f 77 20 74 6f 20 73 61 | 76 65 20 69 74 22 0d 07 |ow to sa|ve it"..|
|00001670| 76 11 20 c9 20 54 69 6d | 65 53 69 67 5f 68 25 0d |v. . Tim|eSig_h%.|
|00001680| 07 80 49 20 20 74 65 78 | 74 24 3d 22 75 73 65 20 |..I tex|t$="use |
|00001690| 53 45 4c 45 43 54 20 61 | 6e 64 20 41 44 4a 55 53 |SELECT a|nd ADJUS|
|000016a0| 54 20 6f 6e 20 65 61 63 | 68 20 66 69 65 6c 64 20 |T on eac|h field |
|000016b0| 74 6f 20 73 65 74 20 61 | 20 74 69 6d 65 20 73 69 |to set a| time si|
|000016c0| 67 6e 61 74 75 72 65 22 | 0d 07 8a 14 20 c9 20 41 |gnature"|.... . A|
|000016d0| 62 6f 72 74 51 75 65 72 | 79 5f 68 25 0d 07 94 2c |bortQuer|y_h%...,|
|000016e0| 20 20 74 65 78 74 24 3d | 22 63 6c 69 63 6b 20 59 | text$=|"click Y|
|000016f0| 45 53 20 74 6f 20 74 65 | 72 6d 69 6e 61 74 65 20 |ES to te|rminate |
|00001700| 4d 61 65 73 74 72 6f 22 | 0d 07 9e 06 20 cb 0d 07 |Maestro"|.... ...|
|00001710| a8 16 24 28 62 6c 6f 63 | 6b 25 2b 32 30 29 3d 74 |..$(bloc|k%+20)=t|
|00001720| 65 78 74 24 0d 07 b2 28 | 62 6c 6f 63 6b 25 21 30 |ext$...(|block%!0|
|00001730| 20 3d 20 28 28 28 32 30 | 2b a9 28 74 65 78 74 24 | = (((20|+.(text$|
|00001740| 29 2b 31 29 81 34 29 2a | 34 29 2b 34 0d 07 bc 32 |)+1).4)*|4)+4...2|
|00001750| 24 28 62 6c 6f 63 6b 25 | 2b 32 31 2b a9 28 74 65 |$(block%|+21+.(te|
|00001760| 78 74 24 29 29 20 3d 20 | bd 28 30 29 20 3a f4 20 |xt$)) = |.(0) :. |
|00001770| 6e 75 6c 6c 2d 74 65 72 | 6d 69 6e 61 74 65 0d 07 |null-ter|minate..|
|00001780| c6 33 c8 99 20 53 65 6e | 64 4d 65 73 73 61 67 65 |.3.. Sen|dMessage|
|00001790| 2c 31 37 2c 62 6c 6f 63 | 6b 25 20 3a f4 20 61 63 |,17,bloc|k% :. ac|
|000017a0| 6b 6e 6f 77 6c 65 64 67 | 65 20 6d 65 73 73 61 67 |knowledg|e messag|
|000017b0| 65 0d 07 d0 05 e1 0d 07 | da 04 0d 07 e4 18 dd 20 |e.......|....... |
|000017c0| f2 44 61 74 61 4c 6f 61 | 64 41 63 6b 28 72 65 66 |.DataLoa|dAck(ref|
|000017d0| 25 29 0d 07 ee 0b ea 20 | 62 6c 6f 63 6b 0d 07 f8 |%)..... |block...|
|000017e0| 11 62 6c 6f 63 6b 3d 57 | 69 6e 64 6f 77 25 0d 08 |.block=W|indow%..|
|000017f0| 02 10 62 6c 6f 63 6b 21 | 30 20 3d 20 32 30 0d 08 |..block!|0 = 20..|
|00001800| 0c 13 62 6c 6f 63 6b 21 | 31 32 20 3d 20 72 65 66 |..block!|12 = ref|
|00001810| 25 0d 08 16 1f 62 6c 6f | 63 6b 21 31 36 20 3d 20 |%....blo|ck!16 = |
|00001820| 34 20 3a f4 20 44 61 74 | 61 4c 6f 61 64 41 63 6b |4 :. Dat|aLoadAck|
|00001830| 0d 08 20 32 c8 99 20 53 | 65 6e 64 4d 65 73 73 61 |.. 2.. S|endMessa|
|00001840| 67 65 2c 31 37 2c 62 6c | 6f 63 6b 20 3a f4 20 61 |ge,17,bl|ock :. a|
|00001850| 63 6b 6e 6f 77 6c 65 64 | 67 65 20 6d 65 73 73 61 |cknowled|ge messa|
|00001860| 67 65 0d 08 2a 05 e1 0d | 08 34 04 0d 08 3e 1c dd |ge..*...|.4...>..|
|00001870| 20 f2 72 65 64 72 61 77 | 5f 77 69 6e 64 6f 77 5f | .redraw|_window_|
|00001880| 72 65 71 75 65 73 74 0d | 08 48 08 ea 20 52 25 0d |request.|.H.. R%.|
|00001890| 08 52 2a c8 99 20 52 65 | 64 72 61 77 57 69 6e 64 |.R*.. Re|drawWind|
|000018a0| 6f 77 25 2c 2c 57 69 6e | 64 6f 77 25 2b 68 61 6e |ow%,,Win|dow%+han|
|000018b0| 64 6c 65 25 20 b8 20 52 | 25 0d 08 5c 09 c8 95 20 |dle% . R|%..\... |
|000018c0| 52 25 0d 08 66 46 20 20 | e7 20 57 69 6e 64 6f 77 |R%..fF |. Window|
|000018d0| 25 21 68 61 6e 64 6c 65 | 25 20 3d 20 53 63 6f 72 |%!handle|% = Scor|
|000018e0| 65 57 69 6e 64 5f 68 25 | 20 f2 64 72 61 77 5f 73 |eWind_h%| .draw_s|
|000018f0| 74 61 76 65 73 3a e7 20 | 50 4c 41 59 49 4e 47 25 |taves:. |PLAYING%|
|00001900| 20 f2 43 68 65 63 6b 51 | 0d 08 70 2d f4 20 74 72 | .CheckQ|..p-. tr|
|00001910| 79 20 74 6f 20 61 76 6f | 69 64 20 69 6e 74 65 72 |y to avo|id inter|
|00001920| 72 75 70 74 69 6f 6e 73 | 20 69 6e 20 74 68 65 20 |ruptions| in the |
|00001930| 6d 75 73 69 63 0d 08 7a | 2c 20 20 c8 99 20 47 65 |music..z|, .. Ge|
|00001940| 74 52 65 63 74 61 6e 67 | 6c 65 25 2c 2c 57 69 6e |tRectang|le%,,Win|
|00001950| 64 6f 77 25 2b 68 61 6e | 64 6c 65 25 20 b8 20 52 |dow%+han|dle% . R|
|00001960| 25 0d 08 84 07 20 20 ce | 0d 08 8e 05 e1 0d 08 98 |%.... .|........|
|00001970| 04 0d 08 a2 1e dd 20 f2 | 70 6c 61 63 65 5f 74 6f |...... .|place_to|
|00001980| 70 5f 70 61 6e 65 73 28 | 62 65 68 69 6e 64 29 0d |p_panes(|behind).|
|00001990| 08 ac 0c ea 20 78 73 69 | 7a 65 25 0d 08 b6 22 78 |.... xsi|ze%..."x|
|000019a0| 73 69 7a 65 25 3d 57 69 | 6e 64 6f 77 25 21 78 31 |size%=Wi|ndow%!x1|
|000019b0| 25 2d 57 69 6e 64 6f 77 | 25 21 78 30 25 0d 08 c0 |%-Window|%!x0%...|
|000019c0| 1d 52 65 73 74 50 42 6c | 6b 25 21 78 31 25 3d 57 |.RestPBl|k%!x1%=W|
|000019d0| 69 6e 64 6f 77 25 21 78 | 31 25 0d 08 ca 26 52 65 |indow%!x|1%...&Re|
|000019e0| 73 74 50 42 6c 6b 25 21 | 78 30 25 3d 57 69 6e 64 |stPBlk%!|x0%=Wind|
|000019f0| 6f 77 25 21 78 30 25 2b | 78 73 69 7a 65 25 2f 32 |ow%!x0%+|xsize%/2|
|00001a00| 0d 08 d4 1d 52 65 73 74 | 50 42 6c 6b 25 21 79 31 |....Rest|PBlk%!y1|
|00001a10| 25 3d 57 69 6e 64 6f 77 | 25 21 79 31 25 0d 08 de |%=Window|%!y1%...|
|00001a20| 2b 52 65 73 74 50 42 6c | 6b 25 21 79 30 25 3d 52 |+RestPBl|k%!y0%=R|
|00001a30| 65 73 74 50 42 6c 6b 25 | 21 79 31 25 2d 50 61 6e |estPBlk%|!y1%-Pan|
|00001a40| 65 48 65 69 67 68 74 25 | 0d 08 e8 1b 52 65 73 74 |eHeight%|....Rest|
|00001a50| 50 42 6c 6b 25 21 75 6e | 64 65 72 25 3d 62 65 68 |PBlk%!un|der%=beh|
|00001a60| 69 6e 64 0d 08 f2 33 c8 | 99 20 4f 70 65 6e 57 69 |ind...3.|. OpenWi|
|00001a70| 6e 64 6f 77 25 2c 20 52 | 65 73 74 73 50 61 6e 65 |ndow%, R|estsPane|
|00001a80| 5f 68 25 2c 20 52 65 73 | 74 50 42 6c 6b 25 2b 68 |_h%, Res|tPBlk%+h|
|00001a90| 61 6e 64 6c 65 25 0d 08 | fc 1d 4e 6f 74 65 50 42 |andle%..|..NotePB|
|00001aa0| 6c 6b 25 21 78 30 25 3d | 57 69 6e 64 6f 77 25 21 |lk%!x0%=|Window%!|
|00001ab0| 78 30 25 0d 09 06 1f 4e | 6f 74 65 50 42 6c 6b 25 |x0%....N|otePBlk%|
|00001ac0| 21 78 31 25 3d 52 65 73 | 74 50 42 6c 6b 25 21 78 |!x1%=Res|tPBlk%!x|
|00001ad0| 30 25 0d 09 10 1d 4e 6f | 74 65 50 42 6c 6b 25 21 |0%....No|tePBlk%!|
|00001ae0| 79 31 25 3d 57 69 6e 64 | 6f 77 25 21 79 31 25 0d |y1%=Wind|ow%!y1%.|
|00001af0| 09 1a 2b 4e 6f 74 65 50 | 42 6c 6b 25 21 79 30 25 |..+NoteP|Blk%!y0%|
|00001b00| 3d 4e 6f 74 65 50 42 6c | 6b 25 21 79 31 25 2d 50 |=NotePBl|k%!y1%-P|
|00001b10| 61 6e 65 48 65 69 67 68 | 74 25 0d 09 24 21 4e 6f |aneHeigh|t%..$!No|
|00001b20| 74 65 50 42 6c 6b 25 21 | 75 6e 64 65 72 25 3d 52 |tePBlk%!|under%=R|
|00001b30| 65 73 74 73 50 61 6e 65 | 5f 68 25 0d 09 2e 33 c8 |estsPane|_h%...3.|
|00001b40| 99 20 4f 70 65 6e 57 69 | 6e 64 6f 77 25 2c 20 4e |. OpenWi|ndow%, N|
|00001b50| 6f 74 65 73 50 61 6e 65 | 5f 68 25 2c 20 4e 6f 74 |otesPane|_h%, Not|
|00001b60| 65 50 42 6c 6b 25 2b 68 | 61 6e 64 6c 65 25 0d 09 |ePBlk%+h|andle%..|
|00001b70| 38 05 e1 0d 09 42 04 0d | 09 4c 21 dd 20 f2 70 6c |8....B..|.L!. .pl|
|00001b80| 61 63 65 5f 62 6f 74 74 | 6f 6d 5f 70 61 6e 65 73 |ace_bott|om_panes|
|00001b90| 28 62 65 68 69 6e 64 29 | 0d 09 56 0c ea 20 78 73 |(behind)|..V.. xs|
|00001ba0| 69 7a 65 25 0d 09 60 22 | 78 73 69 7a 65 25 3d 57 |ize%..`"|xsize%=W|
|00001bb0| 69 6e 64 6f 77 25 21 78 | 30 25 2b 57 69 6e 64 6f |indow%!x|0%+Windo|
|00001bc0| 77 25 21 78 31 25 0d 09 | 6a 1e 53 68 61 72 70 50 |w%!x1%..|j.SharpP|
|00001bd0| 42 6c 6b 25 21 78 30 25 | 3d 57 69 6e 64 6f 77 25 |Blk%!x0%|=Window%|
|00001be0| 21 78 30 25 0d 09 74 28 | 53 68 61 72 70 50 42 6c |!x0%..t(|SharpPBl|
|00001bf0| 6b 25 21 78 31 25 3d 53 | 68 61 72 70 50 42 6c 6b |k%!x1%=S|harpPBlk|
|00001c00| 25 21 78 30 25 2b 78 73 | 69 7a 65 25 0d 09 7e 1e |%!x0%+xs|ize%..~.|
|00001c10| 53 68 61 72 70 50 42 6c | 6b 25 21 78 31 25 3d 57 |SharpPBl|k%!x1%=W|
|00001c20| 69 6e 64 6f 77 25 21 78 | 31 25 0d 09 88 1e 53 68 |indow%!x|1%....Sh|
|00001c30| 61 72 70 50 42 6c 6b 25 | 21 79 30 25 3d 57 69 6e |arpPBlk%|!y0%=Win|
|00001c40| 64 6f 77 25 21 79 30 25 | 0d 09 92 2d 53 68 61 72 |dow%!y0%|...-Shar|
|00001c50| 70 50 42 6c 6b 25 21 79 | 31 25 3d 53 68 61 72 70 |pPBlk%!y|1%=Sharp|
|00001c60| 50 42 6c 6b 25 21 79 30 | 25 2b 50 61 6e 65 48 65 |PBlk%!y0|%+PaneHe|
|00001c70| 69 67 68 74 25 0d 09 9c | 1c 53 68 61 72 70 50 42 |ight%...|.SharpPB|
|00001c80| 6c 6b 25 21 75 6e 64 65 | 72 25 3d 62 65 68 69 6e |lk%!unde|r%=behin|
|00001c90| 64 0d 09 a6 35 c8 99 20 | 4f 70 65 6e 57 69 6e 64 |d...5.. |OpenWind|
|00001ca0| 6f 77 25 2c 20 53 68 61 | 72 70 73 50 61 6e 65 5f |ow%, Sha|rpsPane_|
|00001cb0| 68 25 2c 20 53 68 61 72 | 70 50 42 6c 6b 25 2b 68 |h%, Shar|pPBlk%+h|
|00001cc0| 61 6e 64 6c 65 25 0d 09 | b0 05 e1 0d 09 ba 04 0d |andle%..|........|
|00001cd0| 09 c4 13 dd 20 f2 72 65 | 6d 6f 76 65 5f 70 61 6e |.... .re|move_pan|
|00001ce0| 65 73 0d 09 ce 1e f2 43 | 6c 6f 73 65 57 69 6e 64 |es.....C|loseWind|
|00001cf0| 6f 77 28 4e 6f 74 65 73 | 50 61 6e 65 5f 68 25 29 |ow(Notes|Pane_h%)|
|00001d00| 0d 09 d8 1f f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 |.....Clo|seWindow|
|00001d10| 28 53 68 61 72 70 73 50 | 61 6e 65 5f 68 25 29 0d |(SharpsP|ane_h%).|
|00001d20| 09 e2 1e f2 43 6c 6f 73 | 65 57 69 6e 64 6f 77 28 |....Clos|eWindow(|
|00001d30| 52 65 73 74 73 50 61 6e | 65 5f 68 25 29 0d 09 ec |RestsPan|e_h%)...|
|00001d40| 05 e1 0d 09 f6 04 0d 0a | 00 1a dd 20 f2 6f 70 65 |........|... .ope|
|00001d50| 6e 5f 77 69 6e 64 6f 77 | 5f 72 65 71 75 65 73 74 |n_window|_request|
|00001d60| 0d 0a 0a 0e ea 20 62 68 | 61 6e 64 6c 65 25 0d 0a |..... bh|andle%..|
|00001d70| 14 1b 62 68 61 6e 64 6c | 65 25 3d 57 69 6e 64 6f |..bhandl|e%=Windo|
|00001d80| 77 25 21 75 6e 64 65 72 | 25 0d 0a 1e 0c f2 72 65 |w%!under|%.....re|
|00001d90| 6c 65 61 73 65 0d 0a 28 | 24 e7 20 57 69 6e 64 6f |lease..(|$. Windo|
|00001da0| 77 25 21 68 61 6e 64 6c | 65 25 3d 53 63 6f 72 65 |w%!handl|e%=Score|
|00001db0| 57 69 6e 64 5f 68 25 20 | 8c 0d 0a 32 14 20 e7 20 |Wind_h% |...2. . |
|00001dc0| 54 52 41 4e 53 43 52 49 | 42 45 25 20 8c 0d 0a 3c |TRANSCRI|BE% ...<|
|00001dd0| 50 f4 20 64 65 66 69 6e | 65 20 77 69 6e 64 6f 77 |P. defin|e window|
|00001de0| 20 73 74 61 63 6b 20 61 | 73 20 74 6f 70 2d 3e 62 | stack a|s top->b|
|00001df0| 6f 74 74 6f 6d 20 73 68 | 61 72 70 73 70 61 6e 65 |ottom sh|arpspane|
|00001e00| 2d 3e 72 65 73 74 73 70 | 61 6e 65 2d 3e 6e 6f 74 |->restsp|ane->not|
|00001e10| 65 73 70 61 6e 65 2d 3e | 73 63 6f 72 65 0d 0a 46 |espane->|score..F|
|00001e20| 4a f4 20 6f 70 65 6e 20 | 74 6f 70 20 6f 72 20 62 |J. open |top or b|
|00001e30| 6f 74 74 6f 6d 20 70 61 | 6e 65 73 20 62 65 66 6f |ottom pa|nes befo|
|00001e40| 72 65 20 73 63 6f 72 65 | 20 64 65 70 65 6e 64 69 |re score| dependi|
|00001e50| 6e 67 20 6f 6e 20 64 69 | 72 65 63 74 69 6f 6e 20 |ng on di|rection |
|00001e60| 6f 66 20 64 72 61 67 0d | 0a 50 2c 20 20 c8 99 20 |of drag.|.P, .. |
|00001e70| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 25 2c |GetWindo|wState%,|
|00001e80| 2c 53 68 61 72 70 50 42 | 6c 6b 25 2b 68 61 6e 64 |,SharpPB|lk%+hand|
|00001e90| 6c 65 25 0d 0a 5a 3e 20 | 20 e7 20 53 68 61 72 70 |le%..Z> | . Sharp|
|00001ea0| 50 42 6c 6b 25 21 75 6e | 64 65 72 25 3d 62 68 61 |PBlk%!un|der%=bha|
|00001eb0| 6e 64 6c 65 25 20 57 69 | 6e 64 6f 77 25 21 75 6e |ndle% Wi|ndow%!un|
|00001ec0| 64 65 72 25 3d 4e 6f 74 | 65 73 50 61 6e 65 5f 68 |der%=Not|esPane_h|
|00001ed0| 25 0d 0a 64 2c 20 20 c8 | 99 20 47 65 74 57 69 6e |%..d, .|. GetWin|
|00001ee0| 64 6f 77 53 74 61 74 65 | 25 2c 2c 53 63 6f 72 65 |dowState|%,,Score|
|00001ef0| 57 42 6c 6b 25 2b 68 61 | 6e 64 6c 65 25 0d 0a 6e |WBlk%+ha|ndle%..n|
|00001f00| 24 20 20 e7 20 57 69 6e | 64 6f 77 25 21 79 31 25 |$ . Win|dow%!y1%|
|00001f10| 3e 53 63 6f 72 65 57 42 | 6c 6b 25 21 79 31 25 20 |>ScoreWB|lk%!y1% |
|00001f20| 8c 0d 0a 78 21 20 20 20 | f2 70 6c 61 63 65 5f 74 |...x! |.place_t|
|00001f30| 6f 70 5f 70 61 6e 65 73 | 28 62 68 61 6e 64 6c 65 |op_panes|(bhandle|
|00001f40| 25 29 0d 0a 82 08 20 20 | 20 cc 0d 0a 8c 24 20 20 |%).... | ....$ |
|00001f50| 20 f2 70 6c 61 63 65 5f | 62 6f 74 74 6f 6d 5f 70 | .place_|bottom_p|
|00001f60| 61 6e 65 73 28 62 68 61 | 6e 64 6c 65 25 29 0d 0a |anes(bha|ndle%)..|
|00001f70| 96 08 20 20 20 cd 0d 0a | a0 07 20 20 cd 0d 0a aa |.. ...|.. ....|
|00001f80| 53 20 e7 20 50 4c 41 59 | 49 4e 47 25 20 80 20 57 |S . PLAY|ING% . W|
|00001f90| 69 6e 64 6f 77 25 21 73 | 63 78 25 3c 3e 53 63 6f |indow%!s|cx%<>Sco|
|00001fa0| 72 65 57 42 6c 6b 25 21 | 73 63 78 25 20 e1 3a f4 |reWBlk%!|scx% .:.|
|00001fb0| 20 6e 6f 20 75 73 65 72 | 2d 73 63 72 6f 6c 6c 69 | no user|-scrolli|
|00001fc0| 6e 67 20 77 68 69 6c 65 | 20 70 6c 61 79 69 6e 67 |ng while| playing|
|00001fd0| 0d 0a b4 24 20 c8 99 20 | 4f 70 65 6e 57 69 6e 64 |...$ .. |OpenWind|
|00001fe0| 6f 77 25 2c 2c 57 69 6e | 64 6f 77 25 2b 68 61 6e |ow%,,Win|dow%+han|
|00001ff0| 64 6c 65 25 0d 0a be 13 | 20 53 63 6f 72 65 43 6c |dle%....| ScoreCl|
|00002000| 6f 73 65 64 25 3d a3 0d | 0a c8 14 20 e7 20 54 52 |osed%=..|... . TR|
|00002010| 41 4e 53 43 52 49 42 45 | 25 20 8c 0d 0a d2 15 20 |ANSCRIBE|% ..... |
|00002020| 20 e7 20 62 68 61 6e 64 | 6c 65 25 3d 2d 32 20 8c | . bhand|le%=-2 .|
|00002030| 0d 0a dc 32 20 20 20 f4 | 20 66 69 6e 64 20 62 65 |...2 .| find be|
|00002040| 68 69 6e 64 20 68 61 6e | 64 6c 65 25 20 69 66 20 |hind han|dle% if |
|00002050| 70 75 73 68 65 64 20 74 | 6f 20 74 68 65 20 62 61 |pushed t|o the ba|
|00002060| 63 6b 0d 0a e6 2d 20 20 | 20 c8 99 20 47 65 74 57 |ck...- | .. GetW|
|00002070| 69 6e 64 6f 77 53 74 61 | 74 65 25 2c 2c 53 63 6f |indowSta|te%,,Sco|
|00002080| 72 65 57 42 6c 6b 25 2b | 68 61 6e 64 6c 65 25 0d |reWBlk%+|handle%.|
|00002090| 0a f0 23 20 20 20 62 68 | 61 6e 64 6c 65 25 20 3d |..# bh|andle% =|
|000020a0| 20 53 63 6f 72 65 57 42 | 6c 6b 25 21 75 6e 64 65 | ScoreWB|lk%!unde|
|000020b0| 72 25 0d 0a fa 08 20 20 | 20 cd 0d 0b 04 19 20 20 |r%.... | ..... |
|000020c0| f4 20 72 65 2d 6f 70 65 | 6e 20 61 6c 6c 20 70 61 |. re-ope|n all pa|
|000020d0| 6e 65 73 0d 0b 0e 23 20 | 20 f2 70 6c 61 63 65 5f |nes...# | .place_|
|000020e0| 62 6f 74 74 6f 6d 5f 70 | 61 6e 65 73 28 62 68 61 |bottom_p|anes(bha|
|000020f0| 6e 64 6c 65 25 29 0d 0b | 18 25 20 20 f2 70 6c 61 |ndle%)..|.% .pla|
|00002100| 63 65 5f 74 6f 70 5f 70 | 61 6e 65 73 28 53 68 61 |ce_top_p|anes(Sha|
|00002110| 72 70 73 50 61 6e 65 5f | 68 25 29 0d 0b 22 6f 20 |rpsPane_|h%).."o |
|00002120| 20 e7 20 62 68 61 6e 64 | 6c 65 25 3d 53 63 6f 72 | . bhand|le%=Scor|
|00002130| 65 57 69 6e 64 5f 68 25 | 20 20 c8 99 20 4f 70 65 |eWind_h%| .. Ope|
|00002140| 6e 57 69 6e 64 6f 77 25 | 2c 2c 57 69 6e 64 6f 77 |nWindow%|,,Window|
|00002150| 25 2b 68 61 6e 64 6c 65 | 25 20 3a f4 20 65 6e 73 |%+handle|% :. ens|
|00002160| 75 72 65 20 77 69 6e 64 | 6f 77 20 69 73 20 62 65 |ure wind|ow is be|
|00002170| 68 69 6e 64 20 70 61 6e | 65 73 20 69 6e 20 75 6e |hind pan|es in un|
|00002180| 75 73 75 61 6c 20 63 61 | 73 65 0d 0b 2c 07 20 20 |usual ca|se..,. |
|00002190| cd 0d 0b 36 51 20 4c 48 | 42 41 52 25 3d a4 46 69 |...6Q LH|BAR%=.Fi|
|000021a0| 6e 64 42 61 72 28 53 63 | 6f 72 65 57 42 6c 6b 25 |ndBar(Sc|oreWBlk%|
|000021b0| 21 73 63 78 25 29 20 3a | f4 20 74 68 65 20 62 61 |!scx%) :|. the ba|
|000021c0| 72 20 6e 75 6d 62 65 72 | 20 61 74 20 74 68 65 20 |r number| at the |
|000021d0| 6c 65 66 74 20 6f 66 20 | 74 68 65 20 77 69 6e 64 |left of |the wind|
|000021e0| 6f 77 0d 0b 40 06 20 cc | 0d 0b 4a 24 20 c8 99 20 |ow..@. .|..J$ .. |
|000021f0| 4f 70 65 6e 57 69 6e 64 | 6f 77 25 2c 2c 57 69 6e |OpenWind|ow%,,Win|
|00002200| 64 6f 77 25 2b 68 61 6e | 64 6c 65 25 0d 0b 54 06 |dow%+han|dle%..T.|
|00002210| 20 cd 0d 0b 5e 05 e1 0d | 0b 68 04 0d 0b 72 1b dd | ...^...|.h...r..|
|00002220| 20 f2 63 6c 6f 73 65 5f | 77 69 6e 64 6f 77 5f 72 | .close_|window_r|
|00002230| 65 71 75 65 73 74 0d 0b | 7c 24 c8 99 20 43 6c 6f |equest..||$.. Clo|
|00002240| 73 65 57 69 6e 64 6f 77 | 25 2c 2c 57 69 6e 64 6f |seWindow|%,,Windo|
|00002250| 77 25 2b 68 61 6e 64 6c | 65 25 0d 0b 86 41 e7 20 |w%+handl|e%...A. |
|00002260| 57 69 6e 64 6f 77 25 21 | 68 61 6e 64 6c 65 25 3d |Window%!|handle%=|
|00002270| 53 63 6f 72 65 57 69 6e | 64 5f 68 25 20 f2 72 65 |ScoreWin|d_h% .re|
|00002280| 6d 6f 76 65 5f 70 61 6e | 65 73 20 3a 20 53 63 6f |move_pan|es : Sco|
|00002290| 72 65 43 6c 6f 73 65 64 | 25 3d b9 0d 0b 90 05 e1 |reClosed|%=......|
|000022a0| 0d 0b 9a 04 0d 0b a4 19 | dd 20 f2 6d 6f 75 73 65 |........|. .mouse|
|000022b0| 5f 62 75 74 74 6f 6e 5f | 63 6c 69 63 6b 0d 0b ae |_button_|click...|
|000022c0| 15 ea 42 25 2c 43 25 2c | 57 25 2c 49 25 2c 69 6e |..B%,C%,|W%,I%,in|
|000022d0| 63 25 0d 0b b8 23 57 25 | 3d 4d 6f 75 73 65 25 21 |c%...#W%|=Mouse%!|
|000022e0| 77 69 6e 64 6f 77 3a 49 | 25 3d 4d 6f 75 73 65 25 |window:I|%=Mouse%|
|000022f0| 21 69 63 6f 6e 0d 0b c2 | 1a 42 25 3d 25 31 31 31 |!icon...|.B%=%111|
|00002300| 80 4d 6f 75 73 65 25 21 | 62 75 74 74 6f 6e 73 0d |.Mouse%!|buttons.|
|00002310| 0b cc 2b 4d 6f 75 73 65 | 5f 58 25 3d 4d 6f 75 73 |..+Mouse|_X%=Mous|
|00002320| 65 25 21 78 30 25 3a 4d | 6f 75 73 65 5f 59 25 3d |e%!x0%:M|ouse_Y%=|
|00002330| 4d 6f 75 73 65 25 21 79 | 30 25 0d 0b d6 0f e7 20 |Mouse%!y|0%..... |
|00002340| 42 25 3d 25 30 31 30 20 | 8c 0d 0b e0 1b 20 20 f2 |B%=%010 |..... .|
|00002350| 43 68 65 63 6b 49 6e 73 | 74 61 6c 6c 65 64 56 6f |CheckIns|talledVo|
|00002360| 69 63 65 73 0d 0b ea 12 | 20 20 f2 53 74 6f 70 53 |ices....| .StopS|
|00002370| 63 6f 72 69 6e 67 0d 0b | f4 32 20 20 e7 20 57 25 |coring..|.2 . W%|
|00002380| 3d 2d 32 20 f2 4f 70 65 | 6e 4d 65 6e 75 28 49 63 |=-2 .Ope|nMenu(Ic|
|00002390| 6f 6e 4d 65 6e 75 25 29 | 20 8b 20 f2 4f 70 65 6e |onMenu%)| . .Open|
|000023a0| 4d 61 69 6e 4d 65 6e 75 | 0d 0b fe 05 cc 0d 0c 08 |MainMenu|........|
|000023b0| 31 e7 20 42 25 3d 25 31 | 30 30 20 69 6e 63 25 3d |1. B%=%1|00 inc%=|
|000023c0| 2d 31 20 8b 20 e7 20 42 | 25 3d 25 30 30 31 20 69 |-1 . . B|%=%001 i|
|000023d0| 6e 63 25 3d 31 20 8b 20 | 69 6e 63 25 3d 30 0d 0c |nc%=1 . |inc%=0..|
|000023e0| 12 0b c8 8e 20 57 25 20 | ca 0d 0c 1c 41 c9 20 2d |.... W% |....A. -|
|000023f0| 32 20 3a 20 e7 20 53 63 | 6f 72 65 43 6c 6f 73 65 |2 : . Sc|oreClose|
|00002400| 64 25 20 84 20 ac 20 50 | 4c 41 59 49 4e 47 25 20 |d% . . P|LAYING% |
|00002410| f2 73 65 74 75 70 5f 73 | 74 61 76 65 73 3a e1 20 |.setup_s|taves:. |
|00002420| 3a f4 20 69 63 6f 6e 62 | 61 72 0d 0c 26 13 c9 20 |:. iconb|ar..&.. |
|00002430| 41 62 6f 72 74 51 75 65 | 72 79 5f 68 25 0d 0c 30 |AbortQue|ry_h%..0|
|00002440| 0e 20 20 e7 20 49 25 3d | 32 20 8c 0d 0c 3a 12 20 |. . I%=|2 ...:. |
|00002450| 20 20 20 f2 74 65 72 6d | 69 6e 61 74 65 0d 0c 44 | .term|inate..D|
|00002460| 09 20 20 20 20 cc 0d 0c | 4e 14 20 20 20 20 20 20 |. ...|N. |
|00002470| f2 43 6c 6f 73 65 4d 65 | 6e 75 0d 0c 58 25 20 20 |.CloseMe|nu..X% |
|00002480| 20 20 20 20 f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 | .Clo|seWindow|
|00002490| 28 41 62 6f 72 74 51 75 | 65 72 79 5f 68 25 29 0d |(AbortQu|ery_h%).|
|000024a0| 0c 62 09 20 20 20 20 cd | 0d 0c 6c 12 c9 20 4e 6f |.b. .|..l.. No|
|000024b0| 74 65 73 50 61 6e 65 5f | 68 25 0d 0c 76 0f 20 20 |tesPane_|h%..v. |
|000024c0| e7 20 49 25 3e 3d 30 20 | 8c 0d 0c 80 0e 20 20 f2 |. I%>=0 |..... .|
|000024d0| 72 65 6c 65 61 73 65 0d | 0c 8a 13 20 20 77 61 73 |release.|... was|
|000024e0| 53 43 4f 52 49 4e 47 25 | 3d b9 0d 0c 94 14 20 20 |SCORING%|=..... |
|000024f0| 73 74 6f 70 53 43 4f 52 | 49 4e 47 25 3d a3 0d 0c |stopSCOR|ING%=...|
|00002500| 9e 28 20 20 f2 55 70 64 | 61 74 65 49 63 6f 6e 28 |.( .Upd|ateIcon(|
|00002510| 53 65 6c 57 25 2c 20 53 | 65 6c 49 25 2c 20 30 2c |SelW%, S|elI%, 0,|
|00002520| 20 31 3c 3c 32 29 0d 0c | a8 22 20 20 f2 55 70 64 | 1<<2)..|." .Upd|
|00002530| 61 74 65 49 63 6f 6e 28 | 57 25 2c 20 49 25 2c 20 |ateIcon(|W%, I%, |
|00002540| 31 3c 3c 32 2c 20 30 29 | 0d 0c b2 0e 20 20 53 65 |1<<2, 0)|.... Se|
|00002550| 6c 57 25 3d 57 25 0d 0c | bc 0e 20 20 53 65 6c 49 |lW%=W%..|.. SelI|
|00002560| 25 3d 49 25 0d 0c c6 1f | 20 20 f2 61 74 74 61 63 |%=I%....| .attac|
|00002570| 68 28 6e 6f 74 65 25 2b | 49 25 2c 25 31 31 31 30 |h(note%+|I%,%1110|
|00002580| 30 30 29 0d 0c d0 07 20 | 20 cd 0d 0c da 12 c9 20 |00).... | ...... |
|00002590| 52 65 73 74 73 50 61 6e | 65 5f 68 25 0d 0c e4 0f |RestsPan|e_h%....|
|000025a0| 20 20 e7 20 49 25 3e 3d | 30 20 8c 0d 0c ee 0e 20 | . I%>=|0 ..... |
|000025b0| 20 f2 72 65 6c 65 61 73 | 65 0d 0c f8 13 20 20 77 | .releas|e.... w|
|000025c0| 61 73 53 43 4f 52 49 4e | 47 25 3d b9 0d 0d 02 14 |asSCORIN|G%=.....|
|000025d0| 20 20 73 74 6f 70 53 43 | 4f 52 49 4e 47 25 3d a3 | stopSC|ORING%=.|
|000025e0| 0d 0d 0c 28 20 20 f2 55 | 70 64 61 74 65 49 63 6f |...( .U|pdateIco|
|000025f0| 6e 28 53 65 6c 57 25 2c | 20 53 65 6c 49 25 2c 20 |n(SelW%,| SelI%, |
|00002600| 30 2c 20 31 3c 3c 32 29 | 0d 0d 16 22 20 20 f2 55 |0, 1<<2)|..." .U|
|00002610| 70 64 61 74 65 49 63 6f | 6e 28 57 25 2c 20 49 25 |pdateIco|n(W%, I%|
|00002620| 2c 20 31 3c 3c 32 2c 20 | 30 29 0d 0d 20 0e 20 20 |, 1<<2, |0).. . |
|00002630| 53 65 6c 57 25 3d 57 25 | 0d 0d 2a 0e 20 20 53 65 |SelW%=W%|..*. Se|
|00002640| 6c 49 25 3d 49 25 0d 0d | 34 1e 20 20 f2 61 74 74 |lI%=I%..|4. .att|
|00002650| 61 63 68 28 72 65 73 74 | 25 2b 49 25 2c 25 31 31 |ach(rest|%+I%,%11|
|00002660| 30 30 30 29 0d 0d 3e 07 | 20 20 cd 0d 0d 48 13 c9 |000)..>.| ...H..|
|00002670| 20 53 68 61 72 70 73 50 | 61 6e 65 5f 68 25 0d 0d | SharpsP|ane_h%..|
|00002680| 52 0f 20 20 e7 20 49 25 | 3e 3d 30 20 8c 0d 0d 5c |R. . I%|>=0 ...\|
|00002690| 0e 20 20 f2 72 65 6c 65 | 61 73 65 0d 0d 66 13 20 |. .rele|ase..f. |
|000026a0| 20 77 61 73 53 43 4f 52 | 49 4e 47 25 3d b9 0d 0d | wasSCOR|ING%=...|
|000026b0| 70 14 20 20 73 74 6f 70 | 53 43 4f 52 49 4e 47 25 |p. stop|SCORING%|
|000026c0| 3d a3 0d 0d 7a 28 20 20 | f2 55 70 64 61 74 65 49 |=...z( |.UpdateI|
|000026d0| 63 6f 6e 28 53 65 6c 57 | 25 2c 20 53 65 6c 49 25 |con(SelW|%, SelI%|
|000026e0| 2c 20 30 2c 20 31 3c 3c | 32 29 0d 0d 84 22 20 20 |, 0, 1<<|2)..." |
|000026f0| f2 55 70 64 61 74 65 49 | 63 6f 6e 28 57 25 2c 20 |.UpdateI|con(W%, |
|00002700| 49 25 2c 20 31 3c 3c 32 | 2c 20 30 29 0d 0d 8e 0e |I%, 1<<2|, 0)....|
|00002710| 20 20 53 65 6c 57 25 3d | 57 25 0d 0d 98 0e 20 20 | SelW%=|W%.... |
|00002720| 53 65 6c 49 25 3d 49 25 | 0d 0d a2 55 20 20 e7 20 |SelI%=I%|...U . |
|00002730| 49 25 3c 37 20 20 f2 61 | 74 74 61 63 68 28 61 63 |I%<7 .a|ttach(ac|
|00002740| 63 69 64 65 6e 74 61 6c | 25 2b 49 25 2b 31 2c 25 |cidental|%+I%+1,%|
|00002750| 31 31 30 30 30 30 30 29 | 20 8b e7 20 49 25 3c 31 |1100000)| .. I%<1|
|00002760| 31 20 f2 61 74 74 61 63 | 68 28 64 6f 74 25 2b 49 |1 .attac|h(dot%+I|
|00002770| 25 2d 36 2c 25 31 31 30 | 31 30 30 30 29 0d 0d ac |%-6,%110|1000)...|
|00002780| 24 20 20 e7 20 49 25 3d | 31 30 20 f2 61 74 74 61 |$ . I%=|10 .atta|
|00002790| 63 68 28 74 69 65 25 2c | 25 31 31 30 31 30 30 30 |ch(tie%,|%1101000|
|000027a0| 29 0d 0d b6 25 20 20 e7 | 20 49 25 3d 31 31 20 f2 |)...% .| I%=11 .|
|000027b0| 61 74 74 61 63 68 28 62 | 61 72 25 2c 25 31 30 30 |attach(b|ar%,%100|
|000027c0| 31 30 30 30 30 29 0d 0d | c0 31 20 20 e7 20 49 25 |10000)..|.1 . I%|
|000027d0| 3d 31 32 20 f2 61 74 74 | 61 63 68 28 63 6c 65 66 |=12 .att|ach(clef|
|000027e0| 25 2c 25 31 30 30 29 20 | 20 3a f4 20 54 72 65 62 |%,%100) | :. Treb|
|000027f0| 6c 65 20 63 6c 65 66 0d | 0d ca 2f 20 20 e7 20 49 |le clef.|../ . I|
|00002800| 25 3d 31 33 20 f2 61 74 | 74 61 63 68 28 63 6c 65 |%=13 .at|tach(cle|
|00002810| 66 25 2b 33 2c 25 31 30 | 30 29 3a f4 20 42 61 73 |f%+3,%10|0):. Bas|
|00002820| 73 20 63 6c 65 66 0d 0d | d4 33 20 20 e7 20 49 25 |s clef..|.3 . I%|
|00002830| 3d 31 34 20 f2 61 74 74 | 61 63 68 28 6b 65 79 25 |=14 .att|ach(key%|
|00002840| 2c 25 31 30 29 20 20 20 | 20 3a f4 20 6b 65 79 20 |,%10) | :. key |
|00002850| 73 69 67 6e 61 74 75 72 | 65 0d 0d de 34 20 20 e7 |signatur|e...4 .|
|00002860| 20 49 25 3d 31 35 20 f2 | 61 74 74 61 63 68 28 74 | I%=15 .|attach(t|
|00002870| 69 6d 65 25 2c 25 31 29 | 20 20 20 20 3a f4 20 74 |ime%,%1)| :. t|
|00002880| 69 6d 65 20 73 69 67 6e | 61 74 75 72 65 0d 0d e8 |ime sign|ature...|
|00002890| 07 20 20 cd 0d 0d f2 12 | c9 20 53 63 6f 72 65 57 |. .....|. ScoreW|
|000028a0| 69 6e 64 5f 68 25 0d 0d | fc 33 20 20 e7 20 42 25 |ind_h%..|.3 . B%|
|000028b0| 3d 25 31 30 30 20 e7 53 | 43 4f 52 49 4e 47 25 80 |=%100 .S|CORING%.|
|000028c0| 53 43 52 49 42 45 25 28 | 64 72 61 77 6e 25 29 20 |SCRIBE%(|drawn%) |
|000028d0| f2 70 75 74 5f 64 6f 77 | 6e 0d 0e 06 12 c9 20 49 |.put_dow|n..... I|
|000028e0| 6e 73 74 72 57 69 6e 64 | 5f 68 25 0d 0e 10 11 20 |nstrWind|_h%.... |
|000028f0| 20 ea 20 63 68 61 6e 25 | 2c 20 76 25 0d 0e 1a 1b | . chan%|, v%....|
|00002900| 20 20 f2 43 68 65 63 6b | 49 6e 73 74 61 6c 6c 65 | .Check|Installe|
|00002910| 64 56 6f 69 63 65 73 0d | 0e 24 12 20 20 f2 53 74 |dVoices.|.$. .St|
|00002920| 6f 70 53 63 6f 72 69 6e | 67 0d 0e 2e 0f 20 20 e7 |opScorin|g.... .|
|00002930| 20 49 25 3e 3d 38 20 8c | 0d 0e 38 12 20 20 20 20 | I%>=8 .|..8. |
|00002940| 63 68 61 6e 25 3d 49 25 | 2d 38 0d 0e 42 13 20 20 |chan%=I%|-8..B. |
|00002950| 20 20 e7 20 63 68 61 6e | 25 3c 38 20 8c 0d 0e 4c | . chan|%<8 ...L|
|00002960| 26 20 20 20 20 20 20 76 | 25 3d a4 41 74 74 61 63 |& v|%=.Attac|
|00002970| 68 56 6f 69 63 65 28 63 | 68 61 6e 25 2c 20 69 6e |hVoice(c|han%, in|
|00002980| 63 25 29 0d 0e 56 2b 20 | 20 20 20 20 20 c8 99 20 |c%)..V+ | .. |
|00002990| 53 6f 75 6e 64 5f 41 74 | 74 61 63 68 56 6f 69 63 |Sound_At|tachVoic|
|000029a0| 65 2c 20 63 68 61 6e 25 | 2b 31 2c 20 76 25 0d 0e |e, chan%|+1, v%..|
|000029b0| 60 36 20 20 20 20 20 20 | 24 28 56 6f 69 63 65 53 |`6 |$(VoiceS|
|000029c0| 74 72 25 28 63 68 61 6e | 25 29 29 3d c0 56 6f 69 |tr%(chan|%))=.Voi|
|000029d0| 63 65 24 28 76 25 29 2c | 20 56 6f 69 63 65 53 69 |ce$(v%),| VoiceSi|
|000029e0| 7a 65 25 29 0d 0e 6a 23 | 20 20 20 20 20 20 49 6e |ze%)..j#| In|
|000029f0| 73 74 72 75 6d 65 6e 74 | 25 28 63 68 61 6e 25 2c |strument|%(chan%,|
|00002a00| 31 29 20 3d 20 76 25 0d | 0e 74 22 20 20 20 20 20 |1) = v%.|.t" |
|00002a10| 20 f2 55 70 64 61 74 65 | 49 63 6f 6e 28 57 25 2c | .Update|Icon(W%,|
|00002a20| 20 49 25 2c 20 30 2c 30 | 29 0d 0e 7e 09 20 20 20 | I%, 0,0|)..~. |
|00002a30| 20 cc 0d 0e 88 10 20 20 | 20 20 63 68 61 6e 25 2d | ..... | chan%-|
|00002a40| 3d 38 0d 0e 92 13 20 20 | 20 20 e7 20 63 68 61 6e |=8.... | . chan|
|00002a50| 25 3c 38 20 8c 0d 0e 9c | 1c 20 20 20 20 20 20 76 |%<8 ....|. v|
|00002a60| 25 3d 56 6f 6c 75 6d 65 | 73 25 28 63 68 61 6e 25 |%=Volume|s%(chan%|
|00002a70| 29 0d 0e a6 3d 20 20 20 | 20 20 20 76 25 2b 3d 69 |)...= | v%+=i|
|00002a80| 6e 63 25 20 3a 20 e7 20 | 76 25 3e 4e 56 6f 6c 75 |nc% : . |v%>NVolu|
|00002a90| 6d 65 73 25 20 76 25 3d | 4e 56 6f 6c 75 6d 65 73 |mes% v%=|NVolumes|
|00002aa0| 25 20 8b e7 20 76 25 3c | 30 20 76 25 3d 30 0d 0e |% .. v%<|0 v%=0..|
|00002ab0| b0 1c 20 20 20 20 20 20 | 56 6f 6c 75 6d 65 73 25 |.. |Volumes%|
|00002ac0| 28 63 68 61 6e 25 29 3d | 76 25 0d 0e ba 43 20 20 |(chan%)=|v%...C |
|00002ad0| 20 20 20 20 24 28 56 6f | 6c 75 6d 65 53 74 72 25 | $(Vo|lumeStr%|
|00002ae0| 28 63 68 61 6e 25 29 29 | 3d c0 56 6f 6c 75 6d 65 |(chan%))|=.Volume|
|00002af0| 24 28 56 6f 6c 75 6d 65 | 73 25 28 63 68 61 6e 25 |$(Volume|s%(chan%|
|00002b00| 29 29 2c 20 56 6f 6c 53 | 69 7a 65 25 29 0d 0e c4 |)), VolS|ize%)...|
|00002b10| 22 20 20 20 20 20 20 f2 | 55 70 64 61 74 65 49 63 |" .|UpdateIc|
|00002b20| 6f 6e 28 57 25 2c 20 49 | 25 2c 20 30 2c 30 29 0d |on(W%, I|%, 0,0).|
|00002b30| 0e ce 09 20 20 20 20 cc | 0d 0e d8 10 20 20 20 20 |... .|.... |
|00002b40| 63 68 61 6e 25 2d 3d 38 | 0d 0e e2 13 20 20 20 20 |chan%-=8|.... |
|00002b50| e7 20 63 68 61 6e 25 3c | 38 20 8c 0d 0e ec 24 20 |. chan%<|8 ....$ |
|00002b60| 20 20 20 20 20 76 25 3d | 53 74 65 72 65 6f 5f 50 | v%=|Stereo_P|
|00002b70| 6f 73 69 74 69 6f 6e 25 | 28 63 68 61 6e 25 29 0d |osition%|(chan%).|
|00002b80| 0e f6 48 20 20 20 20 20 | 20 76 25 2b 3d 69 6e 63 |..H | v%+=inc|
|00002b90| 25 20 3a 20 e7 20 76 25 | 3e 4e 53 74 65 72 65 6f |% : . v%|>NStereo|
|00002ba0| 73 25 20 76 25 3d 4e 53 | 74 65 72 65 6f 73 25 20 |s% v%=NS|tereos% |
|00002bb0| 8b e7 20 76 25 3c 30 20 | 76 25 3d 30 3a 20 f4 20 |.. v%<0 |v%=0: . |
|00002bc0| 6e 6f 20 77 72 61 70 0d | 0f 00 24 20 20 20 20 20 |no wrap.|..$ |
|00002bd0| 20 53 74 65 72 65 6f 5f | 50 6f 73 69 74 69 6f 6e | Stereo_|Position|
|00002be0| 25 28 63 68 61 6e 25 29 | 3d 76 25 0d 0f 0a 42 20 |%(chan%)|=v%...B |
|00002bf0| 20 20 20 20 20 c8 99 20 | 53 6f 75 6e 64 5f 53 74 | .. |Sound_St|
|00002c00| 65 72 65 6f 2c 63 68 61 | 6e 25 2b 31 2c 53 74 65 |ereo,cha|n%+1,Ste|
|00002c10| 72 65 6f 25 28 53 74 65 | 72 65 6f 5f 50 6f 73 69 |reo%(Ste|reo_Posi|
|00002c20| 74 69 6f 6e 25 28 63 68 | 61 6e 25 29 29 0d 0f 14 |tion%(ch|an%))...|
|00002c30| 51 20 20 20 20 20 20 24 | 28 53 74 65 72 65 6f 53 |Q $|(StereoS|
|00002c40| 74 72 25 28 63 68 61 6e | 25 29 29 20 3d 20 c0 53 |tr%(chan|%)) = .S|
|00002c50| 74 65 72 65 6f 24 28 53 | 74 65 72 65 6f 5f 50 6f |tereo$(S|tereo_Po|
|00002c60| 73 69 74 69 6f 6e 25 28 | 63 68 61 6e 25 29 2c 20 |sition%(|chan%), |
|00002c70| 30 29 2c 20 53 74 65 72 | 53 69 7a 65 25 29 0d 0f |0), Ster|Size%)..|
|00002c80| 1e 22 20 20 20 20 20 20 | f2 55 70 64 61 74 65 49 |." |.UpdateI|
|00002c90| 63 6f 6e 28 57 25 2c 20 | 49 25 2c 20 30 2c 30 29 |con(W%, |I%, 0,0)|
|00002ca0| 0d 0f 28 09 20 20 20 20 | cc 0d 0f 32 18 20 20 20 |..(. |...2. |
|00002cb0| 20 e7 20 4d 49 44 49 70 | 72 65 73 65 6e 74 25 20 | . MIDIp|resent% |
|00002cc0| 8c 0d 0f 3c 12 20 20 20 | 20 20 20 63 68 61 6e 25 |...<. | chan%|
|00002cd0| 2d 3d 38 0d 0f 46 15 20 | 20 20 20 20 20 e7 20 63 |-=8..F. | . c|
|00002ce0| 68 61 6e 25 3c 38 20 8c | 0d 0f 50 22 20 20 20 20 |han%<8 .|..P" |
|00002cf0| 20 20 20 20 76 25 3d 4d | 49 44 49 43 68 61 6e 6e | v%=M|IDIChann|
|00002d00| 65 6c 25 28 63 68 61 6e | 25 29 0d 0f 5a 49 20 20 |el%(chan|%)..ZI |
|00002d10| 20 20 20 20 20 20 76 25 | 2b 3d 69 6e 63 25 20 3a | v%|+=inc% :|
|00002d20| 20 e7 20 76 25 3e 4e 4d | 49 44 49 43 68 61 6e 6e | . v%>NM|IDIChann|
|00002d30| 65 6c 73 25 20 76 25 3d | 31 20 8b e7 20 76 25 3c |els% v%=|1 .. v%<|
|00002d40| 31 20 76 25 3d 4e 4d 49 | 44 49 43 68 61 6e 6e 65 |1 v%=NMI|DIChanne|
|00002d50| 6c 73 25 0d 0f 64 22 20 | 20 20 20 20 20 20 20 4d |ls%..d" | M|
|00002d60| 49 44 49 43 68 61 6e 6e | 65 6c 25 28 63 68 61 6e |IDIChann|el%(chan|
|00002d70| 25 29 3d 76 25 0d 0f 6e | 39 20 20 20 20 20 20 20 |%)=v%..n|9 |
|00002d80| 20 24 28 4d 49 44 49 43 | 68 53 74 72 25 28 63 68 | $(MIDIC|hStr%(ch|
|00002d90| 61 6e 25 29 29 20 3d 20 | c3 28 4d 49 44 49 43 68 |an%)) = |.(MIDICh|
|00002da0| 61 6e 6e 65 6c 25 28 63 | 68 61 6e 25 29 29 0d 0f |annel%(c|han%))..|
|00002db0| 78 24 20 20 20 20 20 20 | 20 20 f2 55 70 64 61 74 |x$ | .Updat|
|00002dc0| 65 49 63 6f 6e 28 57 25 | 2c 20 49 25 2c 20 30 2c |eIcon(W%|, I%, 0,|
|00002dd0| 30 29 0d 0f 82 0d 20 20 | 20 20 20 20 20 20 cd 0d |0).... | ..|
|00002de0| 0f 8c 0b 20 20 20 20 20 | 20 cd 0d 0f 96 09 20 20 |... | ..... |
|00002df0| 20 20 cd 0d 0f a0 09 20 | 20 20 20 cd 0d 0f aa 09 | ..... | .....|
|00002e00| 20 20 20 20 cd 0d 0f b4 | 09 20 20 20 20 cd 0d 0f | ....|. ...|
|00002e10| be 0d c9 20 53 61 76 65 | 5f 68 25 0d 0f c8 12 20 |... Save|_h%.... |
|00002e20| 20 f2 53 74 6f 70 53 63 | 6f 72 69 6e 67 0d 0f d2 | .StopSc|oring...|
|00002e30| 40 20 20 e7 20 49 25 3d | 30 20 f2 73 61 76 65 5f |@ . I%=|0 .save_|
|00002e40| 6d 75 73 69 63 28 a4 47 | 65 74 53 74 72 28 53 61 |music(.G|etStr(Sa|
|00002e50| 76 65 54 65 78 74 29 29 | 20 20 20 20 20 20 20 3a |veText))| :|
|00002e60| 20 20 20 f4 20 30 20 69 | 73 20 4f 4b 2e 0d 0f dc | . 0 i|s OK....|
|00002e70| 0e 20 20 e7 20 49 25 3d | 32 20 8c 0d 0f e6 3b 20 |. . I%=|2 ....; |
|00002e80| 20 20 20 ea 20 78 25 2c | 20 79 25 20 20 20 20 20 | . x%,| y% |
|00002e90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002ea0| 20 20 20 20 20 3a 20 f4 | 20 64 72 61 67 67 69 6e | : .| draggin|
|00002eb0| 67 20 69 63 6f 6e 0d 0f | f0 1a 20 20 20 20 57 69 |g icon..|.. Wi|
|00002ec0| 6e 64 6f 77 25 21 68 61 | 6e 64 6c 65 25 3d 57 25 |ndow%!ha|ndle%=W%|
|00002ed0| 0d 0f fa 2b 20 20 20 20 | c8 99 20 47 65 74 57 69 |...+ |.. GetWi|
|00002ee0| 6e 64 6f 77 53 74 61 74 | 65 25 2c 2c 57 69 6e 64 |ndowStat|e%,,Wind|
|00002ef0| 6f 77 25 2b 68 61 6e 64 | 6c 65 25 0d 10 04 26 20 |ow%+hand|le%...& |
|00002f00| 20 20 20 79 73 69 7a 65 | 25 3d 57 69 6e 64 6f 77 | ysize|%=Window|
|00002f10| 25 21 79 31 25 2d 57 69 | 6e 64 6f 77 25 21 79 30 |%!y1%-Wi|ndow%!y0|
|00002f20| 25 0d 10 0e 16 20 20 20 | 20 78 25 3d 57 69 6e 64 |%.... | x%=Wind|
|00002f30| 6f 77 25 21 78 30 25 0d | 10 18 16 20 20 20 20 79 |ow%!x0%.|... y|
|00002f40| 25 3d 57 69 6e 64 6f 77 | 25 21 79 30 25 0d 10 22 |%=Window|%!y0%.."|
|00002f50| 15 20 20 20 20 21 57 69 | 6e 64 6f 77 25 20 3d 20 |. !Wi|ndow% = |
|00002f60| 57 25 0d 10 2c 16 20 20 | 20 20 57 69 6e 64 6f 77 |W%..,. | Window|
|00002f70| 25 21 34 20 3d 20 49 25 | 0d 10 36 52 20 20 20 20 |%!4 = I%|..6R |
|00002f80| c8 99 20 47 65 74 49 63 | 6f 6e 49 6e 66 6f 25 2c |.. GetIc|onInfo%,|
|00002f90| 20 2c 57 69 6e 64 6f 77 | 25 20 3a 20 f4 20 72 65 | ,Window|% : . re|
|00002fa0| 74 75 72 6e 73 20 69 63 | 6f 6e 20 62 6f 78 20 69 |turns ic|on box i|
|00002fb0| 6e 20 72 69 67 68 74 20 | 70 6c 61 63 65 20 66 6f |n right |place fo|
|00002fc0| 72 20 64 72 61 67 20 62 | 6f 78 0d 10 40 18 20 20 |r drag b|ox..@. |
|00002fd0| 20 20 57 69 6e 64 6f 77 | 25 21 38 20 20 2b 3d 20 | Window|%!8 += |
|00002fe0| 78 25 0d 10 4a 21 20 20 | 20 20 57 69 6e 64 6f 77 |x%..J! | Window|
|00002ff0| 25 21 31 32 20 2b 3d 20 | 79 25 20 2b 20 79 73 69 |%!12 += |y% + ysi|
|00003000| 7a 65 25 0d 10 54 18 20 | 20 20 20 57 69 6e 64 6f |ze%..T. | Windo|
|00003010| 77 25 21 31 36 20 2b 3d | 20 78 25 0d 10 5e 21 20 |w%!16 +=| x%..^! |
|00003020| 20 20 20 57 69 6e 64 6f | 77 25 21 32 30 20 2b 3d | Windo|w%!20 +=|
|00003030| 20 79 25 20 2b 20 79 73 | 69 7a 65 25 0d 10 68 47 | y% + ys|ize%..hG|
|00003040| f4 20 67 65 74 20 73 69 | 7a 65 20 69 6e 20 61 70 |. get si|ze in ap|
|00003050| 70 72 6f 70 72 69 61 74 | 65 20 70 61 72 74 20 6f |propriat|e part o|
|00003060| 66 20 62 6c 6f 63 6b 3a | 20 70 61 72 65 6e 74 20 |f block:| parent |
|00003070| 62 6f 78 3d 73 63 72 65 | 65 6e 20 62 6f 75 6e 64 |box=scre|en bound|
|00003080| 61 72 79 0d 10 72 16 20 | 20 20 20 57 69 6e 64 6f |ary..r. | Windo|
|00003090| 77 25 21 32 34 20 3d 20 | 30 0d 10 7c 16 20 20 20 |w%!24 = |0..|. |
|000030a0| 20 57 69 6e 64 6f 77 25 | 21 32 38 20 3d 20 30 0d | Window%|!28 = 0.|
|000030b0| 10 86 1d 20 20 20 20 57 | 69 6e 64 6f 77 25 21 33 |... W|indow%!3|
|000030c0| 32 20 3d 20 53 5f 57 69 | 64 74 68 25 0d 10 90 1e |2 = S_Wi|dth%....|
|000030d0| 20 20 20 20 57 69 6e 64 | 6f 77 25 21 33 36 20 3d | Wind|ow%!36 =|
|000030e0| 20 53 5f 48 65 69 67 68 | 74 25 0d 10 9a 12 20 20 | S_Heigh|t%.... |
|000030f0| 20 20 21 57 69 6e 64 6f | 77 25 3d 30 0d 10 a4 2a | !Windo|w%=0...*|
|00003100| 20 20 20 20 57 69 6e 64 | 6f 77 25 21 34 3d 35 3a | Wind|ow%!4=5:|
|00003110| 20 f4 20 66 69 78 65 64 | 20 73 69 7a 65 20 64 72 | . fixed| size dr|
|00003120| 61 67 20 62 6f 78 0d 10 | ae 11 20 20 20 20 53 41 |ag box..|.. SA|
|00003130| 56 49 4e 47 25 3d b9 0d | 10 b8 13 20 20 20 20 44 |VING%=..|... D|
|00003140| 52 41 47 47 49 4e 47 25 | 3d b9 0d 10 c2 1c 20 20 |RAGGING%|=..... |
|00003150| 20 20 c8 99 20 44 72 61 | 67 42 6f 78 2c 20 2c 57 | .. Dra|gBox, ,W|
|00003160| 69 6e 64 6f 77 25 0d 10 | cc 07 20 20 cc 0d 10 d6 |indow%..|.. ....|
|00003170| 1d 20 20 20 20 f2 43 6c | 6f 73 65 57 69 6e 64 6f |. .Cl|oseWindo|
|00003180| 77 28 53 61 76 65 5f 68 | 25 29 0d 10 e0 12 20 20 |w(Save_h|%).... |
|00003190| 20 20 f2 43 6c 6f 73 65 | 4d 65 6e 75 0d 10 ea 09 | .Close|Menu....|
|000031a0| 20 20 20 20 cd 0d 10 f4 | 0d c9 20 4c 6f 61 64 5f | ....|.. Load_|
|000031b0| 68 25 0d 10 fe 12 20 20 | f2 53 74 6f 70 53 63 6f |h%.... |.StopSco|
|000031c0| 72 69 6e 67 0d 11 08 40 | 20 20 e7 20 49 25 3d 30 |ring...@| . I%=0|
|000031d0| 20 f2 6c 6f 61 64 5f 6d | 75 73 69 63 28 a4 47 65 | .load_m|usic(.Ge|
|000031e0| 74 53 74 72 28 4c 6f 61 | 64 54 65 78 74 29 29 20 |tStr(Loa|dText)) |
|000031f0| 20 20 20 20 20 20 3a 20 | 20 20 f4 20 30 20 69 73 | : | . 0 is|
|00003200| 20 4f 4b 2e 0d 11 12 1b | 20 20 f2 43 6c 6f 73 65 | OK.....| .Close|
|00003210| 57 69 6e 64 6f 77 28 4c | 6f 61 64 5f 68 25 29 0d |Window(L|oad_h%).|
|00003220| 11 1c 10 20 20 f2 43 6c | 6f 73 65 4d 65 6e 75 0d |... .Cl|oseMenu.|
|00003230| 11 26 10 c9 20 54 69 6d | 65 53 69 67 5f 68 25 0d |.&.. Tim|eSig_h%.|
|00003240| 11 30 0d 20 20 c8 8e 20 | 49 25 20 ca 0d 11 3a 0a |.0. .. |I% ...:.|
|00003250| 20 20 20 c9 20 30 0d 11 | 44 30 20 20 20 20 54 49 | . 0..|D0 TI|
|00003260| 4d 45 5f 53 49 47 25 28 | 30 29 3d 31 2b 28 54 49 |ME_SIG%(|0)=1+(TI|
|00003270| 4d 45 5f 53 49 47 25 28 | 30 29 2b 69 6e 63 25 2b |ME_SIG%(|0)+inc%+|
|00003280| 31 34 29 83 31 35 0d 11 | 4e 25 20 20 20 20 24 42 |14).15..|N% $B|
|00003290| 61 72 4c 65 6e 67 74 68 | 25 3d c3 28 54 49 4d 45 |arLength|%=.(TIME|
|000032a0| 5f 53 49 47 25 28 30 29 | 2b 31 29 0d 11 58 0a 20 |_SIG%(0)|+1)..X. |
|000032b0| 20 20 c9 20 31 0d 11 62 | 2c 20 20 20 20 54 49 4d | . 1..b|, TIM|
|000032c0| 45 5f 53 49 47 25 28 31 | 29 3d 28 54 49 4d 45 5f |E_SIG%(1|)=(TIME_|
|000032d0| 53 49 47 25 28 31 29 2d | 69 6e 63 25 29 83 34 2b |SIG%(1)-|inc%).4+|
|000032e0| 32 0d 11 6c 2a 20 20 20 | 20 24 4e 6f 74 65 56 61 |2..l* | $NoteVa|
|000032f0| 6c 75 65 25 3d c3 28 31 | 3c 3c 28 54 49 4d 45 5f |lue%=.(1|<<(TIME_|
|00003300| 53 49 47 25 28 31 29 2d | 31 29 29 0d 11 76 09 20 |SIG%(1)-|1))..v. |
|00003310| 20 20 20 cb 0d 11 80 2a | 20 20 e7 20 49 25 3d 30 | ....*| . I%=0|
|00003320| 20 84 20 49 25 3d 31 20 | f2 55 70 64 61 74 65 49 | . I%=1 |.UpdateI|
|00003330| 63 6f 6e 28 57 25 2c 49 | 25 2c 30 2c 30 29 0d 11 |con(W%,I|%,0,0)..|
|00003340| 8a 05 cb 0d 11 94 05 cd | 0d 11 9e 05 e1 0d 11 a8 |........|........|
|00003350| 04 0d 11 b2 1b dd 20 f2 | 43 68 65 63 6b 49 6e 73 |...... .|CheckIns|
|00003360| 74 61 6c 6c 65 64 56 6f | 69 63 65 73 0d 11 bc 2c |talledVo|ices...,|
|00003370| ea 20 4e 65 77 56 6f 69 | 63 65 24 2c 20 4e 65 77 |. NewVoi|ce$, New|
|00003380| 4e 56 6f 69 63 65 73 25 | 2c 20 63 68 61 6e 67 65 |NVoices%|, change|
|00003390| 64 56 6f 69 63 65 73 25 | 0d 11 c6 14 63 68 61 6e |dVoices%|....chan|
|000033a0| 67 65 64 56 6f 69 63 65 | 73 25 3d a3 0d 11 d0 39 |gedVoice|s%=....9|
|000033b0| c8 99 20 53 6f 75 6e 64 | 5f 49 6e 73 74 61 6c 6c |.. Sound|_Install|
|000033c0| 56 6f 69 63 65 20 b8 20 | 49 24 2c 4e 65 77 4e 56 |Voice . |I$,NewNV|
|000033d0| 6f 69 63 65 73 25 3a 4e | 65 77 4e 56 6f 69 63 65 |oices%:N|ewNVoice|
|000033e0| 73 25 2d 3d 31 0d 11 da | 3c e7 20 a4 61 73 73 65 |s%-=1...|<. .asse|
|000033f0| 72 74 28 4e 56 6f 69 63 | 65 73 25 3e 30 2c 22 4e |rt(NVoic|es%>0,"N|
|00003400| 6f 20 73 6f 75 6e 64 20 | 76 6f 69 63 65 73 20 61 |o sound |voices a|
|00003410| 72 65 20 69 6e 73 74 61 | 6c 6c 65 64 2e 22 29 20 |re insta|lled.") |
|00003420| fa 0d 11 e4 71 e7 20 4d | 49 44 49 70 72 65 73 65 |....q. M|IDIprese|
|00003430| 6e 74 25 20 4e 65 77 4e | 56 6f 69 63 65 73 25 2b |nt% NewN|Voices%+|
|00003440| 3d 31 3a 56 6f 69 63 65 | 24 28 4e 65 77 4e 56 6f |=1:Voice|$(NewNVo|
|00003450| 69 63 65 73 25 29 3d 22 | 22 3a f4 20 61 6c 6c 6f |ices%)="|":. allo|
|00003460| 77 20 61 20 4e 55 4c 4c | 20 76 6f 69 63 65 20 74 |w a NULL| voice t|
|00003470| 6f 20 70 65 72 6d 69 74 | 20 6a 75 73 74 20 4d 49 |o permit| just MI|
|00003480| 44 49 20 6f 6e 20 74 68 | 69 73 20 63 68 61 6e 6e |DI on th|is chann|
|00003490| 65 6c 0d 11 ee 1d e7 20 | 4e 65 77 4e 56 6f 69 63 |el..... |NewNVoic|
|000034a0| 65 73 25 3c 3e 4e 56 6f | 69 63 65 73 25 20 8c 0d |es%<>NVo|ices% ..|
|000034b0| 11 f8 16 20 20 63 68 61 | 6e 67 65 64 56 6f 69 63 |... cha|ngedVoic|
|000034c0| 65 73 25 3d b9 0d 12 02 | 1a 20 20 4e 56 6f 69 63 |es%=....|. NVoic|
|000034d0| 65 73 25 3d 4e 65 77 4e | 56 6f 69 63 65 73 25 0d |es%=NewN|Voices%.|
|000034e0| 12 0c 07 20 20 cd 0d 12 | 16 2f e7 20 4e 56 6f 69 |... ...|./. NVoi|
|000034f0| 63 65 73 25 3e 4d 41 58 | 5f 56 6f 69 63 65 73 25 |ces%>MAX|_Voices%|
|00003500| 20 4e 56 6f 69 63 65 73 | 25 3d 4d 41 58 5f 56 6f | NVoices|%=MAX_Vo|
|00003510| 69 63 65 73 25 0d 12 20 | 12 e3 52 25 3d 31 b8 4e |ices%.. |..R%=1.N|
|00003520| 56 6f 69 63 65 73 25 0d | 12 2a 24 e7 20 28 4d 49 |Voices%.|.*$. (MI|
|00003530| 44 49 70 72 65 73 65 6e | 74 25 20 80 20 52 25 3d |DIpresen|t% . R%=|
|00003540| 4e 56 6f 69 63 65 73 25 | 29 20 8c 0d 12 34 12 20 |NVoices%|) ...4. |
|00003550| 56 6f 69 63 65 24 28 52 | 25 29 3d 22 22 0d 12 3e |Voice$(R|%)=""..>|
|00003560| 05 cc 0d 12 48 2b 20 c8 | 99 20 53 6f 75 6e 64 5f |....H+ .|. Sound_|
|00003570| 49 6e 73 74 61 6c 6c 56 | 6f 69 63 65 2c 30 2c 52 |InstallV|oice,0,R|
|00003580| 25 20 b8 20 4e 65 77 56 | 6f 69 63 65 24 0d 12 52 |% . NewV|oice$..R|
|00003590| 1e 20 e7 20 4e 65 77 56 | 6f 69 63 65 24 3c 3e 56 |. . NewV|oice$<>V|
|000035a0| 6f 69 63 65 24 28 52 25 | 29 20 8c 0d 12 5c 16 20 |oice$(R%|) ...\. |
|000035b0| 20 63 68 61 6e 67 65 64 | 56 6f 69 63 65 73 25 3d | changed|Voices%=|
|000035c0| b9 0d 12 66 1a 20 20 56 | 6f 69 63 65 24 28 52 25 |...f. V|oice$(R%|
|000035d0| 29 3d 4e 65 77 56 6f 69 | 63 65 24 0d 12 70 07 20 |)=NewVoi|ce$..p. |
|000035e0| 20 cd 0d 12 7a 06 20 cd | 0d 12 84 28 ed 3a f4 20 | ...z. .|...(.:. |
|000035f0| 66 69 6e 64 20 69 66 20 | 69 6e 73 74 72 75 6d 65 |find if |instrume|
|00003600| 6e 74 73 20 68 61 76 65 | 20 63 68 61 6e 67 65 64 |nts have| changed|
|00003610| 0d 12 8e 18 e7 20 ac 20 | 63 68 61 6e 67 65 64 56 |..... . |changedV|
|00003620| 6f 69 63 65 73 25 20 e1 | 0d 12 98 0b e3 52 25 3d |oices% .|.....R%=|
|00003630| 30 b8 37 0d 12 a2 27 c8 | 99 20 53 6f 75 6e 64 5f |0.7...'.|. Sound_|
|00003640| 41 74 74 61 63 68 56 6f | 69 63 65 2c 52 25 2b 31 |AttachVo|ice,R%+1|
|00003650| 2c 30 20 b8 20 4c 25 2c | 53 25 0d 12 ac 4a e7 53 |,0 . L%,|S%...J.S|
|00003660| 25 3c 31 84 53 25 3e 4e | 56 6f 69 63 65 73 25 20 |%<1.S%>N|Voices% |
|00003670| 53 25 3d 31 3a f4 20 4d | 61 6b 65 20 73 75 72 65 |S%=1:. M|ake sure|
|00003680| 20 61 20 76 6f 69 63 65 | 20 69 73 20 61 74 74 61 | a voice| is atta|
|00003690| 63 68 65 64 20 74 6f 20 | 61 6c 6c 20 63 68 61 6e |ched to |all chan|
|000036a0| 6e 65 6c 73 0d 12 b6 1e | c8 99 20 53 6f 75 6e 64 |nels....|.. Sound|
|000036b0| 5f 41 74 74 61 63 68 56 | 6f 69 63 65 2c 4c 25 2c |_AttachV|oice,L%,|
|000036c0| 53 25 0d 12 c0 33 49 6e | 73 74 72 75 6d 65 6e 74 |S%...3In|strument|
|000036d0| 25 28 52 25 2c 30 29 3d | 53 5f 43 25 28 52 25 29 |%(R%,0)=|S_C%(R%)|
|000036e0| 2b 31 3a f4 20 49 6e 73 | 74 72 75 6d 65 6e 74 20 |+1:. Ins|trument |
|000036f0| 73 74 61 76 65 0d 12 ca | 2b 49 6e 73 74 72 75 6d |stave...|+Instrum|
|00003700| 65 6e 74 25 28 52 25 2c | 31 29 3d 53 25 3a f4 20 |ent%(R%,|1)=S%:. |
|00003710| 49 6e 73 74 72 75 6d 65 | 6e 74 20 76 6f 69 63 65 |Instrume|nt voice|
|00003720| 0d 12 d4 2f 24 28 56 6f | 69 63 65 53 74 72 25 28 |.../$(Vo|iceStr%(|
|00003730| 52 25 29 29 20 3d 20 c0 | 56 6f 69 63 65 24 28 53 |R%)) = .|Voice$(S|
|00003740| 25 29 2c 20 56 6f 69 63 | 65 53 69 7a 65 25 29 0d |%), Voic|eSize%).|
|00003750| 12 de 28 f2 55 70 64 61 | 74 65 49 63 6f 6e 28 49 |..(.Upda|teIcon(I|
|00003760| 6e 73 74 72 57 69 6e 64 | 5f 68 25 2c 20 52 25 2b |nstrWind|_h%, R%+|
|00003770| 38 2c 20 30 2c 30 29 0d | 12 e8 23 ed 3a f4 20 47 |8, 0,0).|..#.:. G|
|00003780| 65 74 20 64 65 74 61 69 | 6c 73 20 6f 66 20 65 61 |et detai|ls of ea|
|00003790| 63 68 20 63 68 61 6e 6e | 65 6c 0d 12 f2 17 f2 53 |ch chann|el.....S|
|000037a0| 65 74 44 65 66 61 75 6c | 74 43 68 61 6e 6e 65 6c |etDefaul|tChannel|
|000037b0| 73 0d 12 fc 05 e1 0d 13 | 06 04 0d 13 10 47 dd 20 |s.......|.....G. |
|000037c0| a4 41 74 74 61 63 68 56 | 6f 69 63 65 28 63 68 61 |.AttachV|oice(cha|
|000037d0| 6e 25 2c 69 6e 63 25 29 | 20 3a f4 20 69 6e 63 25 |n%,inc%)| :. inc%|
|000037e0| 20 69 73 20 2b 31 20 6f | 72 20 2d 31 20 6f 72 20 | is +1 o|r -1 or |
|000037f0| 30 20 74 6f 20 66 69 6e | 64 20 6e 65 61 72 65 73 |0 to fin|d neares|
|00003800| 74 0d 13 1a 14 ea 20 73 | 74 6f 70 25 2c 76 25 2c |t..... s|top%,v%,|
|00003810| 70 65 72 63 25 0d 13 24 | 19 f2 43 68 65 63 6b 49 |perc%..$|..CheckI|
|00003820| 6e 73 74 61 6c 6c 65 64 | 56 6f 69 63 65 73 0d 13 |nstalled|Voices..|
|00003830| 2e 36 e7 20 4e 56 6f 69 | 63 65 73 25 3c 32 20 c8 |.6. NVoi|ces%<2 .|
|00003840| 99 20 53 6f 75 6e 64 5f | 41 74 74 61 63 68 56 6f |. Sound_|AttachVo|
|00003850| 69 63 65 2c 20 63 68 61 | 6e 25 2b 31 2c 20 31 20 |ice, cha|n%+1, 1 |
|00003860| 3a 20 3d 31 0d 13 38 65 | f4 20 61 74 74 61 63 68 |: =1..8e|. attach|
|00003870| 20 6e 65 78 74 20 76 6f | 69 63 65 20 74 6f 20 63 | next vo|ice to c|
|00003880| 68 61 6e 6e 65 6c 2e 20 | 41 74 74 61 63 68 20 70 |hannel. |Attach p|
|00003890| 65 72 63 75 73 73 69 6f | 6e 20 76 6f 69 63 65 20 |ercussio|n voice |
|000038a0| 6f 6e 6c 79 20 6f 6e 20 | 70 65 72 63 20 6c 69 6e |only on |perc lin|
|000038b0| 65 2c 20 61 6e 64 20 6e | 6f 74 20 6f 6e 20 73 74 |e, and n|ot on st|
|000038c0| 61 76 65 20 6c 69 6e 65 | 73 0d 13 42 47 70 65 72 |ave line|s..BGper|
|000038d0| 63 25 3d 28 a7 24 53 74 | 61 76 65 53 74 72 25 28 |c%=(.$St|aveStr%(|
|000038e0| 63 68 61 6e 25 29 2c 22 | 70 65 72 63 22 29 3e 30 |chan%),"|perc")>0|
|000038f0| 29 20 3a f4 20 69 73 20 | 69 74 20 61 20 70 65 72 |) :. is |it a per|
|00003900| 63 75 73 73 69 6f 6e 20 | 63 68 61 6e 6e 65 6c 3f |cussion |channel?|
|00003910| 0d 13 4c 28 c8 99 20 53 | 6f 75 6e 64 5f 41 74 74 |..L(.. S|ound_Att|
|00003920| 61 63 68 56 6f 69 63 65 | 2c 20 63 68 61 6e 25 2b |achVoice|, chan%+|
|00003930| 31 20 b8 20 2c 20 76 25 | 0d 13 56 0f e7 20 76 25 |1 . , v%|..V.. v%|
|00003940| 3d 30 20 76 25 3d 31 0d | 13 60 34 c8 99 20 53 6f |=0 v%=1.|.`4.. So|
|00003950| 75 6e 64 5f 41 74 74 61 | 63 68 56 6f 69 63 65 2c |und_Atta|chVoice,|
|00003960| 20 63 68 61 6e 25 2b 31 | 2c 20 76 25 20 20 3a f4 | chan%+1|, v% :.|
|00003970| 20 72 65 73 74 6f 72 65 | 20 69 74 0d 13 6a 36 f4 | restore| it..j6.|
|00003980| 20 63 68 65 63 6b 20 69 | 66 20 63 75 72 72 65 6e | check i|f curren|
|00003990| 74 20 76 6f 69 63 65 20 | 69 73 20 76 61 6c 69 64 |t voice |is valid|
|000039a0| 20 66 6f 72 20 74 68 69 | 73 20 63 68 61 6e 6e 65 | for thi|s channe|
|000039b0| 6c 0d 13 74 38 e7 20 69 | 6e 63 25 3d 30 20 8c 20 |l..t8. i|nc%=0 . |
|000039c0| e7 20 28 70 65 72 63 25 | 20 3d 20 28 a7 56 6f 69 |. (perc%| = (.Voi|
|000039d0| 63 65 24 28 76 25 29 2c | 22 50 65 72 63 22 29 3e |ce$(v%),|"Perc")>|
|000039e0| 30 29 29 20 8c 20 3d 76 | 25 0d 13 7e 1c f4 20 69 |0)) . =v|%..~.. i|
|000039f0| 6e 63 20 6f 72 20 64 65 | 63 20 75 6e 74 69 6c 20 |nc or de|c until |
|00003a00| 66 6f 75 6e 64 0d 13 88 | 19 e7 20 94 28 69 6e 63 |found...|.. .(inc|
|00003a10| 25 29 3c 3e 31 20 8c 20 | 69 6e 63 25 3d 31 0d 13 |%)<>1 . |inc%=1..|
|00003a20| 92 0c 73 74 6f 70 25 3d | 76 25 0d 13 9c 05 f5 0d |..stop%=|v%......|
|00003a30| 13 a6 36 20 76 25 2b 3d | 69 6e 63 25 20 3a 20 e7 |..6 v%+=|inc% : .|
|00003a40| 20 76 25 3e 4e 56 6f 69 | 63 65 73 25 20 76 25 3d | v%>NVoi|ces% v%=|
|00003a50| 31 20 8b e7 20 76 25 3c | 31 20 76 25 3d 4e 56 6f |1 .. v%<|1 v%=NVo|
|00003a60| 69 63 65 73 25 0d 13 b0 | 62 20 e7 20 4d 49 44 49 |ices%...|b . MIDI|
|00003a70| 70 72 65 73 65 6e 74 25 | 20 80 20 56 6f 69 63 65 |present%| . Voice|
|00003a80| 24 28 76 25 29 3d 22 22 | 20 73 74 6f 70 25 3d 76 |$(v%)=""| stop%=v|
|00003a90| 25 20 3a f4 20 70 65 72 | 6d 69 74 20 4e 55 4c 4c |% :. per|mit NULL|
|00003aa0| 20 76 6f 69 63 65 20 6f | 6e 20 61 6e 79 20 63 68 | voice o|n any ch|
|00003ab0| 61 6e 6e 65 6c 20 69 66 | 20 4d 49 44 49 20 69 6e |annel if| MIDI in|
|00003ac0| 73 74 61 6c 6c 65 64 0d | 13 ba 33 20 fd 20 28 70 |stalled.|..3 . (p|
|00003ad0| 65 72 63 25 20 3d 20 28 | a7 56 6f 69 63 65 24 28 |erc% = (|.Voice$(|
|00003ae0| 76 25 29 2c 22 50 65 72 | 63 22 29 3e 30 29 29 20 |v%),"Per|c")>0)) |
|00003af0| 84 20 73 74 6f 70 25 3d | 76 25 0d 13 c4 07 3d 76 |. stop%=|v%....=v|
|00003b00| 25 0d 13 ce 04 0d 13 d8 | 24 dd 20 f2 55 70 64 61 |%.......|$. .Upda|
|00003b10| 74 65 49 63 6f 6e 28 57 | 25 2c 20 49 25 2c 20 73 |teIcon(W|%, I%, s|
|00003b20| 74 25 2c 20 6d 73 6b 25 | 29 0d 13 e2 20 57 69 6e |t%, msk%|)... Win|
|00003b30| 64 6f 77 25 21 68 61 6e | 64 6c 65 25 3d 57 25 3a |dow%!han|dle%=W%:|
|00003b40| 21 49 63 6f 6e 25 3d 49 | 25 0d 13 ec 23 49 63 6f |!Icon%=I|%...#Ico|
|00003b50| 6e 25 21 73 74 61 74 65 | 3d 73 74 25 3a 49 63 6f |n%!state|=st%:Ico|
|00003b60| 6e 25 21 6d 61 73 6b 3d | 6d 73 6b 25 0d 13 f6 3a |n%!mask=|msk%...:|
|00003b70| c8 99 20 53 65 74 49 63 | 6f 6e 53 74 61 74 65 25 |.. SetIc|onState%|
|00003b80| 2c 2c 57 69 6e 64 6f 77 | 25 2b 68 61 6e 64 6c 65 |,,Window|%+handle|
|00003b90| 25 20 3a 20 f4 20 75 70 | 64 61 74 65 20 69 63 6f |% : . up|date ico|
|00003ba0| 6e 20 74 65 78 74 0d 14 | 00 05 e1 0d 14 0a 04 0d |n text..|........|
|00003bb0| 14 14 12 dd 20 f2 55 73 | 65 72 44 72 61 67 42 6f |.... .Us|erDragBo|
|00003bc0| 78 0d 14 1e 0b ea 20 62 | 6c 6f 63 6b 0d 14 28 0f |x..... b|lock..(.|
|00003bd0| 44 52 41 47 47 49 4e 47 | 25 3d a3 0d 14 32 25 62 |DRAGGING|%=...2%b|
|00003be0| 6c 6f 63 6b 3d 57 69 6e | 64 6f 77 25 20 3a f4 20 |lock=Win|dow% :. |
|00003bf0| 74 65 6d 70 6f 72 61 72 | 79 20 62 75 66 66 65 72 |temporar|y buffer|
|00003c00| 0d 14 3c 0f e7 20 53 41 | 56 49 4e 47 25 20 8c 0d |..<.. SA|VING% ..|
|00003c10| 14 46 20 20 20 c8 99 20 | 47 65 74 50 6f 69 6e 74 |.F .. |GetPoint|
|00003c20| 65 72 49 6e 66 6f 25 2c | 20 2c 62 6c 6f 63 6b 0d |erInfo%,| ,block.|
|00003c30| 14 50 16 20 20 62 6c 6f | 63 6b 21 33 32 3d 62 6c |.P. blo|ck!32=bl|
|00003c40| 6f 63 6b 21 34 0d 14 5a | 15 20 20 62 6c 6f 63 6b |ock!4..Z|. block|
|00003c50| 21 32 38 3d 21 62 6c 6f | 63 6b 0d 14 64 17 20 20 |!28=!blo|ck..d. |
|00003c60| 62 6c 6f 63 6b 21 32 34 | 3d 62 6c 6f 63 6b 21 31 |block!24|=block!1|
|00003c70| 36 0d 14 6e 42 20 20 62 | 6c 6f 63 6b 21 32 30 3d |6..nB b|lock!20=|
|00003c80| 62 6c 6f 63 6b 21 31 32 | 20 3a 20 f4 20 74 68 69 |block!12| : . thi|
|00003c90| 73 20 69 73 20 74 68 65 | 20 64 65 73 74 69 6e 61 |s is the| destina|
|00003ca0| 74 69 6f 6e 20 77 69 6e | 64 6f 77 20 68 61 6e 64 |tion win|dow hand|
|00003cb0| 6c 65 25 0d 14 78 24 20 | 20 62 6c 6f 63 6b 21 31 |le%..x$ | block!1|
|00003cc0| 36 3d 31 20 20 20 20 20 | 20 20 20 3a 20 f4 20 44 |6=1 | : . D|
|00003cd0| 61 74 61 53 61 76 65 0d | 14 82 10 20 20 62 6c 6f |ataSave.|... blo|
|00003ce0| 63 6b 21 31 32 3d 30 0d | 14 8c 29 20 20 62 6c 6f |ck!12=0.|..) blo|
|00003cf0| 63 6b 21 33 36 3d 30 20 | 20 3a f4 20 64 6f 6e 27 |ck!36=0 | :. don'|
|00003d00| 74 20 6b 6e 6f 77 20 66 | 69 6c 65 20 73 69 7a 65 |t know f|ile size|
|00003d10| 0d 14 96 1d 20 20 62 6c | 6f 63 6b 21 34 30 3d 4d |.... bl|ock!40=M|
|00003d20| 75 73 69 63 46 69 6c 65 | 54 79 70 65 25 0d 14 a0 |usicFile|Type%...|
|00003d30| 28 20 20 24 28 62 6c 6f | 63 6b 2b 34 34 29 3d a4 |( $(blo|ck+44)=.|
|00003d40| 47 65 74 4c 65 61 66 4e | 61 6d 65 28 53 61 76 65 |GetLeafN|ame(Save|
|00003d50| 54 65 78 74 29 0d 14 aa | 11 20 20 21 62 6c 6f 63 |Text)...|. !bloc|
|00003d60| 6b 20 3d 20 36 30 0d 14 | b4 29 20 20 c8 99 20 53 |k = 60..|.) .. S|
|00003d70| 65 6e 64 4d 65 73 73 61 | 67 65 2c 20 31 37 2c 20 |endMessa|ge, 17, |
|00003d80| 62 6c 6f 63 6b 2c 20 62 | 6c 6f 63 6b 21 32 30 0d |block, b|lock!20.|
|00003d90| 14 be 07 20 20 cd 0d 14 | c8 05 e1 0d 14 d2 04 0d |... ...|........|
|00003da0| 14 dc 48 dd 20 a4 53 65 | 74 42 69 74 28 74 65 73 |..H. .Se|tBit(tes|
|00003db0| 74 2c 20 77 6f 72 64 2c | 20 62 69 74 6e 75 6d 29 |t, word,| bitnum)|
|00003dc0| 20 3a 20 f4 20 73 65 74 | 20 6f 72 20 63 6c 65 61 | : . set| or clea|
|00003dd0| 72 20 62 69 74 20 64 65 | 70 65 6e 64 69 6e 67 20 |r bit de|pending |
|00003de0| 6f 6e 20 74 65 73 74 0d | 14 e6 0c e7 20 74 65 73 |on test.|.... tes|
|00003df0| 74 20 8c 0d 14 f0 1a 20 | 20 3d 20 77 6f 72 64 20 |t ..... | = word |
|00003e00| 84 20 28 31 3c 3c 62 69 | 74 6e 75 6d 29 0d 14 fa |. (1<<bi|tnum)...|
|00003e10| 05 cc 0d 15 04 1c 20 20 | 3d 20 77 6f 72 64 20 80 |...... |= word .|
|00003e20| 20 ac 20 28 31 3c 3c 62 | 69 74 6e 75 6d 29 0d 15 | . (1<<b|itnum)..|
|00003e30| 0e 05 cd 0d 15 18 04 0d | 15 22 11 dd 20 f2 4d 65 |........|.".. .Me|
|00003e40| 6e 75 53 65 6c 65 63 74 | 0d 15 2c 2a ea 20 69 74 |nuSelect|..,*. it|
|00003e50| 65 6d 25 2c 20 6e 2c 20 | 73 65 6c 65 63 74 69 6f |em%, n, |selectio|
|00003e60| 6e 2c 20 53 6f 75 6e 64 | 45 6e 61 62 6c 65 25 2c |n, Sound|Enable%,|
|00003e70| 46 24 0d 15 36 1d 73 65 | 6c 65 63 74 69 6f 6e 3d |F$..6.se|lection=|
|00003e80| 57 69 6e 64 6f 77 25 2b | 68 61 6e 64 6c 65 25 0d |Window%+|handle%.|
|00003e90| 15 40 37 c8 99 20 44 65 | 63 6f 64 65 4d 65 6e 75 |.@7.. De|codeMenu|
|00003ea0| 2c 20 2c 43 75 72 72 65 | 6e 74 4d 65 6e 75 25 2c |, ,Curre|ntMenu%,|
|00003eb0| 20 73 65 6c 65 63 74 69 | 6f 6e 2c 20 4d 65 6e 75 | selecti|on, Menu|
|00003ec0| 53 74 72 69 6e 67 0d 15 | 4a 2b c8 8e 20 c0 24 4d |String..|J+.. .$M|
|00003ed0| 65 6e 75 53 74 72 69 6e | 67 2c a7 24 4d 65 6e 75 |enuStrin|g,.$Menu|
|00003ee0| 53 74 72 69 6e 67 2c 20 | 22 2e 22 29 2d 31 29 20 |String, |".")-1) |
|00003ef0| ca 0d 15 54 0e 20 20 c9 | 20 22 53 61 76 65 22 0d |...T. .| "Save".|
|00003f00| 15 5e 1b 20 20 20 46 24 | 3d a4 47 65 74 53 74 72 |.^. F$|=.GetStr|
|00003f10| 28 53 61 76 65 54 65 78 | 74 29 0d 15 68 26 20 20 |(SaveTex|t)..h& |
|00003f20| 20 e7 20 28 20 a7 46 24 | 2c 22 2e 22 29 3d 30 20 | . ( .F$|,".")=0 |
|00003f30| 80 20 a7 46 24 2c 22 3a | 22 29 3d 30 20 29 20 8c |. .F$,":|")=0 ) .|
|00003f40| 0d 15 72 30 20 20 20 20 | f2 4f 70 65 6e 57 69 6e |..r0 |.OpenWin|
|00003f50| 64 6f 77 28 53 61 76 65 | 5f 68 25 2c 20 4d 6f 75 |dow(Save|_h%, Mou|
|00003f60| 73 65 5f 58 25 2c 20 4d | 6f 75 73 65 5f 59 25 29 |se_X%, M|ouse_Y%)|
|00003f70| 0d 15 7c 08 20 20 20 cc | 0d 15 86 17 20 20 20 20 |..|. .|.... |
|00003f80| f2 73 61 76 65 5f 6d 75 | 73 69 63 28 46 24 29 0d |.save_mu|sic(F$).|
|00003f90| 15 90 08 20 20 20 cd 0d | 15 9a 10 20 20 c9 20 22 |... ..|... . "|
|00003fa0| 53 74 61 76 65 73 22 0d | 15 a4 18 20 20 20 c8 99 |Staves".|... ..|
|00003fb0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d | "Hourgl|ass_On".|
|00003fc0| 15 ae 29 20 20 20 e7 20 | c0 24 53 74 61 76 65 4e |..) . |.$StaveN|
|00003fd0| 75 6d 25 2c 31 29 3d 22 | 22 20 24 53 74 61 76 65 |um%,1)="|" $Stave|
|00003fe0| 4e 75 6d 25 3d 22 31 22 | 0d 15 b8 21 20 20 20 53 |Num%="1"|...! S|
|00003ff0| 54 41 56 45 25 3d bb 28 | c0 24 53 74 61 76 65 4e |TAVE%=.(|.$StaveN|
|00004000| 75 6d 25 2c 31 29 29 2d | 31 0d 15 c2 22 20 20 20 |um%,1))-|1..." |
|00004010| e7 20 a7 24 4d 65 6e 75 | 53 74 72 69 6e 67 2c 22 |. .$Menu|String,"|
|00004020| 2b 70 65 72 63 22 2c 36 | 29 20 8c 0d 15 cc 23 20 |+perc",6|) ....# |
|00004030| 20 20 20 e7 20 50 45 52 | 43 25 3d 31 20 50 45 52 | . PER|C%=1 PER|
|00004040| 43 25 3d 30 20 8b 20 50 | 45 52 43 25 3d 31 0d 15 |C%=0 . P|ERC%=1..|
|00004050| d6 09 20 20 20 20 cd 0d | 15 e0 37 20 20 20 69 74 |.. ..|..7 it|
|00004060| 65 6d 25 20 3d 20 a4 46 | 69 6e 64 4d 65 6e 75 49 |em% = .F|indMenuI|
|00004070| 74 65 6d 28 22 2b 70 65 | 72 63 75 73 73 69 6f 6e |tem("+pe|rcussion|
|00004080| 22 2c 20 53 74 61 76 65 | 4d 65 6e 75 25 29 0d 15 |", Stave|Menu%)..|
|00004090| ea 4c 20 20 20 e7 20 28 | 69 74 65 6d 25 3e 3d 30 |.L . (|item%>=0|
|000040a0| 29 20 21 69 74 65 6d 25 | 20 3d 20 a4 53 65 74 42 |) !item%| = .SetB|
|000040b0| 69 74 28 50 45 52 43 25 | 3d 31 2c 20 21 69 74 65 |it(PERC%|=1, !ite|
|000040c0| 6d 25 2c 20 30 29 3a f4 | 20 73 65 74 20 6f 72 20 |m%, 0):.| set or |
|000040d0| 63 6c 65 61 72 20 74 69 | 63 6b 0d 15 f4 13 20 20 |clear ti|ck.... |
|000040e0| 20 f2 73 65 74 75 70 5f | 73 63 6f 72 65 0d 15 fe | .setup_|score...|
|000040f0| 13 20 20 20 f2 73 74 61 | 72 74 5f 6d 75 73 69 63 |. .sta|rt_music|
|00004100| 0d 16 08 12 20 20 20 f2 | 72 65 73 63 6f 72 65 28 |.... .|rescore(|
|00004110| 30 29 0d 16 12 19 20 20 | 20 c8 99 20 22 48 6f 75 |0).... | .. "Hou|
|00004120| 72 67 6c 61 73 73 5f 4f | 66 66 22 0d 16 1c 43 20 |rglass_O|ff"...C |
|00004130| 20 c9 20 22 49 6e 73 74 | 72 75 6d 65 6e 74 73 22 | . "Inst|ruments"|
|00004140| 20 3a 20 f2 4f 70 65 6e | 57 69 6e 64 6f 77 28 49 | : .Open|Window(I|
|00004150| 6e 73 74 72 57 69 6e 64 | 5f 68 25 2c 4d 6f 75 73 |nstrWind|_h%,Mous|
|00004160| 65 5f 58 25 2c 4d 6f 75 | 73 65 5f 59 25 29 0d 16 |e_X%,Mou|se_Y%)..|
|00004170| 26 10 20 20 c9 20 22 56 | 6f 6c 75 6d 65 22 0d 16 |&. . "V|olume"..|
|00004180| 30 1a 20 20 20 20 e7 20 | 73 65 6c 65 63 74 69 6f |0. . |selectio|
|00004190| 6e 21 34 3e 3d 30 20 8c | 0d 16 3a 21 20 20 20 20 |n!4>=0 .|..:! |
|000041a0| 20 20 f2 53 65 74 56 6f | 6c 75 6d 65 28 73 65 6c | .SetVo|lume(sel|
|000041b0| 65 63 74 69 6f 6e 21 34 | 29 0d 16 44 30 20 20 20 |ection!4|)..D0 |
|000041c0| 20 20 20 f2 53 65 74 4d | 65 6e 75 54 69 63 6b 28 | .SetM|enuTick(|
|000041d0| 56 6f 6c 75 6d 65 4d 65 | 6e 75 25 2c 20 73 65 6c |VolumeMe|nu%, sel|
|000041e0| 65 63 74 69 6f 6e 21 34 | 29 0d 16 4e 0b 20 20 20 |ection!4|)..N. |
|000041f0| 20 20 20 cd 0d 16 58 0f | 20 20 c9 20 22 54 65 6d | ...X.| . "Tem|
|00004200| 70 6f 22 0d 16 62 1a 20 | 20 20 20 e7 20 73 65 6c |po"..b. | . sel|
|00004210| 65 63 74 69 6f 6e 21 34 | 3e 3d 30 20 8c 0d 16 6c |ection!4|>=0 ...l|
|00004220| 20 20 20 20 20 20 20 f2 | 53 65 74 54 65 6d 70 6f | .|SetTempo|
|00004230| 28 73 65 6c 65 63 74 69 | 6f 6e 21 34 29 0d 16 76 |(selecti|on!4)..v|
|00004240| 2f 20 20 20 20 20 20 f2 | 53 65 74 4d 65 6e 75 54 |/ .|SetMenuT|
|00004250| 69 63 6b 28 54 65 6d 70 | 6f 4d 65 6e 75 25 2c 20 |ick(Temp|oMenu%, |
|00004260| 73 65 6c 65 63 74 69 6f | 6e 21 34 29 0d 16 80 0b |selectio|n!4)....|
|00004270| 20 20 20 20 20 20 cd 0d | 16 8a 32 20 20 c9 20 22 | ..|..2 . "|
|00004280| 54 69 6d 65 20 73 69 67 | 22 20 3a 20 54 49 4d 45 |Time sig|" : TIME|
|00004290| 5f 53 49 47 25 28 30 29 | 3d bb 28 24 42 61 72 4c |_SIG%(0)|=.($BarL|
|000042a0| 65 6e 67 74 68 25 29 2d | 31 0d 16 94 11 20 20 c9 |ength%)-|1.... .|
|000042b0| 20 22 4b 65 79 20 73 69 | 67 22 0d 16 9e 1a 20 20 | "Key si|g".... |
|000042c0| 20 20 e7 20 73 65 6c 65 | 63 74 69 6f 6e 21 34 3e | . sele|ction!4>|
|000042d0| 3d 30 20 8c 0d 16 a8 2b | 20 20 20 20 20 4b 45 59 |=0 ....+| KEY|
|000042e0| 5f 53 49 47 25 28 30 29 | 20 3d 20 28 28 73 65 6c |_SIG%(0)| = ((sel|
|000042f0| 65 63 74 69 6f 6e 21 38 | 29 3e 3d 37 29 2b 31 0d |ection!8|)>=7)+1.|
|00004300| 16 b2 29 20 20 20 20 20 | 4b 45 59 5f 53 49 47 25 |..) |KEY_SIG%|
|00004310| 28 31 29 20 3d 20 94 28 | 28 73 65 6c 65 63 74 69 |(1) = .(|(selecti|
|00004320| 6f 6e 21 38 29 2d 37 29 | 0d 16 bc 2e 20 20 20 20 |on!8)-7)|.... |
|00004330| 20 f2 53 65 74 4d 65 6e | 75 54 69 63 6b 28 4d 61 | .SetMen|uTick(Ma|
|00004340| 6a 6f 72 4d 65 6e 75 25 | 2c 20 73 65 6c 65 63 74 |jorMenu%|, select|
|00004350| 69 6f 6e 21 38 29 0d 16 | c6 2e 20 20 20 20 20 f2 |ion!8)..|.. .|
|00004360| 53 65 74 4d 65 6e 75 54 | 69 63 6b 28 4d 69 6e 6f |SetMenuT|ick(Mino|
|00004370| 72 4d 65 6e 75 25 2c 20 | 73 65 6c 65 63 74 69 6f |rMenu%, |selectio|
|00004380| 6e 21 38 29 0d 16 d0 86 | 20 20 20 20 20 e7 20 4b |n!8)....| . K|
|00004390| 45 59 5f 53 49 47 25 28 | 31 29 20 6e 3d 61 63 63 |EY_SIG%(|1) n=acc|
|000043a0| 69 64 65 6e 74 61 6c 25 | 2b 32 2b 4b 45 59 5f 53 |idental%|+2+KEY_S|
|000043b0| 49 47 25 28 30 29 20 3a | 20 58 25 28 6b 65 79 25 |IG%(0) :| X%(key%|
|000043c0| 29 3d 28 78 25 28 6e 29 | 2b 58 25 28 6e 29 29 2a |)=(x%(n)|+X%(n))*|
|000043d0| 4b 45 59 5f 53 49 47 25 | 28 31 29 20 8b 20 58 25 |KEY_SIG%|(1) . X%|
|000043e0| 28 6b 65 79 25 29 3d 78 | 25 28 61 63 63 69 64 65 |(key%)=x|%(accide|
|000043f0| 6e 74 61 6c 25 2b 32 29 | 2b 58 25 28 61 63 63 69 |ntal%+2)|+X%(acci|
|00004400| 64 65 6e 74 61 6c 25 2b | 32 29 0d 16 da 0a 20 20 |dental%+|2).... |
|00004410| 20 20 20 cd 0d 16 e4 0e | 20 20 c9 20 22 50 6c 61 | .....| . "Pla|
|00004420| 79 22 0d 16 ee 6a 20 20 | 20 20 c8 99 20 53 6f 75 |y"...j | .. Sou|
|00004430| 6e 64 5f 45 6e 61 62 6c | 65 2c 30 20 b8 20 53 6f |nd_Enabl|e,0 . So|
|00004440| 75 6e 64 45 6e 61 62 6c | 65 25 3a f4 20 64 6f 6e |undEnabl|e%:. don|
|00004450| 74 20 70 72 65 74 65 6e | 64 20 74 6f 20 62 65 20 |t preten|d to be |
|00004460| 61 62 6c 65 20 74 6f 20 | 70 6c 61 79 20 69 66 20 |able to |play if |
|00004470| 74 68 65 20 73 6f 75 6e | 64 20 73 79 73 74 65 6d |the soun|d system|
|00004480| 20 69 73 20 64 69 73 61 | 62 6c 65 64 0d 16 f8 1a | is disa|bled....|
|00004490| 20 20 20 20 e7 20 53 6f | 75 6e 64 45 6e 61 62 6c | . So|undEnabl|
|000044a0| 65 25 3d 32 20 8c 0d 17 | 02 13 20 20 20 20 20 53 |e%=2 ...|.. S|
|000044b0| 43 4f 52 49 4e 47 25 3d | a3 0d 17 0c 1c 20 20 20 |CORING%=|..... |
|000044c0| 20 20 50 4c 41 59 49 4e | 47 25 3d ac 20 50 4c 41 | PLAYIN|G%=. PLA|
|000044d0| 59 49 4e 47 25 0d 17 16 | 1c 20 20 20 20 20 53 43 |YING%...|. SC|
|000044e0| 52 4f 4c 4c 49 4e 47 25 | 3d 50 4c 41 59 49 4e 47 |ROLLING%|=PLAYING|
|000044f0| 25 0d 17 20 2c 20 20 20 | 20 20 e7 20 50 4c 41 59 |%.. , | . PLAY|
|00004500| 49 4e 47 25 20 f2 70 6c | 61 79 5f 73 74 61 72 74 |ING% .pl|ay_start|
|00004510| 20 8b 20 f2 70 6c 61 79 | 5f 73 74 6f 70 0d 17 2a | . .play|_stop..*|
|00004520| 40 20 20 20 20 cc 20 6e | 3d a4 43 68 65 63 6b 4f |@ . n|=.CheckO|
|00004530| 4b 28 22 53 6f 75 6e 64 | 20 69 73 20 6e 6f 74 20 |K("Sound| is not |
|00004540| 65 6e 61 62 6c 65 64 2e | 20 59 6f 75 20 63 61 6e |enabled.| You can|
|00004550| 6e 6f 74 20 70 6c 61 79 | 22 2c 20 31 29 0d 17 34 |not play|", 1)..4|
|00004560| 0a 20 20 20 20 20 cd 0d | 17 3e 0f 20 20 c9 20 22 |. ..|.>. . "|
|00004570| 43 6c 65 61 72 22 0d 17 | 48 4d 20 20 20 20 e7 20 |Clear"..|HM . |
|00004580| 43 48 41 4e 47 45 44 25 | 20 e7 20 ac 20 a4 43 68 |CHANGED%| . . .Ch|
|00004590| 65 63 6b 4f 4b 28 22 41 | 72 65 20 79 6f 75 20 73 |eckOK("A|re you s|
|000045a0| 75 72 65 3f 20 43 75 72 | 72 65 6e 74 20 6d 75 73 |ure? Cur|rent mus|
|000045b0| 69 63 20 69 73 20 75 6e | 73 61 76 65 64 22 2c 33 |ic is un|saved",3|
|000045c0| 29 20 e1 0d 17 52 16 20 | 20 20 20 f2 43 6c 65 61 |) ...R. | .Clea|
|000045d0| 72 41 6c 6c 4d 75 73 69 | 63 0d 17 5c 24 20 20 20 |rAllMusi|c..\$ |
|000045e0| 20 57 69 6e 64 6f 77 25 | 21 68 61 6e 64 6c 65 25 | Window%|!handle%|
|000045f0| 3d 53 63 6f 72 65 57 69 | 6e 64 5f 68 25 0d 17 66 |=ScoreWi|nd_h%..f|
|00004600| 2b 20 20 20 20 c8 99 20 | 47 65 74 57 69 6e 64 6f |+ .. |GetWindo|
|00004610| 77 53 74 61 74 65 25 2c | 2c 57 69 6e 64 6f 77 25 |wState%,|,Window%|
|00004620| 2b 68 61 6e 64 6c 65 25 | 0d 17 70 16 20 20 20 20 |+handle%|..p. |
|00004630| 57 69 6e 64 6f 77 25 21 | 73 63 78 25 3d 30 0d 17 |Window%!|scx%=0..|
|00004640| 7a 10 20 20 20 20 4c 48 | 42 41 52 25 3d 30 0d 17 |z. LH|BAR%=0..|
|00004650| 84 27 20 20 20 20 c8 99 | 20 4f 70 65 6e 57 69 6e |.' ..| OpenWin|
|00004660| 64 6f 77 25 2c 2c 57 69 | 6e 64 6f 77 25 2b 68 61 |dow%,,Wi|ndow%+ha|
|00004670| 6e 64 6c 65 25 0d 17 8e | 2e 20 20 20 20 c8 99 20 |ndle%...|. .. |
|00004680| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 25 2c |GetWindo|wState%,|
|00004690| 2c 53 63 6f 72 65 57 42 | 6c 6b 25 2b 68 61 6e 64 |,ScoreWB|lk%+hand|
|000046a0| 6c 65 25 0d 17 98 3d 20 | 20 c9 20 22 49 6e 66 6f |le%...= | . "Info|
|000046b0| 22 20 3a 20 f2 4f 70 65 | 6e 57 69 6e 64 6f 77 28 |" : .Ope|nWindow(|
|000046c0| 50 72 6f 67 49 6e 66 6f | 5f 68 25 2c 20 4d 6f 75 |ProgInfo|_h%, Mou|
|000046d0| 73 65 5f 58 25 2c 20 4d | 6f 75 73 65 5f 59 25 29 |se_X%, M|ouse_Y%)|
|000046e0| 0d 17 a2 4c 20 20 c9 20 | 22 51 75 69 74 22 20 3a |...L . |"Quit" :|
|000046f0| 20 e7 20 43 48 41 4e 47 | 45 44 25 20 f2 4f 70 65 | . CHANG|ED% .Ope|
|00004700| 6e 41 62 6f 72 74 51 75 | 65 72 79 28 4d 6f 75 73 |nAbortQu|ery(Mous|
|00004710| 65 5f 58 25 2c 20 4d 6f | 75 73 65 5f 59 25 29 20 |e_X%, Mo|use_Y%) |
|00004720| 8b 20 f2 74 65 72 6d 69 | 6e 61 74 65 0d 17 ac 0e |. .termi|nate....|
|00004730| 20 20 c9 20 22 47 6f 74 | 6f 22 0d 17 b6 24 20 20 | . "Got|o"...$ |
|00004740| 20 20 57 69 6e 64 6f 77 | 25 21 68 61 6e 64 6c 65 | Window|%!handle|
|00004750| 25 3d 53 63 6f 72 65 57 | 69 6e 64 5f 68 25 0d 17 |%=ScoreW|ind_h%..|
|00004760| c0 2b 20 20 20 20 c8 99 | 20 47 65 74 57 69 6e 64 |.+ ..| GetWind|
|00004770| 6f 77 53 74 61 74 65 25 | 2c 2c 57 69 6e 64 6f 77 |owState%|,,Window|
|00004780| 25 2b 68 61 6e 64 6c 65 | 25 0d 17 ca 16 20 20 20 |%+handle|%.... |
|00004790| 20 57 69 6e 64 6f 77 25 | 21 73 63 78 25 3d 30 0d | Window%|!scx%=0.|
|000047a0| 17 d4 3b 20 20 20 20 c8 | 99 20 4f 70 65 6e 57 69 |..; .|. OpenWi|
|000047b0| 6e 64 6f 77 25 2c 2c 57 | 69 6e 64 6f 77 25 2b 68 |ndow%,,W|indow%+h|
|000047c0| 61 6e 64 6c 65 25 20 3a | 20 f4 20 73 65 74 20 73 |andle% :| . set s|
|000047d0| 63 72 6f 6c 6c 20 74 6f | 20 30 0d 17 de 2e 20 20 |croll to| 0.... |
|000047e0| 20 20 c8 99 20 47 65 74 | 57 69 6e 64 6f 77 53 74 | .. Get|WindowSt|
|000047f0| 61 74 65 25 2c 2c 53 63 | 6f 72 65 57 42 6c 6b 25 |ate%,,Sc|oreWBlk%|
|00004800| 2b 68 61 6e 64 6c 65 25 | 0d 17 e8 3c 20 20 20 20 |+handle%|...< |
|00004810| 4c 48 42 41 52 25 3d 30 | 20 3a f4 20 74 68 65 20 |LHBAR%=0| :. the |
|00004820| 62 61 72 20 6e 75 6d 62 | 65 72 20 61 74 20 74 68 |bar numb|er at th|
|00004830| 65 20 6c 65 66 74 20 6f | 66 20 74 68 65 20 77 69 |e left o|f the wi|
|00004840| 6e 64 6f 77 0d 17 f2 07 | 20 20 cb 0d 17 fc 22 20 |ndow....| ...." |
|00004850| 20 e7 20 28 43 75 72 72 | 65 6e 74 4d 65 6e 75 25 | . (Curr|entMenu%|
|00004860| 3d 4d 65 6e 75 53 74 61 | 72 74 29 20 8c 0d 18 06 |=MenuSta|rt) ....|
|00004870| 21 20 20 20 c8 99 20 47 | 65 74 50 6f 69 6e 74 65 |! .. G|etPointe|
|00004880| 72 49 6e 66 6f 25 2c 2c | 4d 6f 75 73 65 25 0d 18 |rInfo%,,|Mouse%..|
|00004890| 10 3f 20 20 20 e7 20 25 | 30 30 31 20 80 20 4d 6f |.? . %|001 . Mo|
|000048a0| 75 73 65 25 21 62 75 74 | 74 6f 6e 73 20 f2 4f 70 |use%!but|tons .Op|
|000048b0| 65 6e 4d 61 69 6e 4d 65 | 6e 75 20 3a f4 20 70 65 |enMainMe|nu :. pe|
|000048c0| 72 73 69 73 74 65 6e 74 | 20 6d 65 6e 75 0d 18 1a |rsistent| menu...|
|000048d0| 08 20 20 20 cd 0d 18 24 | 05 e1 0d 18 2e 04 0d 18 |. ...$|........|
|000048e0| 38 20 dd 20 f2 53 65 74 | 4d 65 6e 75 54 69 63 6b |8 . .Set|MenuTick|
|000048f0| 28 6d 65 6e 75 25 2c 20 | 74 68 69 73 25 29 0d 18 |(menu%, |this%)..|
|00004900| 42 2d f4 20 73 65 74 20 | 31 20 74 69 63 6b 20 69 |B-. set |1 tick i|
|00004910| 6e 20 6d 65 6e 75 20 61 | 6e 64 20 63 6c 65 61 72 |n menu a|nd clear|
|00004920| 20 61 6c 6c 20 6f 74 68 | 65 72 73 0d 18 4c 0e ea | all oth|ers..L..|
|00004930| 20 6e 2c 20 69 74 65 6d | 25 0d 18 56 09 6e 20 3d | n, item|%..V.n =|
|00004940| 20 30 0d 18 60 12 69 74 | 65 6d 25 3d 6d 65 6e 75 | 0..`.it|em%=menu|
|00004950| 25 2b 32 38 0d 18 6a 3e | 21 69 74 65 6d 25 20 3d |%+28..j>|!item% =|
|00004960| 20 a4 53 65 74 42 69 74 | 28 6e 3d 74 68 69 73 25 | .SetBit|(n=this%|
|00004970| 2c 20 21 69 74 65 6d 25 | 2c 20 30 29 20 20 3a f4 |, !item%|, 0) :.|
|00004980| 20 73 65 74 20 6f 72 20 | 63 6c 65 61 72 20 74 69 | set or |clear ti|
|00004990| 63 6b 0d 18 74 05 f5 0d | 18 7e 10 20 69 74 65 6d |ck..t...|.~. item|
|000049a0| 25 20 2b 3d 20 32 34 0d | 18 88 0b 20 6e 20 2b 3d |% += 24.|... n +=|
|000049b0| 20 31 0d 18 92 3f 20 21 | 69 74 65 6d 25 20 3d 20 | 1...? !|item% = |
|000049c0| a4 53 65 74 42 69 74 28 | 6e 3d 74 68 69 73 25 2c |.SetBit(|n=this%,|
|000049d0| 20 21 69 74 65 6d 25 2c | 20 30 29 20 20 3a f4 20 | !item%,| 0) :. |
|000049e0| 73 65 74 20 6f 72 20 63 | 6c 65 61 72 20 74 69 63 |set or c|lear tic|
|000049f0| 6b 0d 18 9c 15 20 fd 20 | 28 21 69 74 65 6d 25 20 |k.... . |(!item% |
|00004a00| 80 20 26 38 30 29 0d 18 | a6 05 e1 0d 18 b0 04 0d |. &80)..|........|
|00004a10| 18 ba 11 dd 20 f2 4b 65 | 79 50 72 65 73 73 65 64 |.... .Ke|yPressed|
|00004a20| 0d 18 c4 11 ea 20 54 68 | 69 73 57 69 6e 64 6f 77 |..... Th|isWindow|
|00004a30| 25 0d 18 ce 20 e7 20 21 | 28 57 69 6e 64 6f 77 25 |%... . !|(Window%|
|00004a40| 2b 68 61 6e 64 6c 65 25 | 2b 32 34 29 3d 31 33 20 |+handle%|+24)=13 |
|00004a50| 8c 0d 18 d8 21 20 20 54 | 68 69 73 57 69 6e 64 6f |....! T|hisWindo|
|00004a60| 77 25 3d 57 69 6e 64 6f | 77 25 21 68 61 6e 64 6c |w%=Windo|w%!handl|
|00004a70| 65 25 0d 18 e2 18 20 20 | c8 8e 20 28 54 68 69 73 |e%.... |.. (This|
|00004a80| 57 69 6e 64 6f 77 25 29 | 20 ca 0d 18 ec 49 20 20 |Window%)| ....I |
|00004a90| 20 20 c9 20 53 61 76 65 | 5f 68 25 20 3a 20 f2 73 | . Save|_h% : .s|
|00004aa0| 61 76 65 5f 6d 75 73 69 | 63 28 a4 47 65 74 53 74 |ave_musi|c(.GetSt|
|00004ab0| 72 28 53 61 76 65 54 65 | 78 74 29 29 20 3a 20 f4 |r(SaveTe|xt)) : .|
|00004ac0| 20 63 2f 72 20 69 6e 20 | 73 61 76 65 20 77 69 6e | c/r in |save win|
|00004ad0| 64 6f 77 0d 18 f6 49 20 | 20 20 20 c9 20 4c 6f 61 |dow...I | . Loa|
|00004ae0| 64 5f 68 25 20 3a 20 f2 | 6c 6f 61 64 5f 6d 75 73 |d_h% : .|load_mus|
|00004af0| 69 63 28 a4 47 65 74 53 | 74 72 28 4c 6f 61 64 54 |ic(.GetS|tr(LoadT|
|00004b00| 65 78 74 29 29 20 3a 20 | f4 20 63 2f 72 20 69 6e |ext)) : |. c/r in|
|00004b10| 20 6c 6f 61 64 20 77 69 | 6e 64 6f 77 0d 19 00 10 | load wi|ndow....|
|00004b20| 20 20 20 20 c9 20 42 61 | 72 5f 68 25 0d 19 0a 19 | . Ba|r_h%....|
|00004b30| 20 20 20 20 20 42 41 52 | 25 3d bb 28 24 42 61 72 | BAR|%=.($Bar|
|00004b40| 4e 75 6d 25 29 0d 19 14 | 33 20 20 20 20 20 e7 20 |Num%)...|3 . |
|00004b50| 42 41 52 25 3e 4e 42 61 | 72 73 25 20 42 41 52 25 |BAR%>NBa|rs% BAR%|
|00004b60| 3d 4e 42 61 72 73 25 20 | 8b e7 20 42 41 52 25 3c |=NBars% |.. BAR%<|
|00004b70| 30 20 42 41 52 25 3d 30 | 0d 19 1e 25 20 20 20 20 |0 BAR%=0|...% |
|00004b80| 20 57 69 6e 64 6f 77 25 | 21 68 61 6e 64 6c 65 25 | Window%|!handle%|
|00004b90| 3d 53 63 6f 72 65 57 69 | 6e 64 5f 68 25 0d 19 28 |=ScoreWi|nd_h%..(|
|00004ba0| 2c 20 20 20 20 20 c8 99 | 20 47 65 74 57 69 6e 64 |, ..| GetWind|
|00004bb0| 6f 77 53 74 61 74 65 25 | 2c 2c 57 69 6e 64 6f 77 |owState%|,,Window|
|00004bc0| 25 2b 68 61 6e 64 6c 65 | 25 0d 19 32 25 20 20 20 |%+handle|%..2% |
|00004bd0| 20 20 57 69 6e 64 6f 77 | 25 21 73 63 78 25 3d 50 | Window|%!scx%=P|
|00004be0| 58 25 28 50 58 6e 25 28 | 42 41 52 25 29 29 0d 19 |X%(PXn%(|BAR%))..|
|00004bf0| 3c 4f 20 20 20 20 20 c8 | 99 20 4f 70 65 6e 57 69 |<O .|. OpenWi|
|00004c00| 6e 64 6f 77 25 2c 2c 57 | 69 6e 64 6f 77 25 2b 68 |ndow%,,W|indow%+h|
|00004c10| 61 6e 64 6c 65 25 20 3a | 20 f4 20 73 65 74 20 73 |andle% :| . set s|
|00004c20| 63 72 6f 6c 6c 20 74 6f | 20 72 65 71 75 65 73 74 |croll to| request|
|00004c30| 65 64 20 62 61 72 20 6e | 75 6d 62 65 72 0d 19 46 |ed bar n|umber..F|
|00004c40| 2f 20 20 20 20 20 c8 99 | 20 47 65 74 57 69 6e 64 |/ ..| GetWind|
|00004c50| 6f 77 53 74 61 74 65 25 | 2c 2c 53 63 6f 72 65 57 |owState%|,,ScoreW|
|00004c60| 42 6c 6b 25 2b 68 61 6e | 64 6c 65 25 0d 19 50 55 |Blk%+han|dle%..PU|
|00004c70| 20 20 20 20 20 4c 48 42 | 41 52 25 3d a4 46 69 6e | LHB|AR%=.Fin|
|00004c80| 64 42 61 72 28 53 63 6f | 72 65 57 42 6c 6b 25 21 |dBar(Sco|reWBlk%!|
|00004c90| 73 63 78 25 29 20 3a f4 | 20 74 68 65 20 62 61 72 |scx%) :.| the bar|
|00004ca0| 20 6e 75 6d 62 65 72 20 | 61 74 20 74 68 65 20 6c | number |at the l|
|00004cb0| 65 66 74 20 6f 66 20 74 | 68 65 20 77 69 6e 64 6f |eft of t|he windo|
|00004cc0| 77 0d 19 5a 55 20 20 20 | 7f 20 3a 20 c8 99 20 22 |w..ZU |. : .. "|
|00004cd0| 57 69 6d 70 5f 50 72 6f | 63 65 73 73 4b 65 79 22 |Wimp_Pro|cessKey"|
|00004ce0| 2c 21 28 57 69 6e 64 6f | 77 25 2b 68 61 6e 64 6c |,!(Windo|w%+handl|
|00004cf0| 65 25 2b 32 34 29 20 3a | 20 f4 20 20 69 65 2e 20 |e%+24) :| . ie. |
|00004d00| 70 61 73 73 20 6f 6e 20 | 6b 65 79 20 63 6f 64 65 |pass on |key code|
|00004d10| 20 69 6e 20 52 30 0d 19 | 64 08 20 20 20 cb 0d 19 | in R0..|d. ...|
|00004d20| 6e 1f 20 20 f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 |n. .Clo|seWindow|
|00004d30| 28 54 68 69 73 57 69 6e | 64 6f 77 25 29 0d 19 78 |(ThisWin|dow%)..x|
|00004d40| 10 20 20 f2 43 6c 6f 73 | 65 4d 65 6e 75 0d 19 82 |. .Clos|eMenu...|
|00004d50| 07 20 20 cc 0d 19 8c 4f | 20 20 c8 99 20 22 57 69 |. ....O| .. "Wi|
|00004d60| 6d 70 5f 50 72 6f 63 65 | 73 73 4b 65 79 22 2c 21 |mp_Proce|ssKey",!|
|00004d70| 28 57 69 6e 64 6f 77 25 | 2b 68 61 6e 64 6c 65 25 |(Window%|+handle%|
|00004d80| 2b 32 34 29 20 3a 20 f4 | 20 69 65 2e 20 70 61 73 |+24) : .| ie. pas|
|00004d90| 73 20 6f 6e 20 6b 65 79 | 20 63 6f 64 65 20 69 6e |s on key| code in|
|00004da0| 20 52 30 0d 19 96 07 20 | 20 cd 0d 19 a0 05 e1 0d | R0.... | .......|
|00004db0| 19 aa 04 0d 19 b4 26 dd | 20 f2 53 63 72 6f 6c 6c |......&.| .Scroll|
|00004dc0| 52 65 71 28 78 5f 73 63 | 72 6f 6c 6c 25 2c 20 79 |Req(x_sc|roll%, y|
|00004dd0| 5f 73 63 72 6f 6c 6c 25 | 29 0d 19 be 47 f4 20 69 |_scroll%|)...G. i|
|00004de0| 66 20 62 61 64 20 6d 6f | 64 65 20 64 69 73 61 6c |f bad mo|de disal|
|00004df0| 6c 6f 77 20 73 63 72 6f | 6c 6c 20 74 6f 20 70 72 |low scro|ll to pr|
|00004e00| 65 76 65 6e 74 20 6d 6f | 64 65 20 77 61 72 6e 69 |event mo|de warni|
|00004e10| 6e 67 20 62 65 69 6e 67 | 20 67 61 72 62 6c 65 64 |ng being| garbled|
|00004e20| 0d 19 c8 10 e7 20 42 41 | 44 4d 4f 44 45 25 20 e1 |..... BA|DMODE% .|
|00004e30| 0d 19 d2 24 e7 20 57 69 | 6e 64 6f 77 25 21 68 61 |...$. Wi|ndow%!ha|
|00004e40| 6e 64 6c 65 25 3d 53 63 | 6f 72 65 57 69 6e 64 5f |ndle%=Sc|oreWind_|
|00004e50| 68 25 20 8c 0d 19 dc 21 | 20 20 e7 20 50 4c 41 59 |h% ....!| . PLAY|
|00004e60| 49 4e 47 25 80 28 78 5f | 73 63 72 6f 6c 6c 25 3c |ING%.(x_|scroll%<|
|00004e70| 3e 30 29 20 e1 0d 19 e6 | 17 20 20 c8 8e 20 94 28 |>0) ....|. .. .(|
|00004e80| 78 5f 73 63 72 6f 6c 6c | 25 29 20 ca 0d 19 f0 2b |x_scroll|%) ....+|
|00004e90| 20 20 20 20 c9 20 31 3a | 57 69 6e 64 6f 77 25 21 | . 1:|Window%!|
|00004ea0| 73 63 78 25 2b 3d 78 5f | 73 63 72 6f 6c 6c 25 2a |scx%+=x_|scroll%*|
|00004eb0| 34 2a 50 67 61 70 25 0d | 19 fa 41 20 20 20 20 c9 |4*Pgap%.|..A .|
|00004ec0| 20 32 3a 57 69 6e 64 6f | 77 25 21 73 63 78 25 2b | 2:Windo|w%!scx%+|
|00004ed0| 3d 28 78 5f 73 63 72 6f | 6c 6c 25 2f 32 29 2a 28 |=(x_scro|ll%/2)*(|
|00004ee0| 57 69 6e 64 6f 77 25 21 | 78 31 25 2d 57 69 6e 64 |Window%!|x1%-Wind|
|00004ef0| 6f 77 25 21 78 30 25 29 | 0d 1a 04 09 20 20 20 20 |ow%!x0%)|.... |
|00004f00| cb 0d 1a 0e 17 20 20 c8 | 8e 20 94 28 79 5f 73 63 |..... .|. .(y_sc|
|00004f10| 72 6f 6c 6c 25 29 20 ca | 0d 1a 18 2d 20 20 20 20 |roll%) .|...- |
|00004f20| c9 20 31 3a 57 69 6e 64 | 6f 77 25 21 73 63 79 25 |. 1:Wind|ow%!scy%|
|00004f30| 2b 3d 79 5f 73 63 72 6f | 6c 6c 25 2a 43 5f 48 65 |+=y_scro|ll%*C_He|
|00004f40| 69 67 68 74 25 0d 1a 22 | 41 20 20 20 20 c9 20 32 |ight%.."|A . 2|
|00004f50| 3a 57 69 6e 64 6f 77 25 | 21 73 63 79 25 2b 3d 28 |:Window%|!scy%+=(|
|00004f60| 79 5f 73 63 72 6f 6c 6c | 25 2f 32 29 2a 28 57 69 |y_scroll|%/2)*(Wi|
|00004f70| 6e 64 6f 77 25 21 79 31 | 25 2d 57 69 6e 64 6f 77 |ndow%!y1|%-Window|
|00004f80| 25 21 79 30 25 29 0d 1a | 2c 09 20 20 20 20 cb 0d |%!y0%)..|,. ..|
|00004f90| 1a 36 26 20 20 c8 99 20 | 4f 70 65 6e 57 69 6e 64 |.6& .. |OpenWind|
|00004fa0| 6f 77 25 2c 20 2c 57 69 | 6e 64 6f 77 25 2b 68 61 |ow%, ,Wi|ndow%+ha|
|00004fb0| 6e 64 6c 65 25 0d 1a 40 | 2c 20 20 c8 99 20 47 65 |ndle%..@|, .. Ge|
|00004fc0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 25 2c 2c 53 |tWindowS|tate%,,S|
|00004fd0| 63 6f 72 65 57 42 6c 6b | 25 2b 68 61 6e 64 6c 65 |coreWBlk|%+handle|
|00004fe0| 25 0d 1a 4a 14 20 20 53 | 63 6f 72 65 43 6c 6f 73 |%..J. S|coreClos|
|00004ff0| 65 64 25 3d a3 0d 1a 54 | 52 20 20 4c 48 42 41 52 |ed%=...T|R LHBAR|
|00005000| 25 3d a4 46 69 6e 64 42 | 61 72 28 53 63 6f 72 65 |%=.FindB|ar(Score|
|00005010| 57 42 6c 6b 25 21 73 63 | 78 25 29 20 3a f4 20 74 |WBlk%!sc|x%) :. t|
|00005020| 68 65 20 62 61 72 20 6e | 75 6d 62 65 72 20 61 74 |he bar n|umber at|
|00005030| 20 74 68 65 20 6c 65 66 | 74 20 6f 66 20 74 68 65 | the lef|t of the|
|00005040| 20 77 69 6e 64 6f 77 0d | 1a 5e 07 20 20 cd 0d 1a | window.|.^. ...|
|00005050| 68 05 e1 0d 1a 72 04 0d | 1a 7c 13 dd 20 f2 4f 70 |h....r..|.|.. .Op|
|00005060| 65 6e 4d 61 69 6e 4d 65 | 6e 75 0d 1a 86 0b ea 20 |enMainMe|nu..... |
|00005070| 69 74 65 6d 25 0d 1a 90 | 2c 69 74 65 6d 25 20 3d |item%...|,item% =|
|00005080| 20 a4 46 69 6e 64 4d 65 | 6e 75 49 74 65 6d 28 22 | .FindMe|nuItem("|
|00005090| 50 6c 61 79 22 2c 20 4d | 65 6e 75 53 74 61 72 74 |Play", M|enuStart|
|000050a0| 29 0d 1a 9a 36 e7 20 28 | 69 74 65 6d 25 3e 3d 30 |)...6. (|item%>=0|
|000050b0| 29 20 21 69 74 65 6d 25 | 20 3d 20 a4 53 65 74 42 |) !item%| = .SetB|
|000050c0| 69 74 28 50 4c 41 59 49 | 4e 47 25 2c 20 21 69 74 |it(PLAYI|NG%, !it|
|000050d0| 65 6d 25 2c 20 30 29 0d | 1a a4 17 f4 20 73 65 74 |em%, 0).|.... set|
|000050e0| 20 6f 72 20 63 6c 65 61 | 72 20 74 69 63 6b 0d 1a | or clea|r tick..|
|000050f0| ae 2c 69 74 65 6d 25 20 | 3d 20 a4 46 69 6e 64 4d |.,item% |= .FindM|
|00005100| 65 6e 75 49 74 65 6d 28 | 22 47 6f 74 6f 22 2c 20 |enuItem(|"Goto", |
|00005110| 4d 65 6e 75 53 74 61 72 | 74 29 0d 1a b8 39 e7 20 |MenuStar|t)...9. |
|00005120| 28 69 74 65 6d 25 3e 3d | 30 29 20 69 74 65 6d 25 |(item%>=|0) item%|
|00005130| 21 38 20 3d 20 a4 53 65 | 74 42 69 74 28 50 4c 41 |!8 = .Se|tBit(PLA|
|00005140| 59 49 4e 47 25 2c 20 69 | 74 65 6d 25 21 38 2c 20 |YING%, i|tem%!8, |
|00005150| 32 32 29 0d 1a c2 2b f4 | 20 73 68 61 64 65 64 20 |22)...+.| shaded |
|00005160| 62 69 74 2e 20 64 69 73 | 61 62 6c 65 20 47 6f 74 |bit. dis|able Got|
|00005170| 6f 20 77 68 65 6e 20 70 | 6c 61 79 69 6e 67 0d 1a |o when p|laying..|
|00005180| cc 48 c8 99 20 43 72 65 | 61 74 65 4d 65 6e 75 2c |.H.. Cre|ateMenu,|
|00005190| 20 2c 4d 65 6e 75 53 74 | 61 72 74 2c 20 4d 6f 75 | ,MenuSt|art, Mou|
|000051a0| 73 65 5f 58 25 2d 43 5f | 57 69 64 74 68 25 2a 34 |se_X%-C_|Width%*4|
|000051b0| 2c 20 4d 6f 75 73 65 5f | 59 25 2b 43 5f 48 65 69 |, Mouse_|Y%+C_Hei|
|000051c0| 67 68 74 25 2a 34 0d 1a | d6 1a 43 75 72 72 65 6e |ght%*4..|..Curren|
|000051d0| 74 4d 65 6e 75 25 3d 4d | 65 6e 75 53 74 61 72 74 |tMenu%=M|enuStart|
|000051e0| 0d 1a e0 19 f2 43 6c 6f | 73 65 57 69 6e 64 6f 77 |.....Clo|seWindow|
|000051f0| 28 53 61 76 65 5f 68 25 | 29 0d 1a ea 19 f2 43 6c |(Save_h%|).....Cl|
|00005200| 6f 73 65 57 69 6e 64 6f | 77 28 4c 6f 61 64 5f 68 |oseWindo|w(Load_h|
|00005210| 25 29 0d 1a f4 05 e1 0d | 1a fe 04 0d 1b 08 16 dd |%)......|........|
|00005220| 20 f2 4f 70 65 6e 4d 65 | 6e 75 28 4d 65 6e 75 25 | .OpenMe|nu(Menu%|
|00005230| 29 0d 1b 12 19 e7 20 28 | 4d 65 6e 75 25 3d 49 63 |)..... (|Menu%=Ic|
|00005240| 6f 6e 4d 65 6e 75 25 29 | 20 8c 0d 1b 1c 5d 20 20 |onMenu%)| ....] |
|00005250| c8 99 20 43 72 65 61 74 | 65 4d 65 6e 75 2c 20 2c |.. Creat|eMenu, ,|
|00005260| 49 63 6f 6e 4d 65 6e 75 | 25 2c 20 4d 6f 75 73 65 |IconMenu|%, Mouse|
|00005270| 5f 58 25 2d 43 5f 57 69 | 64 74 68 25 2a 34 2c 20 |_X%-C_Wi|dth%*4, |
|00005280| 31 31 32 2b 43 5f 48 65 | 69 67 68 74 25 2a 32 3a |112+C_He|ight%*2:|
|00005290| f4 20 79 20 61 64 6a 75 | 73 74 65 64 20 74 6f 20 |. y adju|sted to |
|000052a0| 6c 69 6e 65 20 75 70 0d | 1b 26 05 cc 0d 1b 30 44 |line up.|.&....0D|
|000052b0| 20 20 c8 99 20 43 72 65 | 61 74 65 4d 65 6e 75 2c | .. Cre|ateMenu,|
|000052c0| 20 2c 4d 65 6e 75 25 2c | 20 4d 6f 75 73 65 5f 58 | ,Menu%,| Mouse_X|
|000052d0| 25 2d 43 5f 57 69 64 74 | 68 25 2a 34 2c 20 4d 6f |%-C_Widt|h%*4, Mo|
|000052e0| 75 73 65 5f 59 25 2b 43 | 5f 48 65 69 67 68 74 25 |use_Y%+C|_Height%|
|000052f0| 0d 1b 3a 05 cd 0d 1b 44 | 16 43 75 72 72 65 6e 74 |..:....D|.Current|
|00005300| 4d 65 6e 75 25 3d 4d 65 | 6e 75 25 0d 1b 4e 19 f2 |Menu%=Me|nu%..N..|
|00005310| 43 6c 6f 73 65 57 69 6e | 64 6f 77 28 53 61 76 65 |CloseWin|dow(Save|
|00005320| 5f 68 25 29 0d 1b 58 19 | f2 43 6c 6f 73 65 57 69 |_h%)..X.|.CloseWi|
|00005330| 6e 64 6f 77 28 4c 6f 61 | 64 5f 68 25 29 0d 1b 62 |ndow(Loa|d_h%)..b|
|00005340| 05 e1 0d 1b 6c 04 0d 1b | 76 10 dd 20 f2 43 6c 6f |....l...|v.. .Clo|
|00005350| 73 65 4d 65 6e 75 0d 1b | 80 16 c8 99 20 43 72 65 |seMenu..|.... Cre|
|00005360| 61 74 65 4d 65 6e 75 2c | 20 2c 2d 31 0d 1b 8a 19 |ateMenu,| ,-1....|
|00005370| f2 43 6c 6f 73 65 57 69 | 6e 64 6f 77 28 53 61 76 |.CloseWi|ndow(Sav|
|00005380| 65 5f 68 25 29 0d 1b 94 | 19 f2 43 6c 6f 73 65 57 |e_h%)...|..CloseW|
|00005390| 69 6e 64 6f 77 28 4c 6f | 61 64 5f 68 25 29 0d 1b |indow(Lo|ad_h%)..|
|000053a0| 9e 05 e1 0d 1b a8 04 0d | 1b b2 15 dd 20 f2 73 79 |........|.... .sy|
|000053b0| 6d 62 6f 6c 5f 70 6f 69 | 6e 74 65 72 0d 1b bc 1e |mbol_poi|nter....|
|000053c0| c8 99 20 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |.. GetPo|interInf|
|000053d0| 6f 25 2c 2c 4d 6f 75 73 | 65 25 0d 1b c6 41 e7 20 |o%,,Mous|e%...A. |
|000053e0| 28 4d 6f 75 73 65 25 21 | 77 69 6e 64 6f 77 3d 53 |(Mouse%!|window=S|
|000053f0| 63 6f 72 65 57 69 6e 64 | 5f 68 25 29 20 f2 73 63 |coreWind|_h%) .sc|
|00005400| 72 69 62 65 28 4d 6f 75 | 73 65 25 21 78 30 25 2c |ribe(Mou|se%!x0%,|
|00005410| 4d 6f 75 73 65 25 21 79 | 30 25 29 0d 1b d0 05 e1 |Mouse%!y|0%).....|
|00005420| 0d 1b da 04 0d 1b e4 12 | dd 20 f2 53 74 6f 70 53 |........|. .StopS|
|00005430| 63 6f 72 69 6e 67 0d 1b | ee 12 73 74 6f 70 53 43 |coring..|..stopSC|
|00005440| 4f 52 49 4e 47 25 3d b9 | 0d 1b f8 0c f2 72 65 6c |ORING%=.|.....rel|
|00005450| 65 61 73 65 0d 1c 02 4a | f2 55 70 64 61 74 65 49 |ease...J|.UpdateI|
|00005460| 63 6f 6e 28 53 65 6c 57 | 25 2c 20 53 65 6c 49 25 |con(SelW|%, SelI%|
|00005470| 2c 20 30 2c 20 31 3c 3c | 32 29 20 3a f4 20 72 65 |, 0, 1<<|2) :. re|
|00005480| 6d 6f 76 65 20 68 69 67 | 68 6c 69 67 68 74 20 6f |move hig|hlight o|
|00005490| 6e 20 69 63 6f 6e 20 69 | 6e 20 70 61 6e 65 0d 1c |n icon i|n pane..|
|000054a0| 0c 05 e1 0d 1c 16 04 0d | 1c 20 16 dd 20 f2 55 70 |........|. .. .Up|
|000054b0| 64 61 74 65 54 69 74 6c | 65 28 54 24 29 0d 1c 2a |dateTitl|e(T$)..*|
|000054c0| 0d ea 20 61 2c 62 2c 63 | 2c 64 0d 1c 34 18 24 53 |.. a,b,c|,d..4.$S|
|000054d0| 63 6f 72 65 54 69 74 6c | 65 25 3d 54 24 2b bd 28 |coreTitl|e%=T$+.(|
|000054e0| 30 29 0d 1c 3e 20 57 69 | 6e 64 6f 77 25 21 68 61 |0)..> Wi|ndow%!ha|
|000054f0| 6e 64 6c 65 25 3d 53 63 | 6f 72 65 57 69 6e 64 5f |ndle%=Sc|oreWind_|
|00005500| 68 25 0d 1c 48 27 c8 99 | 20 47 65 74 57 69 6e 64 |h%..H'..| GetWind|
|00005510| 6f 77 53 74 61 74 65 25 | 2c 2c 57 69 6e 64 6f 77 |owState%|,,Window|
|00005520| 25 2b 68 61 6e 64 6c 65 | 25 0d 1c 52 54 61 3d 57 |%+handle|%..RTa=W|
|00005530| 69 6e 64 6f 77 25 21 78 | 30 25 20 3a 20 62 3d 57 |indow%!x|0% : b=W|
|00005540| 69 6e 64 6f 77 25 21 79 | 31 25 20 3a 20 63 3d 57 |indow%!y|1% : c=W|
|00005550| 69 6e 64 6f 77 25 21 78 | 31 25 20 3a f4 20 67 65 |indow%!x|1% :. ge|
|00005560| 74 20 74 69 74 6c 65 20 | 61 72 65 61 20 61 6e 64 |t title |area and|
|00005570| 20 66 6f 72 63 65 20 72 | 65 64 72 61 77 0d 1c 5c | force r|edraw..\|
|00005580| 28 c8 99 20 47 65 74 57 | 69 6e 64 6f 77 4f 75 74 |(.. GetW|indowOut|
|00005590| 6c 69 6e 65 2c 2c 57 69 | 6e 64 6f 77 25 2b 68 61 |line,,Wi|ndow%+ha|
|000055a0| 6e 64 6c 65 25 0d 1c 66 | 11 64 3d 57 69 6e 64 6f |ndle%..f|.d=Windo|
|000055b0| 77 25 21 79 31 25 0d 1c | 70 2d c8 99 20 46 6f 72 |w%!y1%..|p-.. For|
|000055c0| 63 65 52 65 64 72 61 77 | 2c 2d 31 2c 61 2b 48 69 |ceRedraw|,-1,a+Hi|
|000055d0| 25 2c 62 2b 56 69 25 2c | 63 2d 48 69 25 2c 64 2b |%,b+Vi%,|c-Hi%,d+|
|000055e0| 56 69 25 0d 1c 7a 05 e1 | 0d 1c 84 04 0d 1c 8e 1d |Vi%..z..|........|
|000055f0| dd 20 f2 4f 70 65 6e 57 | 69 6e 64 6f 77 28 68 25 |. .OpenW|indow(h%|
|00005600| 2c 20 78 25 2c 20 79 25 | 29 0d 1c 98 14 ea 20 78 |, x%, y%|)..... x|
|00005610| 73 69 7a 65 25 2c 20 79 | 73 69 7a 65 25 0d 1c a2 |size%, y|size%...|
|00005620| 18 57 69 6e 64 6f 77 25 | 21 68 61 6e 64 6c 65 25 |.Window%|!handle%|
|00005630| 20 3d 20 68 25 0d 1c ac | 28 c8 99 20 47 65 74 57 | = h%...|(.. GetW|
|00005640| 69 6e 64 6f 77 53 74 61 | 74 65 25 2c 20 2c 57 69 |indowSta|te%, ,Wi|
|00005650| 6e 64 6f 77 25 2b 68 61 | 6e 64 6c 65 25 0d 1c b6 |ndow%+ha|ndle%...|
|00005660| 22 78 73 69 7a 65 25 3d | 57 69 6e 64 6f 77 25 21 |"xsize%=|Window%!|
|00005670| 78 31 25 2d 57 69 6e 64 | 6f 77 25 21 78 30 25 0d |x1%-Wind|ow%!x0%.|
|00005680| 1c c0 22 79 73 69 7a 65 | 25 3d 57 69 6e 64 6f 77 |.."ysize|%=Window|
|00005690| 25 21 79 31 25 2d 57 69 | 6e 64 6f 77 25 21 79 30 |%!y1%-Wi|ndow%!y0|
|000056a0| 25 0d 1c ca 15 57 69 6e | 64 6f 77 25 21 75 6e 64 |%....Win|dow%!und|
|000056b0| 65 72 25 3d 2d 31 0d 1c | d4 12 57 69 6e 64 6f 77 |er%=-1..|..Window|
|000056c0| 25 21 78 30 25 3d 78 25 | 0d 1c de 22 57 69 6e 64 |%!x0%=x%|..."Wind|
|000056d0| 6f 77 25 21 78 31 25 3d | 57 69 6e 64 6f 77 25 21 |ow%!x1%=|Window%!|
|000056e0| 78 30 25 2b 78 73 69 7a | 65 25 0d 1c e8 12 57 69 |x0%+xsiz|e%....Wi|
|000056f0| 6e 64 6f 77 25 21 79 30 | 25 3d 79 25 0d 1c f2 22 |ndow%!y0|%=y%..."|
|00005700| 57 69 6e 64 6f 77 25 21 | 79 31 25 3d 57 69 6e 64 |Window%!|y1%=Wind|
|00005710| 6f 77 25 21 79 30 25 2b | 79 73 69 7a 65 25 0d 1c |ow%!y0%+|ysize%..|
|00005720| fc 24 c8 99 20 4f 70 65 | 6e 57 69 6e 64 6f 77 25 |.$.. Ope|nWindow%|
|00005730| 2c 20 2c 57 69 6e 64 6f | 77 25 2b 68 61 6e 64 6c |, ,Windo|w%+handl|
|00005740| 65 25 0d 1d 06 05 e1 0d | 1d 10 04 0d 1d 1a 16 dd |e%......|........|
|00005750| 20 f2 43 6c 6f 73 65 57 | 69 6e 64 6f 77 28 68 25 | .CloseW|indow(h%|
|00005760| 29 0d 1d 24 16 57 69 6e | 64 6f 77 25 21 68 61 6e |)..$.Win|dow%!han|
|00005770| 64 6c 65 25 3d 68 25 0d | 1d 2e 25 c8 99 20 43 6c |dle%=h%.|..%.. Cl|
|00005780| 6f 73 65 57 69 6e 64 6f | 77 25 2c 20 2c 57 69 6e |oseWindo|w%, ,Win|
|00005790| 64 6f 77 25 2b 68 61 6e | 64 6c 65 25 0d 1d 38 05 |dow%+han|dle%..8.|
|000057a0| e1 0d 1d 42 04 0d 1d 4c | 14 dd 20 f2 53 65 74 45 |...B...L|.. .SetE|
|000057b0| 78 74 65 6e 74 28 57 25 | 29 0d 1d 56 13 53 63 6f |xtent(W%|)..V.Sco|
|000057c0| 72 65 5f 57 69 64 74 68 | 25 3d 57 25 0d 1d 60 11 |re_Width|%=W%..`.|
|000057d0| 57 69 6e 64 6f 77 25 21 | 78 30 25 3d 30 0d 1d 6a |Window%!|x0%=0..j|
|000057e0| 2a 57 69 6e 64 6f 77 25 | 21 79 30 25 3d 2d 53 63 |*Window%|!y0%=-Sc|
|000057f0| 6f 72 65 5f 48 65 69 67 | 68 74 25 2d 50 61 6e 65 |ore_Heig|ht%-Pane|
|00005800| 48 65 69 67 68 74 25 0d | 1d 74 1c 57 69 6e 64 6f |Height%.|.t.Windo|
|00005810| 77 25 21 78 31 25 3d 53 | 63 6f 72 65 5f 57 69 64 |w%!x1%=S|core_Wid|
|00005820| 74 68 25 0d 1d 7e 1b 57 | 69 6e 64 6f 77 25 21 79 |th%..~.W|indow%!y|
|00005830| 31 25 3d 50 61 6e 65 48 | 65 69 67 68 74 25 0d 1d |1%=PaneH|eight%..|
|00005840| 88 25 c8 99 20 53 65 74 | 45 78 74 65 6e 74 2c 53 |.%.. Set|Extent,S|
|00005850| 63 6f 72 65 57 69 6e 64 | 5f 68 25 2c 57 69 6e 64 |coreWind|_h%,Wind|
|00005860| 6f 77 25 0d 1d 92 05 e1 | 0d 1d 9c 04 0d 1d a6 2e |ow%.....|........|
|00005870| dd 20 a4 47 65 74 4c 65 | 61 66 4e 61 6d 65 28 6e |. .GetLe|afName(n|
|00005880| 61 6d 65 25 29 20 3a f4 | 20 72 65 74 75 72 6e 73 |ame%) :.| returns|
|00005890| 20 6c 65 61 66 20 6e 61 | 6d 65 0d 1d b0 12 ea 20 | leaf na|me..... |
|000058a0| 63 68 24 2c 6e 25 2c 6e | 61 6d 65 24 0d 1d ba 18 |ch$,n%,n|ame$....|
|000058b0| 6e 61 6d 65 24 3d a4 47 | 65 74 53 74 72 28 6e 61 |name$=.G|etStr(na|
|000058c0| 6d 65 25 29 0d 1d c4 33 | e7 20 28 20 28 a7 6e 61 |me%)...3|. ( (.na|
|000058d0| 6d 65 24 2c 22 2e 22 29 | 3d 30 29 20 80 20 28 a7 |me$,".")|=0) . (.|
|000058e0| 6e 61 6d 65 24 2c 22 3a | 22 29 3d 30 29 20 29 20 |name$,":|")=0) ) |
|000058f0| 8c 3d 6e 61 6d 65 24 0d | 1d ce 0f 6e 25 3d a9 28 |.=name$.|...n%=.(|
|00005900| 6e 61 6d 65 24 29 0d 1d | d8 2b f4 20 73 63 61 6e |name$)..|.+. scan|
|00005910| 20 73 74 72 69 6e 67 20 | 74 6f 20 66 69 6e 64 20 | string |to find |
|00005920| 6c 65 61 66 20 6e 61 6d | 65 20 6f 66 20 66 69 6c |leaf nam|e of fil|
|00005930| 65 0d 1d e2 05 f5 0d 1d | ec 19 20 20 63 68 24 3d |e.......|.. ch$=|
|00005940| 20 c1 6e 61 6d 65 24 2c | 20 6e 25 2c 20 31 29 0d | .name$,| n%, 1).|
|00005950| 1d f6 0b 20 20 6e 25 2d | 3d 31 0d 1e 00 23 20 20 |... n%-|=1...# |
|00005960| fd 20 28 6e 25 3c 3d 30 | 20 84 20 63 68 24 3d 22 |. (n%<=0| . ch$="|
|00005970| 2e 22 20 84 20 63 68 24 | 3d 22 3a 22 29 0d 1e 0a |." . ch$|=":")...|
|00005980| 24 e7 20 6e 25 3e 30 20 | 8c 20 3d c2 6e 61 6d 65 |$. n%>0 |. =.name|
|00005990| 24 2c 20 a9 28 6e 61 6d | 65 24 29 2d 6e 25 2d 31 |$, .(nam|e$)-n%-1|
|000059a0| 29 0d 1e 14 04 0d 1e 1e | 20 dd 20 a4 47 65 74 53 |).......| . .GetS|
|000059b0| 74 72 28 73 25 29 20 3a | 20 f4 20 67 65 74 20 73 |tr(s%) :| . get s|
|000059c0| 74 72 69 6e 67 0d 1e 28 | 08 ea 20 6e 24 0d 1e 32 |tring..(|.. n$..2|
|000059d0| 1a c8 95 3f 73 25 3a 6e | 24 2b 3d bd 3f 73 25 3a |...?s%:n|$+=.?s%:|
|000059e0| 73 25 2b 3d 31 3a ce 0d | 1e 3c 07 3d 6e 24 0d 1e |s%+=1:..|.<.=n$..|
|000059f0| 46 04 0d 1e 50 14 dd 20 | f2 53 65 74 56 6f 6c 75 |F...P.. |.SetVolu|
|00005a00| 6d 65 28 52 25 29 0d 1e | 5a 1f c8 99 20 53 6f 75 |me(R%)..|Z... Sou|
|00005a10| 6e 64 5f 56 6f 6c 75 6d | 65 2c 56 6f 6c 75 6d 65 |nd_Volum|e,Volume|
|00005a20| 25 28 52 25 29 0d 1e 64 | 05 e1 0d 1e 6e 04 0d 1e |%(R%)..d|....n...|
|00005a30| 78 19 dd 20 f2 53 65 74 | 44 65 66 61 75 6c 74 43 |x.. .Set|DefaultC|
|00005a40| 68 61 6e 6e 65 6c 73 0d | 1e 82 0a ea 53 25 2c 50 |hannels.|....S%,P|
|00005a50| 25 0d 1e 8c 2d f4 20 6f | 6e 6c 79 20 31 20 70 65 |%...-. o|nly 1 pe|
|00005a60| 72 63 75 73 73 69 6f 6e | 20 63 68 61 6e 6e 65 6c |rcussion| channel|
|00005a70| 20 70 65 72 6d 69 74 74 | 65 64 20 6e 6f 77 0d 1e | permitt|ed now..|
|00005a80| 96 5f e3 53 25 3d 30 b8 | 37 3a 53 5f 43 25 28 53 |._.S%=0.|7:S_C%(S|
|00005a90| 25 29 3d 53 74 61 76 65 | 5f 43 68 61 6e 6e 65 6c |%)=Stave|_Channel|
|00005aa0| 73 25 28 53 54 41 56 45 | 25 2c 53 25 29 3a ed 3a |s%(STAVE|%,S%):.:|
|00005ab0| f4 20 43 68 61 6e 6e 65 | 6c 20 61 73 73 69 67 6e |. Channe|l assign|
|00005ac0| 6d 65 6e 74 20 63 68 61 | 6e 67 65 73 20 69 66 20 |ment cha|nges if |
|00005ad0| 73 74 61 76 65 73 20 63 | 68 61 6e 67 65 0d 1e a0 |staves c|hange...|
|00005ae0| 41 e7 20 50 45 52 43 25 | 20 53 5f 43 25 28 37 29 |A. PERC%| S_C%(7)|
|00005af0| 3d 53 54 41 56 45 25 2b | 31 3a f4 20 53 74 65 61 |=STAVE%+|1:. Stea|
|00005b00| 6c 20 63 68 61 6e 6e 65 | 6c 20 66 6f 72 20 70 65 |l channe|l for pe|
|00005b10| 72 63 75 73 73 69 6f 6e | 20 6c 69 6e 65 73 0d 1e |rcussion| lines..|
|00005b20| aa 0b e3 53 25 3d 30 b8 | 37 0d 1e b4 20 49 6e 73 |...S%=0.|7... Ins|
|00005b30| 74 72 75 6d 65 6e 74 25 | 28 53 25 2c 30 29 3d 53 |trument%|(S%,0)=S|
|00005b40| 5f 43 25 28 53 25 29 2b | 31 0d 1e be 83 24 53 74 |_C%(S%)+|1....$St|
|00005b50| 61 76 65 53 74 72 25 28 | 53 25 29 3d 4e 74 68 24 |aveStr%(|S%)=Nth$|
|00005b60| 28 49 6e 73 74 72 75 6d | 65 6e 74 25 28 53 25 2c |(Instrum|ent%(S%,|
|00005b70| 30 29 2b 28 53 54 41 56 | 45 25 2d 33 29 2a 28 28 |0)+(STAV|E%-3)*((|
|00005b80| 49 6e 73 74 72 75 6d 65 | 6e 74 25 28 53 25 2c 30 |Instrume|nt%(S%,0|
|00005b90| 29 2d 31 29 3e 53 54 41 | 56 45 25 29 29 2b 22 3b |)-1)>STA|VE%))+";|
|00005ba0| 22 20 3a f4 20 73 65 74 | 20 75 70 20 73 74 61 76 |" :. set| up stav|
|00005bb0| 65 20 6e 61 6d 65 73 20 | 69 6e 20 69 6e 73 74 72 |e names |in instr|
|00005bc0| 75 6d 65 6e 74 20 77 69 | 6d 64 6f 77 0d 1e c8 3c |ument wi|mdow...<|
|00005bd0| f2 55 70 64 61 74 65 49 | 63 6f 6e 28 49 6e 73 74 |.UpdateI|con(Inst|
|00005be0| 72 57 69 6e 64 5f 68 25 | 2c 53 25 2c 30 2c 30 29 |rWind_h%|,S%,0,0)|
|00005bf0| 20 3a f4 20 75 70 64 61 | 74 65 20 74 65 78 74 20 | :. upda|te text |
|00005c00| 69 6e 20 69 63 6f 6e 73 | 0d 1e d2 19 76 25 3d a4 |in icons|....v%=.|
|00005c10| 41 74 74 61 63 68 56 6f | 69 63 65 28 53 25 2c 30 |AttachVo|ice(S%,0|
|00005c20| 29 0d 1e dc 20 c8 99 20 | 53 6f 75 6e 64 5f 41 74 |)... .. |Sound_At|
|00005c30| 74 61 63 68 56 6f 69 63 | 65 2c 53 25 2b 31 2c 76 |tachVoic|e,S%+1,v|
|00005c40| 25 0d 1e e6 2d 24 28 56 | 6f 69 63 65 53 74 72 25 |%...-$(V|oiceStr%|
|00005c50| 28 53 25 29 29 3d c0 56 | 6f 69 63 65 24 28 76 25 |(S%))=.V|oice$(v%|
|00005c60| 29 2c 20 56 6f 69 63 65 | 53 69 7a 65 25 29 0d 1e |), Voice|Size%)..|
|00005c70| f0 1a 49 6e 73 74 72 75 | 6d 65 6e 74 25 28 53 25 |..Instru|ment%(S%|
|00005c80| 2c 31 29 20 3d 20 76 25 | 0d 1e fa 27 f2 55 70 64 |,1) = v%|...'.Upd|
|00005c90| 61 74 65 49 63 6f 6e 28 | 49 6e 73 74 72 57 69 6e |ateIcon(|InstrWin|
|00005ca0| 64 5f 68 25 2c 53 25 2b | 38 2c 20 30 2c 30 29 0d |d_h%,S%+|8, 0,0).|
|00005cb0| 1f 04 1d ed 3a f4 20 49 | 6e 73 74 72 75 6d 65 6e |....:. I|nstrumen|
|00005cc0| 74 20 61 6c 6c 6f 63 61 | 74 69 6f 6e 0d 1f 0e 47 |t alloca|tion...G|
|00005cd0| e7 20 50 45 52 43 25 20 | 24 53 74 61 76 65 53 74 |. PERC% |$StaveSt|
|00005ce0| 72 25 28 37 29 3d 4e 74 | 68 24 28 35 29 2b 22 3b |r%(7)=Nt|h$(5)+";|
|00005cf0| 22 20 3a f4 20 73 74 65 | 61 6c 20 31 20 63 68 61 |" :. ste|al 1 cha|
|00005d00| 6e 6e 65 6c 20 66 6f 72 | 20 70 65 72 63 75 73 73 |nnel for| percuss|
|00005d10| 69 6f 6e 0d 1f 18 05 e1 | 0d 1f 22 04 0d 1f 2c 12 |ion.....|.."...,.|
|00005d20| dd 20 f2 73 65 74 75 70 | 5f 73 63 6f 72 65 0d 1f |. .setup|_score..|
|00005d30| 36 0a ea 53 25 2c 50 25 | 0d 1f 40 2d f4 20 6f 6e |6..S%,P%|..@-. on|
|00005d40| 6c 79 20 31 20 70 65 72 | 63 75 73 73 69 6f 6e 20 |ly 1 per|cussion |
|00005d50| 63 68 61 6e 6e 65 6c 20 | 70 65 72 6d 69 74 74 65 |channel |permitte|
|00005d60| 64 20 6e 6f 77 0d 1f 4a | 31 f2 73 65 74 75 70 5f |d now..J|1.setup_|
|00005d70| 73 74 61 76 65 73 3a f4 | 20 43 61 6c 63 75 6c 61 |staves:.| Calcula|
|00005d80| 74 65 20 6e 65 77 20 73 | 74 61 76 65 20 70 6f 73 |te new s|tave pos|
|00005d90| 69 74 69 6f 6e 73 0d 1f | 54 17 f2 53 65 74 44 65 |itions..|T..SetDe|
|00005da0| 66 61 75 6c 74 43 68 61 | 6e 6e 65 6c 73 0d 1f 5e |faultCha|nnels..^|
|00005db0| 05 e1 0d 1f 68 04 0d 1f | 72 16 dd 20 a4 47 65 74 |....h...|r.. .Get|
|00005dc0| 46 69 6c 65 49 6e 66 6f | 28 46 24 29 0d 1f 7c 26 |FileInfo|(F$)..|&|
|00005dd0| ea 54 25 2c 4c 25 2c 41 | 25 2c 4d 24 2c 74 69 6d |.T%,L%,A|%,M$,tim|
|00005de0| 65 25 2c 46 69 6c 65 54 | 79 70 65 24 2c 72 32 2c |e%,FileT|ype$,r2,|
|00005df0| 72 33 0d 1f 86 35 e7 20 | 46 24 3c 3e 22 22 20 c8 |r3...5. |F$<>"" .|
|00005e00| 99 4f 53 5f 46 69 6c 65 | 2c 35 2c 46 24 20 b8 20 |.OS_File|,5,F$ . |
|00005e10| 54 25 2c 2c 6c 61 64 64 | 72 25 2c 65 61 64 64 72 |T%,,ladd|r%,eaddr|
|00005e20| 25 2c 4c 25 2c 41 25 0d | 1f 90 32 e7 20 28 46 24 |%,L%,A%.|..2. (F$|
|00005e30| 3d 22 22 29 20 84 20 28 | 28 54 25 3d 31 29 20 80 |="") . (|(T%=1) .|
|00005e40| 20 28 41 25 20 80 20 31 | 29 20 80 20 28 4c 25 3e | (A% . 1|) . (L%>|
|00005e50| 38 29 29 20 3d 20 30 20 | 8c 0d 1f 9a 20 24 54 68 |8)) = 0 |.... $Th|
|00005e60| 69 73 46 69 6c 65 25 3d | 22 3c 75 6e 74 69 74 6c |isFile%=|"<untitl|
|00005e70| 65 64 3e 22 2b bd 28 30 | 29 0d 1f a4 11 24 46 69 |ed>"+.(0|)....$Fi|
|00005e80| 6c 65 53 69 7a 65 25 3d | 22 22 0d 1f ae 11 24 46 |leSize%=|""....$F|
|00005e90| 69 6c 65 54 79 70 65 25 | 3d 22 22 0d 1f b8 11 24 |ileType%|=""....$|
|00005ea0| 46 69 6c 65 44 61 74 65 | 25 3d 22 22 0d 1f c2 06 |FileDate|%=""....|
|00005eb0| 3d a3 0d 1f cc 05 cc 0d | 1f d6 11 24 54 68 69 73 |=.......|...$This|
|00005ec0| 46 69 6c 65 25 3d 46 24 | 0d 1f e0 14 24 46 69 6c |File%=F$|....$Fil|
|00005ed0| 65 53 69 7a 65 25 3d c3 | 28 4c 25 29 0d 1f ea 20 |eSize%=.|(L%)... |
|00005ee0| e7 20 28 28 6c 61 64 64 | 72 25 3e 3e 32 30 29 80 |. ((ladd|r%>>20).|
|00005ef0| 26 46 46 46 29 3d 26 46 | 46 46 20 8c 0d 1f f4 2d |&FFF)=&F|FF ....-|
|00005f00| 20 20 e7 20 28 6c 61 64 | 64 72 25 3e 3e 38 20 80 | . (lad|dr%>>8 .|
|00005f10| 20 26 46 46 46 29 20 3d | 20 4d 75 73 69 63 46 69 | &FFF) =| MusicFi|
|00005f20| 6c 65 54 79 70 65 25 20 | 8c 0d 1f fe 1c 20 20 20 |leType% |..... |
|00005f30| 20 46 69 6c 65 54 79 70 | 65 24 3d 20 22 4d 75 73 | FileTyp|e$= "Mus|
|00005f40| 69 63 20 20 22 0d 20 08 | 07 20 20 cc 0d 20 12 38 |ic ". .|. .. .8|
|00005f50| 20 20 20 20 c8 99 20 22 | 4f 53 5f 46 53 43 6f 6e | .. "|OS_FSCon|
|00005f60| 74 72 6f 6c 22 2c 31 38 | 2c 2c 6c 61 64 64 72 25 |trol",18|,,laddr%|
|00005f70| 3e 3e 38 20 80 20 26 46 | 46 46 20 b8 20 2c 2c 72 |>>8 . &F|FF . ,,r|
|00005f80| 32 2c 72 33 0d 20 1c 58 | 20 20 20 20 46 69 6c 65 |2,r3. .X| File|
|00005f90| 54 79 70 65 24 3d bd 28 | 72 32 20 80 20 26 46 46 |Type$=.(|r2 . &FF|
|00005fa0| 29 20 2b 20 bd 28 28 72 | 32 3e 3e 38 29 20 80 20 |) + .((r|2>>8) . |
|00005fb0| 26 46 46 29 20 2b 20 bd | 28 28 72 32 3e 3e 31 36 |&FF) + .|((r2>>16|
|00005fc0| 29 20 80 20 26 46 46 29 | 20 2b 20 bd 28 28 72 32 |) . &FF)| + .((r2|
|00005fd0| 3e 3e 32 34 29 20 80 20 | 26 46 46 29 0d 20 26 5b |>>24) . |&FF). &[|
|00005fe0| 20 20 20 20 46 69 6c 65 | 54 79 70 65 24 20 2b 3d | File|Type$ +=|
|00005ff0| 20 bd 28 72 33 20 80 20 | 26 46 46 29 20 2b 20 bd | .(r3 . |&FF) + .|
|00006000| 28 28 72 33 3e 3e 38 29 | 20 80 20 26 46 46 29 20 |((r3>>8)| . &FF) |
|00006010| 2b 20 bd 28 28 72 33 3e | 3e 31 36 29 20 80 20 26 |+ .((r3>|>16) . &|
|00006020| 46 46 29 20 2b 20 bd 28 | 28 72 33 3e 3e 32 34 29 |FF) + .(|(r3>>24)|
|00006030| 20 80 20 26 46 46 29 0d | 20 30 09 20 20 20 20 cd | . &FF).| 0. .|
|00006040| 0d 20 3a 2f 20 20 24 46 | 69 6c 65 54 79 70 65 25 |. :/ $F|ileType%|
|00006050| 3d 46 69 6c 65 54 79 70 | 65 24 2b c3 7e 28 6c 61 |=FileTyp|e$+.~(la|
|00006060| 64 64 72 25 3e 3e 38 20 | 80 20 26 46 46 46 29 0d |ddr%>>8 |. &FFF).|
|00006070| 20 44 2a 20 20 74 69 6d | 65 25 3d 57 69 6e 64 6f | D* tim|e%=Windo|
|00006080| 77 25 20 3a f4 20 61 20 | 63 6f 6e 76 65 6e 69 65 |w% :. a |convenie|
|00006090| 6e 74 20 62 75 66 66 65 | 72 0d 20 4e 3b f4 20 6c |nt buffe|r. N;. l|
|000060a0| 6f 61 64 20 61 6e 64 20 | 65 78 65 63 75 74 69 6f |oad and |executio|
|000060b0| 6e 20 61 64 64 72 65 73 | 73 65 73 20 61 72 65 2c |n addres|ses are,|
|000060c0| 20 69 6e 20 66 61 63 74 | 2c 20 74 69 6d 65 20 73 | in fact|, time s|
|000060d0| 74 61 6d 70 0d 20 58 1a | 20 20 74 69 6d 65 25 3f |tamp. X.| time%?|
|000060e0| 34 3d 6c 61 64 64 72 25 | 20 80 20 26 46 46 0d 20 |4=laddr%| . &FF. |
|000060f0| 62 1e 20 20 74 69 6d 65 | 25 3f 33 3d 65 61 64 64 |b. time|%?3=eadd|
|00006100| 72 25 3e 3e 32 34 20 80 | 20 26 46 46 0d 20 6c 1e |r%>>24 .| &FF. l.|
|00006110| 20 20 74 69 6d 65 25 3f | 32 3d 65 61 64 64 72 25 | time%?|2=eaddr%|
|00006120| 3e 3e 31 36 20 80 20 26 | 46 46 0d 20 76 1e 20 20 |>>16 . &|FF. v. |
|00006130| 74 69 6d 65 25 3f 31 3d | 65 61 64 64 72 25 3e 3e |time%?1=|eaddr%>>|
|00006140| 38 20 20 80 20 26 46 46 | 0d 20 80 1e 20 20 74 69 |8 . &FF|. .. ti|
|00006150| 6d 65 25 3f 30 3d 65 61 | 64 64 72 25 20 20 20 20 |me%?0=ea|ddr% |
|00006160| 20 80 20 26 46 46 0d 20 | 8a 3e 20 20 c8 99 20 22 | . &FF. |.> .. "|
|00006170| 4f 53 5f 43 6f 6e 76 65 | 72 74 53 74 61 6e 64 61 |OS_Conve|rtStanda|
|00006180| 72 64 44 61 74 65 41 6e | 64 54 69 6d 65 22 2c 20 |rdDateAn|dTime", |
|00006190| 74 69 6d 65 25 2c 20 46 | 69 6c 65 44 61 74 65 25 |time%, F|ileDate%|
|000061a0| 2c 20 32 38 0d 20 94 33 | 20 20 f4 20 70 75 74 20 |, 28. .3| . put |
|000061b0| 74 69 6d 65 73 74 61 6d | 70 20 6f 66 20 66 69 6c |timestam|p of fil|
|000061c0| 65 20 69 6e 74 6f 20 66 | 69 6c 65 20 69 6e 66 6f |e into f|ile info|
|000061d0| 20 77 69 6e 64 6f 77 0d | 20 9e 07 20 20 cd 0d 20 | window.| .. .. |
|000061e0| a8 05 cd 0d 20 b2 06 3d | b9 0d 20 bc 04 0d 20 c6 |.... ..=|.. ... .|
|000061f0| 15 dd 20 f2 6c 6f 61 64 | 5f 6d 75 73 69 63 28 46 |.. .load|_music(F|
|00006200| 24 29 0d 20 d0 0b ea 20 | 46 25 2c 4d 24 0d 20 da |$). ... |F%,M$. .|
|00006210| 07 ea 20 85 0d 20 e4 49 | e7 20 43 48 41 4e 47 45 |.. .. .I|. CHANGE|
|00006220| 44 25 20 e7 20 ac 20 a4 | 43 68 65 63 6b 4f 4b 28 |D% . . .|CheckOK(|
|00006230| 22 41 72 65 20 79 6f 75 | 20 73 75 72 65 3f 20 43 |"Are you| sure? C|
|00006240| 75 72 72 65 6e 74 20 6d | 75 73 69 63 20 69 73 20 |urrent m|usic is |
|00006250| 75 6e 73 61 76 65 64 22 | 2c 33 29 20 e1 0d 20 ee |unsaved"|,3) .. .|
|00006260| 0e 53 43 4f 52 49 4e 47 | 25 3d a3 0d 20 f8 19 e7 |.SCORING|%=.. ...|
|00006270| 20 50 4c 41 59 49 4e 47 | 25 20 f2 70 6c 61 79 5f | PLAYING|% .play_|
|00006280| 73 74 6f 70 0d 21 02 10 | 53 43 52 4f 4c 4c 49 4e |stop.!..|SCROLLIN|
|00006290| 47 25 3d a3 0d 21 0c 38 | e7 20 a9 46 24 3d 30 20 |G%=..!.8|. .F$=0 |
|000062a0| 8c 20 ef 37 20 3a 20 54 | 25 3d a4 43 68 65 63 6b |. .7 : T|%=.Check|
|000062b0| 4f 4b 28 22 49 6e 76 61 | 6c 69 64 20 66 69 6c 65 |OK("Inva|lid file|
|000062c0| 6e 61 6d 65 22 2c 31 29 | 20 3a 20 e1 0d 21 16 15 |name",1)| : ..!..|
|000062d0| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |.. "Hour|glass_On|
|000062e0| 22 0d 21 20 59 ee 20 85 | 20 ea 20 ef 37 3a 20 ff |".! Y. .| . .7: .|
|000062f0| 28 22 46 58 20 32 32 39 | 2c 31 22 29 20 3a 20 f2 |("FX 229|,1") : .|
|00006300| 43 6c 65 61 72 41 6c 6c | 4d 75 73 69 63 20 3a 20 |ClearAll|Music : |
|00006310| c8 99 20 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 66 |.. "Hour|glass_Of|
|00006320| 66 22 20 3a 20 54 25 3d | a4 43 68 65 63 6b 4f 4b |f" : T%=|.CheckOK|
|00006330| 28 f6 24 2c 31 29 20 3a | 20 e1 0d 21 2a 26 ff 28 |(.$,1) :| ..!*&.(|
|00006340| 22 46 58 20 32 32 39 2c | 30 22 29 20 3a f4 20 65 |"FX 229,|0") :. e|
|00006350| 6e 61 62 6c 65 20 65 73 | 63 61 70 65 20 6b 65 79 |nable es|cape key|
|00006360| 0d 21 34 0d 46 49 4c 45 | 25 3d 8e 46 24 0d 21 3e |.!4.FILE|%=.F$.!>|
|00006370| 20 4d 24 3d 22 22 3a e3 | 52 25 3d 31 b8 37 3a 4d | M$="":.|R%=1.7:M|
|00006380| 24 2b 3d bd 9a 23 46 49 | 4c 45 25 3a ed 0d 21 48 |$+=..#FI|LE%:..!H|
|00006390| 0e 42 25 3d 9a 23 46 49 | 4c 45 25 0d 21 52 13 e7 |.B%=.#FI|LE%.!R..|
|000063a0| 4d 24 3d 22 4d 61 65 73 | 74 72 6f 22 20 8c 0d 21 |M$="Maes|tro" ..!|
|000063b0| 5c 15 24 4c 6f 61 64 54 | 65 78 74 3d 46 24 2b bd |\.$LoadT|ext=F$+.|
|000063c0| 28 30 29 0d 21 66 15 24 | 53 61 76 65 54 65 78 74 |(0).!f.$|SaveText|
|000063d0| 3d 46 24 2b bd 28 30 29 | 0d 21 70 6e e7 20 ac 20 |=F$+.(0)|.!pn. . |
|000063e0| a4 47 65 74 46 69 6c 65 | 49 6e 66 6f 28 46 24 29 |.GetFile|Info(F$)|
|000063f0| 20 8c 20 ef 37 20 3a ff | 28 22 46 58 20 32 32 39 | . .7 :.|("FX 229|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
