/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilsd / drummer / !Drummer / RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 0e f4 3e 52 75 | 6e 49 6d 61 67 65 0d 00 |.....>Ru|nImage..|
|00000010| 02 30 f4 50 72 6f 64 75 | 63 65 64 20 62 79 20 42 |.0.Produ|ced by B|
|00000020| 61 73 43 6f 6d 70 72 65 | 73 73 20 76 31 2e 36 30 |asCompre|ss v1.60|
|00000030| 20 28 30 33 20 46 65 62 | 20 31 39 39 35 29 0d 00 | (03 Feb| 1995)..|
|00000040| 03 33 c8 a0 38 3a c8 99 | 26 34 30 36 63 30 3a ee |.3..8:..|&406c0:.|
|00000050| 85 c8 99 26 34 30 30 64 | 64 3a f1 f6 24 3b 22 20 |...&400d|d:..$;" |
|00000060| 61 74 20 22 3b 9e 3a c8 | 99 26 34 30 36 63 31 3a |at ";.:.|.&406c1:|
|00000070| e0 0d 00 04 5b c8 99 26 | 34 30 30 63 30 2c 26 63 |....[..&|400c0,&c|
|00000080| 38 2c 26 34 62 35 33 34 | 31 35 34 2c 22 44 72 75 |8,&4b534|154,"Dru|
|00000090| 6d 6d 65 72 22 b8 2c 54 | 61 73 6b 3a f2 4d 79 3a |mmer".,T|ask:.My:|
|000000a0| 49 63 6f 6e 3d a4 4e 3a | f2 7a 79 3a f2 67 79 3a |Icon=.N:|.zy:.gy:|
|000000b0| f2 5a 79 3a f2 78 79 3a | f2 77 3a f2 6f 3a c8 99 |.Zy:.xy:|.w:.o:..|
|000000c0| 26 34 30 36 63 31 3a ee | 85 f2 47 79 0d 00 05 20 |&406c1:.|..Gy... |
|000000d0| c8 95 ac 51 75 69 74 3a | e7 50 6c 61 79 69 6e 67 |...Quit:|.Playing|
|000000e0| 50 61 74 74 65 72 6e 73 | 8c f2 5f 79 0d 00 06 14 |Patterns|.._y....|
|000000f0| e7 50 6c 61 79 69 6e 67 | 53 6f 6e 67 8c f2 57 79 |.Playing|Song..Wy|
|00000100| 0d 00 07 1b f2 72 79 28 | a4 47 28 30 29 29 3a ce |.....ry(|.G(0)):.|
|00000110| 3a c8 99 26 34 30 30 64 | 64 3a e0 0d 00 08 26 dd |:..&400d|d:....&.|
|00000120| f2 6f 3a c8 99 31 36 b8 | 24 42 6c 6f 63 6b 3a e7 |.o:..16.|$Block:.|
|00000130| a7 24 42 6c 6f 63 6b 2c | 22 2d 6c 6f 61 64 22 29 |.$Block,|"-load")|
|00000140| 8c 0d 00 09 35 5f 24 3d | c2 24 42 6c 6f 63 6b 2c |....5_$=|.$Block,|
|00000150| a9 28 24 42 6c 6f 63 6b | 29 2d 28 a7 24 42 6c 6f |.($Block|)-(.$Blo|
|00000160| 63 6b 2c 22 2d 6c 6f 61 | 64 22 29 2b 35 29 29 3a |ck,"-loa|d")+5)):|
|00000170| f2 64 28 5f 24 29 0d 00 | 0a 07 cd 3a e1 0d 00 0b |.d(_$)..|...:....|
|00000180| 50 dd f2 4d 79 3a c8 99 | 36 2c 26 38 31 2c 30 2c |P..My:..|6,&81,0,|
|00000190| 26 66 66 b8 2c 4f 53 56 | 65 72 73 69 6f 6e 25 3a |&ff.,OSV|ersion%:|
|000001a0| e7 4f 53 56 65 72 73 69 | 6f 6e 25 3c 26 61 34 8c |.OSVersi|on%<&a4.|
|000001b0| 4f 53 56 65 72 73 69 6f | 6e 25 3d 26 63 38 8b 4f |OSVersio|n%=&c8.O|
|000001c0| 53 56 65 72 73 69 6f 6e | 25 3d 33 31 30 0d 00 0c |SVersion|%=310...|
|000001d0| 71 c8 99 36 2c 26 61 31 | 2c 32 38 b8 2c 2c 56 61 |q..6,&a1|,28.,,Va|
|000001e0| 6c 25 3a 64 72 61 67 61 | 73 70 72 69 74 65 25 3d |l%:draga|sprite%=|
|000001f0| 28 28 56 61 6c 25 80 32 | 29 3d 32 29 80 28 4f 53 |((Val%.2|)=2).(OS|
|00000200| 56 65 72 73 69 6f 6e 25 | 3e 3d 33 31 30 29 3a de |Version%|>=310):.|
|00000210| 42 6c 6f 63 6b 20 34 36 | 30 38 2c 4d 65 6e 75 20 |Block 46|08,Menu |
|00000220| 35 33 37 36 2c 54 65 6d | 70 6c 61 74 65 25 34 36 |5376,Tem|plate%46|
|00000230| 30 38 2c 6d 65 73 73 25 | 26 38 30 30 3a e1 0d 00 |08,mess%|&800:...|
|00000240| 0d f8 dd f2 67 79 3a 51 | 75 69 74 3d a3 3a 4d 61 |....gy:Q|uit=.:Ma|
|00000250| 78 50 61 74 74 65 72 6e | 73 3d 35 30 3a 50 61 74 |xPattern|s=50:Pat|
|00000260| 74 65 72 6e 4c 65 6e 67 | 74 68 3d 31 36 3a 4d 61 |ternLeng|th=16:Ma|
|00000270| 78 53 65 71 75 65 6e 63 | 65 3d 35 30 3a 4d 61 78 |xSequenc|e=50:Max|
|00000280| 53 61 6d 70 6c 65 73 3d | 31 36 3a 54 65 6d 70 6f |Samples=|16:Tempo|
|00000290| 44 65 6c 61 79 25 3d 31 | 3a 54 69 6d 69 6e 67 25 |Delay%=1|:Timing%|
|000002a0| 3d 91 3a de 41 28 38 2c | 4d 61 78 50 61 74 74 65 |=.:.A(8,|MaxPatte|
|000002b0| 72 6e 73 2c 50 61 74 74 | 65 72 6e 4c 65 6e 67 74 |rns,Patt|ernLengt|
|000002c0| 68 2c 31 29 2c 4d 28 4d | 61 78 53 65 71 75 65 6e |h,1),M(M|axSequen|
|000002d0| 63 65 2c 35 29 3a de 41 | 24 28 4d 61 78 53 65 71 |ce,5):.A|$(MaxSeq|
|000002e0| 75 65 6e 63 65 29 3a de | 5a 28 34 29 3a de 46 28 |uence):.|Z(4):.F(|
|000002f0| 34 29 3a de 5a 24 28 34 | 2c 4d 61 78 53 61 6d 70 |4):.Z$(4|,MaxSamp|
|00000300| 6c 65 73 29 3a de 53 28 | 36 34 29 3a de 43 28 34 |les):.S(|64):.C(4|
|00000310| 29 2c 4a 28 34 29 3a e3 | 49 6e 69 74 3d 31 b8 34 |),J(4):.|Init=1.4|
|00000320| 3a 43 28 49 6e 69 74 29 | 3d b9 3a 4a 28 49 6e 69 |:C(Init)|=.:J(Ini|
|00000330| 74 29 3d b9 3a ed 0d 00 | 0e 57 de 50 28 32 2c 50 |t)=.:...|.W.P(2,P|
|00000340| 61 74 74 65 72 6e 4c 65 | 6e 67 74 68 2c 31 29 3a |atternLe|ngth,1):|
|00000350| de 57 28 35 29 3a 52 24 | 3d 22 22 3a 4a 24 3d 22 |.W(5):R$|="":J$="|
|00000360| 22 3a 4d 24 3d 22 22 3a | 42 24 3d 22 22 3a 47 24 |":M$="":|B$="":G$|
|00000370| 3d 22 22 3a 48 24 3d 22 | 22 3a 4f 24 3d 22 22 3a |="":H$="|":O$="":|
|00000380| 56 24 3d 22 22 3a 4b 24 | 3d 22 22 3a e1 0d 00 0f |V$="":K$|="":....|
|00000390| 92 dd f2 77 3a f2 67 3a | f2 54 79 3a 46 24 3d 22 |...w:.g:|.Ty:F$="|
|000003a0| 44 72 75 6d 46 69 6c 65 | 22 3a 51 24 3d 22 54 68 |DrumFile|":Q$="Th|
|000003b0| 65 20 44 72 75 6d 6d 65 | 72 20 2d 20 a9 31 39 39 |e Drumme|r - .199|
|000003c0| 35 22 3a 4e 24 3d 22 4d | 69 6b 65 20 47 6f 61 74 |5":N$="M|ike Goat|
|000003d0| 6c 79 22 3a f2 52 3a 50 | 6c 61 79 69 6e 67 50 61 |ly":.R:P|layingPa|
|000003e0| 74 74 65 72 6e 73 3d a3 | 3a 50 6c 61 79 69 6e 67 |tterns=.|:Playing|
|000003f0| 53 6f 6e 67 3d a3 3a 50 | 61 74 74 65 72 6e 50 6f |Song=.:P|atternPo|
|00000400| 73 69 74 69 6f 6e 25 3d | 31 3a 50 61 74 74 65 72 |sition%=|1:Patter|
|00000410| 6e 54 65 6d 70 6f 25 3d | 26 61 3a f2 4e 3a e1 0d |nTempo%=|&a:.N:..|
|00000420| 00 10 d5 dd f2 67 3a 53 | 65 71 75 65 6e 63 65 50 |.....g:S|equenceP|
|00000430| 6f 69 6e 74 65 72 3d 31 | 3a 53 65 71 75 65 6e 63 |ointer=1|:Sequenc|
|00000440| 65 50 6f 73 69 74 69 6f | 6e 25 3d 30 3a 50 61 74 |ePositio|n%=0:Pat|
|00000450| 74 65 72 6e 50 6f 73 69 | 74 69 6f 6e 25 3d 30 3a |ternPosi|tion%=0:|
|00000460| 44 65 66 61 75 6c 74 54 | 65 6d 70 6f 3d 32 31 3a |DefaultT|empo=21:|
|00000470| e3 43 6c 65 61 72 49 3d | 30 b8 4d 61 78 53 65 71 |.ClearI=|0.MaxSeq|
|00000480| 75 65 6e 63 65 3a e3 43 | 6c 65 61 72 49 49 3d 31 |uence:.C|learII=1|
|00000490| b8 34 3a 4d 28 43 6c 65 | 61 72 49 2c 43 6c 65 61 |.4:M(Cle|arI,Clea|
|000004a0| 72 49 49 29 3d 30 3a ed | 3a 4d 28 43 6c 65 61 72 |rII)=0:.|:M(Clear|
|000004b0| 49 2c 35 29 3d 44 65 66 | 61 75 6c 74 54 65 6d 70 |I,5)=Def|aultTemp|
|000004c0| 6f 3a 41 24 28 43 6c 65 | 61 72 49 29 3d 22 22 3a |o:A$(Cle|arI)="":|
|000004d0| ed 3a 44 65 66 61 75 6c | 74 54 65 6d 70 6f 3d 32 |.:Defaul|tTempo=2|
|000004e0| 31 3a f2 47 3a f2 41 3a | 4c 61 73 74 49 63 6f 6e |1:.G:.A:|LastIcon|
|000004f0| 3d 31 3a e1 0d 00 11 b8 | dd f2 54 79 3a e3 43 6c |=1:.....|..Ty:.Cl|
|00000500| 65 61 72 3d 31 b8 34 3a | 5a 28 43 6c 65 61 72 29 |ear=1.4:|Z(Clear)|
|00000510| 3d 31 3a 46 28 43 6c 65 | 61 72 29 3d 31 3a ed 3a |=1:F(Cle|ar)=1:.:|
|00000520| e3 43 6c 65 61 72 49 3d | 31 b8 38 3a e3 43 6c 65 |.ClearI=|1.8:.Cle|
|00000530| 61 72 49 49 3d 31 b8 4d | 61 78 50 61 74 74 65 72 |arII=1.M|axPatter|
|00000540| 6e 73 3a e3 43 6c 65 61 | 72 49 49 49 3d 31 b8 50 |ns:.Clea|rIII=1.P|
|00000550| 61 74 74 65 72 6e 4c 65 | 6e 67 74 68 3a 41 28 43 |atternLe|ngth:A(C|
|00000560| 6c 65 61 72 49 2c 43 6c | 65 61 72 49 49 2c 43 6c |learI,Cl|earII,Cl|
|00000570| 65 61 72 49 49 49 2c 30 | 29 3d 30 3a 41 28 43 6c |earIII,0|)=0:A(Cl|
|00000580| 65 61 72 49 2c 43 6c 65 | 61 72 49 49 2c 43 6c 65 |earI,Cle|arII,Cle|
|00000590| 61 72 49 49 49 2c 31 29 | 3d 26 66 3a ed 3a ed 3a |arIII,1)|=&f:.:.:|
|000005a0| ed 3a f2 68 3a f2 6e 3a | f2 65 3a e1 0d 00 12 26 |.:.h:.n:|.e:....&|
|000005b0| dd f2 47 3a f2 5a 28 54 | 65 6d 70 6f 25 2c 32 2c |..G:.Z(T|empo%,2,|
|000005c0| c3 28 44 65 66 61 75 6c | 74 54 65 6d 70 6f 29 29 |.(Defaul|tTempo))|
|000005d0| 3a e1 0d 00 13 46 dd f2 | 78 3a 44 65 66 61 75 6c |:....F..|x:Defaul|
|000005e0| 74 54 65 6d 70 6f 3d bb | 28 24 a4 4d 28 54 65 6d |tTempo=.|($.M(Tem|
|000005f0| 70 6f 25 2c 32 29 29 3a | e7 44 65 66 61 75 6c 74 |po%,2)):|.Default|
|00000600| 54 65 6d 70 6f 3e 33 30 | 8c 44 65 66 61 75 6c 74 |Tempo>30|.Default|
|00000610| 54 65 6d 70 6f 3d 33 30 | 0d 00 14 22 e7 44 65 66 |Tempo=30|...".Def|
|00000620| 61 75 6c 74 54 65 6d 70 | 6f 3c 31 8c 44 65 66 61 |aultTemp|o<1.Defa|
|00000630| 75 6c 74 54 65 6d 70 6f | 3d 31 0d 00 15 22 f2 5a |ultTempo|=1...".Z|
|00000640| 28 54 65 6d 70 6f 25 2c | 32 2c c3 28 44 65 66 61 |(Tempo%,|2,.(Defa|
|00000650| 75 6c 74 54 65 6d 70 6f | 29 29 3a e1 0d 00 16 30 |ultTempo|)):....0|
|00000660| dd f2 4f 79 3a f2 5a 28 | 53 6f 6e 67 49 6e 66 6f |..Oy:.Z(|SongInfo|
|00000670| 25 2c 32 2c 4e 24 29 3a | f2 5a 28 53 6f 6e 67 49 |%,2,N$):|.Z(SongI|
|00000680| 6e 66 6f 25 2c 31 2c 51 | 24 29 3a e1 0d 00 17 32 |nfo%,1,Q|$):....2|
|00000690| dd f2 44 79 3a 4e 24 3d | 24 a4 4d 28 53 6f 6e 67 |..Dy:N$=|$.M(Song|
|000006a0| 49 6e 66 6f 25 2c 32 29 | 3a 51 24 3d 24 a4 4d 28 |Info%,2)|:Q$=$.M(|
|000006b0| 53 6f 6e 67 49 6e 66 6f | 25 2c 31 29 3a e1 0d 00 |SongInfo|%,1):...|
|000006c0| 18 da dd f2 41 3a ea 43 | 75 72 72 49 63 6f 6e 3a |....A:.C|urrIcon:|
|000006d0| 43 75 72 72 49 63 6f 6e | 3d 30 3a e3 55 70 64 61 |CurrIcon|=0:.Upda|
|000006e0| 74 65 3d 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |te=Seque|ncePoint|
|000006f0| 65 72 b8 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |er.Seque|ncePoint|
|00000700| 65 72 2b 35 3a f2 5a 28 | 53 65 71 75 65 6e 63 65 |er+5:.Z(|Sequence|
|00000710| 25 2c 32 35 2b 43 75 72 | 72 49 63 6f 6e 2c c3 28 |%,25+Cur|rIcon,.(|
|00000720| 55 70 64 61 74 65 29 29 | 3a e3 55 70 64 61 74 65 |Update))|:.Update|
|00000730| 49 3d 31 b8 34 3a f2 5a | 28 53 65 71 75 65 6e 63 |I=1.4:.Z|(Sequenc|
|00000740| 65 25 2c 55 70 64 61 74 | 65 49 2b 28 43 75 72 72 |e%,Updat|eI+(Curr|
|00000750| 49 63 6f 6e 2a 34 29 2c | c3 28 4d 28 55 70 64 61 |Icon*4),|.(M(Upda|
|00000760| 74 65 2c 55 70 64 61 74 | 65 49 29 29 29 3a ed 3a |te,Updat|eI))):.:|
|00000770| f2 5a 28 53 65 71 75 65 | 6e 63 65 25 2c 33 31 2b |.Z(Seque|nce%,31+|
|00000780| 43 75 72 72 49 63 6f 6e | 2c c3 28 4d 28 55 70 64 |CurrIcon|,.(M(Upd|
|00000790| 61 74 65 2c 35 29 29 29 | 0d 00 19 38 f2 5a 28 53 |ate,5)))|...8.Z(S|
|000007a0| 65 71 75 65 6e 63 65 25 | 2c 33 37 2b 43 75 72 72 |equence%|,37+Curr|
|000007b0| 49 63 6f 6e 2c 41 24 28 | 55 70 64 61 74 65 29 29 |Icon,A$(|Update))|
|000007c0| 3a 43 75 72 72 49 63 6f | 6e 2b 3d 31 3a ed 3a e1 |:CurrIco|n+=1:.:.|
|000007d0| 0d 00 1a 18 dd f2 52 3a | f2 5a 28 53 61 76 65 25 |......R:|.Z(Save%|
|000007e0| 2c 32 2c 46 24 29 3a e1 | 0d 00 1b 4b dd f2 68 3a |,2,F$):.|...K..h:|
|000007f0| f2 53 28 42 61 73 73 50 | 61 74 74 25 2c 31 29 3a |.S(BassP|att%,1):|
|00000800| f2 53 28 53 6e 61 72 65 | 50 61 74 74 25 2c 32 29 |.S(Snare|Patt%,2)|
|00000810| 3a f2 53 28 48 69 48 61 | 74 50 61 74 74 25 2c 33 |:.S(HiHa|tPatt%,3|
|00000820| 29 3a f2 53 28 4d 69 73 | 63 50 61 74 74 25 2c 34 |):.S(Mis|cPatt%,4|
|00000830| 29 3a e1 0d 00 1c 3a dd | f2 53 28 48 61 6e 64 6c |):....:.|.S(Handl|
|00000840| 65 25 2c 50 61 74 25 29 | 3a e3 44 72 61 77 3d 30 |e%,Pat%)|:.Draw=0|
|00000850| b8 33 31 3a f2 74 28 48 | 61 6e 64 6c 65 25 2c 50 |.31:.t(H|andle%,P|
|00000860| 61 74 25 2c 44 72 61 77 | 29 3a ed 3a e1 0d 00 1d |at%,Draw|):.:....|
|00000870| 62 dd f2 74 28 48 61 6e | 64 6c 65 25 2c 50 61 74 |b..t(Han|dle%,Pat|
|00000880| 25 2c 4e 6f 74 65 25 29 | 3a ea 50 61 74 74 25 3a |%,Note%)|:.Patt%:|
|00000890| 50 61 74 74 25 3d 28 50 | 61 74 25 2a 32 29 2d 31 |Patt%=(P|at%*2)-1|
|000008a0| 3a e7 41 28 50 61 74 74 | 25 2b 28 4e 6f 74 65 25 |:.A(Patt|%+(Note%|
|000008b0| 81 31 36 29 2c 5a 28 50 | 61 74 25 29 2c 28 4e 6f |.16),Z(P|at%),(No|
|000008c0| 74 65 25 83 31 36 29 2b | 31 2c 30 29 3d 30 8c 0d |te%.16)+|1,0)=0..|
|000008d0| 00 1e 0e 4c 24 3d 22 65 | 6d 70 74 79 22 0d 00 1f |...L$="e|mpty"...|
|000008e0| 3e cc 3a 4c 24 3d 22 73 | 6f 75 6e 64 22 2b c3 28 |>.:L$="s|ound"+.(|
|000008f0| 41 28 50 61 74 74 25 2b | 28 4e 6f 74 65 25 81 31 |A(Patt%+|(Note%.1|
|00000900| 36 29 2c 5a 28 50 61 74 | 25 29 2c 28 4e 6f 74 65 |6),Z(Pat|%),(Note|
|00000910| 25 83 31 36 29 2b 31 2c | 30 29 29 0d 00 20 1f cd |%.16)+1,|0)).. ..|
|00000920| 3a f2 42 79 28 48 61 6e | 64 6c 65 25 2c 4e 6f 74 |:.By(Han|dle%,Not|
|00000930| 65 25 2b 31 2c 4c 24 29 | 3a e1 0d 00 21 4b dd f2 |e%+1,L$)|:...!K..|
|00000940| 6e 3a f2 42 28 42 61 73 | 73 50 61 74 74 25 2c 31 |n:.B(Bas|sPatt%,1|
|00000950| 29 3a f2 42 28 53 6e 61 | 72 65 50 61 74 74 25 2c |):.B(Sna|rePatt%,|
|00000960| 32 29 3a f2 42 28 48 69 | 48 61 74 50 61 74 74 25 |2):.B(Hi|HatPatt%|
|00000970| 2c 33 29 3a f2 42 28 4d | 69 73 63 50 61 74 74 25 |,3):.B(M|iscPatt%|
|00000980| 2c 34 29 3a e1 0d 00 22 | 34 dd f2 42 28 48 61 6e |,4):..."|4..B(Han|
|00000990| 64 6c 65 25 2c 4e 6f 25 | 29 3a f2 5a 28 48 61 6e |dle%,No%|):.Z(Han|
|000009a0| 64 6c 65 25 2c 33 39 2c | 5a 24 28 4e 6f 25 2c 46 |dle%,39,|Z$(No%,F|
|000009b0| 28 4e 6f 25 29 29 29 3a | e1 0d 00 23 4b dd f2 65 |(No%))):|...#K..e|
|000009c0| 3a f2 4a 28 42 61 73 73 | 50 61 74 74 25 2c 31 29 |:.J(Bass|Patt%,1)|
|000009d0| 3a f2 4a 28 53 6e 61 72 | 65 50 61 74 74 25 2c 32 |:.J(Snar|ePatt%,2|
|000009e0| 29 3a f2 4a 28 48 69 48 | 61 74 50 61 74 74 25 2c |):.J(HiH|atPatt%,|
|000009f0| 33 29 3a f2 4a 28 4d 69 | 73 63 50 61 74 74 25 2c |3):.J(Mi|scPatt%,|
|00000a00| 34 29 3a e1 0d 00 24 2f | dd f2 4a 28 48 61 6e 64 |4):...$/|..J(Hand|
|00000a10| 6c 65 25 2c 4e 6f 25 29 | 3a f2 5a 28 48 61 6e 64 |le%,No%)|:.Z(Hand|
|00000a20| 6c 65 25 2c 33 33 2c c3 | 28 5a 28 4e 6f 25 29 29 |le%,33,.|(Z(No%))|
|00000a30| 29 3a e1 0d 00 25 2c dd | f2 4e 3a f2 5a 28 50 61 |):...%,.|.N:.Z(Pa|
|00000a40| 74 43 6f 6e 25 2c 26 64 | 2c c3 28 33 31 2d 50 61 |tCon%,&d|,.(31-Pa|
|00000a50| 74 74 65 72 6e 54 65 6d | 70 6f 25 29 29 3a e1 0d |tternTem|po%)):..|
|00000a60| 00 26 4f dd f2 77 79 3a | f2 5a 28 50 61 74 43 6f |.&O..wy:|.Z(PatCo|
|00000a70| 6e 25 2c 37 2c 47 24 29 | 3a f2 5a 28 50 61 74 43 |n%,7,G$)|:.Z(PatC|
|00000a80| 6f 6e 25 2c 26 62 2c 4a | 24 29 3a f2 5a 28 50 61 |on%,&b,J|$):.Z(Pa|
|00000a90| 74 43 6f 6e 25 2c 36 2c | 42 24 29 3a f2 5a 28 50 |tCon%,6,|B$):.Z(P|
|00000aa0| 61 74 43 6f 6e 25 2c 38 | 2c 4d 24 29 3a e1 0d 00 |atCon%,8|,M$):...|
|00000ab0| 27 4a dd f2 49 79 28 42 | 6c 6f 63 6b 29 3a 48 61 |'J..Iy(B|lock):Ha|
|00000ac0| 6e 64 6c 65 25 3d 42 6c | 6f 63 6b 21 26 63 3a 49 |ndle%=Bl|ock!&c:I|
|00000ad0| 63 6f 6e 25 3d 42 6c 6f | 63 6b 21 31 36 3a 42 75 |con%=Blo|ck!16:Bu|
|00000ae0| 74 74 6f 6e 25 3d 42 6c | 6f 63 6b 21 38 3a c8 8e |tton%=Bl|ock!8:..|
|00000af0| 48 61 6e 64 6c 65 25 ca | 0d 00 28 0b c9 2d 32 3a |Handle%.|..(..-2:|
|00000b00| f2 74 79 0d 00 29 0e c9 | 53 61 76 65 25 3a f2 58 |.ty..)..|Save%:.X|
|00000b10| 79 0d 00 2a 3b c9 42 61 | 73 73 50 61 74 74 25 2c |y..*;.Ba|ssPatt%,|
|00000b20| 53 6e 61 72 65 50 61 74 | 74 25 2c 48 69 48 61 74 |SnarePat|t%,HiHat|
|00000b30| 50 61 74 74 25 2c 4d 69 | 73 63 50 61 74 74 25 3a |Patt%,Mi|scPatt%:|
|00000b40| f2 63 79 28 48 61 6e 64 | 6c 65 25 29 0d 00 2b 10 |.cy(Hand|le%)..+.|
|00000b50| c9 50 61 74 43 6f 6e 25 | 3a f2 4c 79 0d 00 2c 11 |.PatCon%|:.Ly..,.|
|00000b60| c9 53 65 71 75 65 6e 63 | 65 25 3a f2 6c 0d 00 2d |.Sequenc|e%:.l..-|
|00000b70| 0e c9 54 65 6d 70 6f 25 | 3a f2 60 0d 00 2e 11 c9 |..Tempo%|:.`.....|
|00000b80| 43 6f 6e 74 72 6f 6c 25 | 3a f2 48 79 0d 00 2f 11 |Control%|:.Hy../.|
|00000b90| c9 4d 65 73 73 61 67 65 | 25 3a f2 53 79 0d 00 30 |.Message|%:.Sy..0|
|00000ba0| 07 cb 3a e1 0d 00 31 32 | dd f2 53 79 3a e7 42 75 |..:...12|..Sy:.Bu|
|00000bb0| 74 74 6f 6e 25 3d 34 84 | 42 75 74 74 6f 6e 25 3d |tton%=4.|Button%=|
|00000bc0| 32 80 49 63 6f 6e 25 3d | 31 8c f2 58 28 4d 65 73 |2.Icon%=|1..X(Mes|
|00000bd0| 73 61 67 65 25 29 0d 00 | 32 05 e1 0d 00 33 1e dd |sage%)..|2....3..|
|00000be0| f2 48 79 3a e7 42 75 74 | 74 6f 6e 25 3d 34 84 42 |.Hy:.But|ton%=4.B|
|00000bf0| 75 74 74 6f 6e 25 3d 32 | 8c 0d 00 34 0c c8 8e 49 |utton%=2|...4...I|
|00000c00| 63 6f 6e 25 ca 0d 00 35 | 09 c9 31 3a f2 4f 0d 00 |con%...5|..1:.O..|
|00000c10| 36 09 c9 34 3a f2 55 0d | 00 37 3a c9 36 3a e7 53 |6..4:.U.|.7:.6:.S|
|00000c20| 65 71 75 65 6e 63 65 50 | 6f 73 69 74 69 6f 6e 25 |equenceP|osition%|
|00000c30| 3c 4d 61 78 53 65 71 75 | 65 6e 63 65 8c 53 65 71 |<MaxSequ|ence.Seq|
|00000c40| 75 65 6e 63 65 50 6f 73 | 69 74 69 6f 6e 25 2b 3d |uencePos|ition%+=|
|00000c50| 31 0d 00 38 30 c9 39 3a | e7 53 65 71 75 65 6e 63 |1..80.9:|.Sequenc|
|00000c60| 65 50 6f 73 69 74 69 6f | 6e 25 3e 31 8c 53 65 71 |ePositio|n%>1.Seq|
|00000c70| 75 65 6e 63 65 50 6f 73 | 69 74 69 6f 6e 25 2d 3d |uencePos|ition%-=|
|00000c80| 31 0d 00 39 0a c9 26 61 | 3a f2 5f 0d 00 3a 05 cb |1..9..&a|:._..:..|
|00000c90| 0d 00 3b 07 cd 3a e1 0d | 00 3c 16 dd f2 60 3a f2 |..;..:..|.<...`:.|
|00000ca0| 78 3a e7 42 75 74 74 6f | 6e 25 3d 34 8c 0d 00 3d |x:.Butto|n%=4...=|
|00000cb0| 0c c8 8e 49 63 6f 6e 25 | ca 0d 00 3e 29 c9 33 3a |...Icon%|...>).3:|
|00000cc0| e7 44 65 66 61 75 6c 74 | 54 65 6d 70 6f 3e 30 8c |.Default|Tempo>0.|
|00000cd0| 44 65 66 61 75 6c 74 54 | 65 6d 70 6f 2d 3d 31 3a |DefaultT|empo-=1:|
|00000ce0| f2 47 0d 00 3f 2a c9 34 | 3a e7 44 65 66 61 75 6c |.G..?*.4|:.Defaul|
|00000cf0| 74 54 65 6d 70 6f 3c 33 | 30 8c 44 65 66 61 75 6c |tTempo<3|0.Defaul|
|00000d00| 74 54 65 6d 70 6f 2b 3d | 31 3a f2 47 0d 00 40 19 |tTempo+=|1:.G..@.|
|00000d10| c9 35 3a 44 65 66 61 75 | 6c 74 54 65 6d 70 6f 3d |.5:Defau|ltTempo=|
|00000d20| 32 31 3a f2 47 0d 00 41 | 14 c9 36 3a f2 58 28 54 |21:.G..A|..6:.X(T|
|00000d30| 65 6d 70 6f 25 29 3a f2 | 59 0d 00 42 1a c9 37 3a |empo%):.|Y..B..7:|
|00000d40| f2 6a 3a f2 41 3a f2 58 | 28 54 65 6d 70 6f 25 29 |.j:.A:.X|(Tempo%)|
|00000d50| 3a f2 59 0d 00 43 05 cb | 0d 00 44 11 cd 3a e7 42 |:.Y..C..|..D..:.B|
|00000d60| 75 74 74 6f 6e 25 3d 31 | 8c 0d 00 45 0c c8 8e 49 |utton%=1|...E...I|
|00000d70| 63 6f 6e 25 ca 0d 00 46 | 29 c9 34 3a e7 44 65 66 |con%...F|).4:.Def|
|00000d80| 61 75 6c 74 54 65 6d 70 | 6f 3e 30 8c 44 65 66 61 |aultTemp|o>0.Defa|
|00000d90| 75 6c 74 54 65 6d 70 6f | 2d 3d 31 3a f2 47 0d 00 |ultTempo|-=1:.G..|
|00000da0| 47 2a c9 33 3a e7 44 65 | 66 61 75 6c 74 54 65 6d |G*.3:.De|faultTem|
|00000db0| 70 6f 3c 33 30 8c 44 65 | 66 61 75 6c 74 54 65 6d |po<30.De|faultTem|
|00000dc0| 70 6f 2b 3d 31 3a f2 47 | 0d 00 48 19 c9 35 3a 44 |po+=1:.G|..H..5:D|
|00000dd0| 65 66 61 75 6c 74 54 65 | 6d 70 6f 3d 32 31 3a f2 |efaultTe|mpo=21:.|
|00000de0| 47 0d 00 49 0c c9 37 3a | f2 6a 3a f2 41 0d 00 4a |G..I..7:|.j:.A..J|
|00000df0| 05 cb 0d 00 4b 07 cd 3a | e1 0d 00 4c 13 dd f2 6c |....K..:|...L...l|
|00000e00| 3a e7 42 75 74 74 6f 6e | 25 3d 34 8c 0d 00 4d 0c |:.Button|%=4...M.|
|00000e10| c8 8e 49 63 6f 6e 25 ca | 0d 00 4e 18 c9 31 2c 32 |..Icon%.|..N..1,2|
|00000e20| 2c 33 2c 34 2c 33 31 2c | 33 37 3a f2 4d 3a f2 41 |,3,4,31,|37:.M:.A|
|00000e30| 0d 00 4f 18 c9 35 2c 36 | 2c 37 2c 38 2c 33 32 2c |..O..5,6|,7,8,32,|
|00000e40| 33 38 3a f2 4d 3a f2 41 | 0d 00 50 1b c9 39 2c 26 |38:.M:.A|..P..9,&|
|00000e50| 61 2c 26 62 2c 26 63 2c | 33 33 2c 33 39 3a f2 4d |a,&b,&c,|33,39:.M|
|00000e60| 3a f2 41 0d 00 51 1c c9 | 26 64 2c 26 65 2c 26 66 |:.A..Q..|&d,&e,&f|
|00000e70| 2c 31 36 2c 33 34 2c 34 | 30 3a f2 4d 3a f2 41 0d |,16,34,4|0:.M:.A.|
|00000e80| 00 52 1c c9 31 37 2c 31 | 38 2c 31 39 2c 32 30 2c |.R..17,1|8,19,20,|
|00000e90| 33 35 2c 34 31 3a f2 4d | 3a f2 41 0d 00 53 1c c9 |35,41:.M|:.A..S..|
|00000ea0| 32 31 2c 32 32 2c 32 33 | 2c 32 34 2c 33 36 2c 34 |21,22,23|,24,36,4|
|00000eb0| 32 3a f2 4d 3a f2 41 0d | 00 54 33 c9 37 33 3a e7 |2:.M:.A.|.T3.73:.|
|00000ec0| 53 65 71 75 65 6e 63 65 | 50 6f 69 6e 74 65 72 3e |Sequence|Pointer>|
|00000ed0| 31 8c f2 4d 3a 53 65 71 | 75 65 6e 63 65 50 6f 69 |1..M:Seq|uencePoi|
|00000ee0| 6e 74 65 72 2d 3d 31 3a | f2 41 0d 00 55 3f c9 37 |nter-=1:|.A..U?.7|
|00000ef0| 34 3a e7 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |4:.Seque|ncePoint|
|00000f00| 65 72 3c 4d 61 78 53 65 | 71 75 65 6e 63 65 2d 36 |er<MaxSe|quence-6|
|00000f10| 8c f2 4d 3a 53 65 71 75 | 65 6e 63 65 50 6f 69 6e |..M:Sequ|encePoin|
|00000f20| 74 65 72 2b 3d 31 3a f2 | 41 0d 00 56 29 c9 35 32 |ter+=1:.|A..V).52|
|00000f30| 2c 35 33 2c 35 34 2c 35 | 35 3a 4a 28 49 63 6f 6e |,53,54,5|5:J(Icon|
|00000f40| 25 2d 35 31 29 3d ac 4a | 28 49 63 6f 6e 25 2d 35 |%-51)=.J|(Icon%-5|
|00000f50| 31 29 0d 00 57 05 cb 0d | 00 58 11 cd 3a e7 42 75 |1)..W...|.X..:.Bu|
|00000f60| 74 74 6f 6e 25 3d 32 8c | 0d 00 59 0c c8 8e 49 63 |tton%=2.|..Y...Ic|
|00000f70| 6f 6e 25 ca 0d 00 5a 3f | c9 32 35 2c 31 2c 32 2c |on%...Z?|.25,1,2,|
|00000f80| 33 2c 34 2c 33 31 2c 33 | 37 3a 4c 61 73 74 54 6f |3,4,31,3|7:LastTo|
|00000f90| 45 64 69 74 3d 30 3a f2 | 46 28 45 78 74 72 61 53 |Edit=0:.|F(ExtraS|
|00000fa0| 65 71 75 65 6e 63 65 4d | 65 6e 75 25 2c 42 6c 6f |equenceM|enu%,Blo|
|00000fb0| 63 6b 29 0d 00 5b 3f c9 | 32 36 2c 35 2c 36 2c 37 |ck)..[?.|26,5,6,7|
|00000fc0| 2c 38 2c 33 32 2c 33 38 | 3a 4c 61 73 74 54 6f 45 |,8,32,38|:LastToE|
|00000fd0| 64 69 74 3d 31 3a f2 46 | 28 45 78 74 72 61 53 65 |dit=1:.F|(ExtraSe|
|00000fe0| 71 75 65 6e 63 65 4d 65 | 6e 75 25 2c 42 6c 6f 63 |quenceMe|nu%,Bloc|
|00000ff0| 6b 29 0d 00 5c 42 c9 32 | 37 2c 39 2c 26 61 2c 26 |k)..\B.2|7,9,&a,&|
|00001000| 62 2c 26 63 2c 33 33 2c | 33 39 3a 4c 61 73 74 54 |b,&c,33,|39:LastT|
|00001010| 6f 45 64 69 74 3d 32 3a | f2 46 28 45 78 74 72 61 |oEdit=2:|.F(Extra|
|00001020| 53 65 71 75 65 6e 63 65 | 4d 65 6e 75 25 2c 42 6c |Sequence|Menu%,Bl|
|00001030| 6f 63 6b 29 0d 00 5d 43 | c9 32 38 2c 26 64 2c 26 |ock)..]C|.28,&d,&|
|00001040| 65 2c 26 66 2c 31 36 2c | 33 34 2c 34 30 3a 4c 61 |e,&f,16,|34,40:La|
|00001050| 73 74 54 6f 45 64 69 74 | 3d 33 3a f2 46 28 45 78 |stToEdit|=3:.F(Ex|
|00001060| 74 72 61 53 65 71 75 65 | 6e 63 65 4d 65 6e 75 25 |traSeque|nceMenu%|
|00001070| 2c 42 6c 6f 63 6b 29 0d | 00 5e 43 c9 32 39 2c 31 |,Block).|.^C.29,1|
|00001080| 37 2c 31 38 2c 31 39 2c | 32 30 2c 33 35 2c 34 31 |7,18,19,|20,35,41|
|00001090| 3a 4c 61 73 74 54 6f 45 | 64 69 74 3d 34 3a f2 46 |:LastToE|dit=4:.F|
|000010a0| 28 45 78 74 72 61 53 65 | 71 75 65 6e 63 65 4d 65 |(ExtraSe|quenceMe|
|000010b0| 6e 75 25 2c 42 6c 6f 63 | 6b 29 0d 00 5f 43 c9 33 |nu%,Bloc|k).._C.3|
|000010c0| 30 2c 32 31 2c 32 32 2c | 32 33 2c 32 34 2c 33 36 |0,21,22,|23,24,36|
|000010d0| 2c 34 32 3a 4c 61 73 74 | 54 6f 45 64 69 74 3d 35 |,42:Last|ToEdit=5|
|000010e0| 3a f2 46 28 45 78 74 72 | 61 53 65 71 75 65 6e 63 |:.F(Extr|aSequenc|
|000010f0| 65 4d 65 6e 75 25 2c 42 | 6c 6f 63 6b 29 0d 00 60 |eMenu%,B|lock)..`|
|00001100| 1c 7f f2 46 28 53 65 71 | 75 65 6e 63 65 4d 65 6e |...F(Seq|uenceMen|
|00001110| 75 25 2c 42 6c 6f 63 6b | 29 0d 00 61 05 cb 0d 00 |u%,Block|)..a....|
|00001120| 62 11 cd 3a e7 42 75 74 | 74 6f 6e 25 3d 31 8c 0d |b..:.But|ton%=1..|
|00001130| 00 63 0c c8 8e 49 63 6f | 6e 25 ca 0d 00 64 18 c9 |.c...Ico|n%...d..|
|00001140| 31 2c 32 2c 33 2c 34 2c | 33 31 2c 33 37 3a f2 4d |1,2,3,4,|31,37:.M|
|00001150| 3a f2 41 0d 00 65 18 c9 | 35 2c 36 2c 37 2c 38 2c |:.A..e..|5,6,7,8,|
|00001160| 33 32 2c 33 38 3a f2 4d | 3a f2 41 0d 00 66 1b c9 |32,38:.M|:.A..f..|
|00001170| 39 2c 26 61 2c 26 62 2c | 26 63 2c 33 33 2c 33 39 |9,&a,&b,|&c,33,39|
|00001180| 3a f2 4d 3a f2 41 0d 00 | 67 1c c9 26 64 2c 26 65 |:.M:.A..|g..&d,&e|
|00001190| 2c 26 66 2c 31 36 2c 33 | 34 2c 34 30 3a f2 4d 3a |,&f,16,3|4,40:.M:|
|000011a0| f2 41 0d 00 68 1c c9 31 | 37 2c 31 38 2c 31 39 2c |.A..h..1|7,18,19,|
|000011b0| 32 30 2c 33 35 2c 34 31 | 3a f2 4d 3a f2 41 0d 00 |20,35,41|:.M:.A..|
|000011c0| 69 1c c9 32 31 2c 32 32 | 2c 32 33 2c 32 34 2c 33 |i..21,22|,23,24,3|
|000011d0| 36 2c 34 32 3a f2 4d 3a | f2 41 0d 00 6a 30 c9 37 |6,42:.M:|.A..j0.7|
|000011e0| 34 3a e7 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |4:.Seque|ncePoint|
|000011f0| 65 72 3e 31 8c 53 65 71 | 75 65 6e 63 65 50 6f 69 |er>1.Seq|uencePoi|
|00001200| 6e 74 65 72 2d 3d 31 3a | f2 41 0d 00 6b 3c c9 37 |nter-=1:|.A..k<.7|
|00001210| 33 3a e7 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |3:.Seque|ncePoint|
|00001220| 65 72 3c 4d 61 78 53 65 | 71 75 65 6e 63 65 2d 36 |er<MaxSe|quence-6|
|00001230| 8c 53 65 71 75 65 6e 63 | 65 50 6f 69 6e 74 65 72 |.Sequenc|ePointer|
|00001240| 2b 3d 31 3a f2 41 0d 00 | 6c 29 c9 35 32 2c 35 33 |+=1:.A..|l).52,53|
|00001250| 2c 35 34 2c 35 35 3a 4a | 28 49 63 6f 6e 25 2d 35 |,54,55:J|(Icon%-5|
|00001260| 31 29 3d ac 4a 28 49 63 | 6f 6e 25 2d 35 31 29 0d |1)=.J(Ic|on%-51).|
|00001270| 00 6d 05 cb 0d 00 6e 07 | cd 3a e1 0d 00 6f 14 dd |.m....n.|.:...o..|
|00001280| f2 4c 79 3a e7 42 75 74 | 74 6f 6e 25 3d 34 8c 0d |.Ly:.But|ton%=4..|
|00001290| 00 70 0c c8 8e 49 63 6f | 6e 25 ca 0d 00 71 2d c9 |.p...Ico|n%...q-.|
|000012a0| 26 66 3a e7 50 61 74 74 | 65 72 6e 54 65 6d 70 6f |&f:.Patt|ernTempo|
|000012b0| 25 3c 33 30 8c 50 61 74 | 74 65 72 6e 54 65 6d 70 |%<30.Pat|ternTemp|
|000012c0| 6f 25 2b 3d 31 3a f2 4e | 0d 00 72 2c c9 31 36 3a |o%+=1:.N|..r,.16:|
|000012d0| e7 50 61 74 74 65 72 6e | 54 65 6d 70 6f 25 3e 31 |.Pattern|Tempo%>1|
|000012e0| 8c 50 61 74 74 65 72 6e | 54 65 6d 70 6f 25 2d 3d |.Pattern|Tempo%-=|
|000012f0| 31 3a f2 4e 0d 00 73 35 | c9 32 3a 50 61 74 74 65 |1:.N..s5|.2:Patte|
|00001300| 72 6e 50 6f 73 69 74 69 | 6f 6e 25 3d 31 3a 50 6c |rnPositi|on%=1:Pl|
|00001310| 61 79 69 6e 67 50 61 74 | 74 65 72 6e 73 3d b9 3a |ayingPat|terns=.:|
|00001320| 54 69 6d 69 6e 67 25 3d | 91 0d 00 74 39 c9 33 3a |Timing%=|...t9.3:|
|00001330| 50 61 74 74 65 72 6e 50 | 6f 73 69 74 69 6f 6e 25 |PatternP|osition%|
|00001340| 3d 31 3a 50 6c 61 79 69 | 6e 67 50 61 74 74 65 72 |=1:Playi|ngPatter|
|00001350| 6e 73 3d a3 3a 50 6c 61 | 79 69 6e 67 53 6f 6e 67 |ns=.:Pla|yingSong|
|00001360| 3d a3 0d 00 75 05 cb 0d | 00 76 11 cd 3a e7 42 75 |=...u...|.v..:.Bu|
|00001370| 74 74 6f 6e 25 3d 31 8c | 0d 00 77 0c c8 8e 49 63 |tton%=1.|..w...Ic|
|00001380| 6f 6e 25 ca 0d 00 78 2c | c9 26 66 3a e7 50 61 74 |on%...x,|.&f:.Pat|
|00001390| 74 65 72 6e 54 65 6d 70 | 6f 25 3e 31 8c 50 61 74 |ternTemp|o%>1.Pat|
|000013a0| 74 65 72 6e 54 65 6d 70 | 6f 25 2d 3d 31 3a f2 4e |ternTemp|o%-=1:.N|
|000013b0| 0d 00 79 2d c9 31 36 3a | e7 50 61 74 74 65 72 6e |..y-.16:|.Pattern|
|000013c0| 54 65 6d 70 6f 25 3c 33 | 30 8c 50 61 74 74 65 72 |Tempo%<3|0.Patter|
|000013d0| 6e 54 65 6d 70 6f 25 2b | 3d 31 3a f2 4e 0d 00 7a |nTempo%+|=1:.N..z|
|000013e0| 35 c9 32 3a 50 61 74 74 | 65 72 6e 50 6f 73 69 74 |5.2:Patt|ernPosit|
|000013f0| 69 6f 6e 25 3d 31 3a 50 | 6c 61 79 69 6e 67 50 61 |ion%=1:P|layingPa|
|00001400| 74 74 65 72 6e 73 3d b9 | 3a 54 69 6d 69 6e 67 25 |tterns=.|:Timing%|
|00001410| 3d 91 0d 00 7b 39 c9 33 | 3a 50 61 74 74 65 72 6e |=...{9.3|:Pattern|
|00001420| 50 6f 73 69 74 69 6f 6e | 25 3d 31 3a 50 6c 61 79 |Position|%=1:Play|
|00001430| 69 6e 67 50 61 74 74 65 | 72 6e 73 3d a3 3a 50 6c |ingPatte|rns=.:Pl|
|00001440| 61 79 69 6e 67 53 6f 6e | 67 3d a3 0d 00 7c 05 cb |ayingSon|g=...|..|
|00001450| 0d 00 7d 07 cd 3a e1 0d | 00 7e 56 dd f2 63 79 28 |..}..:..|.~V..cy(|
|00001460| 48 61 6e 64 6c 65 25 29 | 3a 4e 6f 25 3d 30 3a 4a |Handle%)|:No%=0:J|
|00001470| 24 3d 22 22 3a 53 61 6d | 70 4e 6f 3d 30 3a 50 61 |$="":Sam|pNo=0:Pa|
|00001480| 74 74 4e 6f 3d 31 3a e7 | 48 61 6e 64 6c 65 25 3d |ttNo=1:.|Handle%=|
|00001490| 42 61 73 73 50 61 74 74 | 25 8c 4e 6f 25 3d 31 3a |BassPatt|%.No%=1:|
|000014a0| 4a 24 3d 22 42 61 73 73 | 64 72 75 6d 22 0d 00 7f |J$="Bass|drum"...|
|000014b0| 28 e7 48 61 6e 64 6c 65 | 25 3d 53 6e 61 72 65 50 |(.Handle|%=SnareP|
|000014c0| 61 74 74 25 8c 4e 6f 25 | 3d 32 3a 4a 24 3d 22 53 |att%.No%|=2:J$="S|
|000014d0| 6e 61 72 65 22 0d 00 80 | 28 e7 48 61 6e 64 6c 65 |nare"...|(.Handle|
|000014e0| 25 3d 48 69 48 61 74 50 | 61 74 74 25 8c 4e 6f 25 |%=HiHatP|att%.No%|
|000014f0| 3d 33 3a 4a 24 3d 22 48 | 69 48 61 74 22 0d 00 81 |=3:J$="H|iHat"...|
|00001500| 26 e7 48 61 6e 64 6c 65 | 25 3d 4d 69 73 63 50 61 |&.Handle|%=MiscPa|
|00001510| 74 74 25 8c 4e 6f 25 3d | 34 3a 4a 24 3d 22 4d 69 |tt%.No%=|4:J$="Mi|
|00001520| 73 63 22 0d 00 82 3f 55 | 70 64 61 74 65 25 3d a3 |sc"...?U|pdate%=.|
|00001530| 3a e7 49 63 6f 6e 25 3e | 30 80 49 63 6f 6e 25 3c |:.Icon%>|0.Icon%<|
|00001540| 31 37 8c 55 70 64 61 74 | 65 25 3d b9 3a 50 61 74 |17.Updat|e%=.:Pat|
|00001550| 74 4e 6f 3d 31 3a 53 61 | 6d 70 4e 6f 3d 49 63 6f |tNo=1:Sa|mpNo=Ico|
|00001560| 6e 25 0d 00 83 39 e7 49 | 63 6f 6e 25 3e 31 36 80 |n%...9.I|con%>16.|
|00001570| 49 63 6f 6e 25 3c 33 33 | 8c 55 70 64 61 74 65 25 |Icon%<33|.Update%|
|00001580| 3d b9 3a 50 61 74 74 4e | 6f 3d 32 3a 53 61 6d 70 |=.:PattN|o=2:Samp|
|00001590| 4e 6f 3d 49 63 6f 6e 25 | 2d 31 36 0d 00 84 35 e7 |No=Icon%|-16...5.|
|000015a0| 55 70 64 61 74 65 25 80 | 41 28 28 4e 6f 25 2a 32 |Update%.|A((No%*2|
|000015b0| 29 2b 28 50 61 74 74 4e | 6f 2d 32 29 2c 5a 28 4e |)+(PattN|o-2),Z(N|
|000015c0| 6f 25 29 2c 53 61 6d 70 | 4e 6f 2c 30 29 3e 30 8c |o%),Samp|No,0)>0.|
|000015d0| 0d 00 85 58 4a 24 3d 4a | 24 2b 22 28 22 2b c3 28 |...XJ$=J|$+"("+.(|
|000015e0| 50 61 74 74 4e 6f 29 2b | 22 29 22 3a 4d 24 3d c3 |PattNo)+|")":M$=.|
|000015f0| 28 41 28 28 4e 6f 25 2a | 32 29 2b 28 50 61 74 74 |(A((No%*|2)+(Patt|
|00001600| 4e 6f 2d 32 29 2c 5a 28 | 4e 6f 25 29 2c 53 61 6d |No-2),Z(|No%),Sam|
|00001610| 70 4e 6f 2c 31 29 29 3a | e7 4d 24 3d 22 31 32 37 |pNo,1)):|.M$="127|
|00001620| 22 8c 4d 24 3d 22 38 22 | 0d 00 86 14 e7 4d 24 3d |".M$="8"|.....M$=|
|00001630| 22 31 31 39 22 8c 4d 24 | 3d 22 37 22 0d 00 87 14 |"119".M$|="7"....|
|00001640| e7 4d 24 3d 22 31 31 31 | 22 8c 4d 24 3d 22 36 22 |.M$="111|".M$="6"|
|00001650| 0d 00 88 14 e7 4d 24 3d | 22 31 30 33 22 8c 4d 24 |.....M$=|"103".M$|
|00001660| 3d 22 35 22 0d 00 89 13 | e7 4d 24 3d 22 39 35 22 |="5"....|.M$="95"|
|00001670| 8c 4d 24 3d 22 34 22 0d | 00 8a 13 e7 4d 24 3d 22 |.M$="4".|....M$="|
|00001680| 38 37 22 8c 4d 24 3d 22 | 33 22 0d 00 8b 13 e7 4d |87".M$="|3".....M|
|00001690| 24 3d 22 37 39 22 8c 4d | 24 3d 22 32 22 0d 00 8c |$="79".M|$="2"...|
|000016a0| 13 e7 4d 24 3d 22 37 31 | 22 8c 4d 24 3d 22 31 22 |..M$="71|".M$="1"|
|000016b0| 0d 00 8d 86 42 24 3d c3 | 28 a4 46 28 4e 6f 25 2c |....B$=.|(.F(No%,|
|000016c0| 41 28 28 4e 6f 25 2a 32 | 29 2b 28 50 61 74 74 4e |A((No%*2|)+(PattN|
|000016d0| 6f 2d 32 29 2c 5a 28 4e | 6f 25 29 2c 53 61 6d 70 |o-2),Z(N|o%),Samp|
|000016e0| 4e 6f 2c 30 29 29 29 3a | 47 24 3d 5a 24 28 4e 6f |No,0))):|G$=Z$(No|
|000016f0| 25 2c 41 28 28 4e 6f 25 | 2a 32 29 2b 28 50 61 74 |%,A((No%|*2)+(Pat|
|00001700| 74 4e 6f 2d 32 29 2c 5a | 28 4e 6f 25 29 2c 53 61 |tNo-2),Z|(No%),Sa|
|00001710| 6d 70 4e 6f 2c 30 29 29 | 3a e7 4a 24 3c 3e 48 24 |mpNo,0))|:.J$<>H$|
|00001720| 84 4d 24 3c 3e 4f 24 84 | 47 24 3c 3e 4b 24 84 42 |.M$<>O$.|G$<>K$.B|
|00001730| 24 3c 3e 56 24 8c 0d 00 | 8e 1f f2 77 79 3a 48 24 |$<>V$...|...wy:H$|
|00001740| 3d 4a 24 3a 4f 24 3d 4d | 24 3a 4b 24 3d 47 24 3a |=J$:O$=M|$:K$=G$:|
|00001750| 56 24 3d 42 24 0d 00 8f | 05 cd 0d 00 90 11 cd 3a |V$=B$...|.......:|
|00001760| e7 42 75 74 74 6f 6e 25 | 3d 34 8c 0d 00 91 0c c8 |.Button%|=4......|
|00001770| 8e 49 63 6f 6e 25 ca 0d | 00 92 43 c9 31 2c 32 2c |.Icon%..|..C.1,2,|
|00001780| 33 2c 34 2c 35 2c 36 2c | 37 2c 38 2c 39 2c 26 61 |3,4,5,6,|7,8,9,&a|
|00001790| 2c 26 62 2c 26 63 2c 26 | 64 2c 26 65 2c 26 66 2c |,&b,&c,&|d,&e,&f,|
|000017a0| 31 36 3a f2 63 28 48 61 | 6e 64 6c 65 25 2c 4e 6f |16:.c(Ha|ndle%,No|
|000017b0| 25 2c 30 2c 49 63 6f 6e | 25 29 0d 00 93 4f c9 31 |%,0,Icon|%)...O.1|
|000017c0| 37 2c 31 38 2c 31 39 2c | 32 30 2c 32 31 2c 32 32 |7,18,19,|20,21,22|
|000017d0| 2c 32 33 2c 32 34 2c 32 | 35 2c 32 36 2c 32 37 2c |,23,24,2|5,26,27,|
|000017e0| 32 38 2c 32 39 2c 33 30 | 2c 33 31 2c 33 32 3a f2 |28,29,30|,31,32:.|
|000017f0| 63 28 48 61 6e 64 6c 65 | 25 2c 4e 6f 25 2c 31 2c |c(Handle|%,No%,1,|
|00001800| 49 63 6f 6e 25 2d 31 36 | 29 0d 00 94 20 c9 33 39 |Icon%-16|)... .39|
|00001810| 3a f2 48 28 a4 46 28 4e | 6f 25 2c 46 28 4e 6f 25 |:.H(.F(N|o%,F(No%|
|00001820| 29 29 2c 26 37 66 2c 30 | 29 0d 00 95 0f c9 34 30 |)),&7f,0|).....40|
|00001830| 3a f2 54 28 4e 6f 25 29 | 0d 00 96 1b c9 33 34 3a |:.T(No%)|.....34:|
|00001840| e7 5a 28 4e 6f 25 29 3e | 31 8c 5a 28 4e 6f 25 29 |.Z(No%)>|1.Z(No%)|
|00001850| 2d 3d 31 0d 00 97 23 f2 | 4a 28 48 61 6e 64 6c 65 |-=1...#.|J(Handle|
|00001860| 25 2c 4e 6f 25 29 3a f2 | 53 28 48 61 6e 64 6c 65 |%,No%):.|S(Handle|
|00001870| 25 2c 4e 6f 25 29 0d 00 | 98 25 c9 34 31 3a e7 5a |%,No%)..|.%.41:.Z|
|00001880| 28 4e 6f 25 29 3c 4d 61 | 78 50 61 74 74 65 72 6e |(No%)<Ma|xPattern|
|00001890| 73 8c 5a 28 4e 6f 25 29 | 2b 3d 31 0d 00 99 23 f2 |s.Z(No%)|+=1...#.|
|000018a0| 4a 28 48 61 6e 64 6c 65 | 25 2c 4e 6f 25 29 3a f2 |J(Handle|%,No%):.|
|000018b0| 53 28 48 61 6e 64 6c 65 | 25 2c 4e 6f 25 29 0d 00 |S(Handle|%,No%)..|
|000018c0| 9a 23 c9 33 37 3a e7 43 | 28 4e 6f 25 29 3d a3 8c |.#.37:.C|(No%)=..|
|000018d0| 43 28 4e 6f 25 29 3d b9 | 8b 43 28 4e 6f 25 29 3d |C(No%)=.|.C(No%)=|
|000018e0| a3 0d 00 9b 05 cb 0d 00 | 9c 11 cd 3a e7 42 75 74 |........|...:.But|
|000018f0| 74 6f 6e 25 3d 31 8c 0d | 00 9d 0c c8 8e 49 63 6f |ton%=1..|.....Ico|
|00001900| 6e 25 ca 0d 00 9e 43 c9 | 31 2c 32 2c 33 2c 34 2c |n%....C.|1,2,3,4,|
|00001910| 35 2c 36 2c 37 2c 38 2c | 39 2c 26 61 2c 26 62 2c |5,6,7,8,|9,&a,&b,|
|00001920| 26 63 2c 26 64 2c 26 65 | 2c 26 66 2c 31 36 3a f2 |&c,&d,&e|,&f,16:.|
|00001930| 72 28 48 61 6e 64 6c 65 | 25 2c 4e 6f 25 2c 30 2c |r(Handle|%,No%,0,|
|00001940| 49 63 6f 6e 25 29 0d 00 | 9f 4f c9 31 37 2c 31 38 |Icon%)..|.O.17,18|
|00001950| 2c 31 39 2c 32 30 2c 32 | 31 2c 32 32 2c 32 33 2c |,19,20,2|1,22,23,|
|00001960| 32 34 2c 32 35 2c 32 36 | 2c 32 37 2c 32 38 2c 32 |24,25,26|,27,28,2|
|00001970| 39 2c 33 30 2c 33 31 2c | 33 32 3a f2 72 28 48 61 |9,30,31,|32:.r(Ha|
|00001980| 6e 64 6c 65 25 2c 4e 6f | 25 2c 31 2c 49 63 6f 6e |ndle%,No|%,1,Icon|
|00001990| 25 2d 31 36 29 0d 00 a0 | 20 c9 33 39 3a f2 48 28 |%-16)...| .39:.H(|
|000019a0| a4 46 28 4e 6f 25 2c 46 | 28 4e 6f 25 29 29 2c 26 |.F(No%,F|(No%)),&|
|000019b0| 37 66 2c 30 29 0d 00 a1 | 0f c9 34 30 3a f2 54 28 |7f,0)...|..40:.T(|
|000019c0| 4e 6f 25 29 0d 00 a2 1b | c9 34 31 3a e7 5a 28 4e |No%)....|.41:.Z(N|
|000019d0| 6f 25 29 3e 31 8c 5a 28 | 4e 6f 25 29 2d 3d 31 0d |o%)>1.Z(|No%)-=1.|
|000019e0| 00 a3 23 f2 4a 28 48 61 | 6e 64 6c 65 25 2c 4e 6f |..#.J(Ha|ndle%,No|
|000019f0| 25 29 3a f2 53 28 48 61 | 6e 64 6c 65 25 2c 4e 6f |%):.S(Ha|ndle%,No|
|00001a00| 25 29 0d 00 a4 25 c9 33 | 34 3a e7 5a 28 4e 6f 25 |%)...%.3|4:.Z(No%|
|00001a10| 29 3c 4d 61 78 50 61 74 | 74 65 72 6e 73 8c 5a 28 |)<MaxPat|terns.Z(|
|00001a20| 4e 6f 25 29 2b 3d 31 0d | 00 a5 23 f2 4a 28 48 61 |No%)+=1.|..#.J(Ha|
|00001a30| 6e 64 6c 65 25 2c 4e 6f | 25 29 3a f2 53 28 48 61 |ndle%,No|%):.S(Ha|
|00001a40| 6e 64 6c 65 25 2c 4e 6f | 25 29 0d 00 a6 23 c9 33 |ndle%,No|%)...#.3|
|00001a50| 37 3a e7 43 28 4e 6f 25 | 29 3d a3 8c 43 28 4e 6f |7:.C(No%|)=..C(No|
|00001a60| 25 29 3d b9 8b 43 28 4e | 6f 25 29 3d a3 0d 00 a7 |%)=..C(N|o%)=....|
|00001a70| 05 cb 0d 00 a8 11 cd 3a | e7 42 75 74 74 6f 6e 25 |.......:|.Button%|
|00001a80| 3d 32 8c 0d 00 a9 17 e7 | 49 63 6f 6e 25 3d 33 39 |=2......|Icon%=39|
|00001a90| 84 49 63 6f 6e 25 3d 34 | 30 8c 0d 00 aa 0b f2 54 |.Icon%=4|0......T|
|00001aa0| 28 4e 6f 25 29 0d 00 ab | 10 cc 3a c8 8e 48 61 6e |(No%)...|..:..Han|
|00001ab0| 64 6c 65 25 ca 0d 00 ac | 22 c9 42 61 73 73 50 61 |dle%....|".BassPa|
|00001ac0| 74 74 25 3a f2 46 28 42 | 61 73 73 4d 65 6e 75 25 |tt%:.F(B|assMenu%|
|00001ad0| 2c 42 6c 6f 63 6b 29 0d | 00 ad 24 c9 53 6e 61 72 |,Block).|..$.Snar|
|00001ae0| 65 50 61 74 74 25 3a f2 | 46 28 53 6e 61 72 65 4d |ePatt%:.|F(SnareM|
|00001af0| 65 6e 75 25 2c 42 6c 6f | 63 6b 29 0d 00 ae 24 c9 |enu%,Blo|ck)...$.|
|00001b00| 48 69 48 61 74 50 61 74 | 74 25 3a f2 46 28 48 69 |HiHatPat|t%:.F(Hi|
|00001b10| 48 61 74 4d 65 6e 75 25 | 2c 42 6c 6f 63 6b 29 0d |HatMenu%|,Block).|
|00001b20| 00 af 22 c9 4d 69 73 63 | 50 61 74 74 25 3a f2 46 |..".Misc|Patt%:.F|
|00001b30| 28 4d 69 73 63 4d 65 6e | 75 25 2c 42 6c 6f 63 6b |(MiscMen|u%,Block|
|00001b40| 29 0d 00 b0 05 cb 0d 00 | b1 05 cd 0d 00 b2 07 cd |).......|........|
|00001b50| 3a e1 0d 00 b3 7a dd f2 | 63 28 48 61 6e 64 6c 65 |:....z..|c(Handle|
|00001b60| 25 2c 57 69 6e 25 2c 50 | 6c 75 73 25 2c 49 25 29 |%,Win%,P|lus%,I%)|
|00001b70| 3a ea 50 61 74 4e 6f 25 | 2c 43 75 72 72 25 3a 50 |:.PatNo%|,Curr%:P|
|00001b80| 61 74 4e 6f 25 3d 28 57 | 69 6e 25 2a 32 29 2d 31 |atNo%=(W|in%*2)-1|
|00001b90| 3a 43 75 72 72 25 3d 41 | 28 50 61 74 4e 6f 25 2b |:Curr%=A|(PatNo%+|
|00001ba0| 50 6c 75 73 25 2c 5a 28 | 57 69 6e 25 29 2c 49 25 |Plus%,Z(|Win%),I%|
|00001bb0| 2c 30 29 3a e7 43 75 72 | 72 25 3d 30 84 43 75 72 |,0):.Cur|r%=0.Cur|
|00001bc0| 72 25 3c 3e 46 28 57 69 | 6e 25 29 8c 0d 00 b4 69 |r%<>F(Wi|n%)....i|
|00001bd0| 41 28 50 61 74 4e 6f 25 | 2b 50 6c 75 73 25 2c 5a |A(PatNo%|+Plus%,Z|
|00001be0| 28 57 69 6e 25 29 2c 49 | 25 2c 30 29 3d 46 28 57 |(Win%),I|%,0)=F(W|
|00001bf0| 69 6e 25 29 3a 41 28 50 | 61 74 4e 6f 25 2b 50 6c |in%):A(P|atNo%+Pl|
|00001c00| 75 73 25 2c 5a 28 57 69 | 6e 25 29 2c 49 25 2c 31 |us%,Z(Wi|n%),I%,1|
|00001c10| 29 3d 26 37 66 3a e7 ac | 50 6c 61 79 69 6e 67 50 |)=&7f:..|PlayingP|
|00001c20| 61 74 74 65 72 6e 73 80 | ac 50 6c 61 79 69 6e 67 |atterns.|.Playing|
|00001c30| 53 6f 6e 67 8c 0d 00 b5 | 29 f2 48 28 a4 46 28 57 |Song....|).H(.F(W|
|00001c40| 69 6e 25 2c 46 28 57 69 | 6e 25 29 29 2c 26 37 66 |in%,F(Wi|n%)),&7f|
|00001c50| 2c 50 61 74 4e 6f 25 2b | 50 6c 75 73 25 29 0d 00 |,PatNo%+|Plus%)..|
|00001c60| b6 05 cd 0d 00 b7 24 cc | 3a 41 28 50 61 74 4e 6f |......$.|:A(PatNo|
|00001c70| 25 2b 50 6c 75 73 25 2c | 5a 28 57 69 6e 25 29 2c |%+Plus%,|Z(Win%),|
|00001c80| 49 25 2c 30 29 3d 30 0d | 00 b8 17 cd 3a e7 50 6c |I%,0)=0.|....:.Pl|
|00001c90| 75 73 25 3d 31 8c 49 25 | 3d 49 25 2b 31 36 0d 00 |us%=1.I%|=I%+16..|
|00001ca0| b9 1b f2 74 28 48 61 6e | 64 6c 65 25 2c 57 69 6e |...t(Han|dle%,Win|
|00001cb0| 25 2c 49 25 2d 31 29 3a | e1 0d 00 ba 75 dd f2 72 |%,I%-1):|....u..r|
|00001cc0| 28 48 61 6e 64 6c 65 25 | 2c 57 69 6e 25 2c 50 6c |(Handle%|,Win%,Pl|
|00001cd0| 75 73 25 2c 49 25 29 3a | ea 50 61 74 4e 6f 25 2c |us%,I%):|.PatNo%,|
|00001ce0| 43 75 72 72 25 2c 43 75 | 72 72 56 6f 6c 25 3a 50 |Curr%,Cu|rrVol%:P|
|00001cf0| 61 74 4e 6f 25 3d 28 57 | 69 6e 25 2a 32 29 2d 31 |atNo%=(W|in%*2)-1|
|00001d00| 3a 43 75 72 72 25 3d 41 | 28 50 61 74 4e 6f 25 2b |:Curr%=A|(PatNo%+|
|00001d10| 50 6c 75 73 25 2c 5a 28 | 57 69 6e 25 29 2c 49 25 |Plus%,Z(|Win%),I%|
|00001d20| 2c 30 29 3a e7 43 75 72 | 72 25 3c 3e 30 8c 0d 00 |,0):.Cur|r%<>0...|
|00001d30| bb 50 43 75 72 72 56 6f | 6c 25 3d 41 28 50 61 74 |.PCurrVo|l%=A(Pat|
|00001d40| 4e 6f 25 2b 50 6c 75 73 | 25 2c 5a 28 57 69 6e 25 |No%+Plus|%,Z(Win%|
|00001d50| 29 2c 49 25 2c 31 29 3a | 43 75 72 72 56 6f 6c 25 |),I%,1):|CurrVol%|
|00001d60| 2d 3d 38 3a e7 43 75 72 | 72 56 6f 6c 25 3c 3d 37 |-=8:.Cur|rVol%<=7|
|00001d70| 30 8c 43 75 72 72 56 6f | 6c 25 3d 26 37 66 0d 00 |0.CurrVo|l%=&7f..|
|00001d80| bc 49 41 28 50 61 74 4e | 6f 25 2b 50 6c 75 73 25 |.IA(PatN|o%+Plus%|
|00001d90| 2c 5a 28 57 69 6e 25 29 | 2c 49 25 2c 31 29 3d 43 |,Z(Win%)|,I%,1)=C|
|00001da0| 75 72 72 56 6f 6c 25 3a | e7 ac 50 6c 61 79 69 6e |urrVol%:|..Playin|
|00001db0| 67 50 61 74 74 65 72 6e | 73 80 ac 50 6c 61 79 69 |gPattern|s..Playi|
|00001dc0| 6e 67 53 6f 6e 67 8c 0d | 00 bd 2c f2 48 28 a4 46 |ngSong..|..,.H(.F|
|00001dd0| 28 57 69 6e 25 2c 43 75 | 72 72 25 29 2c 43 75 72 |(Win%,Cu|rr%),Cur|
|00001de0| 72 56 6f 6c 25 2c 50 61 | 74 4e 6f 25 2b 50 6c 75 |rVol%,Pa|tNo%+Plu|
|00001df0| 73 25 29 0d 00 be 05 cd | 0d 00 bf 07 cd 3a e1 0d |s%).....|.....:..|
|00001e00| 00 c0 2e dd a4 46 28 50 | 61 74 74 65 72 6e 25 2c |.....F(P|attern%,|
|00001e10| 53 61 6d 70 4e 6f 25 29 | 3a 53 61 6d 70 25 3d 30 |SampNo%)|:Samp%=0|
|00001e20| 3a e7 50 61 74 74 65 72 | 6e 25 3d 31 8c 0d 00 c1 |:.Patter|n%=1....|
|00001e30| 11 53 61 6d 70 25 3d 53 | 61 6d 70 4e 6f 25 0d 00 |.Samp%=S|ampNo%..|
|00001e40| c2 4a cc 3a e3 41 64 64 | 4f 6e 3d 31 b8 50 61 74 |.J.:.Add|On=1.Pat|
|00001e50| 74 65 72 6e 25 2d 31 3a | 53 61 6d 70 25 3d 53 61 |tern%-1:|Samp%=Sa|
|00001e60| 6d 70 25 2b bb 28 5a 24 | 28 41 64 64 4f 6e 2c 30 |mp%+.(Z$|(AddOn,0|
|00001e70| 29 29 3a ed 3a 53 61 6d | 70 25 3d 53 61 6d 70 25 |)):.:Sam|p%=Samp%|
|00001e80| 2b 53 61 6d 70 4e 6f 25 | 0d 00 c3 0e cd 3a 3d 53 |+SampNo%|.....:=S|
|00001e90| 61 6d 70 25 2d 31 0d 00 | c4 27 dd f2 74 79 3a e7 |amp%-1..|.'..ty:.|
|00001ea0| 42 75 74 74 6f 6e 25 3d | 32 8c f2 46 28 49 63 6f |Button%=|2..F(Ico|
|00001eb0| 6e 4d 65 6e 75 25 2c 42 | 6c 6f 63 6b 29 0d 00 c5 |nMenu%,B|lock)...|
|00001ec0| 1b e7 42 75 74 74 6f 6e | 25 3d 31 84 42 75 74 74 |..Button|%=1.Butt|
|00001ed0| 6f 6e 25 3d 34 8c f2 70 | 0d 00 c6 05 e1 0d 00 c7 |on%=4..p|........|
|00001ee0| 21 dd f2 58 79 3a e7 49 | 63 6f 6e 25 3d 33 80 28 |!..Xy:.I|con%=3.(|
|00001ef0| 42 75 74 74 6f 6e 25 80 | 38 30 29 3e 30 8c 0d 00 |Button%.|80)>0...|
|00001f00| c8 07 f2 76 79 0d 00 c9 | 1f cc 3a e7 49 63 6f 6e |...vy...|..:.Icon|
|00001f10| 25 3d 34 80 28 42 75 74 | 74 6f 6e 25 80 35 29 3e |%=4.(But|ton%.5)>|
|00001f20| 30 8c f2 51 0d 00 ca 07 | cd 3a e1 0d 00 cb 80 dd |0..Q....|.:......|
|00001f30| f2 76 79 3a 42 6c 6f 63 | 6b 21 30 3d 53 61 76 65 |.vy:Bloc|k!0=Save|
|00001f40| 25 3a c8 99 26 34 30 30 | 63 62 2c 2c 42 6c 6f 63 |%:..&400|cb,,Bloc|
|00001f50| 6b 3a 6f 78 25 3d 42 6c | 6f 63 6b 21 34 2d 42 6c |k:ox%=Bl|ock!4-Bl|
|00001f60| 6f 63 6b 21 32 30 2d 34 | 3a 6f 79 25 3d 42 6c 6f |ock!20-4|:oy%=Blo|
|00001f70| 63 6b 21 31 36 2d 42 6c | 6f 63 6b 21 32 34 2b 37 |ck!16-Bl|ock!24+7|
|00001f80| 32 3a 42 6c 6f 63 6b 21 | 34 3d 32 3a c8 99 26 34 |2:Block!|4=2:..&4|
|00001f90| 30 30 63 65 2c 2c 42 6c | 6f 63 6b 3a e7 ac 64 72 |00ce,,Bl|ock:..dr|
|00001fa0| 61 67 61 73 70 72 69 74 | 65 25 8c 0d 00 cc 9e 42 |agasprit|e%.....B|
|00001fb0| 6c 6f 63 6b 21 30 3d 53 | 61 76 65 25 3a 42 6c 6f |lock!0=S|ave%:Blo|
|00001fc0| 63 6b 21 34 3d 35 3a 42 | 6c 6f 63 6b 21 38 2b 3d |ck!4=5:B|lock!8+=|
|00001fd0| 6f 78 25 3a 42 6c 6f 63 | 6b 21 26 63 2b 3d 6f 79 |ox%:Bloc|k!&c+=oy|
|00001fe0| 25 3a 42 6c 6f 63 6b 21 | 31 36 2b 3d 6f 78 25 3a |%:Block!|16+=ox%:|
|00001ff0| 42 6c 6f 63 6b 21 32 30 | 2b 3d 6f 79 25 3a 42 6c |Block!20|+=oy%:Bl|
|00002000| 6f 63 6b 21 32 34 3d 30 | 3a 42 6c 6f 63 6b 21 32 |ock!24=0|:Block!2|
|00002010| 38 3d 30 3a 42 6c 6f 63 | 6b 21 33 32 3d 26 37 66 |8=0:Bloc|k!32=&7f|
|00002020| 66 66 66 66 66 66 3a 42 | 6c 6f 63 6b 21 33 36 3d |ffffff:B|lock!36=|
|00002030| 26 37 66 66 66 66 66 66 | 66 3a c8 99 26 34 30 30 |&7ffffff|f:..&400|
|00002040| 64 30 2c 2c 42 6c 6f 63 | 6b 0d 00 cd 79 cc 3a 42 |d0,,Bloc|k...y.:B|
|00002050| 6c 6f 63 6b 21 30 3d 42 | 6c 6f 63 6b 21 38 2b 6f |lock!0=B|lock!8+o|
|00002060| 78 25 3a 42 6c 6f 63 6b | 21 34 3d 42 6c 6f 63 6b |x%:Block|!4=Block|
|00002070| 21 26 63 2b 6f 79 25 3a | 42 6c 6f 63 6b 21 38 3d |!&c+oy%:|Block!8=|
|00002080| 42 6c 6f 63 6b 21 31 36 | 2b 6f 78 25 3a 42 6c 6f |Block!16|+ox%:Blo|
|00002090| 63 6b 21 26 63 3d 42 6c | 6f 63 6b 21 32 30 2b 6f |ck!&c=Bl|ock!20+o|
|000020a0| 79 25 3a c8 99 26 34 32 | 34 30 30 2c 26 63 35 2c |y%:..&42|400,&c5,|
|000020b0| 31 2c 22 21 44 72 75 6d | 6d 65 72 22 2c 42 6c 6f |1,"!Drum|mer",Blo|
|000020c0| 63 6b 0d 00 ce 07 cd 3a | e1 0d 00 cf 34 dd a4 47 |ck.....:|....4..G|
|000020d0| 28 6d 61 73 6b 25 29 3a | 42 6c 6f 63 6b 21 30 3d |(mask%):|Block!0=|
|000020e0| 6d 61 73 6b 25 3a c8 99 | 26 34 30 30 63 37 2c 30 |mask%:..|&400c7,0|
|000020f0| 2c 42 6c 6f 63 6b b8 61 | 25 3a 3d 61 25 0d 00 d0 |,Block.a|%:=a%...|
|00002100| 1c dd f2 72 79 28 52 65 | 61 73 6f 6e 25 29 3a c8 |...ry(Re|ason%):.|
|00002110| 8e 52 65 61 73 6f 6e 25 | ca 0d 00 d1 13 c9 31 3a |.Reason%|......1:|
|00002120| f2 55 79 28 42 6c 6f 63 | 6b 21 30 29 0d 00 d2 14 |.Uy(Bloc|k!0)....|
|00002130| c9 32 3a f2 50 28 42 6c | 6f 63 6b 21 30 2c b9 29 |.2:.P(Bl|ock!0,.)|
|00002140| 0d 00 d3 12 c9 33 3a f2 | 58 28 42 6c 6f 63 6b 21 |.....3:.|X(Block!|
|00002150| 30 29 0d 00 d4 11 c9 36 | 3a f2 49 79 28 42 6c 6f |0).....6|:.Iy(Blo|
|00002160| 63 6b 29 0d 00 d5 0a c9 | 37 3a f2 4e 79 0d 00 d6 |ck).....|7:.Ny...|
|00002170| 0a c9 38 3a f2 59 79 0d | 00 d7 11 c9 39 3a f2 51 |..8:.Yy.|....9:.Q|
|00002180| 79 28 42 6c 6f 63 6b 29 | 0d 00 d8 15 c9 31 37 2c |y(Block)|.....17,|
|00002190| 31 38 3a f2 71 79 28 42 | 6c 6f 63 6b 29 0d 00 d9 |18:.qy(B|lock)...|
|000021a0| 07 cb 3a e1 0d 00 da 48 | dd f2 59 79 3a ea 57 69 |..:....H|..Yy:.Wi|
|000021b0| 6e 25 2c 4b 65 79 25 2c | 43 61 75 67 68 74 25 3a |n%,Key%,|Caught%:|
|000021c0| 57 69 6e 25 3d 42 6c 6f | 63 6b 21 30 3a 4b 65 79 |Win%=Blo|ck!0:Key|
|000021d0| 25 3d 42 6c 6f 63 6b 21 | 32 34 3a 43 61 75 67 68 |%=Block!|24:Caugh|
|000021e0| 74 25 3d a3 3a c8 8e 57 | 69 6e 25 ca 0d 00 db 20 |t%=.:..W|in%.... |
|000021f0| c9 53 61 76 65 25 3a e7 | 4b 65 79 25 3d 26 64 8c |.Save%:.|Key%=&d.|
|00002200| f2 51 3a 43 61 75 67 68 | 74 25 3d b9 0d 00 dc 2f |.Q:Caugh|t%=..../|
|00002210| c9 54 65 6d 70 6f 25 3a | e7 4b 65 79 25 3d 26 64 |.Tempo%:|.Key%=&d|
|00002220| 8c f2 78 3a f2 58 28 54 | 65 6d 70 6f 25 29 3a f2 |..x:.X(T|empo%):.|
|00002230| 59 3a 43 61 75 67 68 74 | 25 3d b9 0d 00 dd 16 c9 |Y:Caught|%=......|
|00002240| 50 61 74 43 6f 6e 25 3a | e7 4b 65 79 25 3d 26 64 |PatCon%:|.Key%=&d|
|00002250| 8c 0d 00 de 47 50 61 74 | 74 65 72 6e 54 65 6d 70 |....GPat|ternTemp|
|00002260| 6f 25 3d bb 28 24 a4 4d | 28 50 61 74 43 6f 6e 25 |o%=.($.M|(PatCon%|
|00002270| 2c 26 64 29 29 3a e7 50 | 61 74 74 65 72 6e 54 65 |,&d)):.P|atternTe|
|00002280| 6d 70 6f 25 3e 33 30 8c | 50 61 74 74 65 72 6e 54 |mpo%>30.|PatternT|
|00002290| 65 6d 70 6f 25 3d 33 30 | 0d 00 df 24 e7 50 61 74 |empo%=30|...$.Pat|
|000022a0| 74 65 72 6e 54 65 6d 70 | 6f 25 3c 31 8c 50 61 74 |ternTemp|o%<1.Pat|
|000022b0| 74 65 72 6e 54 65 6d 70 | 6f 25 3d 31 0d 00 e0 2f |ternTemp|o%=1.../|
|000022c0| 50 61 74 74 65 72 6e 54 | 65 6d 70 6f 25 3d 33 31 |PatternT|empo%=31|
|000022d0| 2d 50 61 74 74 65 72 6e | 54 65 6d 70 6f 25 3a f2 |-Pattern|Tempo%:.|
|000022e0| 4e 3a 43 61 75 67 68 74 | 25 3d b9 0d 00 e1 05 cd |N:Caught|%=......|
|000022f0| 0d 00 e2 38 c9 42 61 73 | 73 50 61 74 74 25 2c 53 |...8.Bas|sPatt%,S|
|00002300| 6e 61 72 65 50 61 74 74 | 25 2c 48 69 48 61 74 50 |narePatt|%,HiHatP|
|00002310| 61 74 74 25 2c 4d 69 73 | 63 50 61 74 74 25 3a e7 |att%,Mis|cPatt%:.|
|00002320| 4b 65 79 25 3d 26 64 8c | 0d 00 e3 3e 5a 28 a4 53 |Key%=&d.|...>Z(.S|
|00002330| 28 57 69 6e 25 29 29 3d | bb 28 24 a4 4d 28 57 69 |(Win%))=|.($.M(Wi|
|00002340| 6e 25 2c 33 33 29 29 3a | e7 5a 28 a4 53 28 57 69 |n%,33)):|.Z(.S(Wi|
|00002350| 6e 25 29 29 3e 35 30 8c | 5a 28 a4 53 28 57 69 6e |n%))>50.|Z(.S(Win|
|00002360| 25 29 29 3d 35 30 0d 00 | e4 20 e7 5a 28 a4 53 28 |%))=50..|. .Z(.S(|
|00002370| 57 69 6e 25 29 29 3c 31 | 8c 5a 28 a4 53 28 57 69 |Win%))<1|.Z(.S(Wi|
|00002380| 6e 25 29 29 3d 31 0d 00 | e5 31 f2 4a 28 57 69 6e |n%))=1..|.1.J(Win|
|00002390| 25 2c a4 53 28 57 69 6e | 25 29 29 3a f2 53 28 57 |%,.S(Win|%)):.S(W|
|000023a0| 69 6e 25 2c a4 53 28 57 | 69 6e 25 29 29 3a 43 61 |in%,.S(W|in%)):Ca|
|000023b0| 75 67 68 74 25 3d b9 0d | 00 e6 05 cd 0d 00 e7 27 |ught%=..|.......'|
|000023c0| c9 53 65 71 75 65 6e 63 | 65 25 3a e7 4b 65 79 25 |.Sequenc|e%:.Key%|
|000023d0| 3d 26 64 8c f2 4d 3a f2 | 41 3a 43 61 75 67 68 74 |=&d..M:.|A:Caught|
|000023e0| 25 3d b9 0d 00 e8 14 7f | c8 99 26 34 30 30 64 63 |%=......|..&400dc|
|000023f0| 2c 4b 65 79 25 3a e1 0d | 00 e9 1e cb 3a e7 43 61 |,Key%:..|....:.Ca|
|00002400| 75 67 68 74 25 3d a3 3a | c8 99 26 34 30 30 64 63 |ught%=.:|..&400dc|
|00002410| 2c 4b 65 79 25 0d 00 ea | 05 e1 0d 00 eb 31 dd a4 |,Key%...|.....1..|
|00002420| 53 28 48 61 6e 64 6c 65 | 25 29 3a 52 65 73 25 3d |S(Handle|%):Res%=|
|00002430| 30 3a e7 48 61 6e 64 6c | 65 25 3d 42 61 73 73 50 |0:.Handl|e%=BassP|
|00002440| 61 74 74 25 8c 52 65 73 | 25 3d 31 0d 00 ec 1e e7 |att%.Res|%=1.....|
|00002450| 48 61 6e 64 6c 65 25 3d | 53 6e 61 72 65 50 61 74 |Handle%=|SnarePat|
|00002460| 74 25 8c 52 65 73 25 3d | 32 0d 00 ed 1e e7 48 61 |t%.Res%=|2.....Ha|
|00002470| 6e 64 6c 65 25 3d 48 69 | 48 61 74 50 61 74 74 25 |ndle%=Hi|HatPatt%|
|00002480| 8c 52 65 73 25 3d 33 0d | 00 ee 1d e7 48 61 6e 64 |.Res%=3.|....Hand|
|00002490| 6c 65 25 3d 4d 69 73 63 | 50 61 74 74 25 8c 52 65 |le%=Misc|Patt%.Re|
|000024a0| 73 25 3d 34 0d 00 ef 09 | 3d 52 65 73 25 0d 00 f0 |s%=4....|=Res%...|
|000024b0| 4e dd a4 4d 28 48 61 6e | 64 6c 65 25 2c 49 63 6f |N..M(Han|dle%,Ico|
|000024c0| 6e 25 29 3a 42 6c 6f 63 | 6b 21 30 3d 48 61 6e 64 |n%):Bloc|k!0=Hand|
|000024d0| 6c 65 25 3a 42 6c 6f 63 | 6b 21 34 3d 49 63 6f 6e |le%:Bloc|k!4=Icon|
|000024e0| 25 3a c8 99 26 34 30 30 | 63 65 2c 2c 42 6c 6f 63 |%:..&400|ce,,Bloc|
|000024f0| 6b 3a 3d 42 6c 6f 63 6b | 21 32 38 0d 00 f1 f1 dd |k:=Block|!28.....|
|00002500| f2 7a 79 3a c8 99 26 34 | 30 30 64 39 2c 2c 22 3c |.zy:..&4|00d9,,"<|
|00002510| 44 72 75 6d 6d 65 72 24 | 44 69 72 3e 2e 54 65 6d |Drummer$|Dir>.Tem|
|00002520| 70 6c 61 74 65 73 22 3a | 42 61 73 73 50 61 74 74 |plates":|BassPatt|
|00002530| 25 3d a4 41 28 22 42 61 | 73 73 45 64 69 74 22 29 |%=.A("Ba|ssEdit")|
|00002540| 3a 53 6e 61 72 65 50 61 | 74 74 25 3d a4 41 28 22 |:SnarePa|tt%=.A("|
|00002550| 53 6e 61 72 65 45 64 69 | 74 22 29 3a 48 69 48 61 |SnareEdi|t"):HiHa|
|00002560| 74 50 61 74 74 25 3d a4 | 41 28 22 48 69 48 61 74 |tPatt%=.|A("HiHat|
|00002570| 45 64 69 74 22 29 3a 4d | 69 73 63 50 61 74 74 25 |Edit"):M|iscPatt%|
|00002580| 3d a4 41 28 22 4d 69 73 | 63 45 64 69 74 22 29 3a |=.A("Mis|cEdit"):|
|00002590| 53 6f 6e 67 49 6e 66 6f | 25 3d a4 41 28 22 53 6f |SongInfo|%=.A("So|
|000025a0| 6e 67 49 6e 66 6f 22 29 | 3a 50 61 74 43 6f 6e 25 |ngInfo")|:PatCon%|
|000025b0| 3d a4 41 28 22 50 61 74 | 43 6f 6e 74 72 6f 6c 22 |=.A("Pat|Control"|
|000025c0| 29 3a 49 6e 66 6f 25 3d | a4 41 28 22 49 6e 66 6f |):Info%=|.A("Info|
|000025d0| 22 29 3a 53 65 71 75 65 | 6e 63 65 25 3d a4 41 28 |"):Seque|nce%=.A(|
|000025e0| 22 53 65 71 75 65 6e 63 | 65 72 22 29 0d 00 f2 63 |"Sequenc|er")...c|
|000025f0| 43 6f 6e 74 72 6f 6c 25 | 3d a4 41 28 22 43 6f 6e |Control%|=.A("Con|
|00002600| 74 72 6f 6c 6c 65 72 22 | 29 3a 54 65 6d 70 6f 25 |troller"|):Tempo%|
|00002610| 3d a4 41 28 22 54 65 6d | 70 6f 22 29 3a 53 61 76 |=.A("Tem|po"):Sav|
|00002620| 65 25 3d a4 41 28 22 53 | 61 76 65 22 29 3a 4d 65 |e%=.A("S|ave"):Me|
|00002630| 73 73 61 67 65 25 3d a4 | 41 28 22 4d 65 73 73 61 |ssage%=.|A("Messa|
|00002640| 67 65 22 29 3a c8 99 26 | 34 30 30 64 61 3a e1 0d |ge"):..&|400da:..|
|00002650| 00 f3 33 dd f2 58 28 48 | 61 6e 64 6c 65 25 29 3a |..3..X(H|andle%):|
|00002660| 42 6c 6f 63 6b 21 30 3d | 48 61 6e 64 6c 65 25 3a |Block!0=|Handle%:|
|00002670| c8 99 26 34 30 30 63 36 | 2c 30 2c 42 6c 6f 63 6b |..&400c6|,0,Block|
|00002680| 3a e1 0d 00 f4 b0 dd a4 | 55 28 48 61 6e 64 6c 65 |:.......|U(Handle|
|00002690| 25 2c 69 78 30 25 2c 69 | 79 30 25 2c 69 78 31 25 |%,ix0%,i|y0%,ix1%|
|000026a0| 2c 69 79 31 25 2c 66 6c | 61 67 73 25 2c 57 24 29 |,iy1%,fl|ags%,W$)|
|000026b0| 3a 42 6c 6f 63 6b 21 30 | 3d 48 61 6e 64 6c 65 25 |:Block!0|=Handle%|
|000026c0| 3a 42 6c 6f 63 6b 21 34 | 3d 69 78 30 25 3a 42 6c |:Block!4|=ix0%:Bl|
|000026d0| 6f 63 6b 21 38 3d 69 79 | 30 25 3a 42 6c 6f 63 6b |ock!8=iy|0%:Block|
|000026e0| 21 26 63 3d 69 78 31 25 | 3a 42 6c 6f 63 6b 21 31 |!&c=ix1%|:Block!1|
|000026f0| 36 3d 69 79 31 25 3a 42 | 6c 6f 63 6b 21 32 30 3d |6=iy1%:B|lock!20=|
|00002700| 66 6c 61 67 73 25 3a 24 | 28 42 6c 6f 63 6b 2b 32 |flags%:$|(Block+2|
|00002710| 34 29 3d 57 24 3a c8 99 | 26 34 30 30 63 32 2c 2c |4)=W$:..|&400c2,,|
|00002720| 42 6c 6f 63 6b b8 49 63 | 6f 6e 25 3a 3d 49 63 6f |Block.Ic|on%:=Ico|
|00002730| 6e 25 0d 00 f5 47 dd f2 | 64 79 28 48 61 6e 64 6c |n%...G..|dy(Handl|
|00002740| 65 25 2c 49 63 6f 6e 25 | 29 3a 42 6c 6f 63 6b 21 |e%,Icon%|):Block!|
|00002750| 30 3d 48 61 6e 64 6c 65 | 25 3a 42 6c 6f 63 6b 21 |0=Handle|%:Block!|
|00002760| 34 3d 49 63 6f 6e 25 3a | c8 99 26 34 30 30 63 34 |4=Icon%:|..&400c4|
|00002770| 2c 2c 42 6c 6f 63 6b 3a | e1 0d 00 f6 5f dd f2 47 |,,Block:|...._..G|
|00002780| 79 3a c8 99 26 34 30 30 | 64 30 2c 2c 2d 31 3a 21 |y:..&400|d0,,-1:!|
|00002790| 42 6c 6f 63 6b 3d 9f 3a | 24 28 42 6c 6f 63 6b 2b |Block=.:|$(Block+|
|000027a0| 34 29 3d f6 24 2b 22 20 | 61 74 20 6c 69 6e 65 20 |4)=.$+" |at line |
|000027b0| 22 2b c3 9e 2b bd 30 3a | c8 99 26 34 30 30 64 66 |"+..+.0:|..&400df|
|000027c0| 2c 42 6c 6f 63 6b 2c 31 | 2c 22 54 68 65 20 44 72 |,Block,1|,"The Dr|
|000027d0| 75 6d 6d 65 72 22 3a e1 | 0d 00 f7 9c dd f2 62 28 |ummer":.|......b(|
|000027e0| 48 61 6e 64 6c 65 25 2c | 49 63 6f 6e 25 29 3a 42 |Handle%,|Icon%):B|
|000027f0| 6c 6f 63 6b 21 30 3d 48 | 61 6e 64 6c 65 25 3a 42 |lock!0=H|andle%:B|
|00002800| 6c 6f 63 6b 21 34 3d 49 | 63 6f 6e 25 3a c8 99 26 |lock!4=I|con%:..&|
|00002810| 34 30 30 63 65 2c 2c 42 | 6c 6f 63 6b 3a 69 78 30 |400ce,,B|lock:ix0|
|00002820| 25 3d 42 6c 6f 63 6b 21 | 38 3a 69 79 30 25 3d 42 |%=Block!|8:iy0%=B|
|00002830| 6c 6f 63 6b 21 26 63 3a | 69 78 31 25 3d 42 6c 6f |lock!&c:|ix1%=Blo|
|00002840| 63 6b 21 31 36 3a 69 79 | 31 25 3d 42 6c 6f 63 6b |ck!16:iy|1%=Block|
|00002850| 21 32 30 3a 66 6c 61 67 | 73 25 3d 42 6c 6f 63 6b |!20:flag|s%=Block|
|00002860| 21 32 34 3a 57 24 3d 24 | 28 42 6c 6f 63 6b 2b 32 |!24:W$=$|(Block+2|
|00002870| 38 29 3a e1 0d 00 f8 b0 | dd a4 4e 3a 21 42 6c 6f |8):.....|..N:!Blo|
|00002880| 63 6b 3d 2d 31 3a 42 6c | 6f 63 6b 21 34 3d 30 3a |ck=-1:Bl|ock!4=0:|
|00002890| 42 6c 6f 63 6b 21 38 3d | 30 3a 42 6c 6f 63 6b 21 |Block!8=|0:Block!|
|000028a0| 26 63 3d 36 38 3a 42 6c | 6f 63 6b 21 31 36 3d 36 |&c=68:Bl|ock!16=6|
|000028b0| 38 3a 42 6c 6f 63 6b 21 | 32 30 3d 26 33 31 30 32 |8:Block!|20=&3102|
|000028c0| 3a 57 24 3d 22 21 44 72 | 75 6d 6d 65 72 22 3a de |:W$="!Dr|ummer":.|
|000028d0| 42 6c 6f 63 6b 21 32 34 | 20 28 a9 57 24 2b 31 29 |Block!24| (.W$+1)|
|000028e0| 3a 24 28 42 6c 6f 63 6b | 21 32 34 29 3d 57 24 3a |:$(Block|!24)=W$:|
|000028f0| 42 6c 6f 63 6b 21 32 38 | 3d 31 3a 42 6c 6f 63 6b |Block!28|=1:Block|
|00002900| 21 33 32 3d a9 57 24 2b | 31 3a c8 99 26 34 30 30 |!32=.W$+|1:..&400|
|00002910| 63 32 2c 2c 42 6c 6f 63 | 6b b8 49 63 6f 6e 3a 3d |c2,,Bloc|k.Icon:=|
|00002920| 49 63 6f 6e 0d 00 f9 23 | dd f2 71 79 28 48 61 6e |Icon...#|..qy(Han|
|00002930| 64 6c 65 25 29 3a e7 48 | 61 6e 64 6c 65 25 21 34 |dle%):.H|andle%!4|
|00002940| 3d 54 61 73 6b 8c e1 0d | 00 fa 28 e7 28 48 61 6e |=Task...|..(.(Han|
|00002950| 64 6c 65 25 21 31 36 3d | 35 29 80 28 48 61 6e 64 |dle%!16=|5).(Hand|
|00002960| 6c 65 25 21 34 30 3c 3e | 26 65 31 33 29 8c e1 0d |le%!40<>|&e13)...|
|00002970| 00 fb 11 c8 8e 48 61 6e | 64 6c 65 25 21 31 36 ca |.....Han|dle%!16.|
|00002980| 0d 00 fc 0d c9 30 3a 51 | 75 69 74 3d b9 0d 00 fd |.....0:Q|uit=....|
|00002990| 09 c9 32 3a f2 6b 0d 00 | fe 17 c9 33 2c 35 3a e7 |..2:.k..|...3,5:.|
|000029a0| 48 61 6e 64 6c 65 25 21 | 26 63 3d 30 8c 0d 00 ff |Handle%!|&c=0....|
|000029b0| b6 44 24 3d a4 50 28 42 | 6c 6f 63 6b 2b 34 34 29 |.D$=.P(B|lock+44)|
|000029c0| 3a 46 24 3d 44 24 3a 48 | 69 73 52 65 66 25 3d 42 |:F$=D$:H|isRef%=B|
|000029d0| 6c 6f 63 6b 21 38 3a 53 | 72 63 54 61 73 6b 25 3d |lock!8:S|rcTask%=|
|000029e0| 42 6c 6f 63 6b 21 34 3a | 42 75 66 25 3d 42 6c 6f |Block!4:|Buf%=Blo|
|000029f0| 63 6b 3a 42 75 66 25 21 | 33 36 3d 2d 31 3a 42 75 |ck:Buf%!|36=-1:Bu|
|00002a00| 66 25 21 26 63 3d 48 69 | 73 52 65 66 25 3a 42 75 |f%!&c=Hi|sRef%:Bu|
|00002a10| 66 25 21 31 36 3d 34 3a | 24 28 42 75 66 25 2b 34 |f%!16=4:|$(Buf%+4|
|00002a20| 34 29 3d 46 24 2b bd 30 | 3a 21 42 75 66 25 3d 28 |4)=F$+.0|:!Buf%=(|
|00002a30| 34 38 2b a9 28 46 24 29 | 29 80 ac 33 3a c8 99 26 |48+.(F$)|)..3:..&|
|00002a40| 34 30 30 65 37 2c 31 37 | 2c 42 75 66 25 2c 53 72 |400e7,17|,Buf%,Sr|
|00002a50| 63 54 61 73 6b 25 3a f2 | 41 79 28 48 61 6e 64 6c |cTask%:.|Ay(Handl|
|00002a60| 65 25 29 0d 01 00 05 cd | 0d 01 01 07 cb 3a e1 0d |e%).....|.....:..|
|00002a70| 01 02 4b dd f2 50 28 48 | 61 6e 64 6c 65 25 2c 66 |..K..P(H|andle%,f|
|00002a80| 75 6c 6c 25 29 3a 42 6c | 6f 63 6b 21 30 3d 48 61 |ull%):Bl|ock!0=Ha|
|00002a90| 6e 64 6c 65 25 3a e7 ac | 66 75 6c 6c 25 8c c8 99 |ndle%:..|full%...|
|00002aa0| 26 34 30 30 63 62 2c 30 | 2c 42 6c 6f 63 6b 3a 42 |&400cb,0|,Block:B|
|00002ab0| 6c 6f 63 6b 21 32 38 3d | 2d 31 0d 01 03 26 c8 99 |lock!28=|-1...&..|
|00002ac0| 26 34 30 30 63 35 2c 30 | 2c 42 6c 6f 63 6b 3a e7 |&400c5,0|,Block:.|
|00002ad0| 48 61 6e 64 6c 65 25 3d | 53 61 76 65 25 8c f2 52 |Handle%=|Save%..R|
|00002ae0| 0d 01 04 05 e1 0d 01 05 | 0f dd f2 70 3a f2 7a 3a |........|...p:.z:|
|00002af0| f2 76 3a e1 0d 01 06 28 | dd f2 7a 3a f2 50 28 53 |.v:....(|..z:.P(S|
|00002b00| 65 71 75 65 6e 63 65 25 | 2c a3 29 3a f2 50 28 43 |equence%|,.):.P(C|
|00002b10| 6f 6e 74 72 6f 6c 25 2c | a3 29 3a e1 0d 01 07 59 |ontrol%,|.):....Y|
|00002b20| dd f2 76 3a f2 50 28 42 | 61 73 73 50 61 74 74 25 |..v:.P(B|assPatt%|
|00002b30| 2c a3 29 3a f2 50 28 53 | 6e 61 72 65 50 61 74 74 |,.):.P(S|narePatt|
|00002b40| 25 2c a3 29 3a f2 50 28 | 48 69 48 61 74 50 61 74 |%,.):.P(|HiHatPat|
|00002b50| 74 25 2c a3 29 3a f2 50 | 28 4d 69 73 63 50 61 74 |t%,.):.P|(MiscPat|
|00002b60| 74 25 2c a3 29 3a f2 50 | 28 50 61 74 43 6f 6e 25 |t%,.):.P|(PatCon%|
|00002b70| 2c a3 29 3a e1 0d 01 08 | 93 dd f2 42 79 28 48 61 |,.):....|...By(Ha|
|00002b80| 6e 64 6c 65 25 2c 49 63 | 6f 6e 25 2c 4c 24 29 3a |ndle%,Ic|on%,L$):|
|00002b90| f2 62 28 48 61 6e 64 6c | 65 25 2c 49 63 6f 6e 25 |.b(Handl|e%,Icon%|
|00002ba0| 29 3a f2 64 79 28 48 61 | 6e 64 6c 65 25 2c 49 63 |):.dy(Ha|ndle%,Ic|
|00002bb0| 6f 6e 25 29 3a 69 25 3d | a4 55 28 48 61 6e 64 6c |on%):i%=|.U(Handl|
|00002bc0| 65 25 2c 69 78 30 25 2c | 69 79 30 25 2c 69 78 31 |e%,ix0%,|iy0%,ix1|
|00002bd0| 25 2c 69 79 31 25 2c 66 | 6c 61 67 73 25 2c 4c 24 |%,iy1%,f|lags%,L$|
|00002be0| 29 3a c8 99 26 34 30 30 | 64 31 2c 48 61 6e 64 6c |):..&400|d1,Handl|
|00002bf0| 65 25 2c 69 78 30 25 2c | 69 79 30 25 2c 69 78 31 |e%,ix0%,|iy0%,ix1|
|00002c00| 25 2c 69 79 31 25 3a e1 | 0d 01 09 79 dd f2 55 79 |%,iy1%:.|...y..Uy|
|00002c10| 28 48 61 6e 64 6c 65 25 | 29 3a ea 6d 6f 72 65 25 |(Handle%|):.more%|
|00002c20| 3a 42 6c 6f 63 6b 21 30 | 3d 48 61 6e 64 6c 65 25 |:Block!0|=Handle%|
|00002c30| 3a c8 99 26 34 30 30 63 | 38 2c 30 2c 42 6c 6f 63 |:..&400c|8,0,Bloc|
|00002c40| 6b b8 6d 6f 72 65 25 3a | 78 30 25 3d 42 6c 6f 63 |k.more%:|x0%=Bloc|
|00002c50| 6b 21 34 3a 79 30 25 3d | 42 6c 6f 63 6b 21 38 3a |k!4:y0%=|Block!8:|
|00002c60| c8 95 6d 6f 72 65 25 3a | c8 99 26 34 30 30 63 61 |..more%:|..&400ca|
|00002c70| 2c 2c 42 6c 6f 63 6b b8 | 6d 6f 72 65 25 3a ce 3a |,,Block.|more%:.:|
|00002c80| e1 0d 01 0a 51 dd f2 5a | 28 48 61 6e 64 6c 65 25 |....Q..Z|(Handle%|
|00002c90| 2c 49 63 6f 6e 25 2c 5a | 24 29 3a f2 62 28 48 61 |,Icon%,Z|$):.b(Ha|
|00002ca0| 6e 64 6c 65 25 2c 49 63 | 6f 6e 25 29 3a 24 42 6c |ndle%,Ic|on%):$Bl|
|00002cb0| 6f 63 6b 21 32 38 3d 5a | 24 3a f2 4b 79 28 48 61 |ock!28=Z|$:.Ky(Ha|
|00002cc0| 6e 64 6c 65 25 2c 49 63 | 6f 6e 25 2c 30 2c 30 29 |ndle%,Ic|on%,0,0)|
|00002cd0| 3a e1 0d 01 0b 6d dd f2 | 4b 79 28 48 61 6e 64 6c |:....m..|Ky(Handl|
|00002ce0| 65 25 2c 49 63 6f 6e 25 | 2c 45 6f 72 25 2c 4d 61 |e%,Icon%|,Eor%,Ma|
|00002cf0| 73 6b 25 29 3a 21 42 6c | 6f 63 6b 3d 48 61 6e 64 |sk%):!Bl|ock=Hand|
|00002d00| 6c 65 25 3a 42 6c 6f 63 | 6b 21 34 3d 49 63 6f 6e |le%:Bloc|k!4=Icon|
|00002d10| 25 3a 42 6c 6f 63 6b 21 | 38 3d 45 6f 72 25 3a 42 |%:Block!|8=Eor%:B|
|00002d20| 6c 6f 63 6b 21 26 63 3d | 4d 61 73 6b 25 3a c8 99 |lock!&c=|Mask%:..|
|00002d30| 26 34 30 30 63 64 2c 2c | 42 6c 6f 63 6b 3a e1 0d |&400cd,,|Block:..|
|00002d40| 01 0c 6f dd a4 41 28 43 | 24 29 3a ea 65 6e 64 25 |..o..A(C|$):.end%|
|00002d50| 3a 65 6e 64 25 3d 54 65 | 6d 70 6c 61 74 65 25 2b |:end%=Te|mplate%+|
|00002d60| 34 36 30 38 3a c8 99 26 | 34 30 30 64 62 2c 2c 42 |4608:..&|400db,,B|
|00002d70| 6c 6f 63 6b 2c 54 65 6d | 70 6c 61 74 65 25 2c 65 |lock,Tem|plate%,e|
|00002d80| 6e 64 25 2c 2d 31 2c 43 | 24 2c 30 b8 2c 2c 54 65 |nd%,-1,C|$,0.,,Te|
|00002d90| 6d 70 6c 61 74 65 25 3a | c8 99 26 34 30 30 63 31 |mplate%:|..&400c1|
|00002da0| 2c 2c 42 6c 6f 63 6b b8 | 63 25 3a 3d 63 25 0d 01 |,,Block.|c%:=c%..|
|00002db0| 0d 26 dd f2 59 3a c8 99 | 26 34 30 30 64 34 2c 2d |.&..Y:..|&400d4,-|
|00002dc0| 31 3a c8 99 26 34 30 30 | 63 36 2c 30 2c 42 6c 6f |1:..&400|c6,0,Blo|
|00002dd0| 63 6b 3a e1 0d 01 0e 47 | dd f2 78 79 3a ea 71 24 |ck:....G|..xy:.q$|
|00002de0| 3a ea dc 3a de 6d 65 6e | 75 66 72 65 65 25 26 34 |:..:.men|ufree%&4|
|00002df0| 30 30 30 3a 70 74 72 25 | 3d 6d 65 6e 75 66 72 65 |000:ptr%|=menufre|
|00002e00| 65 25 3a f7 2b 31 3a f3 | 53 24 3a 49 63 6f 6e 4d |e%:.+1:.|S$:IconM|
|00002e10| 65 6e 75 25 3d a4 5a 28 | 53 24 29 0d 01 0f 6a dc |enu%=.Z(|S$)...j.|
|00002e20| 20 22 23 54 68 65 20 44 | 72 75 6d 6d 65 72 20 20 | "#The D|rummer  |
|00002e30| 20 2c 49 6e 66 6f 23 3e | 49 6e 66 6f 25 2c 45 64 | ,Info#>|Info%,Ed|
|00002e40| 69 74 20 70 61 74 74 65 | 72 6e 73 2c 45 64 69 74 |it patte|rns,Edit|
|00002e50| 20 73 65 71 75 65 6e 63 | 65 2c 53 61 76 65 23 3e | sequenc|e,Save#>|
|00002e60| 53 61 76 65 25 2c 52 65 | 73 65 74 20 73 65 71 75 |Save%,Re|set sequ|
|00002e70| 65 6e 63 65 2c 52 65 73 | 65 74 20 61 6c 6c 23 2c |ence,Res|et all#,|
|00002e80| 51 75 69 74 22 0d 01 10 | 4d f3 53 24 3a 42 61 73 |Quit"...|M.S$:Bas|
|00002e90| 73 4d 65 6e 75 25 3d a4 | 5a 28 53 24 29 3a 53 6e |sMenu%=.|Z(S$):Sn|
|00002ea0| 61 72 65 4d 65 6e 75 25 | 3d a4 5a 28 53 24 29 3a |areMenu%|=.Z(S$):|
|00002eb0| 48 69 48 61 74 4d 65 6e | 75 25 3d a4 5a 28 53 24 |HiHatMen|u%=.Z(S$|
|00002ec0| 29 3a 4d 69 73 63 4d 65 | 6e 75 25 3d a4 5a 28 53 |):MiscMe|nu%=.Z(S|
|00002ed0| 24 29 0d 01 11 38 dc 20 | 22 23 50 61 74 74 65 72 |$)...8. |"#Patter|
|00002ee0| 6e 2c 53 61 76 65 23 3e | 53 61 76 65 25 2c 43 75 |n,Save#>|Save%,Cu|
|00002ef0| 74 2c 43 6f 70 79 2c 50 | 61 73 74 65 2c 49 6e 73 |t,Copy,P|aste,Ins|
|00002f00| 65 72 74 2c 43 6c 65 61 | 72 22 0d 01 12 5f e3 43 |ert,Clea|r"..._.C|
|00002f10| 72 65 4d 65 6e 3d 31 b8 | 34 3a 53 24 3d 22 23 53 |reMen=1.|4:S$="#S|
|00002f20| 61 6d 70 6c 65 20 6c 69 | 73 74 20 2c 22 3a e3 41 |ample li|st ,":.A|
|00002f30| 64 64 3d 31 b8 bb 28 5a | 24 28 43 72 65 4d 65 6e |dd=1..(Z|$(CreMen|
|00002f40| 2c 30 29 29 3a 53 24 3d | 53 24 2b 5a 24 28 43 72 |,0)):S$=|S$+Z$(Cr|
|00002f50| 65 4d 65 6e 2c 41 64 64 | 29 2b 22 2c 22 3a ed 3a |eMen,Add|)+",":.:|
|00002f60| c8 8e 43 72 65 4d 65 6e | ca 0d 01 13 1a c9 31 3a |..CreMen|......1:|
|00002f70| 42 61 73 73 53 61 6d 70 | 6c 65 73 25 3d a4 5a 28 |BassSamp|les%=.Z(|
|00002f80| 53 24 29 0d 01 14 1b c9 | 32 3a 53 6e 61 72 65 53 |S$).....|2:SnareS|
|00002f90| 61 6d 70 6c 65 73 25 3d | a4 5a 28 53 24 29 0d 01 |amples%=|.Z(S$)..|
|00002fa0| 15 1b c9 33 3a 48 69 48 | 61 74 53 61 6d 70 6c 65 |...3:HiH|atSample|
|00002fb0| 73 25 3d a4 5a 28 53 24 | 29 0d 01 16 1a c9 34 3a |s%=.Z(S$|).....4:|
|00002fc0| 4d 69 73 63 53 61 6d 70 | 6c 65 73 25 3d a4 5a 28 |MiscSamp|les%=.Z(|
|00002fd0| 53 24 29 0d 01 17 20 cb | 3a ed 3a f3 53 24 3a 53 |S$)... .|:.:.S$:S|
|00002fe0| 65 71 75 65 6e 63 65 4d | 65 6e 75 25 3d a4 5a 28 |equenceM|enu%=.Z(|
|00002ff0| 53 24 29 0d 01 18 64 dc | 20 22 23 53 65 71 75 65 |S$)...d.| "#Seque|
|00003000| 6e 63 65 20 45 64 69 74 | 6f 72 2c 49 6e 66 6f 3e |nce Edit|or,Info>|
|00003010| 49 6e 66 6f 25 2c 53 6f | 6e 67 20 69 6e 66 6f 23 |Info%,So|ng info#|
|00003020| 3e 53 6f 6e 67 49 6e 66 | 6f 25 2c 53 61 76 65 23 |>SongInf|o%,Save#|
|00003030| 3e 53 61 76 65 25 2c 54 | 65 6d 70 6f 3e 54 65 6d |>Save%,T|empo>Tem|
|00003040| 70 6f 25 2c 50 6c 61 79 | 2c 53 74 6f 70 2c 43 6f |po%,Play|,Stop,Co|
|00003050| 6e 74 69 6e 75 65 22 0d | 01 19 21 f3 53 24 3a 45 |ntinue".|..!.S$:E|
|00003060| 78 74 72 61 53 65 71 75 | 65 6e 63 65 4d 65 6e 75 |xtraSequ|enceMenu|
|00003070| 25 3d a4 5a 28 53 24 29 | 0d 01 1a 81 dc 20 22 23 |%=.Z(S$)|..... "#|
|00003080| 53 65 71 75 65 6e 63 65 | 20 45 64 69 74 6f 72 2c |Sequence| Editor,|
|00003090| 49 6e 66 6f 3e 49 6e 66 | 6f 25 2c 53 6f 6e 67 20 |Info>Inf|o%,Song |
|000030a0| 69 6e 66 6f 23 3e 53 6f | 6e 67 49 6e 66 6f 25 2c |info#>So|ngInfo%,|
|000030b0| 53 61 76 65 23 3e 53 61 | 76 65 25 2c 54 65 6d 70 |Save#>Sa|ve%,Temp|
|000030c0| 6f 3e 54 65 6d 70 6f 25 | 2c 50 6c 61 79 2c 53 74 |o>Tempo%|,Play,St|
|000030d0| 6f 70 2c 43 6f 6e 74 69 | 6e 75 65 23 2c 43 75 74 |op,Conti|nue#,Cut|
|000030e0| 2c 43 6f 70 79 2c 50 61 | 73 74 65 2c 49 6e 73 65 |,Copy,Pa|ste,Inse|
|000030f0| 72 74 2c 43 6c 65 61 72 | 22 0d 01 1b 05 e1 0d 01 |rt,Clear|".......|
|00003100| 1c 3a dd a4 4a 28 5a 24 | 2c 61 24 2c f8 69 25 29 |.:..J(Z$|,a$,.i%)|
|00003110| 3a 61 25 3d 69 25 2b 31 | 3a 69 25 3d a7 5a 24 2b |:a%=i%+1|:i%=.Z$+|
|00003120| 61 24 2c 61 24 2c 61 25 | 29 3a 3d c1 5a 24 2c 61 |a$,a$,a%|):=.Z$,a|
|00003130| 25 2c 69 25 2d 61 25 29 | 0d 01 1d 2c dd a4 5a 28 |%,i%-a%)|...,..Z(|
|00003140| 53 24 29 3a 70 74 72 25 | 3d 6d 65 6e 75 66 72 65 |S$):ptr%|=menufre|
|00003150| 65 25 3a 69 25 3d 30 3a | e7 c0 53 24 2c 31 29 3d |e%:i%=0:|..S$,1)=|
|00003160| 22 23 22 8c 0d 01 1e 19 | 69 25 3d 31 3a 55 24 3d |"#".....|i%=1:U$=|
|00003170| a4 4a 28 53 24 2c 22 2c | 22 2c 69 25 29 0d 01 1f |.J(S$,",|",i%)...|
|00003180| 0b cc 3a 55 24 3d 22 22 | 0d 01 20 c2 cd 3a 24 70 |..:U$=""|.. ..:$p|
|00003190| 74 72 25 3d 55 24 3a 70 | 74 72 25 3f 26 63 3d 37 |tr%=U$:p|tr%?&c=7|
|000031a0| 3a 70 74 72 25 3f 26 64 | 3d 32 3a 70 74 72 25 3f |:ptr%?&d|=2:ptr%?|
|000031b0| 26 65 3d 37 3a 70 74 72 | 25 3f 26 66 3d 30 3a 70 |&e=7:ptr|%?&f=0:p|
|000031c0| 74 72 25 21 31 36 3d 26 | 63 34 2d 32 34 3a 70 74 |tr%!16=&|c4-24:pt|
|000031d0| 72 25 21 32 30 3d 34 34 | 3a 70 74 72 25 21 32 34 |r%!20=44|:ptr%!24|
|000031e0| 3d 30 3a 70 74 72 25 2b | 3d 32 38 3a 6d 61 78 78 |=0:ptr%+|=28:maxx|
|000031f0| 25 3d a9 55 24 3a f5 3a | 49 24 3d a4 4a 28 53 24 |%=.U$:.:|I$=.J(S$|
|00003200| 2c 22 2c 22 2c 69 25 29 | 3a f2 69 28 49 24 29 3a |,",",i%)|:.i(I$):|
|00003210| fd 49 24 3d 22 22 3a 6d | 25 3d 6d 65 6e 75 66 72 |.I$="":m|%=menufr|
|00003220| 65 65 25 3a 6d 25 21 31 | 36 3d 28 6d 61 78 78 25 |ee%:m%!1|6=(maxx%|
|00003230| 2a 38 2b 36 29 2a 32 3a | 6d 65 6e 75 66 72 65 65 |*8+6)*2:|menufree|
|00003240| 25 3d 70 74 72 25 3a 3d | 6d 25 0d 01 21 2c dd f2 |%=ptr%:=|m%..!,..|
|00003250| 69 28 5a 24 29 3a e7 5a | 24 3d 22 22 8c 70 74 72 |i(Z$):.Z|$="".ptr|
|00003260| 25 21 2d 32 34 3d 28 70 | 74 72 25 21 2d 32 34 29 |%!-24=(p|tr%!-24)|
|00003270| 84 26 38 30 3a e1 0d 01 | 22 28 ea 69 25 2c 66 6c |.&80:...|"(.i%,fl|
|00003280| 61 67 25 3a 66 6c 61 67 | 25 3d 30 3a 69 25 3d a7 |ag%:flag|%=0:i%=.|
|00003290| 5a 24 2c 22 3e 22 29 3a | e7 69 25 3e 30 8c 0d 01 |Z$,">"):|.i%>0...|
|000032a0| 23 23 73 75 62 70 74 72 | 25 3d a0 c1 5a 24 2c 69 |##subptr|%=..Z$,i|
|000032b0| 25 2b 31 29 3a 5a 24 3d | c0 5a 24 2c 69 25 2d 31 |%+1):Z$=|.Z$,i%-1|
|000032c0| 29 0d 01 24 10 cc 3a 73 | 75 62 70 74 72 25 3d 2d |)..$..:s|ubptr%=-|
|000032d0| 31 0d 01 25 18 cd 3a 69 | 25 3d a7 5a 24 2c 22 7d |1..%..:i|%=.Z$,"}|
|000032e0| 22 29 3a e7 69 25 3e 30 | 8c 0d 01 26 2c 73 75 62 |"):.i%>0|...&,sub|
|000032f0| 70 74 72 25 3d a0 c1 5a | 24 2c 69 25 2b 31 29 3a |ptr%=..Z|$,i%+1):|
|00003300| 5a 24 3d c0 5a 24 2c 69 | 25 2d 31 29 3a 66 6c 61 |Z$=.Z$,i|%-1):fla|
|00003310| 67 25 2b 3d 38 0d 01 27 | 22 cd 3a e7 c2 5a 24 2c |g%+=8..'|".:..Z$,|
|00003320| 31 29 3d 22 23 22 8c 5a | 24 3d c0 5a 24 29 3a 66 |1)="#".Z|$=.Z$):f|
|00003330| 6c 61 67 25 2b 3d 32 0d | 01 28 3c 70 74 72 25 21 |lag%+=2.|.(<ptr%!|
|00003340| 30 3d 66 6c 61 67 25 3a | 70 74 72 25 21 34 3d 73 |0=flag%:|ptr%!4=s|
|00003350| 75 62 70 74 72 25 3a 70 | 74 72 25 21 38 3d 26 37 |ubptr%:p|tr%!8=&7|
|00003360| 30 30 30 30 32 31 3a e7 | c0 5a 24 2c 31 29 3d 22 |000021:.|.Z$,1)="|
|00003370| 24 22 8c 0d 01 29 2b 21 | 70 74 72 25 2b 3d 34 3a |$"...)+!|ptr%+=4:|
|00003380| 70 74 72 25 21 38 2b 3d | 32 35 36 3a 69 25 3d a7 |ptr%!8+=|256:i%=.|
|00003390| 5a 24 2c 22 28 22 29 3a | e7 69 25 3e 30 8c 0d 01 |Z$,"("):|.i%>0...|
|000033a0| 2a 1e 4c 25 3d bb c1 5a | 24 2c 69 25 2b 31 29 3a |*.L%=..Z|$,i%+1):|
|000033b0| 5a 24 3d c0 5a 24 2c 69 | 25 2d 31 29 0d 01 2b 0b |Z$=.Z$,i|%-1)..+.|
|000033c0| cc 3a 4c 25 3d 26 63 0d | 01 2c 37 cd 3a 70 74 72 |.:L%=&c.|.,7.:ptr|
|000033d0| 25 21 26 63 3d a0 c1 5a | 24 2c 32 29 3a 70 74 72 |%!&c=..Z|$,2):ptr|
|000033e0| 25 21 31 36 3d 2d 31 3a | 70 74 72 25 21 32 30 3d |%!16=-1:|ptr%!20=|
|000033f0| 4c 25 3a 5a 24 3d c4 4c | 25 2c 22 20 22 29 0d 01 |L%:Z$=.L|%," ")..|
|00003400| 2d 40 cc 3a 24 28 70 74 | 72 25 2b 26 63 29 3d 5a |-@.:$(pt|r%+&c)=Z|
|00003410| 24 3a e7 a9 5a 24 2d 28 | 73 75 62 70 74 72 25 3e |$:..Z$-(|subptr%>|
|00003420| 30 29 3e 6d 61 78 78 25 | 8c 6d 61 78 78 25 3d a9 |0)>maxx%|.maxx%=.|
|00003430| 5a 24 2d 28 73 75 62 70 | 74 72 25 3e 30 29 0d 01 |Z$-(subp|tr%>0)..|
|00003440| 2e 10 cd 3a 70 74 72 25 | 2b 3d 32 34 3a e1 0d 01 |...:ptr%|+=24:...|
|00003450| 2f 1a dd f2 61 79 28 42 | 6c 6f 63 6b 29 3a c8 8e |/...ay(B|lock):..|
|00003460| 42 6c 6f 63 6b 21 30 ca | 0d 01 30 09 c9 31 3a f2 |Block!0.|..0..1:.|
|00003470| 76 0d 01 31 09 c9 32 3a | f2 7a 0d 01 32 09 c9 33 |v..1..2:|.z..2..3|
|00003480| 3a f2 51 0d 01 33 09 c9 | 34 3a f2 67 0d 01 34 09 |:.Q..3..|4:.g..4.|
|00003490| c9 35 3a f2 77 0d 01 35 | 0d c9 36 3a 51 75 69 74 |.5:.w..5|..6:Quit|
|000034a0| 3d b9 0d 01 36 07 cb 3a | e1 0d 01 37 1a dd f2 52 |=...6..:|...7...R|
|000034b0| 79 28 42 6c 6f 63 6b 29 | 3a c8 8e 42 6c 6f 63 6b |y(Block)|:..Block|
|000034c0| 21 30 ca 0d 01 38 09 c9 | 32 3a f2 51 0d 01 39 09 |!0...8..|2:.Q..9.|
|000034d0| c9 34 3a f2 4f 0d 01 3a | 09 c9 35 3a f2 55 0d 01 |.4:.O..:|..5:.U..|
|000034e0| 3b 09 c9 36 3a f2 5f 0d | 01 3c 07 cb 3a e1 0d 01 |;..6:._.|.<..:...|
|000034f0| 3d 1a dd f2 65 79 28 42 | 6c 6f 63 6b 29 3a c8 8e |=...ey(B|lock):..|
|00003500| 42 6c 6f 63 6b 21 30 ca | 0d 01 3e 09 c9 32 3a f2 |Block!0.|..>..2:.|
|00003510| 51 0d 01 3f 09 c9 34 3a | f2 4f 0d 01 40 09 c9 35 |Q..?..4:|.O..@..5|
|00003520| 3a f2 55 0d 01 41 09 c9 | 36 3a f2 5f 0d 01 42 26 |:.U..A..|6:._..B&|
|00003530| c9 37 3a f2 56 79 28 4c | 61 73 74 54 6f 45 64 69 |.7:.Vy(L|astToEdi|
|00003540| 74 2b 53 65 71 75 65 6e | 63 65 50 6f 69 6e 74 65 |t+Sequen|cePointe|
|00003550| 72 29 0d 01 43 25 c9 38 | 3a f2 6d 28 4c 61 73 74 |r)..C%.8|:.m(Last|
|00003560| 54 6f 45 64 69 74 2b 53 | 65 71 75 65 6e 63 65 50 |ToEdit+S|equenceP|
|00003570| 6f 69 6e 74 65 72 29 0d | 01 44 26 c9 39 3a f2 4a |ointer).|.D&.9:.J|
|00003580| 79 28 4c 61 73 74 54 6f | 45 64 69 74 2b 53 65 71 |y(LastTo|Edit+Seq|
|00003590| 75 65 6e 63 65 50 6f 69 | 6e 74 65 72 29 0d 01 45 |uencePoi|nter)..E|
|000035a0| 27 c9 26 61 3a f2 62 79 | 28 4c 61 73 74 54 6f 45 |'.&a:.by|(LastToE|
|000035b0| 64 69 74 2b 53 65 71 75 | 65 6e 63 65 50 6f 69 6e |dit+Sequ|encePoin|
|000035c0| 74 65 72 29 0d 01 46 26 | c9 26 62 3a f2 71 28 4c |ter)..F&|.&b:.q(L|
|000035d0| 61 73 74 54 6f 45 64 69 | 74 2b 53 65 71 75 65 6e |astToEdi|t+Sequen|
|000035e0| 63 65 50 6f 69 6e 74 65 | 72 29 0d 01 47 07 cb 3a |cePointe|r)..G..:|
|000035f0| e1 0d 01 48 30 dd f2 49 | 28 48 61 6e 64 6c 65 25 |...H0..I|(Handle%|
|00003600| 2c 4e 6f 25 29 3a 46 28 | 4e 6f 25 29 3d 28 48 61 |,No%):F(|No%)=(Ha|
|00003610| 6e 64 6c 65 25 21 30 29 | 2b 31 3a c8 8e 4e 6f 25 |ndle%!0)|+1:..No%|
|00003620| ca 0d 01 49 18 c9 31 3a | f2 42 28 42 61 73 73 50 |...I..1:|.B(BassP|
|00003630| 61 74 74 25 2c 4e 6f 25 | 29 0d 01 4a 19 c9 32 3a |att%,No%|)..J..2:|
|00003640| f2 42 28 53 6e 61 72 65 | 50 61 74 74 25 2c 4e 6f |.B(Snare|Patt%,No|
|00003650| 25 29 0d 01 4b 19 c9 33 | 3a f2 42 28 48 69 48 61 |%)..K..3|:.B(HiHa|
|00003660| 74 50 61 74 74 25 2c 4e | 6f 25 29 0d 01 4c 18 c9 |tPatt%,N|o%)..L..|
|00003670| 34 3a f2 42 28 4d 69 73 | 63 50 61 74 74 25 2c 4e |4:.B(Mis|cPatt%,N|
|00003680| 6f 25 29 0d 01 4d 07 cb | 3a e1 0d 01 4e 2b dd f2 |o%)..M..|:...N+..|
|00003690| 44 28 48 61 6e 64 6c 65 | 25 2c 4e 6f 25 29 3a 55 |D(Handle|%,No%):U|
|000036a0| 70 64 61 74 65 25 3d a3 | 3a c8 8e 48 61 6e 64 6c |pdate%=.|:..Handl|
|000036b0| 65 25 21 30 ca 0d 01 4f | 09 c9 30 3a f2 51 0d 01 |e%!0...O|..0:.Q..|
|000036c0| 50 20 c9 31 3a f2 73 79 | 28 4e 6f 25 2c 5a 28 4e |P .1:.sy|(No%,Z(N|
|000036d0| 6f 25 29 29 3a 55 70 64 | 61 74 65 25 3d b9 0d 01 |o%)):Upd|ate%=...|
|000036e0| 51 15 c9 32 3a f2 61 28 | 4e 6f 25 2c 5a 28 4e 6f |Q..2:.a(|No%,Z(No|
|000036f0| 25 29 29 0d 01 52 20 c9 | 33 3a f2 66 79 28 4e 6f |%))..R .|3:.fy(No|
|00003700| 25 2c 5a 28 4e 6f 25 29 | 29 3a 55 70 64 61 74 65 |%,Z(No%)|):Update|
|00003710| 25 3d b9 0d 01 53 20 c9 | 34 3a f2 43 79 28 4e 6f |%=...S .|4:.Cy(No|
|00003720| 25 2c 5a 28 4e 6f 25 29 | 29 3a 55 70 64 61 74 65 |%,Z(No%)|):Update|
|00003730| 25 3d b9 0d 01 54 1f c9 | 35 3a f2 4b 28 4e 6f 25 |%=...T..|5:.K(No%|
|00003740| 2c 5a 28 4e 6f 25 29 29 | 3a 55 70 64 61 74 65 25 |,Z(No%))|:Update%|
|00003750| 3d b9 0d 01 55 0f cb 3a | e7 55 70 64 61 74 65 25 |=...U..:|.Update%|
|00003760| 8c 0d 01 56 0a c8 8e 4e | 6f 25 ca 0d 01 57 16 c9 |...V...N|o%...W..|
|00003770| 31 3a f2 53 28 42 61 73 | 73 50 61 74 74 25 2c 31 |1:.S(Bas|sPatt%,1|
|00003780| 29 0d 01 58 17 c9 32 3a | f2 53 28 53 6e 61 72 65 |)..X..2:|.S(Snare|
|00003790| 50 61 74 74 25 2c 32 29 | 0d 01 59 17 c9 33 3a f2 |Patt%,2)|..Y..3:.|
|000037a0| 53 28 48 69 48 61 74 50 | 61 74 74 25 2c 33 29 0d |S(HiHatP|att%,3).|
|000037b0| 01 5a 16 c9 34 3a f2 53 | 28 4d 69 73 63 50 61 74 |.Z..4:.S|(MiscPat|
|000037c0| 74 25 2c 34 29 0d 01 5b | 05 cb 0d 01 5c 07 cd 3a |t%,4)..[|....\..:|
|000037d0| e1 0d 01 5d 41 dd f2 43 | 28 6d 65 6e 75 25 29 3a |...]A..C|(menu%):|
|000037e0| 6f 6d 65 6e 75 25 3d 6d | 65 6e 75 25 3a ea 6d 78 |omenu%=m|enu%:.mx|
|000037f0| 25 2c 6d 79 25 2c 6d 7a | 25 3a c8 97 6d 78 25 2c |%,my%,mz|%:..mx%,|
|00003800| 6d 79 25 2c 6d 7a 25 3a | e7 6d 65 6e 75 25 3c 30 |my%,mz%:|.menu%<0|
|00003810| 8c e1 0d 01 5e 1c e7 6d | 65 6e 75 25 3d 49 63 6f |....^..m|enu%=Ico|
|00003820| 6e 4d 65 6e 75 25 8c 6d | 79 25 3d 26 64 63 0d 01 |nMenu%.m|y%=&dc..|
|00003830| 5f 30 c8 99 26 34 30 30 | 64 34 2c 2c 6d 65 6e 75 |_0..&400|d4,,menu|
|00003840| 25 2c 6d 78 25 2d 36 34 | 2c 6d 79 25 2b 33 32 3a |%,mx%-64|,my%+32:|
|00003850| 6f 6d 65 6e 75 25 3d 6d | 65 6e 75 25 3a e1 0d 01 |omenu%=m|enu%:...|
|00003860| 60 24 dd f2 46 28 4d 6e | 75 2c 42 6c 6f 63 6b 29 |`$..F(Mn|u,Block)|
|00003870| 3a c8 97 6d 78 2c 6d 79 | 2c 6d 7a 3a c8 8e 4d 6e |:..mx,my|,mz:..Mn|
|00003880| 75 ca 0d 01 61 1c c9 49 | 63 6f 6e 4d 65 6e 75 25 |u...a..I|conMenu%|
|00003890| 3a f2 43 28 49 63 6f 6e | 4d 65 6e 75 25 29 0d 01 |:.C(Icon|Menu%)..|
|000038a0| 62 1c c9 42 61 73 73 4d | 65 6e 75 25 3a f2 43 28 |b..BassM|enu%:.C(|
|000038b0| 42 61 73 73 4d 65 6e 75 | 25 29 0d 01 63 1e c9 53 |BassMenu|%)..c..S|
|000038c0| 6e 61 72 65 4d 65 6e 75 | 25 3a f2 43 28 53 6e 61 |nareMenu|%:.C(Sna|
|000038d0| 72 65 4d 65 6e 75 25 29 | 0d 01 64 1e c9 48 69 48 |reMenu%)|..d..HiH|
|000038e0| 61 74 4d 65 6e 75 25 3a | f2 43 28 48 69 48 61 74 |atMenu%:|.C(HiHat|
|000038f0| 4d 65 6e 75 25 29 0d 01 | 65 1c c9 4d 69 73 63 4d |Menu%)..|e..MiscM|
|00003900| 65 6e 75 25 3a f2 43 28 | 4d 69 73 63 4d 65 6e 75 |enu%:.C(|MiscMenu|
|00003910| 25 29 0d 01 66 24 c9 53 | 65 71 75 65 6e 63 65 4d |%)..f$.S|equenceM|
|00003920| 65 6e 75 25 3a f2 43 28 | 53 65 71 75 65 6e 63 65 |enu%:.C(|Sequence|
|00003930| 4d 65 6e 75 25 29 0d 01 | 67 2e c9 45 78 74 72 61 |Menu%)..|g..Extra|
|00003940| 53 65 71 75 65 6e 63 65 | 4d 65 6e 75 25 3a f2 43 |Sequence|Menu%:.C|
|00003950| 28 45 78 74 72 61 53 65 | 71 75 65 6e 63 65 4d 65 |(ExtraSe|quenceMe|
|00003960| 6e 75 25 29 0d 01 68 07 | cb 3a e1 0d 01 69 19 dd |nu%)..h.|.:...i..|
|00003970| f2 51 79 28 42 6c 6f 63 | 6b 29 3a c8 8e 6f 6d 65 |.Qy(Bloc|k):..ome|
|00003980| 6e 75 25 ca 0d 01 6a 19 | c9 49 63 6f 6e 4d 65 6e |nu%...j.|.IconMen|
|00003990| 75 25 3a f2 61 79 28 42 | 6c 6f 63 6b 29 0d 01 6b |u%:.ay(B|lock)..k|
|000039a0| 1d c9 42 61 73 73 53 61 | 6d 70 6c 65 73 25 3a f2 |..BassSa|mples%:.|
|000039b0| 49 28 42 6c 6f 63 6b 2c | 31 29 0d 01 6c 1e c9 53 |I(Block,|1)..l..S|
|000039c0| 6e 61 72 65 53 61 6d 70 | 6c 65 73 25 3a f2 49 28 |nareSamp|les%:.I(|
|000039d0| 42 6c 6f 63 6b 2c 32 29 | 0d 01 6d 1e c9 48 69 48 |Block,2)|..m..HiH|
|000039e0| 61 74 53 61 6d 70 6c 65 | 73 25 3a f2 49 28 42 6c |atSample|s%:.I(Bl|
|000039f0| 6f 63 6b 2c 33 29 0d 01 | 6e 1d c9 4d 69 73 63 53 |ock,3)..|n..MiscS|
|00003a00| 61 6d 70 6c 65 73 25 3a | f2 49 28 42 6c 6f 63 6b |amples%:|.I(Block|
|00003a10| 2c 34 29 0d 01 6f 1a c9 | 42 61 73 73 4d 65 6e 75 |,4)..o..|BassMenu|
|00003a20| 25 3a f2 44 28 42 6c 6f | 63 6b 2c 31 29 0d 01 70 |%:.D(Blo|ck,1)..p|
|00003a30| 1b c9 53 6e 61 72 65 4d | 65 6e 75 25 3a f2 44 28 |..SnareM|enu%:.D(|
|00003a40| 42 6c 6f 63 6b 2c 32 29 | 0d 01 71 1b c9 48 69 48 |Block,2)|..q..HiH|
|00003a50| 61 74 4d 65 6e 75 25 3a | f2 44 28 42 6c 6f 63 6b |atMenu%:|.D(Block|
|00003a60| 2c 33 29 0d 01 72 1a c9 | 4d 69 73 63 4d 65 6e 75 |,3)..r..|MiscMenu|
|00003a70| 25 3a f2 44 28 42 6c 6f | 63 6b 2c 34 29 0d 01 73 |%:.D(Blo|ck,4)..s|
|00003a80| 1d c9 53 65 71 75 65 6e | 63 65 4d 65 6e 75 25 3a |..Sequen|ceMenu%:|
|00003a90| f2 52 79 28 42 6c 6f 63 | 6b 29 0d 01 74 22 c9 45 |.Ry(Bloc|k)..t".E|
|00003aa0| 78 74 72 61 53 65 71 75 | 65 6e 63 65 4d 65 6e 75 |xtraSequ|enceMenu|
|00003ab0| 25 3a f2 65 79 28 42 6c | 6f 63 6b 29 0d 01 75 07 |%:.ey(Bl|ock)..u.|
|00003ac0| cb 3a e1 0d 01 76 13 dd | f2 54 28 4e 6f 25 29 3a |.:...v..|.T(No%):|
|00003ad0| c8 8e 4e 6f 25 ca 0d 01 | 77 17 c9 31 3a f2 43 28 |..No%...|w..1:.C(|
|00003ae0| 42 61 73 73 53 61 6d 70 | 6c 65 73 25 29 0d 01 78 |BassSamp|les%)..x|
|00003af0| 18 c9 32 3a f2 43 28 53 | 6e 61 72 65 53 61 6d 70 |..2:.C(S|nareSamp|
|00003b00| 6c 65 73 25 29 0d 01 79 | 18 c9 33 3a f2 43 28 48 |les%)..y|..3:.C(H|
|00003b10| 69 48 61 74 53 61 6d 70 | 6c 65 73 25 29 0d 01 7a |iHatSamp|les%)..z|
|00003b20| 17 c9 34 3a f2 43 28 4d | 69 73 63 53 61 6d 70 6c |..4:.C(M|iscSampl|
|00003b30| 65 73 25 29 0d 01 7b 07 | cb 3a e1 0d 01 7c 2d dd |es%)..{.|.:...|-.|
|00003b40| f2 41 79 28 42 6c 6f 63 | 6b 25 29 3a e7 42 6c 6f |.Ay(Bloc|k%):.Blo|
|00003b50| 63 6b 25 21 34 30 3e 30 | 80 42 6c 6f 63 6b 25 21 |ck%!40>0|.Block%!|
|00003b60| 34 30 3c 34 30 39 36 8c | 0d 01 7d 15 e7 42 6c 6f |40<4096.|..}..Blo|
|00003b70| 63 6b 25 21 34 30 3c 3e | 26 65 31 33 8c 0d 01 7e |ck%!40<>|&e13...~|
|00003b80| 11 e7 42 6c 6f 63 6b 25 | 21 31 36 3d 33 8c 0d 01 |..Block%|!16=3...|
|00003b90| 7f 62 c8 99 26 34 30 30 | 64 30 2c 2c 2d 31 3a 24 |.b..&400|d0,,-1:$|
|00003ba0| 28 42 6c 6f 63 6b 2b 34 | 29 3d 22 54 68 69 73 20 |(Block+4|)="This |
|00003bb0| 69 73 20 6e 6f 74 20 6f | 66 20 44 72 75 6d 6d 65 |is not o|f Drumme|
|00003bc0| 72 20 66 69 6c 65 20 74 | 79 70 65 22 2b bd 28 30 |r file t|ype"+.(0|
|00003bd0| 29 3a c8 99 26 34 30 30 | 64 66 2c 42 6c 6f 63 6b |):..&400|df,Block|
|00003be0| 2c 31 2c 22 54 68 65 20 | 44 72 75 6d 6d 65 72 22 |,1,"The |Drummer"|
|00003bf0| 0d 01 80 05 cd 0d 01 81 | 1d cc 3a 44 24 3d a4 50 |........|..:D$=.P|
|00003c00| 28 42 6c 6f 63 6b 25 2b | 34 34 29 3a f2 64 28 44 |(Block%+|44):.d(D|
|00003c10| 24 29 0d 01 82 05 cd 0d | 01 83 07 cd 3a e1 0d 01 |$)......|....:...|
|00003c20| 84 fd dd f2 64 28 77 24 | 29 3a 46 24 3d 77 24 3a |....d(w$|):F$=w$:|
|00003c30| 46 69 6c 65 25 3d 8e 28 | 46 24 29 3a 53 65 71 75 |File%=.(|F$):Sequ|
|00003c40| 65 6e 63 65 50 6f 69 6e | 74 65 72 3d 31 3a e3 4c |encePoin|ter=1:.L|
|00003c50| 6f 61 64 49 3d 30 b8 4d | 61 78 53 65 71 75 65 6e |oadI=0.M|axSequen|
|00003c60| 63 65 3a e3 4c 6f 61 64 | 49 49 3d 31 b8 35 3a e8 |ce:.Load|II=1.5:.|
|00003c70| 23 46 69 6c 65 25 2c 4d | 28 4c 6f 61 64 49 2c 4c |#File%,M|(LoadI,L|
|00003c80| 6f 61 64 49 49 29 3a ed | 3a e8 23 46 69 6c 65 25 |oadII):.|:.#File%|
|00003c90| 2c 41 24 28 4c 6f 61 64 | 49 29 3a ed 3a e3 43 6c |,A$(Load|I):.:.Cl|
|00003ca0| 65 61 72 3d 31 b8 34 3a | 5a 28 43 6c 65 61 72 29 |ear=1.4:|Z(Clear)|
|00003cb0| 3d 31 3a 46 28 43 6c 65 | 61 72 29 3d 31 3a ed 3a |=1:F(Cle|ar)=1:.:|
|00003cc0| e3 4c 6f 61 64 49 3d 31 | b8 38 3a e3 4c 6f 61 64 |.LoadI=1|.8:.Load|
|00003cd0| 49 49 3d 31 b8 4d 61 78 | 50 61 74 74 65 72 6e 73 |II=1.Max|Patterns|
|00003ce0| 3a e3 4c 6f 61 64 49 49 | 49 3d 31 b8 50 61 74 74 |:.LoadII|I=1.Patt|
|00003cf0| 65 72 6e 4c 65 6e 67 74 | 68 3a e8 23 46 69 6c 65 |ernLengt|h:.#File|
|00003d00| 25 2c 41 28 4c 6f 61 64 | 49 2c 4c 6f 61 64 49 49 |%,A(Load|I,LoadII|
|00003d10| 2c 4c 6f 61 64 49 49 49 | 2c 30 29 0d 01 85 af e8 |,LoadIII|,0).....|
|00003d20| 23 46 69 6c 65 25 2c 41 | 28 4c 6f 61 64 49 2c 4c |#File%,A|(LoadI,L|
|00003d30| 6f 61 64 49 49 2c 4c 6f | 61 64 49 49 49 2c 31 29 |oadII,Lo|adIII,1)|
|00003d40| 3a ed 3a ed 3a ed 3a e8 | 23 46 69 6c 65 25 2c 50 |:.:.:.:.|#File%,P|
|00003d50| 61 74 74 65 72 6e 54 65 | 6d 70 6f 25 3a 50 6c 61 |atternTe|mpo%:Pla|
|00003d60| 79 69 6e 67 50 61 74 74 | 65 72 6e 73 3d a3 3a 50 |yingPatt|erns=.:P|
|00003d70| 6c 61 79 69 6e 67 53 65 | 71 75 65 6e 63 65 3d a3 |layingSe|quence=.|
|00003d80| 3a e8 23 46 69 6c 65 25 | 2c 54 65 6d 70 6f 44 65 |:.#File%|,TempoDe|
|00003d90| 6c 61 79 25 3a e8 23 46 | 69 6c 65 25 2c 51 24 3a |lay%:.#F|ile%,Q$:|
|00003da0| e8 23 46 69 6c 65 25 2c | 4e 24 3a d9 23 46 69 6c |.#File%,|N$:.#Fil|
|00003db0| 65 25 3a f2 4f 79 3a f2 | 4e 3a f2 41 3a f2 68 3a |e%:.Oy:.|N:.A:.h:|
|00003dc0| f2 6e 3a f2 65 3a f2 52 | 3a e1 0d 01 86 3e dd a4 |.n:.e:.R|:....>..|
|00003dd0| 50 28 70 74 72 29 3a 58 | 24 3d 22 22 3a c8 95 3f |P(ptr):X|$="":..?|
|00003de0| 70 74 72 3c 3e 30 80 3f | 70 74 72 3c 3e 26 64 3a |ptr<>0.?|ptr<>&d:|
|00003df0| 58 24 3d 58 24 2b bd 3f | 70 74 72 3a 70 74 72 2b |X$=X$+.?|ptr:ptr+|
|00003e00| 3d 31 3a ce 3a 3d 58 24 | 0d 01 87 78 dd f2 4e 79 |=1:.:=X$|...x..Ny|
|00003e10| 3a ea 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 3a |:.window|%,icon%:|
|00003e20| f2 75 28 53 61 76 65 25 | 2c 32 29 3a 6e 25 3d 42 |.u(Save%|,2):n%=B|
|00003e30| 6c 6f 63 6b 21 32 38 3a | c8 99 26 34 30 30 63 66 |lock!28:|..&400cf|
|00003e40| 2c 2c 42 6c 6f 63 6b 3a | 57 69 6e 64 6f 77 25 3d |,,Block:|Window%=|
|00003e50| 42 6c 6f 63 6b 21 26 63 | 3a 49 63 6f 6e 25 3d 42 |Block!&c|:Icon%=B|
|00003e60| 6c 6f 63 6b 21 31 36 3a | e7 57 69 6e 64 6f 77 25 |lock!16:|.Window%|
|00003e70| 3d 2d 32 80 49 63 6f 6e | 25 3d 49 63 6f 6e 8c e1 |=-2.Icon|%=Icon..|
|00003e80| 0d 01 88 4c e7 57 69 6e | 64 6f 77 25 3d 53 61 76 |...L.Win|dow%=Sav|
|00003e90| 65 25 84 57 69 6e 64 6f | 77 25 3d 42 61 73 73 50 |e%.Windo|w%=BassP|
|00003ea0| 61 74 74 25 84 57 69 6e | 64 6f 77 25 3d 53 6e 61 |att%.Win|dow%=Sna|
|00003eb0| 72 65 50 61 74 74 25 84 | 57 69 6e 64 6f 77 25 3d |rePatt%.|Window%=|
|00003ec0| 48 69 48 61 74 50 61 74 | 74 25 8c e1 0d 01 89 50 |HiHatPat|t%.....P|
|00003ed0| e7 57 69 6e 64 6f 77 25 | 3d 4d 69 73 63 50 61 74 |.Window%|=MiscPat|
|00003ee0| 74 25 84 57 69 6e 64 6f | 77 25 3d 42 61 73 73 50 |t%.Windo|w%=BassP|
|00003ef0| 61 74 74 25 84 57 69 6e | 64 6f 77 25 3d 53 6e 61 |att%.Win|dow%=Sna|
|00003f00| 72 65 50 61 74 74 25 84 | 57 69 6e 64 6f 77 25 3d |rePatt%.|Window%=|
|00003f10| 48 69 48 61 74 50 61 74 | 74 25 8c e1 0d 01 8a c7 |HiHatPat|t%......|
|00003f20| 42 6c 6f 63 6b 21 32 30 | 3d 36 34 3a 42 6c 6f 63 |Block!20|=64:Bloc|
|00003f30| 6b 21 33 32 3d 30 3a 42 | 6c 6f 63 6b 21 33 36 3d |k!32=0:B|lock!36=|
|00003f40| 31 3a 42 6c 6f 63 6b 21 | 34 30 3d 42 6c 6f 63 6b |1:Block!|40=Block|
|00003f50| 21 26 63 3a 42 6c 6f 63 | 6b 21 34 34 3d 42 6c 6f |!&c:Bloc|k!44=Blo|
|00003f60| 63 6b 21 31 36 3a 42 6c | 6f 63 6b 21 34 38 3d 21 |ck!16:Bl|ock!48=!|
|00003f70| 42 6c 6f 63 6b 3a 42 6c | 6f 63 6b 21 35 32 3d 42 |Block:Bl|ock!52=B|
|00003f80| 6c 6f 63 6b 21 34 3a 42 | 6c 6f 63 6b 21 35 36 3d |lock!4:B|lock!56=|
|00003f90| 26 32 38 30 30 3a 42 6c | 6f 63 6b 21 36 30 3d 26 |&2800:Bl|ock!60=&|
|00003fa0| 65 31 33 3a 24 28 42 6c | 6f 63 6b 2b 36 34 29 3d |e13:$(Bl|ock+64)=|
|00003fb0| a4 42 28 a4 57 28 6e 25 | 29 29 3a c8 99 26 34 30 |.B(.W(n%|)):..&40|
|00003fc0| 30 65 37 2c 31 37 2c 42 | 6c 6f 63 6b 2b 32 30 2c |0e7,17,B|lock+20,|
|00003fd0| 42 6c 6f 63 6b 21 26 63 | 2c 42 6c 6f 63 6b 21 31 |Block!&c|,Block!1|
|00003fe0| 36 3a e1 0d 01 8b 2a dd | f2 75 28 42 6c 6f 63 6b |6:....*.|.u(Block|
|00003ff0| 21 30 2c 42 6c 6f 63 6b | 21 34 29 3a c8 99 26 34 |!0,Block|!4):..&4|
|00004000| 30 30 63 65 2c 2c 42 6c | 6f 63 6b 3a e1 0d 01 8c |00ce,,Bl|ock:....|
|00004010| 47 dd a4 57 28 61 64 64 | 72 25 29 3a ea 71 24 3a |G..W(add|r%):.q$:|
|00004020| c8 95 3f 61 64 64 72 25 | 3e 33 31 80 3f 61 64 64 |..?addr%|>31.?add|
|00004030| 72 25 3c 3e 26 37 66 3a | 71 24 2b 3d bd 28 3f 61 |r%<>&7f:|q$+=.(?a|
|00004040| 64 64 72 25 29 3a 61 64 | 64 72 25 2b 3d 31 3a ce |ddr%):ad|dr%+=1:.|
|00004050| 3a 3d 71 24 0d 01 8d 4a | dd a4 42 28 43 24 29 3a |:=q$...J|..B(C$):|
|00004060| e7 43 24 3d 22 4e 6f 20 | 69 6e 70 75 74 20 66 69 |.C$="No |input fi|
|00004070| 6c 65 22 84 43 24 3d 22 | 3c 57 69 6d 70 24 53 63 |le".C$="|<Wimp$Sc|
|00004080| 72 61 70 3e 22 84 43 24 | 3d 22 3c 50 72 69 6e 74 |rap>".C$|="<Print|
|00004090| 65 72 24 53 63 72 61 70 | 3e 22 8c 3d 43 24 0d 01 |er$Scrap|>".=C$..|
|000040a0| 8e 64 ea 70 25 3a 70 25 | 3d a9 43 24 3a c8 95 c1 |.d.p%:p%|=.C$:...|
|000040b0| 43 24 2c 70 25 2c 31 29 | 3d 22 20 22 80 70 25 3e |C$,p%,1)|=" ".p%>|
|000040c0| 30 3a 70 25 2d 3d 31 3a | ce 3a 43 24 3d c0 43 24 |0:p%-=1:|.:C$=.C$|
|000040d0| 2c 70 25 29 3a c8 95 c1 | 43 24 2c 70 25 2c 31 29 |,p%):...|C$,p%,1)|
|000040e0| 3c 3e 22 2e 22 80 70 25 | 3e 30 3a 70 25 2d 3d 31 |<>".".p%|>0:p%-=1|
|000040f0| 3a ce 3a 3d c0 c1 43 24 | 2c 70 25 2b 31 29 2c 26 |:.:=..C$|,p%+1),&|
|00004100| 61 29 0d 01 8f 71 dd f2 | 6b 3a 42 6c 6f 63 6b 21 |a)...q..|k:Block!|
|00004110| 26 63 3d 42 6c 6f 63 6b | 21 38 3a 42 6c 6f 63 6b |&c=Block|!8:Block|
|00004120| 21 31 36 3d 33 3a 21 42 | 6c 6f 63 6b 3d 36 34 3a |!16=3:!B|lock=64:|
|00004130| c8 99 26 34 30 30 65 37 | 2c 31 37 2c 42 6c 6f 63 |..&400e7|,17,Bloc|
|00004140| 6b 2c 42 6c 6f 63 6b 21 | 34 3a 54 24 3d a4 57 28 |k,Block!|4:T$=.W(|
|00004150| 42 6c 6f 63 6b 2b 34 34 | 29 3a f2 5a 28 53 61 76 |Block+44|):.Z(Sav|
|00004160| 65 25 2c 32 2c 54 24 29 | 3a 46 24 3d 54 24 3a f2 |e%,2,T$)|:F$=T$:.|
|00004170| 73 3a e1 0d 01 90 ed dd | f2 73 3a f2 4d 3a f2 44 |s:......|.s:.M:.D|
|00004180| 79 3a 46 69 6c 65 25 3d | ae 28 46 24 29 3a e3 53 |y:File%=|.(F$):.S|
|00004190| 61 76 65 49 3d 30 b8 4d | 61 78 53 65 71 75 65 6e |aveI=0.M|axSequen|
|000041a0| 63 65 3a e3 53 61 76 65 | 49 49 3d 31 b8 35 3a f1 |ce:.Save|II=1.5:.|
|000041b0| 23 46 69 6c 65 25 2c 4d | 28 53 61 76 65 49 2c 53 |#File%,M|(SaveI,S|
|000041c0| 61 76 65 49 49 29 3a ed | 3a f1 23 46 69 6c 65 25 |aveII):.|:.#File%|
|000041d0| 2c 41 24 28 53 61 76 65 | 49 29 3a ed 3a e3 53 61 |,A$(Save|I):.:.Sa|
|000041e0| 76 65 49 3d 31 b8 38 3a | e3 53 61 76 65 49 49 3d |veI=1.8:|.SaveII=|
|000041f0| 31 b8 4d 61 78 50 61 74 | 74 65 72 6e 73 3a e3 53 |1.MaxPat|terns:.S|
|00004200| 61 76 65 49 49 49 3d 31 | b8 50 61 74 74 65 72 6e |aveIII=1|.Pattern|
|00004210| 4c 65 6e 67 74 68 3a f1 | 23 46 69 6c 65 25 2c 41 |Length:.|#File%,A|
|00004220| 28 53 61 76 65 49 2c 53 | 61 76 65 49 49 2c 53 61 |(SaveI,S|aveII,Sa|
|00004230| 76 65 49 49 49 2c 30 29 | 3a f1 23 46 69 6c 65 25 |veIII,0)|:.#File%|
|00004240| 2c 41 28 53 61 76 65 49 | 2c 53 61 76 65 49 49 2c |,A(SaveI|,SaveII,|
|00004250| 53 61 76 65 49 49 49 2c | 31 29 3a ed 3a ed 3a ed |SaveIII,|1):.:.:.|
|00004260| 0d 01 91 a3 f1 23 46 69 | 6c 65 25 2c 50 61 74 74 |.....#Fi|le%,Patt|
|00004270| 65 72 6e 54 65 6d 70 6f | 25 3a f1 23 46 69 6c 65 |ernTempo|%:.#File|
|00004280| 25 2c 54 65 6d 70 6f 44 | 65 6c 61 79 25 3a f1 23 |%,TempoD|elay%:.#|
|00004290| 46 69 6c 65 25 2c 51 24 | 3a f1 23 46 69 6c 65 25 |File%,Q$|:.#File%|
|000042a0| 2c 4e 24 3a d9 23 46 69 | 6c 65 25 3a c8 99 38 2c |,N$:.#Fi|le%:..8,|
|000042b0| 31 38 2c 46 24 2c 26 65 | 31 33 3a f2 75 28 53 61 |18,F$,&e|13:.u(Sa|
|000042c0| 76 65 25 2c 32 29 3a 24 | 28 42 6c 6f 63 6b 21 32 |ve%,2):$|(Block!2|
|000042d0| 38 29 3d 46 24 2b bd 30 | 3a 21 42 6c 6f 63 6b 3d |8)=F$+.0|:!Block=|
|000042e0| 53 61 76 65 25 3a c8 99 | 26 34 30 30 63 36 2c 2c |Save%:..|&400c6,,|
|000042f0| 42 6c 6f 63 6b 3a c8 99 | 26 34 30 30 64 34 2c 2d |Block:..|&400d4,-|
|00004300| 31 3a e1 0d 01 92 14 dd | f2 51 3a e7 a7 46 24 2c |1:......|.Q:..F$,|
|00004310| 22 2e 22 29 3d 30 8c 0d | 01 93 8d c8 99 26 34 30 |".")=0..|.....&40|
|00004320| 30 64 30 2c 2c 2d 31 3a | 21 42 6c 6f 63 6b 3d 9f |0d0,,-1:|!Block=.|
|00004330| 3a 24 28 42 6c 6f 63 6b | 2b 34 29 3d 22 59 6f 75 |:$(Block|+4)="You|
|00004340| 20 6e 65 65 64 20 74 6f | 20 64 72 61 67 20 74 68 | need to| drag th|
|00004350| 65 20 69 63 6f 6e 20 74 | 6f 20 61 20 64 69 72 65 |e icon t|o a dire|
|00004360| 63 74 6f 72 79 20 77 69 | 6e 64 6f 77 20 74 6f 20 |ctory wi|ndow to |
|00004370| 73 61 76 65 20 74 68 65 | 20 73 65 71 75 65 6e 63 |save the| sequenc|
|00004380| 65 22 2b bd 30 3a c8 99 | 26 34 30 30 64 66 2c 42 |e"+.0:..|&400df,B|
|00004390| 6c 6f 63 6b 2c 31 2c 22 | 54 68 65 20 44 72 75 6d |lock,1,"|The Drum|
|000043a0| 6d 65 72 22 0d 01 94 18 | cc 3a 46 24 3d 24 a4 4d |mer"....|.:F$=$.M|
|000043b0| 28 53 61 76 65 25 2c 32 | 29 3a f2 73 0d 01 95 07 |(Save%,2|):.s....|
|000043c0| cd 3a e1 0d 01 96 f6 dd | f2 5a 79 3a ea 43 75 72 |.:......|.Zy:.Cur|
|000043d0| 72 65 6e 74 25 3a f2 56 | 28 22 42 61 73 73 44 72 |rent%:.V|("BassDr|
|000043e0| 75 6d 22 2c 31 29 3a f2 | 56 28 22 53 6e 61 72 65 |um",1):.|V("Snare|
|000043f0| 22 2c 32 29 3a f2 56 28 | 22 48 69 48 61 74 73 22 |",2):.V(|"HiHats"|
|00004400| 2c 33 29 3a f2 56 28 22 | 4d 69 73 63 22 2c 34 29 |,3):.V("|Misc",4)|
|00004410| 3a 43 75 72 72 65 6e 74 | 25 3d 30 3a f2 4c 28 22 |:Current|%=0:.L("|
|00004420| 42 61 73 73 44 72 75 6d | 22 2c 31 29 3a f2 4c 28 |BassDrum|",1):.L(|
|00004430| 22 53 6e 61 72 65 22 2c | 32 29 3a f2 4c 28 22 48 |"Snare",|2):.L("H|
|00004440| 69 48 61 74 73 22 2c 33 | 29 3a f2 4c 28 22 4d 69 |iHats",3|):.L("Mi|
|00004450| 73 63 22 2c 34 29 3a 53 | 28 30 29 3d 26 33 61 30 |sc",4):S|(0)=&3a0|
|00004460| 36 3a 53 28 31 29 3d 26 | 33 63 30 34 3a 53 28 32 |6:S(1)=&|3c04:S(2|
|00004470| 29 3d 26 33 37 30 39 3a | 53 28 33 29 3d 26 33 65 |)=&3709:|S(3)=&3e|
|00004480| 30 32 3a 53 28 34 29 3d | 26 34 30 30 30 3a 53 28 |02:S(4)=|&4000:S(|
|00004490| 35 29 3d 26 34 30 30 30 | 3a 53 28 36 29 3d 26 34 |5)=&4000|:S(6)=&4|
|000044a0| 33 66 63 3a 53 28 37 29 | 3d 26 34 30 66 66 3a 53 |3fc:S(7)|=&40ff:S|
|000044b0| 28 38 29 3d 26 34 30 66 | 66 0d 01 97 f4 53 28 39 |(8)=&40f|f....S(9|
|000044c0| 29 3d 26 34 34 66 62 3a | 53 28 26 61 29 3d 26 34 |)=&44fb:|S(&a)=&4|
|000044d0| 32 66 64 3a 53 28 26 62 | 29 3d 26 34 31 66 65 3a |2fd:S(&b|)=&41fe:|
|000044e0| 53 28 26 63 29 3d 26 34 | 30 30 30 3a 53 28 26 64 |S(&c)=&4|000:S(&d|
|000044f0| 29 3d 26 34 31 66 65 3a | 53 28 26 65 29 3d 26 33 |)=&41fe:|S(&e)=&3|
|00004500| 66 30 31 3a 53 28 26 66 | 29 3d 26 34 30 30 30 3a |f01:S(&f|)=&4000:|
|00004510| 53 28 31 36 29 3d 26 34 | 30 30 30 3a 53 28 31 37 |S(16)=&4|000:S(17|
|00004520| 29 3d 26 34 34 66 62 3a | 53 28 31 38 29 3d 26 33 |)=&44fb:|S(18)=&3|
|00004530| 35 30 62 3a 53 28 31 39 | 29 3d 26 34 30 30 30 3a |50b:S(19|)=&4000:|
|00004540| 53 28 32 30 29 3d 26 33 | 64 30 33 3a 53 28 32 31 |S(20)=&3|d03:S(21|
|00004550| 29 3d 26 34 33 66 63 3a | 53 28 32 32 29 3d 26 33 |)=&43fc:|S(22)=&3|
|00004560| 62 30 35 3a 53 28 32 33 | 29 3d 26 33 66 30 31 3a |b05:S(23|)=&3f01:|
|00004570| 53 28 32 34 29 3d 26 34 | 37 66 38 3a 53 28 32 35 |S(24)=&4|7f8:S(25|
|00004580| 29 3d 26 34 30 66 66 3a | 53 28 32 36 29 3d 26 34 |)=&40ff:|S(26)=&4|
|00004590| 39 66 36 3a 53 28 32 37 | 29 3d 26 33 32 30 65 3a |9f6:S(27|)=&320e:|
|000045a0| 53 28 32 38 29 3d 26 34 | 30 30 30 3a e1 0d 01 98 |S(28)=&4|000:....|
|000045b0| 80 dd f2 4c 28 73 24 2c | 4e 75 6d 25 29 3a e3 4c |...L(s$,|Num%):.L|
|000045c0| 6f 61 64 3d 31 b8 bb 28 | 5a 24 28 4e 75 6d 25 2c |oad=1..(|Z$(Num%,|
|000045d0| 30 29 29 3a ff 22 53 74 | 61 73 69 73 4c 6f 61 64 |0)):."St|asisLoad|
|000045e0| 20 22 2b c3 28 43 75 72 | 72 65 6e 74 25 29 2b 22 | "+.(Cur|rent%)+"|
|000045f0| 20 3c 44 72 75 6d 6d 65 | 72 24 44 69 72 3e 2e 53 | <Drumme|r$Dir>.S|
|00004600| 61 6d 70 6c 65 73 2e 22 | 2b 73 24 2b 22 2e 22 2b |amples."|+s$+"."+|
|00004610| 5a 24 28 4e 75 6d 25 2c | 4c 6f 61 64 29 3a 43 75 |Z$(Num%,|Load):Cu|
|00004620| 72 72 65 6e 74 25 2b 3d | 31 3a ed 3a e1 0d 01 99 |rrent%+=|1:.:....|
|00004630| d4 dd f2 56 28 7a 24 2c | 4e 6f 25 29 3a ea 43 75 |...V(z$,|No%):.Cu|
|00004640| 72 72 65 6e 74 25 2c 44 | 61 74 61 25 3a 43 75 72 |rrent%,D|ata%:Cur|
|00004650| 72 65 6e 74 25 3d 31 3a | ff 28 22 45 6e 75 6d 44 |rent%=1:|.("EnumD|
|00004660| 69 72 20 3c 44 72 75 6d | 6d 65 72 24 44 69 72 3e |ir <Drum|mer$Dir>|
|00004670| 2e 53 61 6d 70 6c 65 73 | 2e 22 2b 7a 24 2b 22 20 |.Samples|."+z$+" |
|00004680| 3c 44 72 75 6d 6d 65 72 | 24 44 69 72 3e 2e 4a 75 |<Drummer|$Dir>.Ju|
|00004690| 6e 6b 22 29 3a 46 69 6c | 3d 8e 28 22 3c 44 72 75 |nk"):Fil|=.("<Dru|
|000046a0| 6d 6d 65 72 24 44 69 72 | 3e 2e 4a 75 6e 6b 22 29 |mmer$Dir|>.Junk")|
|000046b0| 3a c8 95 c5 23 46 69 6c | 3d a3 80 43 75 72 72 65 |:...#Fil|=..Curre|
|000046c0| 6e 74 25 3c 3d 4d 61 78 | 53 61 6d 70 6c 65 73 3a |nt%<=Max|Samples:|
|000046d0| 44 61 74 61 25 3d 9a 23 | 46 69 6c 3a e7 44 61 74 |Data%=.#|Fil:.Dat|
|000046e0| 61 25 3c 3e 26 61 8c 5a | 24 28 4e 6f 25 2c 43 75 |a%<>&a.Z|$(No%,Cu|
|000046f0| 72 72 65 6e 74 25 29 2b | 3d bd 28 44 61 74 61 25 |rrent%)+|=.(Data%|
|00004700| 29 0d 01 9a 19 e7 44 61 | 74 61 25 3d 26 61 8c 43 |).....Da|ta%=&a.C|
|00004710| 75 72 72 65 6e 74 25 2b | 3d 31 0d 01 9b 4b ce 3a |urrent%+|=1...K.:|
|00004720| d9 23 46 69 6c 3a ff 28 | 22 44 65 6c 65 74 65 20 |.#Fil:.(|"Delete |
|00004730| 3c 44 72 75 6d 6d 65 72 | 24 44 69 72 3e 2e 4a 75 |<Drummer|$Dir>.Ju|
|00004740| 6e 6b 22 29 3a e7 5a 24 | 28 4e 6f 25 2c 43 75 72 |nk"):.Z$|(No%,Cur|
|00004750| 72 65 6e 74 25 29 3d 22 | 22 8c 43 75 72 72 65 6e |rent%)="|".Curren|
|00004760| 74 25 2d 3d 31 0d 01 9c | 1b 5a 24 28 4e 6f 25 2c |t%-=1...|.Z$(No%,|
|00004770| 30 29 3d c3 28 43 75 72 | 72 65 6e 74 25 29 3a e1 |0)=.(Cur|rent%):.|
|00004780| 0d 01 9d 50 dd f2 48 28 | 53 61 6d 70 6c 65 25 2c |...P..H(|Sample%,|
|00004790| 56 6f 6c 75 6d 65 25 2c | 43 68 61 6e 6e 65 6c 25 |Volume%,|Channel%|
|000047a0| 29 3a c8 99 26 34 37 64 | 34 62 2c 43 68 61 6e 6e |):..&47d|4b,Chann|
|000047b0| 65 6c 25 2c 53 61 6d 70 | 6c 65 25 2c 56 6f 6c 75 |el%,Samp|le%,Volu|
|000047c0| 6d 65 25 2c 53 28 53 61 | 6d 70 6c 65 25 29 3a e1 |me%,S(Sa|mple%):.|
|000047d0| 0d 01 9e 1a dd f2 79 3a | c8 95 91 3c 3d 54 69 6d |......y:|...<=Tim|
|000047e0| 69 6e 67 25 2d 31 3a ce | 3a e1 0d 01 9f 2c dd f2 |ing%-1:.|:....,..|
|000047f0| 5f 79 3a ea 4c 6f 63 56 | 61 72 2c 50 6c 61 79 50 |_y:.LocV|ar,PlayP|
|00004800| 61 74 74 2c 43 75 72 72 | 53 61 3a e7 54 69 6d 69 |att,Curr|Sa:.Timi|
|00004810| 6e 67 25 3c 91 8c 0d 01 | a0 4b 4c 6f 63 56 61 72 |ng%<....|.KLocVar|
|00004820| 3d 30 3a 43 75 72 72 53 | 61 3d 2d 31 3a e7 28 91 |=0:CurrS|a=-1:.(.|
|00004830| 2d 54 69 6d 69 6e 67 25 | 29 3e 28 32 2a 50 61 74 |-Timing%|)>(2*Pat|
|00004840| 74 65 72 6e 54 65 6d 70 | 6f 25 2a 54 65 6d 70 6f |ternTemp|o%*Tempo|
|00004850| 44 65 6c 61 79 25 29 8c | 54 69 6d 69 6e 67 25 3d |Delay%).|Timing%=|
|00004860| 91 0d 01 a1 82 54 69 6d | 69 6e 67 25 3d 28 91 2b |.....Tim|ing%=(.+|
|00004870| 28 50 61 74 74 65 72 6e | 54 65 6d 70 6f 25 2a 54 |(Pattern|Tempo%*T|
|00004880| 65 6d 70 6f 44 65 6c 61 | 79 25 29 2b 28 54 69 6d |empoDela|y%)+(Tim|
|00004890| 69 6e 67 25 2d 91 29 29 | 2b 31 3a f2 79 3a e3 50 |ing%-.))|+1:.y:.P|
|000048a0| 6c 61 79 50 61 74 74 3d | 31 b8 38 3a e7 28 28 50 |layPatt=|1.8:.((P|
|000048b0| 6c 61 79 50 61 74 74 2d | 31 29 83 32 29 3d 30 8c |layPatt-|1).2)=0.|
|000048c0| 4c 6f 63 56 61 72 2b 3d | 31 3a 43 75 72 72 53 61 |LocVar+=|1:CurrSa|
|000048d0| 2b 3d bb 28 5a 24 28 4c | 6f 63 56 61 72 2d 31 2c |+=.(Z$(L|ocVar-1,|
|000048e0| 30 29 29 0d 01 a2 0f e7 | 43 28 4c 6f 63 56 61 72 |0)).....|C(LocVar|
|000048f0| 29 8c 0d 01 a3 37 50 61 | 3d 41 28 50 6c 61 79 50 |)....7Pa|=A(PlayP|
|00004900| 61 74 74 2c 5a 28 4c 6f | 63 56 61 72 29 2c 50 61 |att,Z(Lo|cVar),Pa|
|00004910| 74 74 65 72 6e 50 6f 73 | 69 74 69 6f 6e 25 2c 30 |tternPos|ition%,0|
|00004920| 29 3a e7 50 61 3c 3e 30 | 8c 0d 01 a4 5f 56 6f 6c |):.Pa<>0|...._Vol|
|00004930| 75 3d 41 28 50 6c 61 79 | 50 61 74 74 2c 5a 28 4c |u=A(Play|Patt,Z(L|
|00004940| 6f 63 56 61 72 29 2c 50 | 61 74 74 65 72 6e 50 6f |ocVar),P|atternPo|
|00004950| 73 69 74 69 6f 6e 25 2c | 31 29 3a c8 99 26 34 37 |sition%,|1):..&47|
|00004960| 64 34 62 2c 50 6c 61 79 | 50 61 74 74 2c 43 75 72 |d4b,Play|Patt,Cur|
|00004970| 72 53 61 2b 50 61 2c 56 | 6f 6c 75 2c 53 28 43 75 |rSa+Pa,V|olu,S(Cu|
|00004980| 72 72 53 61 2b 50 61 29 | 0d 01 a5 05 cd 0d 01 a6 |rrSa+Pa)|........|
|00004990| 4e cd 3a ed 3a 50 61 74 | 74 65 72 6e 50 6f 73 69 |N.:.:Pat|ternPosi|
|000049a0| 74 69 6f 6e 25 2b 3d 31 | 3a e7 50 61 74 74 65 72 |tion%+=1|:.Patter|
|000049b0| 6e 50 6f 73 69 74 69 6f | 6e 25 3e 50 61 74 74 65 |nPositio|n%>Patte|
|000049c0| 72 6e 4c 65 6e 67 74 68 | 8c 50 61 74 74 65 72 6e |rnLength|.Pattern|
|000049d0| 50 6f 73 69 74 69 6f 6e | 25 3d 31 0d 01 a7 07 cd |Position|%=1.....|
|000049e0| 3a e1 0d 01 a8 84 dd f2 | 4b 28 4e 6f 25 2c 57 68 |:.......|K(No%,Wh|
|000049f0| 69 63 68 25 29 3a e3 43 | 6c 65 61 72 49 3d 28 4e |ich%):.C|learI=(N|
|00004a00| 6f 25 2a 32 29 2d 31 b8 | 4e 6f 25 2a 32 3a e3 43 |o%*2)-1.|No%*2:.C|
|00004a10| 6c 65 61 72 49 49 3d 31 | b8 50 61 74 74 65 72 6e |learII=1|.Pattern|
|00004a20| 4c 65 6e 67 74 68 3a 41 | 28 43 6c 65 61 72 49 2c |Length:A|(ClearI,|
|00004a30| 57 68 69 63 68 25 2c 43 | 6c 65 61 72 49 49 2c 30 |Which%,C|learII,0|
|00004a40| 29 3d 30 3a 41 28 43 6c | 65 61 72 49 2c 57 68 69 |)=0:A(Cl|earI,Whi|
|00004a50| 63 68 25 2c 43 6c 65 61 | 72 49 49 2c 31 29 3d 30 |ch%,Clea|rII,1)=0|
|00004a60| 3a ed 3a ed 3a e1 0d 01 | a9 bf dd f2 61 28 4e 6f |:.:.:...|....a(No|
|00004a70| 25 2c 57 68 69 63 68 25 | 29 3a ea 54 65 6d 70 4e |%,Which%|):.TempN|
|00004a80| 6f 25 3a 54 65 6d 70 4e | 6f 25 3d 31 3a e3 43 6f |o%:TempN|o%=1:.Co|
|00004a90| 70 79 49 3d 28 4e 6f 25 | 2a 32 29 2d 31 b8 4e 6f |pyI=(No%|*2)-1.No|
|00004aa0| 25 2a 32 3a e3 43 6f 70 | 79 49 49 3d 31 b8 50 61 |%*2:.Cop|yII=1.Pa|
|00004ab0| 74 74 65 72 6e 4c 65 6e | 67 74 68 3a 50 28 54 65 |tternLen|gth:P(Te|
|00004ac0| 6d 70 4e 6f 25 2c 43 6f | 70 79 49 49 2c 30 29 3d |mpNo%,Co|pyII,0)=|
|00004ad0| 41 28 43 6f 70 79 49 2c | 57 68 69 63 68 25 2c 43 |A(CopyI,|Which%,C|
|00004ae0| 6f 70 79 49 49 2c 30 29 | 3a 50 28 54 65 6d 70 4e |opyII,0)|:P(TempN|
|00004af0| 6f 25 2c 43 6f 70 79 49 | 49 2c 31 29 3d 41 28 43 |o%,CopyI|I,1)=A(C|
|00004b00| 6f 70 79 49 2c 57 68 69 | 63 68 25 2c 43 6f 70 79 |opyI,Whi|ch%,Copy|
|00004b10| 49 49 2c 31 29 3a ed 3a | 54 65 6d 70 4e 6f 25 3d |II,1):.:|TempNo%=|
|00004b20| 32 3a ed 3a e1 0d 01 aa | 2a dd f2 73 79 28 4e 6f |2:.:....|*..sy(No|
|00004b30| 25 2c 57 68 69 63 68 25 | 29 3a e7 57 68 69 63 68 |%,Which%|):.Which|
|00004b40| 25 3c 3e 4d 61 78 50 61 | 74 74 65 72 6e 73 8c 0d |%<>MaxPa|tterns..|
|00004b50| 01 ab a8 e3 43 75 74 3d | 57 68 69 63 68 25 b8 4d |....Cut=|Which%.M|
|00004b60| 61 78 50 61 74 74 65 72 | 6e 73 2d 31 3a e3 43 75 |axPatter|ns-1:.Cu|
|00004b70| 74 49 3d 28 4e 6f 25 2a | 32 29 2d 31 b8 4e 6f 25 |tI=(No%*|2)-1.No%|
|00004b80| 2a 32 3a e3 43 75 74 49 | 49 3d 31 b8 50 61 74 74 |*2:.CutI|I=1.Patt|
|00004b90| 65 72 6e 4c 65 6e 67 74 | 68 3a c8 94 41 28 43 75 |ernLengt|h:..A(Cu|
|00004ba0| 74 49 2c 43 75 74 2b 31 | 2c 43 75 74 49 49 2c 30 |tI,Cut+1|,CutII,0|
|00004bb0| 29 2c 41 28 43 75 74 49 | 2c 43 75 74 2c 43 75 74 |),A(CutI|,Cut,Cut|
|00004bc0| 49 49 2c 30 29 3a c8 94 | 41 28 43 75 74 49 2c 43 |II,0):..|A(CutI,C|
|00004bd0| 75 74 2b 31 2c 43 75 74 | 49 49 2c 31 29 2c 41 28 |ut+1,Cut|II,1),A(|
|00004be0| 43 75 74 49 2c 43 75 74 | 2c 43 75 74 49 49 2c 31 |CutI,Cut|,CutII,1|
|00004bf0| 29 3a ed 3a ed 3a ed 0d | 01 ac 2f cd 3a f2 61 28 |):.:.:..|../.:.a(|
|00004c00| 4e 6f 25 2c 4d 61 78 50 | 61 74 74 65 72 6e 73 29 |No%,MaxP|atterns)|
|00004c10| 3a f2 4b 28 4e 6f 25 2c | 4d 61 78 50 61 74 74 65 |:.K(No%,|MaxPatte|
|00004c20| 72 6e 73 29 3a e1 0d 01 | ad c8 dd f2 66 79 28 4e |rns):...|....fy(N|
|00004c30| 6f 25 2c 57 68 69 63 68 | 25 29 3a ea 54 65 6d 70 |o%,Which|%):.Temp|
|00004c40| 4e 6f 25 3a 54 65 6d 70 | 4e 6f 25 3d 31 3a e3 50 |No%:Temp|No%=1:.P|
|00004c50| 61 73 74 65 49 3d 28 4e | 6f 25 2a 32 29 2d 31 b8 |asteI=(N|o%*2)-1.|
|00004c60| 4e 6f 25 2a 32 3a e3 50 | 61 73 74 65 49 49 3d 31 |No%*2:.P|asteII=1|
|00004c70| b8 50 61 74 74 65 72 6e | 4c 65 6e 67 74 68 3a 41 |.Pattern|Length:A|
|00004c80| 28 50 61 73 74 65 49 2c | 57 68 69 63 68 25 2c 50 |(PasteI,|Which%,P|
|00004c90| 61 73 74 65 49 49 2c 30 | 29 3d 50 28 54 65 6d 70 |asteII,0|)=P(Temp|
|00004ca0| 4e 6f 25 2c 50 61 73 74 | 65 49 49 2c 30 29 3a 41 |No%,Past|eII,0):A|
|00004cb0| 28 50 61 73 74 65 49 2c | 57 68 69 63 68 25 2c 50 |(PasteI,|Which%,P|
|00004cc0| 61 73 74 65 49 49 2c 31 | 29 3d 50 28 54 65 6d 70 |asteII,1|)=P(Temp|
|00004cd0| 4e 6f 25 2c 50 61 73 74 | 65 49 49 2c 31 29 3a ed |No%,Past|eII,1):.|
|00004ce0| 3a 54 65 6d 70 4e 6f 25 | 3d 32 3a ed 3a e1 0d 01 |:TempNo%|=2:.:...|
|00004cf0| ae 27 dd f2 43 79 28 4e | 6f 25 2c 57 68 69 63 68 |.'..Cy(N|o%,Which|
|00004d00| 25 29 3a e7 4e 6f 25 3c | 3e 4d 61 78 50 61 74 74 |%):.No%<|>MaxPatt|
|00004d10| 65 72 6e 73 8c 0d 01 af | d5 e3 49 6e 73 65 72 74 |erns....|..Insert|
|00004d20| 3d 4d 61 78 50 61 74 74 | 65 72 6e 73 b8 4e 6f 25 |=MaxPatt|erns.No%|
|00004d30| 2b 31 88 2d 31 3a e3 49 | 6e 73 65 72 74 49 3d 28 |+1.-1:.I|nsertI=(|
|00004d40| 4e 6f 25 2a 32 29 2d 31 | b8 4e 6f 25 2a 32 3a e3 |No%*2)-1|.No%*2:.|
|00004d50| 49 6e 73 65 72 74 49 49 | 3d 31 b8 50 61 74 74 65 |InsertII|=1.Patte|
|00004d60| 72 6e 4c 65 6e 67 74 68 | 3a c8 94 41 28 49 6e 73 |rnLength|:..A(Ins|
|00004d70| 65 72 74 49 2c 49 6e 73 | 65 72 74 2d 31 2c 49 6e |ertI,Ins|ert-1,In|
|00004d80| 73 65 72 74 49 49 2c 30 | 29 2c 41 28 49 6e 73 65 |sertII,0|),A(Inse|
|00004d90| 72 74 49 2c 49 6e 73 65 | 72 74 2c 49 6e 73 65 72 |rtI,Inse|rt,Inser|
|00004da0| 74 49 49 2c 30 29 3a c8 | 94 41 28 49 6e 73 65 72 |tII,0):.|.A(Inser|
|00004db0| 74 49 2c 49 6e 73 65 72 | 74 2d 31 2c 49 6e 73 65 |tI,Inser|t-1,Inse|
|00004dc0| 72 74 49 49 2c 31 29 2c | 41 28 49 6e 73 65 72 74 |rtII,1),|A(Insert|
|00004dd0| 49 2c 49 6e 73 65 72 74 | 2c 49 6e 73 65 72 74 49 |I,Insert|,InsertI|
|00004de0| 49 2c 31 29 3a ed 3a ed | 3a ed 0d 01 b0 16 cd 3a |I,1):.:.|:......:|
|00004df0| f2 4b 28 4e 6f 25 2c 57 | 68 69 63 68 25 29 3a e1 |.K(No%,W|hich%):.|
|00004e00| 0d 01 b1 ac dd f2 4d 3a | ea 43 75 72 72 49 63 6f |......M:|.CurrIco|
|00004e10| 6e 3a 43 75 72 72 49 63 | 6f 6e 3d 30 3a e3 55 70 |n:CurrIc|on=0:.Up|
|00004e20| 64 61 74 65 3d 53 65 71 | 75 65 6e 63 65 50 6f 69 |date=Seq|uencePoi|
|00004e30| 6e 74 65 72 b8 53 65 71 | 75 65 6e 63 65 50 6f 69 |nter.Seq|uencePoi|
|00004e40| 6e 74 65 72 2b 35 3a e3 | 55 70 64 61 74 65 49 3d |nter+5:.|UpdateI=|
|00004e50| 31 b8 34 3a 4d 28 55 70 | 64 61 74 65 2c 55 70 64 |1.4:M(Up|date,Upd|
|00004e60| 61 74 65 49 29 3d bb 28 | 24 a4 4d 28 53 65 71 75 |ateI)=.(|$.M(Sequ|
|00004e70| 65 6e 63 65 25 2c 55 70 | 64 61 74 65 49 2b 28 43 |ence%,Up|dateI+(C|
|00004e80| 75 72 72 49 63 6f 6e 2a | 34 29 29 29 3a e7 4d 28 |urrIcon*|4))):.M(|
|00004e90| 55 70 64 61 74 65 2c 55 | 70 64 61 74 65 49 29 3e |Update,U|pdateI)>|
|00004ea0| 4d 61 78 50 61 74 74 65 | 72 6e 73 8c 0d 01 b2 59 |MaxPatte|rns....Y|
|00004eb0| 4d 28 55 70 64 61 74 65 | 2c 55 70 64 61 74 65 49 |M(Update|,UpdateI|
|00004ec0| 29 3d 4d 61 78 50 61 74 | 74 65 72 6e 73 3a f2 5a |)=MaxPat|terns:.Z|
|00004ed0| 28 53 65 71 75 65 6e 63 | 65 25 2c 55 70 64 61 74 |(Sequenc|e%,Updat|
|00004ee0| 65 49 2b 28 43 75 72 72 | 49 63 6f 6e 2a 34 29 2c |eI+(Curr|Icon*4),|
|00004ef0| c3 28 4d 28 55 70 64 61 | 74 65 2c 55 70 64 61 74 |.(M(Upda|te,Updat|
|00004f00| 65 49 29 29 29 0d 01 b3 | 1b cd 3a e7 4d 28 55 70 |eI)))...|..:.M(Up|
|00004f10| 64 61 74 65 2c 55 70 64 | 61 74 65 49 29 3c 30 8c |date,Upd|ateI)<0.|
|00004f20| 0d 01 b4 4f 4d 28 55 70 | 64 61 74 65 2c 55 70 64 |...OM(Up|date,Upd|
|00004f30| 61 74 65 49 29 3d 30 3a | f2 5a 28 53 65 71 75 65 |ateI)=0:|.Z(Seque|
|00004f40| 6e 63 65 25 2c 55 70 64 | 61 74 65 49 2b 28 43 75 |nce%,Upd|ateI+(Cu|
|00004f50| 72 72 49 63 6f 6e 2a 34 | 29 2c c3 28 4d 28 55 70 |rrIcon*4|),.(M(Up|
|00004f60| 64 61 74 65 2c 55 70 64 | 61 74 65 49 29 29 29 0d |date,Upd|ateI))).|
|00004f70| 01 b5 79 cd 3a ed 3a 4d | 28 55 70 64 61 74 65 2c |..y.:.:M|(Update,|
|00004f80| 35 29 3d bb 28 24 a4 4d | 28 53 65 71 75 65 6e 63 |5)=.($.M|(Sequenc|
|00004f90| 65 25 2c 33 31 2b 43 75 | 72 72 49 63 6f 6e 29 29 |e%,31+Cu|rrIcon))|
|00004fa0| 3a e7 4d 28 55 70 64 61 | 74 65 2c 35 29 3e 33 30 |:.M(Upda|te,5)>30|
|00004fb0| 8c 4d 28 55 70 64 61 74 | 65 2c 35 29 3d 33 30 3a |.M(Updat|e,5)=30:|
|00004fc0| f2 5a 28 53 65 71 75 65 | 6e 63 65 25 2c 33 31 2b |.Z(Seque|nce%,31+|
|00004fd0| 43 75 72 72 49 63 6f 6e | 2c c3 28 4d 28 55 70 64 |CurrIcon|,.(M(Upd|
|00004fe0| 61 74 65 2c 35 29 29 29 | 0d 01 b6 49 e7 4d 28 55 |ate,5)))|...I.M(U|
|00004ff0| 70 64 61 74 65 2c 35 29 | 3c 31 8c 4d 28 55 70 64 |pdate,5)|<1.M(Upd|
|00005000| 61 74 65 2c 35 29 3d 31 | 3a f2 5a 28 53 65 71 75 |ate,5)=1|:.Z(Sequ|
|00005010| 65 6e 63 65 25 2c 33 31 | 2b 43 75 72 72 49 63 6f |ence%,31|+CurrIco|
|00005020| 6e 2c c3 28 4d 28 55 70 | 64 61 74 65 2c 35 29 29 |n,.(M(Up|date,5))|
|00005030| 29 0d 01 b7 39 41 24 28 | 55 70 64 61 74 65 29 3d |)...9A$(|Update)=|
|00005040| 24 a4 4d 28 53 65 71 75 | 65 6e 63 65 25 2c 33 37 |$.M(Sequ|ence%,37|
|00005050| 2b 43 75 72 72 49 63 6f | 6e 29 3a 43 75 72 72 49 |+CurrIco|n):CurrI|
|00005060| 63 6f 6e 2b 3d 31 3a ed | 3a e1 0d 01 b8 3d dd f2 |con+=1:.|:....=..|
|00005070| 6a 3a f2 4d 3a e3 55 70 | 64 61 74 65 3d 31 b8 4d |j:.M:.Up|date=1.M|
|00005080| 61 78 53 65 71 75 65 6e | 63 65 3a 4d 28 55 70 64 |axSequen|ce:M(Upd|
|00005090| 61 74 65 2c 35 29 3d 44 | 65 66 61 75 6c 74 54 65 |ate,5)=D|efaultTe|
|000050a0| 6d 70 6f 3a ed 3a e1 0d | 01 b9 71 dd f2 4f 3a f2 |mpo:.:..|..q..O:.|
|000050b0| 4d 3a 4c 6f 6f 70 65 64 | 25 3d 30 3a 43 4f 55 4e |M:Looped|%=0:COUN|
|000050c0| 54 45 52 3d 30 3a 50 6c | 61 79 69 6e 67 53 6f 6e |TER=0:Pl|ayingSon|
|000050d0| 67 3d b9 3a 50 6c 61 79 | 69 6e 67 50 61 74 74 65 |g=.:Play|ingPatte|
|000050e0| 72 6e 73 3d a3 3a 54 69 | 6d 69 6e 67 25 3d 91 3a |rns=.:Ti|ming%=.:|
|000050f0| 50 61 74 74 65 72 6e 50 | 6f 73 69 74 69 6f 6e 25 |PatternP|osition%|
|00005100| 3d 31 3a 53 65 71 75 65 | 6e 63 65 50 6f 73 69 74 |=1:Seque|ncePosit|
|00005110| 69 6f 6e 25 3d 31 3a e1 | 0d 01 ba 17 dd f2 55 3a |ion%=1:.|......U:|
|00005120| 50 6c 61 79 69 6e 67 53 | 6f 6e 67 3d a3 3a e1 0d |PlayingS|ong=.:..|
|00005130| 01 bb 75 dd f2 5f 3a f2 | 4d 3a 4c 6f 6f 70 65 64 |..u.._:.|M:Looped|
|00005140| 25 3d 30 3a 50 6c 61 79 | 69 6e 67 53 6f 6e 67 3d |%=0:Play|ingSong=|
|00005150| b9 3a 50 6c 61 79 69 6e | 67 50 61 74 74 65 72 6e |.:Playin|gPattern|
|00005160| 73 3d a3 3a 54 69 6d 69 | 6e 67 25 3d 91 3a 50 61 |s=.:Timi|ng%=.:Pa|
|00005170| 74 74 65 72 6e 50 6f 73 | 69 74 69 6f 6e 25 3d 31 |tternPos|ition%=1|
|00005180| 3a 53 65 71 75 65 6e 63 | 65 50 6f 73 69 74 69 6f |:Sequenc|ePositio|
|00005190| 6e 25 3d 53 65 71 75 65 | 6e 63 65 50 6f 69 6e 74 |n%=Seque|ncePoint|
|000051a0| 65 72 3a e1 0d 01 bc 2c | dd f2 57 79 3a ea 4c 6f |er:....,|..Wy:.Lo|
|000051b0| 63 56 61 72 2c 50 6c 61 | 79 50 61 74 74 2c 43 75 |cVar,Pla|yPatt,Cu|
|000051c0| 72 72 53 61 3a e7 54 69 | 6d 69 6e 67 25 3c 91 8c |rrSa:.Ti|ming%<..|
|000051d0| 0d 01 bd 59 4c 6f 63 56 | 61 72 3d 30 3a 43 75 72 |...YLocV|ar=0:Cur|
|000051e0| 72 53 61 3d 2d 31 3a e7 | 28 91 2d 54 69 6d 69 6e |rSa=-1:.|(.-Timin|
|000051f0| 67 25 29 3e 28 32 2a 28 | 33 31 2d 4d 28 53 65 71 |g%)>(2*(|31-M(Seq|
|00005200| 75 65 6e 63 65 50 6f 73 | 69 74 69 6f 6e 25 2c 35 |uencePos|ition%,5|
|00005210| 29 29 2a 54 65 6d 70 6f | 44 65 6c 61 79 25 29 8c |))*Tempo|Delay%).|
|00005220| 54 69 6d 69 6e 67 25 3d | 91 0d 01 be 90 54 69 6d |Timing%=|.....Tim|
|00005230| 69 6e 67 25 3d 28 91 2b | 28 28 33 31 2d 4d 28 53 |ing%=(.+|((31-M(S|
|00005240| 65 71 75 65 6e 63 65 50 | 6f 73 69 74 69 6f 6e 25 |equenceP|osition%|
|00005250| 2c 35 29 29 2a 54 65 6d | 70 6f 44 65 6c 61 79 25 |,5))*Tem|poDelay%|
|00005260| 29 2b 28 54 69 6d 69 6e | 67 25 2d 91 29 29 2b 31 |)+(Timin|g%-.))+1|
|00005270| 3a f2 79 3a e3 50 6c 61 | 79 50 61 74 74 3d 31 b8 |:.y:.Pla|yPatt=1.|
|00005280| 38 3a e7 28 28 50 6c 61 | 79 50 61 74 74 2d 31 29 |8:.((Pla|yPatt-1)|
|00005290| 83 32 29 3d 30 8c 4c 6f | 63 56 61 72 2b 3d 31 3a |.2)=0.Lo|cVar+=1:|
|000052a0| 43 75 72 72 53 61 2b 3d | bb 28 5a 24 28 4c 6f 63 |CurrSa+=|.(Z$(Loc|
|000052b0| 56 61 72 2d 31 2c 30 29 | 29 0d 01 bf 0f e7 4a 28 |Var-1,0)|).....J(|
|000052c0| 4c 6f 63 56 61 72 29 8c | 0d 01 c0 49 50 61 3d 41 |LocVar).|...IPa=A|
|000052d0| 28 50 6c 61 79 50 61 74 | 74 2c 4d 28 53 65 71 75 |(PlayPat|t,M(Sequ|
|000052e0| 65 6e 63 65 50 6f 73 69 | 74 69 6f 6e 25 2c 4c 6f |encePosi|tion%,Lo|
|000052f0| 63 56 61 72 29 2c 50 61 | 74 74 65 72 6e 50 6f 73 |cVar),Pa|tternPos|
|00005300| 69 74 69 6f 6e 25 2c 30 | 29 3a e7 50 61 3c 3e 30 |ition%,0|):.Pa<>0|
|00005310| 8c 0d 01 c1 71 56 6f 6c | 75 3d 41 28 50 6c 61 79 |....qVol|u=A(Play|
|00005320| 50 61 74 74 2c 4d 28 53 | 65 71 75 65 6e 63 65 50 |Patt,M(S|equenceP|
|00005330| 6f 73 69 74 69 6f 6e 25 | 2c 4c 6f 63 56 61 72 29 |osition%|,LocVar)|
|00005340| 2c 50 61 74 74 65 72 6e | 50 6f 73 69 74 69 6f 6e |,Pattern|Position|
|00005350| 25 2c 31 29 3a c8 99 26 | 34 37 64 34 62 2c 50 6c |%,1):..&|47d4b,Pl|
|00005360| 61 79 50 61 74 74 2c 43 | 75 72 72 53 61 2b 50 61 |ayPatt,C|urrSa+Pa|
|00005370| 2c 56 6f 6c 75 2c 53 28 | 43 75 72 72 53 61 2b 50 |,Volu,S(|CurrSa+P|
|00005380| 61 29 0d 01 c2 05 cd 0d | 01 c3 77 cd 3a ed 3a 50 |a)......|..w.:.:P|
|00005390| 61 74 74 65 72 6e 50 6f | 73 69 74 69 6f 6e 25 2b |atternPo|sition%+|
|000053a0| 3d 31 3a e7 50 61 74 74 | 65 72 6e 50 6f 73 69 74 |=1:.Patt|ernPosit|
|000053b0| 69 6f 6e 25 3e 50 61 74 | 74 65 72 6e 4c 65 6e 67 |ion%>Pat|ternLeng|
|000053c0| 74 68 8c 50 61 74 74 65 | 72 6e 50 6f 73 69 74 69 |th.Patte|rnPositi|
|000053d0| 6f 6e 25 3d 31 3a 52 65 | 70 25 3d 30 3a 47 6f 74 |on%=1:Re|p%=0:Got|
|000053e0| 6f 25 3d 2d 31 3a f2 50 | 79 3a 53 65 71 75 65 6e |o%=-1:.P|y:Sequen|
|000053f0| 63 65 50 6f 73 69 74 69 | 6f 6e 25 2b 3d 31 0d 01 |cePositi|on%+=1..|
|00005400| c4 25 e7 53 65 71 75 65 | 6e 63 65 50 6f 73 69 74 |.%.Seque|ncePosit|
|00005410| 69 6f 6e 25 3e 4d 61 78 | 53 65 71 75 65 6e 63 65 |ion%>Max|Sequence|
|00005420| 8c f2 55 0d 01 c5 07 cd | 3a e1 0d 01 c6 24 dd f2 |..U.....|:....$..|
|00005430| 50 79 3a e7 41 24 28 53 | 65 71 75 65 6e 63 65 50 |Py:.A$(S|equenceP|
|00005440| 6f 73 69 74 69 6f 6e 25 | 29 3c 3e 22 22 8c 0d 01 |osition%|)<>""...|
|00005450| c7 3b 50 24 3d a4 51 28 | 41 24 28 53 65 71 75 65 |.;P$=.Q(|A$(Seque|
|00005460| 6e 63 65 50 6f 73 69 74 | 69 6f 6e 25 29 29 3a c8 |ncePosit|ion%)):.|
|00005470| 95 a9 28 50 24 29 3e 30 | 3a f2 46 79 3a ce 3a e7 |..(P$)>0|:.Fy:.:.|
|00005480| 47 6f 74 6f 25 3e 2d 31 | 8c 0d 01 c8 1b 53 65 71 |Goto%>-1|.....Seq|
|00005490| 75 65 6e 63 65 50 6f 73 | 69 74 69 6f 6e 25 3d 47 |uencePos|ition%=G|
|000054a0| 6f 74 6f 25 0d 01 c9 2c | cc 3a e7 52 65 70 25 3d |oto%...,|.:.Rep%=|
|000054b0| 30 8c 4c 6f 6f 70 65 64 | 25 3d 30 8b 53 65 71 75 |0.Looped|%=0.Sequ|
|000054c0| 65 6e 63 65 50 6f 73 69 | 74 69 6f 6e 25 2d 3d 31 |encePosi|tion%-=1|
|000054d0| 0d 01 ca 05 cd 0d 01 cb | 07 cd 3a e1 0d 01 cc 28 |........|..:....(|
|000054e0| dd f2 46 79 3a ea 4e 65 | 78 74 25 3a 4e 65 78 74 |..Fy:.Ne|xt%:Next|
|000054f0| 25 3d a7 50 24 2c 22 3b | 22 29 3a e7 4e 65 78 74 |%=.P$,";|"):.Next|
|00005500| 25 3d 30 8c 0d 01 cd 10 | f2 66 28 50 24 29 3a 50 |%=0.....|.f(P$):P|
|00005510| 24 3d 22 22 0d 01 ce 40 | cc 3a 41 24 3d c0 50 24 |$=""...@|.:A$=.P$|
|00005520| 2c 4e 65 78 74 25 29 3a | 50 24 3d c1 50 24 2c 4e |,Next%):|P$=.P$,N|
|00005530| 65 78 74 25 2b 31 2c a9 | 28 50 24 29 29 3a 41 24 |ext%+1,.|(P$)):A$|
|00005540| 3d c0 41 24 2c a9 28 41 | 24 29 2d 31 29 3a f2 66 |=.A$,.(A|$)-1):.f|
|00005550| 28 41 24 29 0d 01 cf 07 | cd 3a e1 0d 01 d0 2f dd |(A$)....|.:..../.|
|00005560| f2 66 28 41 24 29 3a ea | 44 6f 6e 65 25 2c 4e 75 |.f(A$):.|Done%,Nu|
|00005570| 6d 25 3a 44 6f 6e 65 25 | 3d 30 3a e7 c0 41 24 2c |m%:Done%|=0:..A$,|
|00005580| 34 29 3d 22 47 4f 54 4f | 22 8c 0d 01 d1 0e e7 47 |4)="GOTO|"......G|
|00005590| 6f 74 6f 25 3e 2d 31 8c | 0d 01 d2 3e f2 57 28 22 |oto%>-1.|...>.W("|
|000055a0| 59 6f 75 20 63 61 6e 6e | 6f 74 20 68 61 76 65 20 |You cann|ot have |
|000055b0| 6d 6f 72 65 20 74 68 61 | 6e 20 6f 6e 65 20 67 6f |more tha|n one go|
|000055c0| 74 6f 20 69 6e 20 61 20 | 63 6f 6d 6d 61 6e 64 20 |to in a |command |
|000055d0| 6c 69 6e 65 22 29 0d 01 | d3 2e cc 3a 4e 75 6d 25 |line")..|...:Num%|
|000055e0| 3d a4 43 28 41 24 2c 35 | 29 3a e7 4e 75 6d 25 3c |=.C(A$,5|):.Num%<|
|000055f0| 3d 30 84 4e 75 6d 25 3e | 4d 61 78 53 65 71 75 65 |=0.Num%>|MaxSeque|
|00005600| 6e 63 65 8c 0d 01 d4 28 | f2 57 28 22 49 6c 6c 65 |nce....(|.W("Ille|
|00005610| 67 61 6c 20 6c 69 6e 65 | 20 6e 75 6d 62 65 72 20 |gal line| number |
|00005620| 66 6f 72 20 61 20 67 6f | 74 6f 22 29 0d 01 d5 12 |for a go|to")....|
|00005630| cc 3a 47 6f 74 6f 25 3d | 4e 75 6d 25 2d 31 0d 01 |.:Goto%=|Num%-1..|
|00005640| d6 05 cd 0d 01 d7 0d cd | 3a 44 6f 6e 65 25 3d b9 |........|:Done%=.|
|00005650| 0d 01 d8 44 cd 3a e7 c0 | 41 24 2c 34 29 3d 22 53 |...D.:..|A$,4)="S|
|00005660| 54 4f 50 22 8c 44 6f 6e | 65 25 3d b9 3a 53 65 71 |TOP".Don|e%=.:Seq|
|00005670| 75 65 6e 63 65 50 6f 69 | 6e 74 65 72 3d 53 65 71 |uencePoi|nter=Seq|
|00005680| 75 65 6e 63 65 50 6f 73 | 69 74 69 6f 6e 25 3a f2 |uencePos|ition%:.|
|00005690| 41 3a f2 55 0d 01 d9 13 | e7 c0 41 24 2c 34 29 3d |A:.U....|..A$,4)=|
|000056a0| 22 4c 4f 4f 50 22 8c 0d | 01 da 0c e7 52 65 70 25 |"LOOP"..|....Rep%|
|000056b0| 3e 30 8c 0d 01 db 3e f2 | 57 28 22 59 6f 75 20 63 |>0....>.|W("You c|
|000056c0| 61 6e 6e 6f 74 20 68 61 | 76 65 20 6d 6f 72 65 20 |annot ha|ve more |
|000056d0| 74 68 61 6e 20 6f 6e 65 | 20 6c 6f 6f 70 20 69 6e |than one| loop in|
|000056e0| 20 61 20 63 6f 6d 6d 61 | 6e 64 20 6c 69 6e 65 22 | a comma|nd line"|
|000056f0| 29 0d 01 dc 1d cc 3a 4e | 75 6d 25 3d a4 43 28 41 |).....:N|um%=.C(A|
|00005700| 24 2c 35 29 3a e7 4e 75 | 6d 25 3c 3d 30 8c 0d 01 |$,5):.Nu|m%<=0...|
|00005710| dd 21 f2 57 28 22 49 6c | 6c 65 67 61 6c 20 6e 75 |.!.W("Il|legal nu|
|00005720| 6d 62 65 72 20 6f 66 20 | 6c 6f 6f 70 73 22 29 0d |mber of |loops").|
|00005730| 01 de 26 cc 3a 4c 6f 6f | 70 65 64 25 2b 3d 31 3a |..&.:Loo|ped%+=1:|
|00005740| e7 4c 6f 6f 70 65 64 25 | 3c 3d 4e 75 6d 25 8c 52 |.Looped%|<=Num%.R|
|00005750| 65 70 25 3d 31 0d 01 df | 05 cd 0d 01 e0 0d cd 3a |ep%=1...|.......:|
|00005760| 44 6f 6e 65 25 3d b9 0d | 01 e1 2f cd 3a e7 c0 41 |Done%=..|../.:..A|
|00005770| 24 2c 26 63 29 3d 22 52 | 45 53 45 54 43 4f 55 4e |$,&c)="R|ESETCOUN|
|00005780| 54 45 52 22 8c 44 6f 6e | 65 25 3d b9 3a 43 4f 55 |TER".Don|e%=.:COU|
|00005790| 4e 54 45 52 3d 30 0d 01 | e2 12 e7 c0 41 24 2c 33 |NTER=0..|....A$,3|
|000057a0| 29 3d 22 49 4e 43 22 8c | 0d 01 e3 1a 4e 75 6d 25 |)="INC".|....Num%|
|000057b0| 3d a4 43 28 41 24 2c 34 | 29 3a e7 4e 75 6d 25 3d |=.C(A$,4|):.Num%=|
|000057c0| 30 8c 0d 01 e4 23 f2 57 | 28 22 49 6c 6c 65 67 61 |0....#.W|("Illega|
|000057d0| 6c 20 70 61 72 61 6d 65 | 74 65 72 20 66 6f 72 20 |l parame|ter for |
|000057e0| 49 6e 63 22 29 0d 01 e5 | 13 cc 3a 43 4f 55 4e 54 |Inc")...|..:COUNT|
|000057f0| 45 52 2b 3d 4e 75 6d 25 | 0d 01 e6 0d cd 3a 44 6f |ER+=Num%|.....:Do|
|00005800| 6e 65 25 3d b9 0d 01 e7 | 14 cd 3a e7 c0 41 24 2c |ne%=....|..:..A$,|
|00005810| 33 29 3d 22 44 45 43 22 | 8c 0d 01 e8 1a 4e 75 6d |3)="DEC"|.....Num|
|00005820| 25 3d a4 43 28 41 24 2c | 34 29 3a e7 4e 75 6d 25 |%=.C(A$,|4):.Num%|
|00005830| 3d 30 8c 0d 01 e9 23 f2 | 57 28 22 49 6c 6c 65 67 |=0....#.|W("Illeg|
|00005840| 61 6c 20 70 61 72 61 6d | 65 74 65 72 20 66 6f 72 |al param|eter for|
|00005850| 20 44 65 63 22 29 0d 01 | ea 13 cc 3a 43 4f 55 4e | Dec")..|...:COUN|
|00005860| 54 45 52 2d 3d 4e 75 6d | 25 0d 01 eb 0d cd 3a 44 |TER-=Num|%.....:D|
|00005870| 6f 6e 65 25 3d b9 0d 01 | ec 13 cd 3a e7 c0 41 24 |one%=...|...:..A$|
|00005880| 2c 32 29 3d 22 49 46 22 | 8c 0d 01 ed 1f 52 65 73 |,2)="IF"|.....Res|
|00005890| 25 3d a0 28 c1 41 24 2c | 33 2c a9 28 41 24 29 29 |%=.(.A$,|3,.(A$))|
|000058a0| 29 3a e7 52 65 73 25 8c | 0d 01 ee 38 4e 75 6d 25 |):.Res%.|...8Num%|
|000058b0| 3d a4 43 28 41 24 2c a7 | 41 24 2c 22 47 4f 54 4f |=.C(A$,.|A$,"GOTO|
|000058c0| 22 29 2b 34 29 3a e7 4e | 75 6d 25 3c 3d 30 84 4e |")+4):.N|um%<=0.N|
|000058d0| 75 6d 25 3e 4d 61 78 53 | 65 71 75 65 6e 63 65 8c |um%>MaxS|equence.|
|000058e0| 0d 01 ef 28 f2 57 28 22 | 49 6c 6c 65 67 61 6c 20 |...(.W("|Illegal |
|000058f0| 6c 69 6e 65 20 6e 75 6d | 62 65 72 20 66 6f 72 20 |line num|ber for |
|00005900| 61 20 67 6f 74 6f 22 29 | 0d 01 f0 12 cc 3a 47 6f |a goto")|.....:Go|
|00005910| 74 6f 25 3d 4e 75 6d 25 | 2d 31 0d 01 f1 05 cd 0d |to%=Num%|-1......|
|00005920| 01 f2 0d cd 3a 44 6f 6e | 65 25 3d b9 0d 01 f3 2d |....:Don|e%=....-|
|00005930| cd 3a e7 44 6f 6e 65 25 | 3d a3 8c f2 57 28 22 55 |.:.Done%|=...W("U|
|00005940| 6e 6b 6e 6f 77 6e 20 63 | 6f 6d 6d 61 6e 64 20 28 |nknown c|ommand (|
|00005950| 22 2b 41 24 2b 22 29 22 | 29 0d 01 f4 05 e1 0d 01 |"+A$+")"|).......|
|00005960| f5 3c dd a4 43 28 59 24 | 2c 53 6b 69 70 25 29 3a |.<..C(Y$|,Skip%):|
|00005970| ea 50 61 72 61 6d 25 3a | 50 61 72 61 6d 25 3d bb |.Param%:|Param%=.|
|00005980| 28 c2 59 24 2c a9 28 59 | 24 29 2d 53 6b 69 70 25 |(.Y$,.(Y|$)-Skip%|
|00005990| 29 29 3a 3d 50 61 72 61 | 6d 25 0d 01 f6 37 dd a4 |)):=Para|m%...7..|
|000059a0| 51 28 41 24 29 3a e3 55 | 70 3d 31 b8 a9 28 41 24 |Q(A$):.U|p=1..(A$|
|000059b0| 29 3a e7 c1 41 24 2c 55 | 70 2c 31 29 3e 3d 22 61 |):..A$,U|p,1)>="a|
|000059c0| 22 80 c1 41 24 2c 55 70 | 2c 31 29 3c 3d 22 7a 22 |"..A$,Up|,1)<="z"|
|000059d0| 8c 0d 01 f7 20 c1 41 24 | 2c 55 70 2c 31 29 3d bd |.... .A$|,Up,1)=.|
|000059e0| 28 97 28 c1 41 24 2c 55 | 70 2c 31 29 29 2d 33 32 |(.(.A$,U|p,1))-32|
|000059f0| 29 0d 01 f8 0b cd 3a ed | 3a 3d 41 24 0d 01 f9 79 |).....:.|:=A$...y|
|00005a00| dd f2 57 28 59 24 29 3a | f2 5a 28 4d 65 73 73 61 |..W(Y$):|.Z(Messa|
|00005a10| 67 65 25 2c 30 2c 59 24 | 2b 22 20 2d 20 41 74 20 |ge%,0,Y$|+" - At |
|00005a20| 6c 69 6e 65 20 22 2b c3 | 28 53 65 71 75 65 6e 63 |line "+.|(Sequenc|
|00005a30| 65 50 6f 73 69 74 69 6f | 6e 25 29 29 3a f2 50 28 |ePositio|n%)):.P(|
|00005a40| 4d 65 73 73 61 67 65 25 | 2c a3 29 3a 53 65 71 75 |Message%|,.):Sequ|
|00005a50| 65 6e 63 65 50 6f 69 6e | 74 65 72 3d 53 65 71 75 |encePoin|ter=Sequ|
|00005a60| 65 6e 63 65 50 6f 73 69 | 74 69 6f 6e 25 3a f2 41 |encePosi|tion%:.A|
|00005a70| 3a f2 55 3a e1 0d 01 fa | 52 dd f2 71 28 50 6c 75 |:.U:....|R..q(Plu|
|00005a80| 73 29 3a e3 43 6c 65 61 | 72 3d 31 b8 34 3a 4d 28 |s):.Clea|r=1.4:M(|
|00005a90| 50 6c 75 73 2c 43 6c 65 | 61 72 29 3d 30 3a ed 3a |Plus,Cle|ar)=0:.:|
|00005aa0| 41 24 28 50 6c 75 73 29 | 3d 22 22 3a 4d 28 50 6c |A$(Plus)|="":M(Pl|
|00005ab0| 75 73 2c 35 29 3d 44 65 | 66 61 75 6c 74 54 65 6d |us,5)=De|faultTem|
|00005ac0| 70 6f 3a f2 41 3a e1 0d | 01 fb 3c dd f2 6d 28 50 |po:.A:..|..<..m(P|
|00005ad0| 6c 75 73 29 3a e3 43 6f | 70 79 3d 31 b8 35 3a 57 |lus):.Co|py=1.5:W|
|00005ae0| 28 43 6f 70 79 29 3d 4d | 28 50 6c 75 73 2c 43 6f |(Copy)=M|(Plus,Co|
|00005af0| 70 79 29 3a ed 3a 52 24 | 3d 41 24 28 50 6c 75 73 |py):.:R$|=A$(Plus|
|00005b00| 29 3a e1 0d 01 fc 43 dd | f2 4a 79 28 50 6c 75 73 |):....C.|.Jy(Plus|
|00005b10| 29 3a e3 50 61 73 74 65 | 3d 31 b8 35 3a 4d 28 50 |):.Paste|=1.5:M(P|
|00005b20| 6c 75 73 2c 50 61 73 74 | 65 29 3d 57 28 50 61 73 |lus,Past|e)=W(Pas|
|00005b30| 74 65 29 3a ed 3a 41 24 | 28 50 6c 75 73 29 3d 52 |te):.:A$|(Plus)=R|
|00005b40| 24 3a f2 41 3a e1 0d 01 | fd 22 dd f2 62 79 28 50 |$:.A:...|."..by(P|
|00005b50| 6c 75 73 29 3a e7 50 6c | 75 73 3c 3e 4d 61 78 53 |lus):.Pl|us<>MaxS|
|00005b60| 65 71 75 65 6e 63 65 8c | 0d 01 fe 6e e3 49 6e 73 |equence.|...n.Ins|
|00005b70| 65 72 74 3d 4d 61 78 53 | 65 71 75 65 6e 63 65 b8 |ert=MaxS|equence.|
|00005b80| 50 6c 75 73 2b 31 88 2d | 31 3a e3 53 68 69 66 74 |Plus+1.-|1:.Shift|
|00005b90| 3d 31 b8 35 3a c8 94 4d | 28 49 6e 73 65 72 74 2c |=1.5:..M|(Insert,|
|00005ba0| 53 68 69 66 74 29 2c 4d | 28 49 6e 73 65 72 74 2d |Shift),M|(Insert-|
|00005bb0| 31 2c 53 68 69 66 74 29 | 3a ed 3a c8 94 41 24 28 |1,Shift)|:.:..A$(|
|00005bc0| 49 6e 73 65 72 74 29 2c | 41 24 28 49 6e 73 65 72 |Insert),|A$(Inser|
|00005bd0| 74 2d 31 29 3a ed 0d 01 | ff 13 cd 3a f2 71 28 50 |t-1):...|...:.q(P|
|00005be0| 6c 75 73 29 3a f2 41 3a | e1 0d 02 00 32 dd f2 56 |lus):.A:|....2..V|
|00005bf0| 79 28 50 6c 75 73 29 3a | ea 4e 75 6d 25 3a 4e 75 |y(Plus):|.Num%:Nu|
|00005c00| 6d 25 3d 50 6c 75 73 3a | e7 4e 75 6d 25 3c 3e 4d |m%=Plus:|.Num%<>M|
|00005c10| 61 78 53 65 71 75 65 6e | 63 65 8c 0d 02 01 61 e3 |axSequen|ce....a.|
|00005c20| 4d 6f 76 65 3d 4e 75 6d | 25 b8 4d 61 78 53 65 71 |Move=Num|%.MaxSeq|
|00005c30| 75 65 6e 63 65 2d 31 3a | e3 53 68 69 66 74 3d 31 |uence-1:|.Shift=1|
|00005c40| b8 35 3a c8 94 4d 28 4d | 6f 76 65 2c 53 68 69 66 |.5:..M(M|ove,Shif|
|00005c50| 74 29 2c 4d 28 4d 6f 76 | 65 2b 31 2c 53 68 69 66 |t),M(Mov|e+1,Shif|
|00005c60| 74 29 3a ed 3a c8 94 41 | 24 28 4d 6f 76 65 29 2c |t):.:..A|$(Move),|
|00005c70| 41 24 28 4d 6f 76 65 2b | 31 29 3a ed 0d 02 02 2a |A$(Move+|1):....*|
|00005c80| cd 3a f2 6d 28 4d 61 78 | 53 65 71 75 65 6e 63 65 |.:.m(Max|Sequence|
|00005c90| 29 3a f2 71 28 4d 61 78 | 53 65 71 75 65 6e 63 65 |):.q(Max|Sequence|
|00005ca0| 29 3a f2 41 3a e1 0d ff |                         |):.A:...|        |
+--------+-------------------------+-------------------------+--------+--------+