1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447
2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559
2560
2561
2562
2563
2564
2565
2566
2567
2568
2569
2570
2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584
2585
2586
2587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599
2600
2601
2602
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633
2634
2635
2636
2637
2638
2639
2640
2641
2642
2643
2644
2645
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657
2658
2659
2660
2661
2662
2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696
2697
2698
2699
2700
2701
2702
2703
2704
2705
2706
2707
2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
2794
2795
2796
2797
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169
3170
3171
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182
3183
3184
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223
3224
3225
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235
3236
3237
3238
3239
3240
3241
3242
3243
3244
3245
3246
3247
3248
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281
3282
3283
3284
3285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308
|
object frmTracker: TfrmTracker
Left = 1876
Height = 798
Top = 210
Width = 1416
AllowDropFiles = True
Caption = 'hUGETracker'
ClientHeight = 798
ClientWidth = 1416
KeyPreview = True
Menu = MainMenu1
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDropFiles = FormDropFiles
OnKeyDown = FormKeyDown
OnKeyUp = FormKeyUp
OnShow = FormShow
Position = poDefault
ShowHint = True
LCLVersion = '3.0.0.3'
object TreeView1: TTreeView
Left = 0
Height = 684
Top = 93
Width = 193
Align = alLeft
ParentFont = False
ReadOnly = True
TabOrder = 0
OnDblClick = TreeView1DblClick
OnSelectionChanged = TreeView1SelectionChanged
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
Items.Data = {
F9FFFFFF020003000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF030000000000
0000010B000000496E737472756D656E7473FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFF0000000000000000000400000044757479FFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFF0000000000000000000400000057617665FFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFF000000000000000000050000004E6F697365FFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFF000000000000000000050000005761766573FFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF00000000000000000008000000526F7574696E6573
}
end
object Splitter1: TSplitter
Left = 193
Height = 684
Top = 93
Width = 5
end
object Panel1: TPanel
Left = 198
Height = 684
Top = 93
Width = 1218
Align = alClient
BevelOuter = bvNone
ClientHeight = 684
ClientWidth = 1218
ParentFont = False
TabOrder = 2
object PageControl1: TPageControl
Left = 0
Height = 684
Top = 0
Width = 1218
ActivePage = PatternTabSheet
Align = alClient
ParentFont = False
TabIndex = 1
TabOrder = 0
object GeneralTabSheet: TTabSheet
Caption = 'General'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
object SongInformationGroupbox: TGroupBox
Left = 8
Height = 192
Top = 8
Width = 297
Caption = 'Song information'
ClientHeight = 188
ClientWidth = 293
ParentFont = False
TabOrder = 0
object Label15: TLabel
Left = 8
Height = 17
Top = 16
Width = 28
Caption = 'Song'
ParentColor = False
ParentFont = False
end
object Label16: TLabel
Left = 7
Height = 17
Top = 48
Width = 30
Caption = 'Artist'
ParentColor = False
ParentFont = False
end
object SongEdit: TEdit
Left = 56
Height = 27
Hint = 'The name of your composition'
Top = 8
Width = 216
MaxLength = 255
ParentFont = False
TabOrder = 0
OnChange = SongEditChange
end
object ArtistEdit: TEdit
Left = 56
Height = 27
Hint = 'Your name or handle'
Top = 40
Width = 216
MaxLength = 255
ParentFont = False
TabOrder = 1
OnChange = ArtistEditChange
end
object Label21: TLabel
Left = 8
Height = 17
Top = 78
Width = 120
Caption = 'Tempo (ticks per row)'
ParentColor = False
ParentFont = False
end
object TicksPerRowSpinEdit: TSpinEdit
Left = 133
Height = 27
Hint = 'How many ticks should happen before the row changes. Higher means slower.'
Top = 72
Width = 50
MaxValue = 20
MinValue = 1
OnChange = TicksPerRowSpinEditChange
ParentFont = False
TabOrder = 2
Value = 7
end
object TimerEnabledCheckBox: TCheckBox
Left = 7
Height = 21
Hint = 'Enable the GB hardware timer. This allows for more fine-grained tempo control.'
Top = 144
Width = 171
Caption = 'Enable timer-based tempo'
TabOrder = 3
OnChange = TimerEnabledCheckBoxChange
end
object TimerTempoLabel: TLabel
Left = 8
Height = 17
Top = 112
Width = 120
Caption = 'Tempo (timer divider)'
Enabled = False
ParentColor = False
end
object TimerDividerSpinEdit: TSpinEdit
Left = 133
Height = 27
Hint = 'The "modulo" value for the GB hardware timer. Higher means faster.'
Top = 108
Width = 50
Enabled = False
MaxValue = 255
OnChange = TimerDividerSpinEditChange
TabOrder = 4
end
object TempoBPMLabel: TLabel
Left = 192
Height = 17
Top = 96
Width = 94
Caption = 'TempoBPMLabel'
ParentColor = False
end
object TicksPerRowSpinEdit1: TSpinEdit
Left = 187
Height = 27
Hint = 'How many ticks should happen before the row changes. Higher means slower.'
Top = 72
Width = 50
MaxValue = 20
MinValue = 1
OnChange = TicksPerRowSpinEdit1Change
ParentFont = False
TabOrder = 5
Value = 7
end
object TicksPerRowSpinEdit2: TSpinEdit
Left = 241
Height = 27
Hint = 'How many ticks should happen before the row changes. Higher means slower.'
Top = 72
Width = 50
MaxValue = 20
MinValue = 1
OnChange = TicksPerRowSpinEdit2Change
ParentFont = False
TabOrder = 6
Value = 7
end
object TicksPerRowSpinEdit3: TSpinEdit
Left = 295
Height = 27
Hint = 'How many ticks should happen before the row changes. Higher means slower.'
Top = 72
Width = 50
MaxValue = 20
MinValue = 1
OnChange = TicksPerRowSpinEdit3Change
ParentFont = False
TabOrder = 7
Value = 7
end
end
end
object PatternTabSheet: TTabSheet
Caption = 'Patterns'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
object Panel3: TPanel
Left = 229
Height = 649
Top = 0
Width = 983
Align = alClient
ClientHeight = 649
ClientWidth = 983
ParentFont = False
TabOrder = 0
object HeaderControl1: THeaderControl
Left = 1
Height = 30
Hint = 'Left click to mute, right click to solo'
Top = 1
Width = 981
DragReorder = False
Images = ImageList2
Sections = <
item
Alignment = taLeftJustify
Width = 32
Visible = True
end
item
Alignment = taCenter
ImageIndex = 1
Text = 'Duty 1'
Width = 133
Visible = True
end
item
Alignment = taCenter
ImageIndex = 1
Text = 'Duty 2'
Width = 133
Visible = True
end
item
Alignment = taCenter
ImageIndex = 1
Text = 'Wave'
Width = 133
Visible = True
end
item
Alignment = taCenter
ImageIndex = 1
Text = 'Noise'
Width = 133
Visible = True
end>
OnSectionClick = HeaderControl1SectionClick
OnSectionResize = HeaderControl1SectionResize
Align = alTop
ParentFont = False
OnMouseUp = HeaderControl1MouseUp
end
object ScrollBox1: TScrollBox
Left = 1
Height = 617
Top = 31
Width = 981
HorzScrollBar.Increment = 3
HorzScrollBar.Page = 32
HorzScrollBar.Smooth = True
HorzScrollBar.Tracking = True
VertScrollBar.Increment = 5
VertScrollBar.Page = 50
VertScrollBar.Smooth = True
VertScrollBar.Tracking = True
Align = alClient
BorderStyle = bsNone
ClientHeight = 617
ClientWidth = 981
ParentFont = False
TabOrder = 1
OnMouseWheelDown = ScrollBox1MouseWheelDown
OnMouseWheelUp = ScrollBox1MouseWheelUp
object RowNumberStringGrid: TStringGrid
Left = 0
Height = 617
Top = 0
Width = 32
Align = alLeft
BorderStyle = bsNone
ColCount = 1
DefaultColWidth = 32
Enabled = False
ParentFont = False
RowCount = 64
ScrollBars = ssNone
TabOrder = 0
end
end
end
object OrderEditStringGrid: TStringGrid
Left = 0
Height = 649
Top = 0
Width = 224
Align = alLeft
AutoEdit = False
AutoFillColumns = True
Columns = <
item
Alignment = taCenter
MinSize = 33
MaxSize = 33
Title.Caption = 'Dty1'
Width = 33
end
item
Alignment = taCenter
MinSize = 33
MaxSize = 33
Title.Caption = 'Dty2'
Width = 33
end
item
Alignment = taCenter
MinSize = 33
MaxSize = 33
Title.Caption = 'Wav'
Width = 33
end
item
Alignment = taCenter
MinSize = 33
MaxSize = 33
Title.Caption = 'Nse'
Width = 33
end>
DefaultColWidth = 17
DefaultRowHeight = 21
ExtendedSelect = False
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goRangeSelect, goRowMoving, goEditing, goTabs, goSmoothScroll, goFixedRowNumbering, goRowHighlight]
ParentFont = False
PopupMenu = OrderEditPopup
RangeSelectMode = rsmMulti
RowCount = 2
ScrollBars = ssVertical
TabOrder = 1
UseXORFeatures = True
OnAfterSelection = OrderEditStringGridAfterSelection
OnCellProcess = OrderEditStringGridCellProcess
OnColRowDeleted = OrderEditStringGridColRowDeleted
OnColRowExchanged = OrderEditStringGridColRowExchanged
OnColRowInserted = OrderEditStringGridColRowInserted
OnDblClick = OrderEditStringGridDblClick
OnEditingDone = OrderEditStringGridEditingDone
OnKeyDown = OrderEditStringGridKeyDown
OnMouseDown = OrderEditStringGridMouseDown
OnValidateEntry = OrderEditStringGridValidateEntry
ColWidths = (
64
33
33
33
33
)
end
object Splitter2: TSplitter
Left = 224
Height = 649
Top = 0
Width = 5
end
end
object InstrumentTabSheet: TTabSheet
Caption = 'Instruments'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
object FlowPanel1: TFlowPanel
Left = 0
Height = 649
Top = 0
Width = 1052
Align = alClient
AutoSize = True
BevelOuter = bvNone
ControlList = <
item
Control = InstrumentGroupBox
WrapAfter = waAuto
Index = 0
end
item
Control = EnvelopeGroupBox
WrapAfter = waAuto
Index = 1
end
item
Control = SquareGroupBox
WrapAfter = waAuto
Index = 2
end
item
Control = WaveGroupBox
WrapAfter = waAuto
Index = 3
end
item
Control = NoiseGroupBox
WrapAfter = waAuto
Index = 4
end>
FlowLayout = tlTop
FlowStyle = fsLeftRightTopBottom
ParentFont = False
PopupMenu = InstrumentPopupMenu
TabOrder = 0
object InstrumentGroupBox: TGroupBox
Left = 7
Height = 273
Top = 7
Width = 280
Anchors = []
BorderSpacing.Left = 7
BorderSpacing.Top = 7
BorderSpacing.Right = 7
BorderSpacing.Bottom = 7
Caption = 'Instrument'
ClientHeight = 254
ClientWidth = 276
ParentFont = False
TabOrder = 0
object LengthTrackbar: TTrackBar
Left = 76
Height = 44
Top = 112
Width = 189
Max = 63
OnChange = LengthSpinnerChange
Position = 0
Enabled = False
ParentFont = False
TabOrder = 7
end
object InstrumentNumberSpinner: TSpinEdit
Left = 80
Height = 27
Hint = 'What instrument to edit'
Top = 38
Width = 187
MaxValue = 15
MinValue = 1
OnChange = InstrumentNumberSpinnerChange
ParentFont = False
TabOrder = 0
Value = 1
end
object Label1: TLabel
Left = 8
Height = 17
Top = 46
Width = 62
Caption = 'Instrument'
ParentColor = False
ParentFont = False
end
object Label2: TLabel
Left = 8
Height = 17
Top = 78
Width = 34
Caption = 'Name'
ParentColor = False
ParentFont = False
end
object InstrumentNameEdit: TEdit
Left = 80
Height = 27
Hint = 'The name of the instrument'
Top = 70
Width = 187
MaxLength = 255
ParentFont = False
TabOrder = 1
OnChange = InstrumentNameEditChange
end
object Label3: TLabel
Left = 8
Height = 17
Top = 16
Width = 50
Caption = 'Channel'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object InstrumentTypeCombobox: TComboBox
Left = 80
Height = 25
Hint = 'What type of channel this instrument will be played on'
Top = 8
Width = 185
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'Square'
'Wave'
'Noise'
)
ParentFont = False
Style = csDropDownList
TabOrder = 2
Text = 'Square'
OnChange = InstrumentTypeComboboxChange
end
object LengthEnabledCheckbox: TCheckBox
Left = 12
Height = 21
Hint = 'Cut the sound after a certain length of time'
Top = 118
Width = 61
Caption = 'Length'
ParentFont = False
TabOrder = 3
OnChange = LengthEnabledCheckboxChange
end
object InstrumentImportButton: TButton
Left = 12
Height = 25
Hint = 'Import an instrument'
Top = 216
Width = 116
Caption = 'Import'
ParentFont = False
TabOrder = 4
OnClick = InstrumentImportButtonClick
end
object InstrumentExportButton: TButton
Left = 149
Height = 25
Hint = 'Export an instrument'
Top = 216
Width = 116
Caption = 'Export'
ParentFont = False
TabOrder = 5
OnClick = InstrumentExportButtonClick
end
object TestOctave5Button: TButton
Tag = 5
Left = 142
Height = 25
Hint = 'Test out the instrument with a C-5 note'
Top = 146
Width = 27
Caption = '5'
ParentFont = False
TabOrder = 6
OnClick = TestOctaveButtonClick
end
object Label14: TLabel
Left = 12
Height = 17
Top = 152
Width = 66
Caption = 'Test octave:'
ParentColor = False
ParentFont = False
end
object TestOctave5Button1: TButton
Tag = 4
Left = 110
Height = 25
Hint = 'Test out the instrument with a C-4 note'
Top = 146
Width = 27
Caption = '4'
ParentFont = False
TabOrder = 8
OnClick = TestOctaveButtonClick
end
object TestOctave5Button2: TButton
Tag = 3
Left = 78
Height = 25
Hint = 'Test out the instrument with a C-3 note'
Top = 146
Width = 27
Caption = '3'
ParentFont = False
TabOrder = 9
OnClick = TestOctaveButtonClick
end
object TestOctave5Button3: TButton
Tag = 6
Left = 174
Height = 25
Hint = 'Test out the instrument with a C-6 note'
Top = 146
Width = 27
Caption = '6'
ParentFont = False
TabOrder = 10
OnClick = TestOctaveButtonClick
end
object TestOctave5Button4: TButton
Tag = 7
Left = 206
Height = 25
Hint = 'Test out the instrument with a C-7 note'
Top = 146
Width = 27
Caption = '7'
ParentFont = False
TabOrder = 11
OnClick = TestOctaveButtonClick
end
object TestOctave5Button5: TButton
Tag = 8
Left = 238
Height = 25
Hint = 'Test out the instrument with a C-8 note'
Top = 146
Width = 27
Caption = '8'
ParentFont = False
TabOrder = 12
OnClick = TestOctaveButtonClick
end
object EnableSubpatternCheckbox: TCheckBox
Left = 12
Height = 21
Top = 184
Width = 125
Caption = 'Enable subpattern'
TabOrder = 13
OnChange = EnableSubpatternCheckboxChange
end
end
object EnvelopeGroupBox: TGroupBox
Left = 301
Height = 153
Top = 7
Width = 582
Anchors = []
BorderSpacing.Left = 7
BorderSpacing.Top = 7
BorderSpacing.Right = 7
BorderSpacing.Bottom = 7
Caption = 'Envelope'
ClientHeight = 134
ClientWidth = 578
ParentFont = False
TabOrder = 1
object EnvChangeTrackbar: TTrackBar
Left = 82
Height = 44
Top = 82
Width = 196
Max = 7
OnChange = EnvChangeSpinnerChange
Position = 0
ParentFont = False
TabOrder = 3
end
object StartVolTrackbar: TTrackBar
Left = 82
Height = 44
Top = 8
Width = 196
Max = 15
OnChange = StartVolSpinnerChange
Position = 0
ParentFont = False
TabOrder = 2
end
object Label4: TLabel
Left = 8
Height = 17
Top = 16
Width = 49
Caption = 'Start vol.'
ParentColor = False
ParentFont = False
end
object Label5: TLabel
Left = 8
Height = 17
Top = 54
Width = 51
Caption = 'Direction'
ParentColor = False
ParentFont = False
end
object DirectionComboBox: TComboBox
Left = 82
Height = 25
Hint = 'Whether to fade the sound in or out'
Top = 46
Width = 198
ItemHeight = 0
ItemIndex = 1
Items.Strings = (
'Up'
'Down'
)
ParentFont = False
Style = csDropDownList
TabOrder = 0
Text = 'Down'
OnChange = DirectionComboBoxChange
end
object Label6: TLabel
Left = 8
Height = 17
Top = 90
Width = 43
Caption = 'Change'
ParentColor = False
ParentFont = False
end
object Panel5: TPanel
Left = 300
Height = 104
Top = 0
Width = 270
BevelOuter = bvLowered
ClientHeight = 104
ClientWidth = 270
ParentFont = False
TabOrder = 1
object EnvelopePaintbox: TPaintBox
Left = 1
Height = 102
Hint = 'Preview of the volume envelope'
Top = 1
Width = 268
Align = alClient
ParentFont = False
OnPaint = EnvelopePaintboxPaint
end
end
end
object SquareGroupBox: TGroupBox
Left = 7
Height = 169
Top = 294
Width = 319
Anchors = []
BorderSpacing.Left = 7
BorderSpacing.Top = 7
BorderSpacing.Right = 7
BorderSpacing.Bottom = 7
Caption = 'Square'
ClientHeight = 150
ClientWidth = 315
ParentFont = False
TabOrder = 2
object SweepSizeTrackbar: TTrackBar
Left = 105
Height = 44
Top = 80
Width = 196
Max = 7
OnChange = SweepSizeSpinnerChange
Position = 0
ParentFont = False
TabOrder = 3
end
object Label7: TLabel
Left = 8
Height = 17
Top = 16
Width = 65
Caption = 'Sweep time'
ParentColor = False
ParentFont = False
end
object SweepTimeCombobox: TComboBox
Left = 104
Height = 25
Hint = 'How long to sweep'
Top = 8
Width = 200
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'Off - no frequency change'
'7.8 ms (1/128Hz)'
'15.6 ms (2/128Hz)'
'23.4 ms (3/128Hz)'
'31.3 ms (4/128Hz)'
'39.1 ms (5/128Hz)'
'46.9 ms (6/128Hz)'
'54.7 ms (7/128Hz)'
)
ParentFont = False
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 0
Text = 'Off - no frequency change'
OnChange = SweepTimeComboboxChange
end
object SweepDirectionCombobox: TComboBox
Left = 104
Height = 25
Hint = 'The direction of the sweep'
Top = 40
Width = 200
ItemHeight = 0
ItemIndex = 1
Items.Strings = (
'Up'
'Down'
)
ParentFont = False
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 1
Text = 'Down'
OnChange = SweepDirectionComboboxChange
end
object Label8: TLabel
Left = 8
Height = 17
Top = 48
Width = 89
Caption = 'Sweep direction'
ParentColor = False
ParentFont = False
end
object Label9: TLabel
Left = 8
Height = 17
Top = 88
Width = 62
Caption = 'Sweep size'
ParentColor = False
ParentFont = False
end
object Label10: TLabel
Left = 8
Height = 17
Top = 120
Width = 26
Caption = 'Duty'
ParentColor = False
ParentFont = False
end
object DutyCombobox: TComboBox
Left = 104
Height = 25
Hint = 'Which duty cycle to use (changes timbre of wave)'
Top = 112
Width = 200
ItemHeight = 0
ItemIndex = 2
Items.Strings = (
'12.5%'
'25%'
'50% (square)'
'75%'
)
ParentFont = False
ParentShowHint = False
ShowHint = True
Style = csDropDownList
TabOrder = 2
Text = '50% (square)'
OnChange = DutyComboboxChange
end
end
object WaveGroupBox: TGroupBox
Left = 340
Height = 169
Top = 294
Width = 297
Anchors = []
BorderSpacing.Left = 7
BorderSpacing.Top = 7
BorderSpacing.Right = 7
BorderSpacing.Bottom = 7
Caption = 'Wave'
ClientHeight = 150
ClientWidth = 293
ParentFont = False
TabOrder = 3
object Label11: TLabel
Left = 8
Height = 17
Top = 16
Width = 42
Caption = 'Volume'
ParentColor = False
ParentFont = False
end
object Label12: TLabel
Left = 8
Height = 17
Top = 48
Width = 58
Caption = 'Waveform'
ParentColor = False
ParentFont = False
end
object WaveformCombobox: TComboBox
Left = 104
Height = 25
Hint = 'Which waveform is associated with this instrument'
Top = 40
Width = 176
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'Wave #0'
'Wave #1'
'Wave #2'
'Wave #3'
'Wave #4'
'Wave #5'
'Wave #6'
'Wave #7'
'Wave #8'
'Wave #9'
'Wave #10'
'Wave #11'
'Wave #12'
'Wave #13'
'Wave #14'
'Wave #15'
)
ParentFont = False
Style = csDropDownList
TabOrder = 0
Text = 'Wave #0'
OnChange = WaveformComboboxChange
end
object Panel4: TPanel
Left = 8
Height = 59
Top = 80
Width = 272
BevelOuter = bvLowered
ClientHeight = 59
ClientWidth = 272
ParentFont = False
TabOrder = 1
object WavePaintbox: TPaintBox
Left = 1
Height = 57
Hint = 'Preview of the waveform associated with this instrument'
Top = 1
Width = 270
Align = alClient
Color = clBlack
ParentColor = False
ParentFont = False
OnPaint = WavePaintboxPaint
end
end
object WaveVolumeCombobox: TComboBox
Left = 104
Height = 25
Hint = 'The initial volume of the wave'
Top = 8
Width = 176
ItemHeight = 0
ItemIndex = 1
Items.Strings = (
'Mute (No sound)'
'100% Volume'
'50% Volume'
'25% Volume'
)
ParentFont = False
Style = csDropDownList
TabOrder = 2
Text = '100% Volume'
OnChange = WaveVolumeComboboxChange
end
end
object NoiseGroupBox: TGroupBox
Left = 651
Height = 59
Top = 294
Width = 237
Anchors = []
BorderSpacing.Left = 7
BorderSpacing.Top = 7
BorderSpacing.Right = 7
BorderSpacing.Bottom = 7
Caption = 'Noise'
ClientHeight = 40
ClientWidth = 233
ParentFont = False
TabOrder = 4
object SevenBitCounterCheckbox: TCheckBox
Left = 8
Height = 21
Hint = 'Select LFSR width. When checked, output will sound like a tone rather than noise'
Top = 8
Width = 224
Alignment = taLeftJustify
Caption = '7 bit counter (more tone-like output)'
ParentFont = False
TabOrder = 0
OnChange = SevenBitCounterCheckboxChange
end
end
end
object SubpatternGroupBox: TGroupBox
Left = 1052
Height = 642
Top = 7
Width = 160
Align = alRight
Anchors = []
BorderSpacing.Top = 7
Caption = 'Subpattern'
ClientHeight = 623
ClientWidth = 156
TabOrder = 1
object ScrollBox2: TScrollBox
Left = 0
Height = 623
Top = 0
Width = 156
HorzScrollBar.Increment = 3
HorzScrollBar.Page = 32
HorzScrollBar.Smooth = True
HorzScrollBar.Tracking = True
VertScrollBar.Increment = 5
VertScrollBar.Page = 50
VertScrollBar.Smooth = True
VertScrollBar.Tracking = True
Align = alClient
BorderStyle = bsNone
ClientHeight = 623
ClientWidth = 156
TabOrder = 0
OnMouseWheelDown = ScrollBox1MouseWheelDown
OnMouseWheelUp = ScrollBox1MouseWheelUp
object RowNumberStringGrid1: TStringGrid
Left = 124
Height = 623
Top = 0
Width = 32
Align = alRight
BorderStyle = bsNone
ColCount = 1
DefaultColWidth = 32
Enabled = False
ParentFont = False
RowCount = 32
ScrollBars = ssNone
TabOrder = 0
end
end
end
end
object WavesTabSheet: TTabSheet
Caption = 'Waves'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
object WaveEditPaintBox: TPaintBox
AnchorSideTop.Control = WaveEditGroupBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 489
Top = 160
Width = 1212
Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 13
ParentFont = False
PopupMenu = WaveEditPopup
OnMouseDown = WaveEditPaintBoxMouseDown
OnMouseMove = WaveEditPaintBoxMouseMove
OnMouseUp = WaveEditPaintBoxMouseUp
OnPaint = WaveEditPaintBoxPaint
end
object WaveEditGroupBox: TGroupBox
Left = 8
Height = 139
Top = 8
Width = 568
Caption = 'Wave Editor'
ClientHeight = 135
ClientWidth = 564
ParentFont = False
TabOrder = 0
object Label20: TLabel
Left = 16
Height = 17
Top = 16
Width = 31
Caption = 'Wave'
ParentColor = False
ParentFont = False
end
object WaveEditNumberSpinner: TSpinEdit
Left = 64
Height = 27
Top = 8
Width = 80
MaxValue = 15
OnChange = WaveEditNumberSpinnerChange
ParentFont = False
TabOrder = 0
end
object ImportWaveButton: TButton
Left = 16
Height = 25
Hint = 'Import a wave'
Top = 48
Width = 147
Caption = 'Import'
ParentFont = False
TabOrder = 1
OnClick = ImportWaveButtonClick
end
object ExportWaveButton: TButton
Left = 16
Height = 25
Hint = 'Export a wave'
Top = 80
Width = 147
Caption = 'Export'
ParentFont = False
TabOrder = 2
OnClick = ExportWaveButtonClick
end
object HexWaveEdit: TEdit
Left = 288
Height = 27
Top = 8
Width = 264
MaxLength = 32
ParentFont = False
TabOrder = 3
OnChange = HexWaveEditEditingDone
OnEditingDone = HexWaveEditEditingDone
end
object Label13: TLabel
Left = 176
Height = 17
Top = 16
Width = 108
Caption = 'Hex representation'
ParentColor = False
ParentFont = False
end
object PlayWaveWhileDrawingCheckbox: TCheckBox
Left = 176
Height = 21
Top = 40
Width = 158
Caption = 'Play wave while drawing'
ParentFont = False
TabOrder = 4
end
end
end
object CommentsTabSheet: TTabSheet
Caption = 'Comments'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
object CommentMemo: TMemo
AnchorSideTop.Control = Label17
AnchorSideTop.Side = asrBottom
Left = 0
Height = 611
Hint = 'The comments section for your song. Greetings/links/etc'
Top = 38
Width = 1212
Align = alBottom
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 13
MaxLength = 255
ParentFont = False
TabOrder = 0
OnChange = CommentMemoChange
end
object Label17: TLabel
Left = 8
Height = 17
Top = 8
Width = 351
Caption = 'This is an area to write comments for anyone editing your tune.'
ParentColor = False
ParentFont = False
end
end
object RoutinesTabSheet: TTabSheet
Caption = 'Routines'
ClientHeight = 649
ClientWidth = 1212
ParentFont = False
inline RoutineSynedit: TSynEdit
AnchorSideTop.Control = Label19
AnchorSideTop.Side = asrBottom
Left = 0
Height = 528
Top = 121
Width = 1212
Align = alBottom
BorderSpacing.Top = 13
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Height = -13
Font.Name = 'Courier New'
Font.Pitch = fpFixed
Font.Quality = fqNonAntialiased
ParentColor = False
ParentFont = False
TabOrder = 0
Gutter.Width = 57
Gutter.MouseActions = <>
RightGutter.Width = 0
RightGutter.MouseActions = <>
Highlighter = SynAnySyn1
InsertCaret = ctBlock
Keystrokes = <
item
Command = ecUp
ShortCut = 38
end
item
Command = ecSelUp
ShortCut = 8230
end
item
Command = ecScrollUp
ShortCut = 16422
end
item
Command = ecDown
ShortCut = 40
end
item
Command = ecSelDown
ShortCut = 8232
end
item
Command = ecScrollDown
ShortCut = 16424
end
item
Command = ecLeft
ShortCut = 37
end
item
Command = ecSelLeft
ShortCut = 8229
end
item
Command = ecWordLeft
ShortCut = 16421
end
item
Command = ecSelWordLeft
ShortCut = 24613
end
item
Command = ecRight
ShortCut = 39
end
item
Command = ecSelRight
ShortCut = 8231
end
item
Command = ecWordRight
ShortCut = 16423
end
item
Command = ecSelWordRight
ShortCut = 24615
end
item
Command = ecPageDown
ShortCut = 34
end
item
Command = ecSelPageDown
ShortCut = 8226
end
item
Command = ecPageBottom
ShortCut = 16418
end
item
Command = ecSelPageBottom
ShortCut = 24610
end
item
Command = ecPageUp
ShortCut = 33
end
item
Command = ecSelPageUp
ShortCut = 8225
end
item
Command = ecPageTop
ShortCut = 16417
end
item
Command = ecSelPageTop
ShortCut = 24609
end
item
Command = ecLineStart
ShortCut = 36
end
item
Command = ecSelLineStart
ShortCut = 8228
end
item
Command = ecEditorTop
ShortCut = 16420
end
item
Command = ecSelEditorTop
ShortCut = 24612
end
item
Command = ecLineEnd
ShortCut = 35
end
item
Command = ecSelLineEnd
ShortCut = 8227
end
item
Command = ecEditorBottom
ShortCut = 16419
end
item
Command = ecSelEditorBottom
ShortCut = 24611
end
item
Command = ecToggleMode
ShortCut = 45
end
item
Command = ecCopy
ShortCut = 16429
end
item
Command = ecPaste
ShortCut = 8237
end
item
Command = ecDeleteChar
ShortCut = 46
end
item
Command = ecCut
ShortCut = 8238
end
item
Command = ecDeleteLastChar
ShortCut = 8
end
item
Command = ecDeleteLastChar
ShortCut = 8200
end
item
Command = ecDeleteLastWord
ShortCut = 16392
end
item
Command = ecUndo
ShortCut = 32776
end
item
Command = ecRedo
ShortCut = 40968
end
item
Command = ecLineBreak
ShortCut = 13
end
item
Command = ecSelectAll
ShortCut = 16449
end
item
Command = ecCopy
ShortCut = 16451
end
item
Command = ecBlockIndent
ShortCut = 24649
end
item
Command = ecLineBreak
ShortCut = 16461
end
item
Command = ecInsertLine
ShortCut = 16462
end
item
Command = ecDeleteWord
ShortCut = 16468
end
item
Command = ecBlockUnindent
ShortCut = 24661
end
item
Command = ecPaste
ShortCut = 16470
end
item
Command = ecCut
ShortCut = 16472
end
item
Command = ecDeleteLine
ShortCut = 16473
end
item
Command = ecDeleteEOL
ShortCut = 24665
end
item
Command = ecUndo
ShortCut = 16474
end
item
Command = ecRedo
ShortCut = 24666
end
item
Command = ecGotoMarker0
ShortCut = 16432
end
item
Command = ecGotoMarker1
ShortCut = 16433
end
item
Command = ecGotoMarker2
ShortCut = 16434
end
item
Command = ecGotoMarker3
ShortCut = 16435
end
item
Command = ecGotoMarker4
ShortCut = 16436
end
item
Command = ecGotoMarker5
ShortCut = 16437
end
item
Command = ecGotoMarker6
ShortCut = 16438
end
item
Command = ecGotoMarker7
ShortCut = 16439
end
item
Command = ecGotoMarker8
ShortCut = 16440
end
item
Command = ecGotoMarker9
ShortCut = 16441
end
item
Command = ecSetMarker0
ShortCut = 24624
end
item
Command = ecSetMarker1
ShortCut = 24625
end
item
Command = ecSetMarker2
ShortCut = 24626
end
item
Command = ecSetMarker3
ShortCut = 24627
end
item
Command = ecSetMarker4
ShortCut = 24628
end
item
Command = ecSetMarker5
ShortCut = 24629
end
item
Command = ecSetMarker6
ShortCut = 24630
end
item
Command = ecSetMarker7
ShortCut = 24631
end
item
Command = ecSetMarker8
ShortCut = 24632
end
item
Command = ecSetMarker9
ShortCut = 24633
end
item
Command = EcFoldLevel1
ShortCut = 41009
end
item
Command = EcFoldLevel2
ShortCut = 41010
end
item
Command = EcFoldLevel3
ShortCut = 41011
end
item
Command = EcFoldLevel4
ShortCut = 41012
end
item
Command = EcFoldLevel5
ShortCut = 41013
end
item
Command = EcFoldLevel6
ShortCut = 41014
end
item
Command = EcFoldLevel7
ShortCut = 41015
end
item
Command = EcFoldLevel8
ShortCut = 41016
end
item
Command = EcFoldLevel9
ShortCut = 41017
end
item
Command = EcFoldLevel0
ShortCut = 41008
end
item
Command = EcFoldCurrent
ShortCut = 41005
end
item
Command = EcUnFoldCurrent
ShortCut = 41003
end
item
Command = EcToggleMarkupWord
ShortCut = 32845
end
item
Command = ecNormalSelect
ShortCut = 24654
end
item
Command = ecColumnSelect
ShortCut = 24643
end
item
Command = ecLineSelect
ShortCut = 24652
end
item
Command = ecTab
ShortCut = 9
end
item
Command = ecShiftTab
ShortCut = 8201
end
item
Command = ecMatchBracket
ShortCut = 24642
end
item
Command = ecColSelUp
ShortCut = 40998
end
item
Command = ecColSelDown
ShortCut = 41000
end
item
Command = ecColSelLeft
ShortCut = 40997
end
item
Command = ecColSelRight
ShortCut = 40999
end
item
Command = ecColSelPageDown
ShortCut = 40994
end
item
Command = ecColSelPageBottom
ShortCut = 57378
end
item
Command = ecColSelPageUp
ShortCut = 40993
end
item
Command = ecColSelPageTop
ShortCut = 57377
end
item
Command = ecColSelLineStart
ShortCut = 40996
end
item
Command = ecColSelLineEnd
ShortCut = 40995
end
item
Command = ecColSelEditorTop
ShortCut = 57380
end
item
Command = ecColSelEditorBottom
ShortCut = 57379
end>
MouseActions = <>
MouseTextActions = <>
MouseSelActions = <>
Options = [eoAutoIndent, eoBracketHighlight, eoGroupUndo, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoDoubleClickSelectsLine]
MouseOptions = [emDoubleClickSelectsLine]
VisibleSpecialChars = [vscSpace, vscTabAtLast]
SelectedColor.BackPriority = 50
SelectedColor.ForePriority = 50
SelectedColor.FramePriority = 50
SelectedColor.BoldPriority = 50
SelectedColor.ItalicPriority = 50
SelectedColor.UnderlinePriority = 50
SelectedColor.StrikeOutPriority = 50
BracketHighlightStyle = sbhsBoth
BracketMatchColor.Background = clNone
BracketMatchColor.Foreground = clNone
BracketMatchColor.Style = [fsBold]
FoldedCodeColor.Background = clNone
FoldedCodeColor.Foreground = clGray
FoldedCodeColor.FrameColor = clGray
MouseLinkColor.Background = clNone
MouseLinkColor.Foreground = clBlue
LineHighlightColor.Background = clNone
LineHighlightColor.Foreground = clNone
OnChange = RoutineSyneditChange
inline SynLeftGutterPartList1: TSynGutterPartList
object SynGutterMarks1: TSynGutterMarks
Width = 24
MouseActions = <>
end
object SynGutterLineNumber1: TSynGutterLineNumber
Width = 17
MouseActions = <>
MarkupInfo.Background = clBtnFace
MarkupInfo.Foreground = clNone
DigitCount = 2
ShowOnlyLineNumbersMultiplesOf = 1
ZeroStart = False
LeadingZeros = False
end
object SynGutterChanges1: TSynGutterChanges
Width = 4
MouseActions = <>
ModifiedColor = 59900
SavedColor = clGreen
end
object SynGutterSeparator1: TSynGutterSeparator
Width = 2
MouseActions = <>
MarkupInfo.Background = clWhite
MarkupInfo.Foreground = clGray
end
object SynGutterCodeFolding1: TSynGutterCodeFolding
MouseActions = <>
MarkupInfo.Background = clNone
MarkupInfo.Foreground = clGray
MouseActionsExpanded = <>
MouseActionsCollapsed = <>
end
end
end
object Label18: TLabel
Left = 8
Height = 17
Top = 16
Width = 42
Caption = 'Routine'
ParentColor = False
ParentFont = False
end
object RoutineNumberSpinner: TSpinEdit
Left = 64
Height = 27
Top = 8
Width = 176
MaxValue = 15
OnChange = RoutineNumberSpinnerChange
ParentFont = False
TabOrder = 1
Value = 1
end
object Label19: TLabel
Left = 8
Height = 68
Top = 40
Width = 531
Caption = 'Routines are an advanced feature of hUGETracker, and you likely won''t need them at all'#13#10'if you are only interested in composing music. If you want to create a custom effect, or interface'#13#10'with game code that you''re writing a soundtrack for, then routines will come in handy.'#13#10#13#10'Refer to the user manual for more information!'
ParentColor = False
ParentFont = False
end
end
end
end
object ScopesPanel: TPanel
Left = 0
Height = 64
Top = 29
Width = 1416
Align = alTop
BevelOuter = bvNone
ClientHeight = 64
ClientWidth = 1416
ParentFont = False
TabOrder = 3
object LEDMeter1: TLEDMeter
AnchorSideRight.Control = Duty1Visualizer
Left = 0
Height = 32
Top = 32
Width = 628
Anchors = [akTop, akLeft, akRight]
BevelStyle = bvLowered
Colors.Border = 2168839
Colors.Section1 = 5269552
Colors.Section2 = 7127174
Colors.Section3 = 13629664
FallbackDelay = 0
LEDContrast = 9
Max = 50
Min = 0
NumDigits = 32
PeakHoldTime = 0
Position = 0
SingleLED = False
Section2Value = 3
Section3Value = 48
end
object LEDMeter2: TLEDMeter
AnchorSideRight.Control = Duty1Visualizer
Left = 0
Height = 32
Top = 0
Width = 628
Anchors = [akTop, akLeft, akRight]
BevelStyle = bvLowered
Colors.Border = 2168839
Colors.Section1 = 5269552
Colors.Section2 = 7127174
Colors.Section3 = 13629664
FallbackDelay = 0
LEDContrast = 9
Max = 50
Min = 0
NumDigits = 32
PeakHoldTime = 0
Position = 0
SingleLED = False
Section2Value = 3
Section3Value = 48
end
object Duty1Visualizer: TPaintBox
Left = 628
Height = 64
Top = 0
Width = 197
Align = alRight
ParentFont = False
OnClick = Duty1VisualizerClick
OnPaint = Duty1VisualizerPaint
end
object Duty2Visualizer: TPaintBox
Left = 825
Height = 64
Top = 0
Width = 197
Align = alRight
ParentFont = False
OnClick = Duty1VisualizerClick
OnPaint = Duty2VisualizerPaint
end
object WaveVisualizer: TPaintBox
Left = 1022
Height = 64
Top = 0
Width = 197
Align = alRight
ParentFont = False
OnClick = Duty1VisualizerClick
OnPaint = WaveVisualizerPaint
end
object NoiseVisualizer: TPaintBox
Left = 1219
Height = 64
Top = 0
Width = 197
Align = alRight
ParentFont = False
OnClick = Duty1VisualizerClick
OnPaint = NoiseVisualizerPaint
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 21
Top = 777
Width = 1416
AutoHint = True
Panels = <
item
Width = 467
end
item
Width = 200
end
item
Width = 200
end>
ParentFont = False
ParentShowHint = False
SimplePanel = False
ShowHint = True
end
object ToolBar1: TToolBar
Left = 0
Height = 29
Top = 0
Width = 1416
AutoSize = True
Caption = 'ToolBar1'
EdgeBorders = [ebBottom]
Images = ImageList1
List = True
ParentFont = False
ShowCaptions = True
TabOrder = 5
object ToolButton1: TToolButton
Left = 1
Top = 0
Action = FileSaveAs1
AutoSize = True
ParentShowHint = False
end
object PanicToolButton: TToolButton
Left = 528
Hint = 'Stops all sound output'
Top = 0
AutoSize = True
Caption = 'Panic'
ImageIndex = 72
OnClick = PanicToolButtonClick
ParentShowHint = False
ShowHint = True
end
object ToolButton2: TToolButton
Left = 120
Top = 0
Action = PlayCursorAction
end
object ToolButton4: TToolButton
Left = 149
Top = 0
Action = StopAction
end
object ExportGBButton: TToolButton
Left = 246
Hint = 'Export the song as a standalone ROM'
Top = 0
AutoSize = True
Caption = 'Export GB'
ImageIndex = 81
OnClick = ExportGBButtonClick
end
object ToolButton8: TToolButton
Left = 86
Height = 22
Top = 0
Caption = 'ToolButton8'
Style = tbsDivider
end
object ToolButton6: TToolButton
Left = 207
Height = 22
Top = 0
Caption = 'ToolButton6'
Style = tbsDivider
end
object ToolButton7: TToolButton
Left = 1072
Height = 22
Top = 0
Caption = 'ToolButton7'
Style = tbsSeparator
end
object OctaveSpinEdit: TSpinEdit
Left = 638
Height = 27
Hint = 'The octave offset for entering new notes'
Top = 0
Width = 65
MaxValue = 5
OnChange = OctaveSpinEditChange
ParentFont = False
TabOrder = 0
end
object ToolButton9: TToolButton
Left = 587
Height = 22
Top = 0
Caption = 'ToolButton9'
Style = tbsSeparator
end
object Label22: TLabel
Left = 595
Height = 22
Top = 0
Width = 43
AutoSize = False
Caption = 'Octave '
Layout = tlCenter
ParentColor = False
ParentFont = False
end
object Label23: TLabel
Left = 703
Height = 22
Top = 0
Width = 70
AutoSize = False
Caption = ' Instrument '
Layout = tlCenter
ParentColor = False
ParentFont = False
end
object InstrumentComboBox: TComboBox
Left = 773
Height = 25
Hint = 'The selected instrument for new notes'
Top = 0
Width = 214
DropDownCount = 999
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'(no instrument)'
)
ParentFont = False
Style = csDropDownList
TabOrder = 1
Text = '(no instrument)'
OnChange = InstrumentComboBoxChange
OnCloseUp = InstrumentComboBoxCloseUp
end
object Label24: TLabel
Left = 987
Height = 22
Top = 0
Width = 35
AutoSize = False
Caption = ' Step '
Layout = tlCenter
ParentColor = False
ParentFont = False
end
object StepSpinEdit: TSpinEdit
Left = 1022
Height = 27
Hint = 'How many rows to step down after entering a new note'
Top = 0
Width = 50
MaxValue = 63
OnChange = StepSpinEditChange
ParentFont = False
TabOrder = 2
end
object ToolButton3: TToolButton
Left = 91
Top = 0
Action = PlayStartAction
end
object ExportGBSButton: TToolButton
Left = 331
Hint = 'Export the song as a GBS soundtrack'
Top = 0
Caption = 'Export GBS'
ImageIndex = 80
OnClick = ExportGBSButtonClick
end
object ToolButton5: TToolButton
Left = 523
Height = 22
Top = 0
Caption = 'ToolButton5'
Style = tbsDivider
end
object ToolButton10: TToolButton
Left = 423
Hint = 'Export the song as WAV or MP3'
Top = 0
Caption = 'Render Song'
ImageIndex = 77
OnClick = ToolButton10Click
end
object ToolButton11: TToolButton
Left = 241
Height = 22
Top = 0
Caption = 'ToolButton11'
Style = tbsDivider
end
object LoopSongToolButton: TToolButton
Left = 212
Top = 0
ImageIndex = 87
OnClick = LoopSongToolButtonClick
Style = tbsCheck
end
object ToolButton12: TToolButton
Left = 178
Top = 0
Action = SingleStepAction
end
end
object MainMenu1: TMainMenu
Images = ImageList1
Left = 40
Top = 32
object MenuItem1: TMenuItem
Caption = 'File'
object MenuItem33: TMenuItem
Caption = 'New'
Hint = 'Create a new song'
OnClick = MenuItem33Click
end
object MenuItem12: TMenuItem
Caption = '&Open ...'
Hint = 'Open'
ImageIndex = 42
ShortCut = 16463
OnClick = MenuItem12Click
end
object MenuItem42: TMenuItem
Action = FileSave1
Hint = 'Save'
end
object MenuItem13: TMenuItem
Action = FileSaveAs1
end
object RevertMenuItem: TMenuItem
Caption = 'Revert to last saved'
Enabled = False
OnClick = RevertMenuItemClick
end
object MenuItem4: TMenuItem
Caption = '-'
end
object MenuItem34: TMenuItem
Caption = 'Import GBT Player MOD ...'
ImageIndex = 78
OnClick = MenuItem34Click
end
object MenuItem41: TMenuItem
Caption = 'Import DefleMask DMF ...'
ImageIndex = 79
OnClick = MenuItem41Click
end
object MenuItem55: TMenuItem
Caption = 'Import TrackerBoy TBM ...'
ImageIndex = 86
OnClick = MenuItem55Click
end
object MenuItem60: TMenuItem
Caption = 'Import Furnace FUR ...'
ImageIndex = 93
OnClick = MenuItem60Click
end
object MenuItem35: TMenuItem
Caption = '-'
end
object MenuItem54: TMenuItem
Caption = 'Export GB ROM ...'
Hint = 'Export the song as a standalone ROM'
ImageIndex = 81
OnClick = ExportGBButtonClick
end
object MenuItem44: TMenuItem
Caption = 'Export GBS soundtrack ...'
Hint = 'Export the song as a GBS soundtrack'
ImageIndex = 80
OnClick = ExportGBSButtonClick
end
object MenuItem10: TMenuItem
Caption = 'Export VGM ...'
Hint = 'Export the song as a VGM, useful for creating sound effects'
ImageIndex = 84
OnClick = MenuItem10Click
end
object MenuItem40: TMenuItem
Caption = '-'
end
object ExportAsmMenuItem: TMenuItem
Caption = 'Export RGBDS .asm ...'
Hint = 'Export an ASM source file suitable for a RGBDS-based project'
ImageIndex = 83
OnClick = ExportAsmMenuItemClick
end
object ExportCMenuItem: TMenuItem
Caption = 'Export GBDK .c ...'
Hint = 'Export a C source file suitable for a GBDK-based project'
ImageIndex = 82
OnClick = ExportCMenuItemClick
end
object MenuItem43: TMenuItem
Caption = '-'
end
object MenuItem14: TMenuItem
Caption = 'E&xit'
Hint = 'Exit'
OnClick = MenuItem14Click
end
end
object MenuItem2: TMenuItem
Caption = 'Edit'
object MenuItem11: TMenuItem
Caption = '&Undo'
Hint = 'Undo'
ImageIndex = 66
ShortCut = 16474
OnClick = MenuItem11Click
end
object MenuItem8: TMenuItem
Caption = 'Redo'
ImageIndex = 56
ShortCut = 16473
OnClick = MenuItem8Click
end
object N2: TMenuItem
Caption = '-'
end
object MenuItem6: TMenuItem
Action = CopyAction
end
object MenuItem7: TMenuItem
Action = CutAction
end
object MenuItem9: TMenuItem
Action = PasteAction
end
object MenuItem25: TMenuItem
Caption = '-'
end
object MenuItem26: TMenuItem
Caption = 'Find/Replace'
ShortCut = 16454
OnClick = MenuItem26Click
end
object OptionsMenuItem: TMenuItem
Caption = 'Options ...'
OnClick = OptionsMenuItemClick
end
end
object MenuItem3: TMenuItem
Caption = 'Help'
object MenuItem15: TMenuItem
Caption = 'Open manual ...'
ImageIndex = 19
OnClick = MenuItem15Click
end
object N3: TMenuItem
Caption = '-'
end
object SampleSongsMenuItem: TMenuItem
Caption = 'Example Songs'
end
object MenuItem5: TMenuItem
Caption = 'About hUGETracker'
ImageIndex = 27
OnClick = MenuItem5Click
end
end
object MenuItem16: TMenuItem
Caption = 'Tools'
Visible = False
object MenuItem24: TMenuItem
Caption = 'Find unused elements of song'
end
object MenuItem23: TMenuItem
Caption = 'Find problems in song'
end
end
object DebugButton: TMenuItem
Caption = 'Debug button'
OnClick = DebugButtonClick
object MenuItem59: TMenuItem
Caption = 'MenuItem59'
OnClick = MenuItem59Click
end
end
end
object MenuBarActionList: TActionList
Images = ImageList1
Left = 104
Top = 72
object FileOpen1: TFileOpen
Category = 'File'
Caption = '&Open ...'
Dialog.Filter = 'hUGETracker Modules|*.uge'
Hint = 'Open'
ImageIndex = 42
ShortCut = 16463
OnAccept = FileOpen1Accept
end
object FileSaveAs1: TFileSaveAs
Category = 'File'
Caption = 'Save As ...'
Dialog.DefaultExt = '.uge'
Dialog.Filter = 'hUGETracker Modules|*.uge'
Hint = 'Save As'
ImageIndex = 59
ShortCut = 24659
BeforeExecute = FileSaveAs1BeforeExecute
OnAccept = FileSaveAs1Accept
end
object FileExit1: TFileExit
Category = 'File'
Caption = 'E&xit'
Hint = 'Exit'
end
object HelpLookupManual: TAction
Category = 'Help'
Caption = 'Look up in &Manual ...'
ImageIndex = 19
OnExecute = HelpLookupManualExecute
ShortCut = 32845
end
object CopyAction: TAction
Category = 'Edit'
Caption = '&Copy'
Hint = 'Copy'
ImageIndex = 9
OnExecute = CopyActionExecute
ShortCut = 16451
end
object PasteAction: TAction
Category = 'Edit'
Caption = '&Paste'
Hint = 'Paste'
ImageIndex = 47
OnExecute = PasteActionExecute
ShortCut = 16470
end
object CutAction: TAction
Category = 'Edit'
Caption = 'Cu&t'
ImageIndex = 10
OnExecute = CutActionExecute
ShortCut = 16472
end
object EditCopy1: TEditCopy
Category = 'Edit'
Caption = '&Copy'
Hint = 'Copy'
ImageIndex = 9
ShortCut = 16451
end
object EditPaste1: TEditPaste
Category = 'Edit'
Caption = '&Paste'
Hint = 'Paste'
ImageIndex = 47
ShortCut = 16470
end
object EditUndo1: TEditUndo
Category = 'Edit'
Caption = '&Undo'
DisableIfNoHandler = False
Hint = 'Undo'
ImageIndex = 66
ShortCut = 16474
end
object EditDelete1: TEditDelete
Category = 'Edit'
Caption = '&Delete'
DisableIfNoHandler = False
Hint = 'Delete'
ImageIndex = 13
ShortCut = 46
end
object EditSelectAll1: TEditSelectAll
Category = 'Edit'
Caption = 'Select &All'
DisableIfNoHandler = False
Hint = 'Select All'
ImageIndex = 39
ShortCut = 16449
end
object EditCut1: TEditCut
Category = 'Edit'
Caption = 'Cu&t'
DisableIfNoHandler = False
Hint = 'Cut'
ShortCut = 16472
end
object FileSave1: TAction
Category = 'File'
Caption = 'Save'
ImageIndex = 85
OnExecute = FileSave1Execute
ShortCut = 16467
end
end
object ImageList1: TImageList
Left = 152
Top = 32
Bitmap = {
4C7A5E0000001000000010000000352C00000000000078DAED5D077C1445DB9F
24A07E8AA28288D81004C140E852420902A1BC74A91A44AAC24B15115190C517
0845012194D0417A11423334A982C08191262D24A10542A8064248E0F9E699DC
1EBB7B5B66778F2484DBFCFE99DB99F9CF33BDED1442B2CC030A9836933E127B
6AFA32F36DDBB6B9F852B794DC87E6A0C957CAD1FACD2B5FCD5D65F83C295FCB
0D999E8E7CBEF823A6FCEF1E7E75BE322F68845955BE20083248ED29CD24F288
8EDB3CC8EE8F9DB082C13B2F1F4CF2C1CBF7F20D7E6B3E92BA43E6A6539F9874
03CC72B350FB0DA6B862FD2E5139DDB05BF7BAC9E552A5F94AC5CCC80D65FF84
A8B48FA6E5AB84D3B47C491B9F29E1D769AFB9E573A87AF24DA7BFB7FD376AEF
79C3AC8C5B237D4FCAD7EC1F72A69B66FF5643DF6E1D26E36AC936E8033F4A3E
98E1DB31E7885FBBE9438CE28887FF04F6FF1FE7FACB6A7A6996510BFD99CCE6
3F69E17FD2C7EB59B5DC65547A6475B9DEF067CFF07B1FBDF9109C0391C00E9F
C79E55F97A7C3D732333337E7C5CF93C6EF09A1BA5A199BC6635EFD9CDB34F42
59B6C3B7235FAA2AE75D25DF7FB8DD12B91ADF1FB9F9BC50F337EF4354E6A75D
DFB4A8B991AAC5E7E13235BBCA3703E3EFDBDE3E8867FA6D2483E2CF2BDF2B3F
33E567D7B2CBC5D7596362990F26BE3FAAAD7B31D17F546DA705157D0D3754E7
D7B5F8A2CA2B5F1A2E8DB070CB57BA6F463E517C4F100CCA9709F99A7D334EF9
BA7C3BF23D3516C9A432ADF7FE38F041E5B7153F8007EA454FA583D97192AD71
9A95F19ED2BE6C8CC45166F4C67999C1373B667D4CE70B3CB206C7CCA3C6E71D
7F69F1EDCA978ED1F5DEBDF21F2FF96A9D353D3E4F87310B8D01ECCE3918F653
04937CB3F508CECD80738EC6A8FFAD2647CC1BB4F675C21C3F7D3D783A573A7E
50FA4BCD9F5AF21FDA11DC20BA6156BE68C78C7C2DAE52BE325C465C837D090A
39F2709B956F14FF5A798AD35C734CC829FF5194C9C77D1EC06A1FDFCC3A3F9E
7837C3350A8BF935D1F6D3DA535C3B7EF744DCF1BAC19BFE56D2DEC88D8C1EAF
65D73944A339544FC5B5A9B9964739072368AF55CBB0F07BE53FB9F25DFEE0F8
D6ACC70571CE848DB3493A78BE833F1C93D1DF4EFB22DFC00DD798CED58F4DE7
3837E9BADCD00A8BD4DF44C295AA7A7E70F10577C8DC31E02BFDFBD0DF32BEEA
B76717570A412E5B117ED9DCA46BBF19C71E1C9DB6D8D49E1B55F7F8F7DC687F
87D1D90B65181E29D7C2377C1BDC8771628D4B88CDF1425050906004BD322C8E
69B41E342F58B0E0365E7E6C6CAC0B225FCF0D1EF97AFE10CDA3A2A2984C5115
7F23FAF4E9C3CA11AAE9D5363F5F54C5B069F1C5F08AAA9A9E1EDFAE7CAFFFED
F95F9A6FD5A0C55FB56A9521571A1E25DFF96E06418FC977047E6E76DA43ACFC
0E6E720FABE07453A99A912F1BE798902FE5A9BD3F6AF99E0ABF9DF87F42F710
DBFD6E6E870F1AE72678AAFCF37EEB071D3D5EBF6BE9999DF7CA287E863E76E7
5D04833D085AAAA7E67F040FAD617FA4716CEF0C12BDBC6485ABF413979FB5E6
5254C222F916A5ACA5D5BFF76A8DFDD4C69EE6F8EAAD050F5F0CBFE47C2CD5F3
C2D4C22F0DA7DA7E0283FA94EFDC309D7AC66D7D9C76FE33BD7E84A35E33CB27
1EE01393ED7F967D38F6AB00CFFC9F41FC811DBEDEF75A13F255DD30B5FFC602
DF8E7CB1EC88F32782C6FE153DAEB3B72B3B278FE8EC7D52C6BBC815F9CAB430
E24B61962F0D3BFAC38CFF0DE20F6CA49FCC0DA9FB46D0E96B5A3D3B26EBD62B
76FA4898CE36CE4EB3D3C773C91661D20F8262FDAB193F88B2DDC261624FA3D5
BEAE52B6593F68C991C6A759D96EE9A1B67F52279CC2E3B7F63EA3C6F966C6E4
A6C7941A635F33FD22CBE7276A8C234CCF6348DDE12E7F4E8E417F977BFC64C6
0F2AB2ADCE2368C6A7DE77589B735EDC6343A51F74C26D769E843B5F69A4AF95
F3899EA43A2733D7C33D167D264FF8D34479F0783C2BFAE656FC60399F78E0EC
DE0C59A7F3B8F7D5B5FA5876FAC73C7D332DBB76E41B845FBD3DB4F64DC252FF
C3C43704B5BE8B5E5F8C8B6BC20D3BDFBDB8EB2BB5EF2C26E3393BB6BF1ED97F
E5DD3F665D3E0FC046DE93AC11B4D29883163C24DF6EF8BDFB47EDC9CF8A7D7B
EE394CDEB953AD7954A3BD5E447FEF97E4FE1AE3951FFA7CF73457FB0E9851F2
95C8EEF2EDA4BF8DFC6737FF3F2E6375FEFEA7EB8B9304BCFD4FB5F5EBFC6E68
D9B3C3371F06EB5CA3B820A6F976E65A32974F6C733D117F76E3E0C9983FE03E
375650FFAEA63FF7AB18AFAB7C4F02BDB1BAA03667ACCD070FF0F5FC6AE47FE0
8D0F9D3968C3F830D97FD38D0B5EBF73F009B13E5FC2356FC3395764974F8867
E6A9BDE70C66916F0E56E6D22DCCDD7965DB93ED3DAB33E3C6F0C4EA1C866B7F
3158E34BB8AA733016B86E7338465CAD35B8E25A30B7F3C445AE40B4F666CBF8
4A3788645D2F0F9F48EEC555EEADE4E14BEFCA558645D0D93FABE4ABB9A17647
AF5928CF0F32357697F889A8DC0FCCB31E566D0E8057BEDA1A4833FEC886F55A
66EF9DF2CAF7CAF79EE19FFDD3CF1B7E6FF8BD0FDF9C9029BECE99EEDCF2856C
9846DEB8F5C6D59354870836F654EBDC91C1CDE7B99BE151F13331FF18B677DE
F4C9DAE99355EB5C1E73BD3A97C75CE0B85332ABD6C9DEF8F3C69FF7C9F4B907
A5EA99BD68C667616A9F1724DAD1E21A9C2BA1B4ABFACE295F57E50C3FD13F5F
5455BE89F344EDCC27789FCCAEC34D7E3FD1DABFC99B67D4CE7F90E651CDBB5F
C5B3E434CE8FD07343AAAF255FCDAEDA3B8F7C2D554FBE915CBDF01BC59DD40D
A3F01BA96A7C2BDFE03C3007E97DB246FB6D67FE18AC3CC4E0FE4B758EFC8E1E
B3F2EDF2F5FCAF76CFA812BCFC4721DF0CDFAC7CE2FD7E975165D1906FF50C30
1E3EEF19F256CEE0329317BDFCECCB7FECEA0EC97D85927EA0BC5F677426A7EB
EE0EE93D1E82EC044D1E37942A77F95570B4F68DA9A59F9B3DB7933F75CF7093
651CE51A35FDBE80ECEE0DA2166756CF11D4CB7746675ADADC3FEA956F939F4D
FA1F76FC0E46F16838EF65EF3C57D91DEFCAFBE8CDA4BD55BEA073061FAF7C2D
D98F9A6FE477DEF06BC9CE08FE1355F643F7A763A4A303C5504E7470F142F789
F8DFC85349F0D9F6CBD07E6B0208879360C6B9FB30EF22C8B03081869FDA75F1
86FF2962F88A9B00CBAE3F80B0B377A1D79F57A1D6940D30F6B78D324CDCBC09
5E1FB66A72F5A16349B5213F1232EC0F11A14BAEDD87F997D318965EBF0F3D57
1E80AB57CF4352523CC539B8752B0E76EC8880E021C323070D6A5E64E0C0A684
FCB043C4E88557D260EEC55406FCDD71F15E3875EA081C3FFE175CB9120DF1F1
C760FDFA052C0D29B71B451132642B71E2A75F2EA5C2CC73290CF8BBCDEC1D70
FAF43FCC8D1B372E3237E6CF9FE842FDFA450691C19B8813E3675D4881A93177
18F077AB195BE1CC9913CC8DA4A444971BE80F0C4BDFBEF57A90EF22891361D3
E392218CA601027F370FDF0C3131A7981BB76F5F97B9F1EFBFE7A0478FDABDC8
376B891353A69CB903E38FDF62C0DF4D2647425C5C34732339F9A6CC8D3B772E
C1E79F07F5215FAF224E4C9F703209C61CB9C180BF1B4E584FF931CC8DBB7793
646EDCBD7B0D3A76ACFA2569FD0321FD9623668D3D760B42A3AE32E0EF7AE356
C3D9B371CC8D7BF7EEC8DCB877EF16B46B57F12B96875B7C4F48EF45F3471FBE
013F1CB8C280BF83C7AC8473E7CE32375253EFCADCB8772F09DAB429FB3565FF
1FC5CBA46BF8EA9151D761C8BECB0CA1F477ED51CBE1FCF9F3CC8DB4B454991B
A9A9B7A14993128329F7258A774970F7A915C66FB9D52D32FADE0FFB1361F8C1
6B5073C462B870E102C57978F0E03E451ADCBF7F8FBA95427FA74060E0EB235D
E530A00E215DC29B92CE53C2DFF876C9B6E60B0EC43EDD62C0D922459E9DE8EF
9F6B74C992CF872A51B8F073DD65FCCE5308E93891904FC79626213F0E226D86
4DA2266F5314D0C04B8FEA9B2CE73737F56F01C67BB7B8CEF832CB979E216BE0
07C36FBD067E003DD932F7D4FD60B8B7D4C00FE081FE9DD207A00E337C35F7CC
A5BF0197A31DD5966B7C2786AE9FD5FC60C0D53E474D5BB6D5F8B75DEA1F87F4
E7E073A7A1552EE1CF7766E32FC3D2DFF01CEF2C5AFFEBAF7134A8FF8DCA3F67
FD6F285BAFFED72AFF195CFF7BBCBF2010FBF72909E6CF54F2887C6FFC79E3EF
498EBF0C1A3318C6BF9D39484FC8CFACF4F3946CABF937BBC49FDD30D89D03B7
5BFF64F16F00E6BF19E8DF452FE30ACEB359A56BD188722DAB68EEBEFE4BCED5
F3A3BA3DA5BB9A3094CFAB6AC897AA82FE5D3EC6F235E6B4D5DA3A2DF95A7CB7
35F53AF2059DFB84ADC857D907C42D5FE90FBDFC6B42BE61BD24648F7B88C431
2958E78215371E9EDF2C77838FAB3C1B9A5FBEAB0E13CF8D218235AEE0E51AB7
1DD6B80FF38776FD6C227FD9BAF73A3BAC2B04597C984D47713D91F619C05C79
C805A57B7A73F24ABBCEF5347A7767EAF1C573B304137D0B979F5D77673E74C7
0CFFE19D97E07283DB0F4E48F99C77A9BB9D93AF72EE1757FEB1728FAC922F8D
7F337957200283F29C2F23AEC84360423CEC473C845EFE51B1E7F28F54CDD2E5
DE0E1FEC9ED76CCB0D90FD593AEFD9961BA0FA67EADC745B6E785EBE840BC053
776B734DF155B84A98C97FDCF275E28A839FF51B76E0BA6F5397AFE3866AFC9B
4E3F9D3CCB251FF4F381B7FC6750F8EDD4BF76EAFFCCB96B207BCDE59BDF7B29
E3DAB9BB486F0D3C2FF711CBD6FCFECB235B3CF7551A8FBCE7E1AA70C1ECDDF3
8AEFCF56F6DCCADEF5E42BCF00D60ABBA67F156331957B7E88957384B5E65F79
C2AF93FFB3D3BE435BEBFF6DDE5D66B9FC67906CCD6F1826F7AC2A55B367AE5B
BB53C89A5CCDBBDB8CEA5395F31EB4E240353524F33E4423DC96F78DABF8C96C
FC65D7F2CF132EAE7562BA6D914159949E63AFDABEE8E4012957CB0D41650FBA
1657E986C2FF6E5C2DB734E24F56BF68F519ACEE5D2119BC6FCF42FDFDD8CB27
DE730732796EC3DEDDA9206F6374C7465EBE3ADFC6D93DDE32E47DECCF59585C
5BA1B6765B6C9F058E757202E77A7A2D7FF1F8552F5C82C97528BCE157E3EADA
B3705798F7C9D031BB27C6CE60876FB60F86F765719EE1A37D6797C0B5875C95
27052F5FE6670BF2957CCE3E8C314720DCE137F20B0F5F1976337C3BF16F14F7
56C36F856FA20FFA249F5F96D5CE6F7BD2EF9FF286FF31297FE3FC3A92F14E0C
19D2D2108306B524FEFE332BFBF89C59E9E3B33BC8C9FF82620C35EF6A84FEFD
5B0E6AF54EDF5DF8B9CBC72762FB38BF0ED40F1D7EBAB5F084B3667BA089ED97
AEC19A356B20393919AABDD4F20021B3837FF2FB8C508C4B9C73181E3C483FA3
410D5B2F5C8606EBFE808117936154C741D0FB99C6BF04FB7E4F7EF46B8FF839
61D6DFEC4C873B776EB86153DC39A8BF6607E3D69CB5022226FC0EC841EE68BF
4F116117A71D80BB77AFC3CD9BF132FC76E634D45DBD8D71AB4F5F0A91FF1C03
B48B1CE486FA8620A69C9BB28FCABA0C8989312EEC3BFD0F04AFFA9D71AB4D5B
0C2B1C7B991DB48B1CE40EF7FD18312D366C0FDC883E034949E75DF82E62239C
4802A8316309AC3FFA17D3433B681739C8FD9F6F5BC4CCD3E377C2E1D08D3260
1EADDB6118CCFD6EB14C1FED2207B9826F6BC49C133F6D8379AD46C1DC962355
816622E226FD09C841EEF7BE2D11F38F8EDA0C0BDAFE087FEED9033B77EC9001
F5D06CE780A5B038641C44FFBC0B9083DCEF7C3F422C3E3462032C69371EB66D
DA0493EA0F62F86DF56A06D44333E4AFEA3C054E8EDD0EC841EE00DFA6881547
466E82151DC2606344045311118B1733887AC88FEC311B8EFFB8159083DC377C
F2908F7C2AD5ECE5D360E3F47AC2F50DCB96414497A90CEB162D6210F590BFED
AB45706CF41640FBC8A5CF5B14011548E14E5D48ADDD3972E418AD063493A221
2937CBC9CD4DF12AD13EE3430BAF3AB959AD1DD7FB366474F6228FCA5367138D
6F557AE36653F285876319A36F6B6E7E54E1F2CF736461AE961D5EAEA0123782
89F81234F6199909B3A07E5E9BE9B81232319DADF67740E33BA9E13DC4F2755B
3277F4D686A8F105237940647C50ECD732922728D6848304447267767ADC839B
3C35FF8B7C41C257BBFF5A4DBED40D1EFF6BEC0590C5B7AE7C4234D7C4ABDD15
AE94A7B717C1254B234E34C26F4A3E0F5F2FFC7A7B41B4EE2AD7BA2B5C8B6F98
DFB5F60FF3AD65F23ED6C67299C1CF68D960D0FF78D47CE281BC0A1E8A37EFE3
F93910FEBE84DAFD3D3C6707AB7038EF8DE2BA3F48C70D6EAECAFCAD39AEDA7A
40B35CB53B4C8CEF29D35A0BA37B4F9915F95C61D288430B5C4FA43FB71B8679
D87AFEF744F9B3F50836CE261074BE950B9CDFC8ADFAC72E9F672C9805FA293C
E701EA9E7D697026AAFEFE56FDB53BDAF32C8AB18A8A1F8CFCEFE270AC1F92B9
A1D5A736B9A7D86A1F030CE6C1BCFD14FD3A8F10EBE71059ED477BF91EE0AB94
57B0910F2093F29F77FCFD983FCA365CABDE57EBBB085A6B0255DC101467B79A
EDAB98E96718F1EDCA171ED13A3FBD7586DEC703799DE3AE5D63AE73BF8974ED
95517E929CB3A3B5764BAF5FCAF892B96550CECB3BDD502D774EAED4CF828423
E56BF54D65762448CFEB12F774F85A6E887E0062CCD7724710F4F982011F0CEA
3EA2F21D8428BEAB70B4832E7B6AE71E49DF257BA1DCDC50D927A5BB175A750E
473256D1DAFFAC358760533EB1197ECBFD60ABE55E5606C4FE1A67B99796FDF4
DF4EFB66EB0EF17BADB2BCE8947B4944C9648A3CA3722FE36B9459A253EEA47C
CE72ABBE6F46ADCC0972D97AFB67D5EE4E27E6F7ED9A9A6B5475CFFC7C9DF6DC
AB957DC852AEF2EC3AE3B3ECEC701FC689352E211E5A6F9841ED3FD86CFF55EF
EFD46AFFD5E7AEE5E73FE8B5FF84689E46E82A5B7AED3F2F5FB3FDE7F43F4F3D
A23696D66DFF896AFB0F86EDBFE0BE2E81676E5290A499248CDC79F861DBAC1D
DF3C63789B7C62D5FF36E64CCCCE3D9AAE07CCF05C6B30C4FEAF400CDD51D601
5A655730A83F04C17C5D28F53351ACC979D8866ADCDD20E14AFD0E6EE7DCA8AE
6F723FF7873CECB3882DA06BFFBECB5DE276FE8DF29C522957E986A0902FD6D9
72BE9C0BD2F5551AFC87E92DB871F5E44BFB6C2059EFA3E40A9273BDA56920ED
6B49EB20E599430F93C6FDEE1C5081BCEE4B3F7F1A88B11B82A42E13147A466E
08FAE7B53BED8B67589BEA0F3C8AFAC54C5D63B86E89A39E31FA7EC4736794A9
3B9D2C84DBEC7D4BE0893ADB03ED40467C9F343AD387AB8D51FBCD1B2E1D3EF0
E4398E3651F79C258BFE074F865FE6FF1A61E9089A144EE1E040B88BC3305184
A3D7DC0BD021EC18F49A1E057F9DBE0AB1672FC2B67D27A15BD8BE747D6A8EF6
241C42AAFD2CC2D165EA69F8F0AB95B075FF71183D7A34040606C2D8D0509837
6705D34773B427E11012385684A3D3E49350B5D742888E8983F2E5CB43787838
74EDDA1576AD8F64FA688EF6241C422A8F11E1F86CE23F10D47739AC8AFC0342
870C814F3FFD14E64C9902AB576E66FA688EF6241C423E1829C21132EE30D419
F01BD4EF350BE6CD5E0E7F50B911BF6E82467DE7327D34477B120E21E5878970
B418BE07EAF65D041316ED808347A321EEEC39D8ED3802A1D3D642ED5EF301CD
D19E84434899A1221C0DFB2F87AD7B8FC192254BA05DBB76D0A85123E8D1A307
2C9C3D1B7A2CDF04AFCDDA063E5DE7C490EAA3880B01834538262EDC0E8B172F
864A952A41C99225A156AD5A2CFEFEDBF74BA8B96C234C3F7F15728C5A73D567
F5FE67280882F80F14E13878E434B469D3064A942801F9F3E7676A4848087C16
360342B63A60D9ED34A8B1FAC06D9F557F36F259B9872048B1FE221C18DE0F3F
FC9001B99B366D82B69F7C025517AC853167AF40CB962D61D0E98434DF15BB67
FA2CDB95838290227D453876EF3B0CED699A75ECD8113EA1BC8F3FFE18DA0E1B
0D4D36EE8541E76FB272F4C5F178281CE9F8D367F1B65A3E8BB61252A0392185
7A221CA161AB60D6D4A92CDD478C1801E1D3A6C187BF4440E743A721F8F03FD0
7FED3A088A3A0481FBFE4EF499BF79AACFBC8D3EAC0CBDD29090D73B39823E9B
06F3662E87D961613078E04068FF43289459FC1B7C782216CAD1F444F9A896A7
787EF9F63D3EB3D657A17ACF12DC8B93BB85A342E74550BDDD14F8FE8739B076
7104345BB41ECAD1F253FCD4652876F2320CBC7A9BA98837F69C48F0098F9841
B9B889A824C9F9C14292B3AE438656831348DF714932F4FF3991FC6F6A14099D
B18F8C9917865D221F1F1F11952926532C57C164A739B32B1D1849F8533EFFFC
F3788CBB3163C6C0F8F1E361ECD8B1306AD428E8D6AD5B3C9A6BF0578AC07A09
F36C404000E4CB978FA9F88EFA527B0A7E391A07079A366D0A83070F86DAB56B
C3B37987805F9E834CC577D44773B487F695FEA74F79AAAEF9F6DB6FA17AF5EA
F042F1E3F0BC7F0253F11DF5D1DC694F2BFCEB070C1800CD9A3583E241B3E0CD
BA97988AEFA88FE61AE18F14D1BF7F7F66BF54A952F0F6DB6F3315DF515F6A4F
C1AF48FD75B24E9D3AF0E597B4ACD6AC0975EBD6852E5DBA3015DF511FCDD11E
DA57097F25AAFEDEAB572F56FEB00CD1B4642ABEA33E9A3BED69857FFB7FFFFB
5FE6DFE6CD9B43FBF6ED998AEFA88FE61AE1DF2582E613C6C13AC8DFDF9FA9F8
8EFA527B0A7E20F55742E5CA95597D151C1CCCC28A7511AAF88EFA688EF6D0BE
4AF803A9BAAF53A74E2CBFB46AD50ADAB66DCB547C477D3477DAD3385A901CEA
D0A103346CD890C57B8B162D988AEFA88FE66A930CCE3A203FC52E2A2B19EBB9
C68D1B337FA38AEFA88FE614AF513CA7E0E7A5284DF1058583E2920A1C4EF332
14F934D22FDB94FF7AF5EA41EFDEBD996AA5FCF7ECD993953954AD947FCC3798
E751F596FF8C2FFF6FF7791B5E99FB0A53AD947FFF487FF0DFE5CF542BE5BFC6
B81A50FF687DA67ACBBFB7FC6774F9CFDDAD1FF8CD59C5542BE5DFEFB7DD4076
1D65AA95F2FF16EDF3E738729EA9DEF63F6B97FFCC0459F28090A5C0E03B2286
E4E8B0F5E51C1DB78D1141820487145233B42BE523FC5A2FFB2278ECB13D2337
5D0344ED014B5D08EAB710447DB48376293F9CC2E1C2F7471C4BA301440CA0FF
44740D7780D42C47FB8D3F93F9298E6609000D2FA4837C1BE59819751726FDF9
2F43CB919B5C6824AC71E9CF3E94027EEDD6877D5EC167E9F46FDB0022E804E5
F7DFEF98B2EF5F18B7E31AFCBCEB06E3B508DD08B0BF16A4EE0C84DB1BCAC08D
95EFC1E4BDB7C0EF93D5E15D2BF9CE3BB8620C2C08ED02814728BFF71F8EB1DB
136178E44518B5398185FBC3FE8BE1F6EDF3328CDA7C11FCDAFE3AB34B35BFA9
47378543C4B46FA0C241CAEFF6BB63C4868B3078552C0C5D7B8EBA130FBDE71D
82C4C453B071E31238706033FBFDED8A13E0D76AC9BC4E35738C3BB0712A4C5D
B5004AFD49F91D231D8357C5D0F83A050397475377E2A043D86E387BF66F197A
CC3E00BE1FCD5F44BEDCE328BB1FA0F88E749076AB1D03969E84BEF38FC1578B
4E3077BACD38086D7FFC1D3EFE69AB0BFD161E05DF26D357D1B2B88C84474399
E0760C791A8E8AFE7AC909CA3D0EDF2C3BC5F0ED8A333068652C740EFD15AAD5
6ACBD06D4C04F8D419B533478E1C630879F92AD6CF08FCEDE7E7D79B62324538
C5745F5FDF59140395F6A8ECA5549F16A797FF423D9CAFC0DF3E3E4F11D41791
5EE7E554B1C7EA9DB76871EE4ADFFF4E07FE2645D5E166CFF6F91FB6CBF0A696
6A008A3C4AFDA052F9DC2727B5F9C3F0F78388FF90FBCBEAB8F0FBD0F2E4AB26
05499F066F906EB55FD5E3DFA768ACE4232ECDAC4162C22A9143A101CC7D15C0
85B08013544D7AF06BBD0A7AFC7B934AA9015267567CE1FC8882BBE9EFCB7743
DF29902C1420889BE34BCAF8C983F2A901EEFEEF4D42794F9FFD36EF5EFA3E4F
34BB39D65FC64F1C51985C1F5584A47CF78A14C054EA0655DFBDF6DD2B374533
E44AF9B161E5487C7845722BBC028171C5440053A7942130C13F17FD9D84EFFF
4E2AA7C9BF362B90FC3B3B90C0FC6A088005D5092CFE30FDF7F4F20513C69726
17A75723F133AA875384A8F1991B73AB93B4C5B58082A9B7E7D5287874741982
3831B63CCA7520CE4CAC1822F2CF4FA91044DDD847914601A8264CAF4CDDAB4A
A286970CA7F61C52C08529802A350BD93FF45D42117F69511DB8B7A31D5C8D68
0CF4FD14EAEF1C5818E1807313008E7607F8BBDD431CEF076856F28D9CE4D72F
72DF8A9B560962A65684F57D5F85614D9EEF81FA016F3C4D4635CD13BEAE7B7E
8714F0472540F5B71EAF85D02250F08B40DFD0E9AD7D6F4D6BED7BA14345DFE1
54AF9CB39D2EEC9CDFCB31BCD18BE4D74E79C8A290E71D88259FBE1042DDC022
F4A246F9C67EC2CBCEBE0556526466F3A7C88C664F85538450378893CF1EEC67
9A81B40CE3FBC50BE7E1D2A5784848C033ACAEC0D5AB8910137306AE5FBF0671
71B170E3C60DB879F306ADFBE3982A75037F47FD751066D0BE52788D1A0CC78E
1D0587633FFCF3CF3FB4CD3900D36B06A583F6894E9C38E1C63F7CF8104C0B0A
A2F68FC1AC06F5A99DE394EF8053A74EC2C183944FFBB0270E1F86BFFEFA0BA2
A3A3DDF8274F9EA0EED7A466A7E1CC9933101B1B0333A8AC05B4EF857E9845FB
800C0D1AC0F9F3E7DDF8681FCDCF9D3B07F3697FF7E2C58B70FAF469B87CF932
732F212101764E9A0433A83FAE5CB9E2C6C7F859F4D147F04BFDFA0C77EFDE65
9C7BF7EE31FB0BFEF39F7450B7535353DDF867CF9E850B340D50EEA54B971837
26268671636363699A24D234B94AD3228EA94A3EDA4533F4FF850B17983BA74E
9D626E89E14060DCA1AAE4A3DD438762982C740771E4C811E6DEB163C7589CA1
1F0FD334403325FFE0C153F0E9A7E97EFEE69B046607E37DF3E633B077EF1126
17D37DFFFEFD70F4E851D62F96F2972FBF0B65CBDE8779F352E9782D0DB66C49
836BD7AED13EFC159839339AF92B2A2A8AFAF16F98316306EB934BF955AA24D3
B1660A0406A650BF25D331C74D68D70ED3290E6AD4888221437E636912191909
03070E74CBFF1B362450FE1DEADF6B94F32FECD993C8C2DBBD7B2C4C9B768085
65C3860D6C3CAB6C03919F907087FA3D99A5ED962D2970FFFE7DE6FFC4C43B34
FF44C3ECD9B3D91854EB239F5E596DD2A4091B3FF27E638D8F8FA7E1D8CCBE05
2D5BB60C76EEDC49CBF175433EAED3C071FFFCF9F361FBF6ED2CAD962E5D4AC3
3F0D860F1FCE8079428D8BF3041111112CFCE283BF31EF21307FEDDBB70F860E
1D0A73E6CC91B9F1F7DF7F337F8A1C04C65F4A4A0A4DEF43346F1D647508CAC6
7C3864C8105A07DD74B98172B1AEC0077952F9C8C13A0381764E9E3C09616161
2C3D45FEA2458B58DE14F96969692E3EE677CCAFE87FB4837501E6BFDDBB77BB
F80B162C606164A71F3E78E0928F651FCBCED6AD5BE1975F7E61407FCC9D3B17
76ECD821938FE56CE2C48990274F1EF6ED0BC3876EA16C1C47E3D8F7FDF7DF67
F91EE561DA887CCC971887AB57AF66730E050A14A0656626F303EA631E2A57AE
1C142D5A94CDA1E077552C4F221FCB26A6B31866311E10589ED1AF688EC03218
1A1ACAC2264DC39F7FFE99F130EEC4F8C374C27907B12EC0B8C774C4F92465FE
C138C5B896FA01F3E2A04183981F30EF601C4F9F3E9D9561253F2929897D7316
9F3B77EE30ECDDBB97AD3F42D91867388FA497FFA74E9DCAF85857AC5DBB1626
4C98C0E210F351BF7EFD64F1A6E506C6CF9E3D7B589A62DA63D8BEF9E61B967F
78CA2FFA7BFDFAF53079F2649832658A2CAFD85C3FACBA769AF7FE38C51D6C6E
7C2CD74650DB5FC1CB95BA2175C7AC7C2DBEC57890DC57B79E0B6A7C97395BCB
2EF9ED3A234D6EAECA97DA93BE2B55337C15D9867C1DB95CFEB7CAD78A3F0EFF
DB4D3F1BF9C76AF9056FF9CF62E5FF387041B5FC2BEDA199F4B708891B9A7C29
57FA6E87AFD0E3E26BA98F9AAF157F3AFEB79B7E995CFE3DF688FD262D60BF08
FBA57A7C710D981AF0DBA29E1B22FFE6F51B6E90BA81678863FFD40A5FEA8655
3E02ED9AE12BDDCA4E7CB5BC6296AF8C5B2B7CBBF2A57CBD7CCCE37F1EE8C55F
669C21E02DFFDEF26F866F054A3E8E8FF11D55B572249A49EB05295F6A4F6A5F
AD1C6BF195E5562A4FA9F6EAD9CB50BED2FF6AF58B557868FC0FAE8DCFF479FA
E9A7DDEE9F7DF6D967E1D5575FD5BCC308CDC5E799679E71E3E7CA954BF70E24
34CF9B37AFEA3DB5A27BE2933B776E264FC473CF3DC7CCA57E20EEF7DCBADED1
BE9AFFD1CE8B2FBE28D3C73938251FFD83F65E78E105373E51DCFD9423470E55
7D2DF908E4E08332A469A4178768A6B4AB96CEA82F8D3B1144E35C507C305D94
F2B5386A7C657A58E1EBC597115F4C6F69DA9AE1637910D3429CCF34CB17F50C
F8448DAF559E54CAAF2D98BDFF07817691835C33F7FFA40300ED2207B9BCF7FF
88403B681739C8E5B9FF470AB4837679EFFF5102EDF0DEFFA30633F7FFA8C1CC
FD3F5AF0DEFF93FDEEFF01938FF2F09382F99F3105D10D911B7537165A7D519E
41F91BD167DB4899BEE886979F75F8527B46BFBD7CF73260A5FCD82DBF59610D
70FC8CEAB92ECF0AEA47B191C26100B4D30F3922FFC2B4AAFDAEAF6B179D766C
540A9C1A077A483B3632E5FADA9068E488FCD8499536A61E1E9E92B8AEF3BF5B
BF7AC5A107B4732FEA7F29C811F927C69673A41E1A015BBECCEBF8BDDF2BE528
8806CAA19D94833F0072443EAE454BDE3F0436F5C9E3A0205BBE94F3B6F57F83
6CFD2A3F4133B473FB8F816CFD9AC8DF37A498E3DAF60110D9F3650705415039
54CD4736F47A83EC185088C169E648D8D01B9023F2A999E3FCFA5EB0AEFB8B0E
0AB2E68B3C24A22B229DBFFDEB77EA51846FEC939FA09D33CB3B0372443EB5E3
888BE808115D733B567F9EA71CF25676CECBF8913D5FAF87E68875DD5F2568E7
E4C2D680EF229FDADB787E4DBB94A81F8BFD4B7F3B567579251CF954AD87EFD7
F67C0DA822D04ECCD2A629C811F94BDBBFD86FD7B080E8CB6B1AA55C5B1B04F4
DD4181FA8EDB7BBBC1D5882A9018511912575582F85F3F4CD929148D468EC85F
14F27CAE5FDA3CD78F622385637EDB5CE10B3ECE45A85A0FDF53FFA80BA83A81
76FA2147BAFEBF997F4E178AE7F3637AA87E5D3D67BD99CD9F7220A476A4658F
3EB81038A773ADDE4BCEB619DBF62214FECDDFF7EDD4AF8AEF42FABB2C4531E7
7A7F3F05DFCFE9C6FF51E472B6EDD8C1C8E7DC5B20AE09CC2BAE09CC2A7B002E
CDAC4E2ECFAA114EE1E04038DA97F2CF8707221CB4630B0F681997E1E45817E0
CC04407B685FCA8F9EF001C291766C34DCDDF39D26520F8702DA43FB52FED1D1
A5118EBBB45CDFDAD0D385AB6BBF80F8151DE0EC927610BBE813B8B2B90FA03D
B42FE53B86164738EEFC3988E6D52E10B7A02D1C99DA100EFC5C071CE36BBB70
92BA81F6D0BE94EF2CDF8E6B5BA9FB53EB40D4C41AAA38B9A0392BB7685FCADF
D0EB7584E3D2DA66103DA3A426CE2DAE01680FED4BF95856291CB77EAB025717
E5D704EE5B407B685FCA5FF8C9F30847DAA6772175E553DA58FB32A03DB42FE5
CF6EF10CC201BF1706D8900720F22580DF72533C0FB09E8EE3D73F0BB0EEFFA8
FA3CA0BD6F6A3CA5DC7FE3D72FD06F4E78633F8711A8BDB9B81E57C977965B9E
7E771E253FBB00D785D3B69996E3A010DABE62BB8A6D235BE74DDB1B433E7228
1C4E8498E5A37D0A075C08075463C22A8598E1A35DD6961F19097490CDDAE8E3
3F950BE1E5A33DB12DBFB9BE3BDC3F3D9EB5D37F8F2819C2C3473BD82EDFDEFD
2D5CA6F546CC2FADE1A643606DF5DEEFDF0B31E28BF5C085B55DE1E084DAB4FE
A8C510BFB9B7ACBDD602B6F5D82E9FFFB5299C082FCF90B0E933D6566FECFDA6
A17C6CEFB18DBEBEA63224CC7F136E6D69C0DAEDD59FBF1A826E1BF1C5363B35
F21D48DD5A9EB5E3CB3E7B2904DD1DD3FC15433E6D97110ED85A049CED78C890
BAB94889D77272F5759BBC9F83886D356DB743C4769CB7AF4C9F67683B3DAF53
59DFAF9CFBF1B0AD2EE86C7F9FE6E0E770B6D7059C9CBCCEF5FDB9B26B9DA1D3
0708D7D253E3CBFA00B4AD17DB79A6173351A6A7C617FB00A9474741F2AE6F5C
ED3CD3A37D7BA99E1A5FEC0388655F6CE7514DFCFD4B88A56DBA5ADBAFEC03FC
4BFBF6D8FE8BED3CAAD1CBDAA7F70154DA7E65D93FB7A6036BEBC5761ED5D38B
5BC9F4D4CBBEB30FB0BA316BEBC5761ED50BCB6ACBF4D4F8AE3EC0FA8AACAD17
DB79546F449490E9A9F15D7D808D85585B2FB6F3A8A6AECB27D353E3BBFA005B
DE66ED3FFE76E945BEC8DA7FB5B65F5AF6B06D97B4F3D8DF2E80AA44EF17AAF7
944ED9CDCB31E7F6D493D2F6C74DAEE2DA2FE634C3F17B38BEF3B6FD4E7D6686
E5D869CEDDF69F1C57DE659646CB36AAF8AED5F6A7440D83077193646DBF6876
F7C050A68FEF5A6DFF9DBD83E13AEDF7A749DAFEBF86956066E2B81DEDEAB5FD
D7567765EDFF6DEA17B1ED47F5F4D24FD9BB5A5F422CEB37B6F683E3339ABAC6
0E97B77D25967BC7095AAF68D50162DB7FF6D7367064521586842DDD5D6D3FAA
D10B1A81732CAFD9F65F5E551BCECE7E0FAEFFDED6D5F6AFED969F99C52FAD2C
8EE335DBFEA4F5A5E0CEB66059DB2F9ADD5A55D835B6D76AFBEFEF28276BFB5B
967EE6A1D9BA97C471BC1BBFD82BBE9A6DBF6886E30754F15DA5FCBF816D7FE7
72BEFD247BF75E768EC3DFA6660BA636F275A01DFAFEA60AFF05E7D8E035C9DE
3D1CCB3FE3EC03E4978CDF737BAADC8A0FFA0FC386F183718CE984698DF905F3
1CE65BCCFB587EB00C623996F68D306C183F18C7984E98D6985F30CF61BEC5BC
8FE507CB209663AC0BA47C8C173BF2ED3E76E563BA231FF31FE661560E6859C2
F288651AEB05AC5BB07E72F243947EC07C87F231FF6319C232886519EB03AC53
B05E72CA0FD10A07E67BF43F963FE4633D807509D647E87FAC178DE2C259EE1C
58FEB10EC17A08C38FF5216F7C3AFBFC0EAC7F30FEB01E349B2658EF60FC63FD
F7A8D7AD6576FEEF53C9774566E6FFACF6E4C9F312A95FBBBA7F83E01AFE79F3
BCC4CDCB993327A95BABDA6B2D1AD7991650EC9DA480E2EF24B56A5A775ADD5A
D55F4333BDA74C29FFA73F69D9B077855245E34B152F945CDAFFDDE4D2EF174E
2D59F41D281F502CF193568DFA942D55E26925AFC06BAFFA7CDCE23F75BA7C54
F560FD2AEFDD29E35F38B95C89C229954A167950AF6A59A858B20894295E18CA
F8177DD0A67EA5831FB768580739C80DFEB0DA9B9FB5A8B3E4F326A5EF04572E
968CDCF225DE4D0B2CFD1EB4AA570D1A077DC0F8F56A0741AF1EDDEE572F5F34
B953C352773AB40C5E82DC766D9ACE6950D59FFAB5507240F14277CBBCFFEE83
0F4A16856A65DF873A954B4395D2C5A073FB8FE18BAE1DD3CA942C42C35388D9
FD4FB512C9343C73DAB66E1650B15CC9B8B2258B269728F64E72A1B7DF7850D6
BF28540C2806D53F280523BEEFFFA075F386F7CA96284CFD96CE2D1FF05E72E5
0A01719FB4F928C0D7C787B46DD5CCBF62F992D1A54B38DD28F8E6FD46C14130
2EF4FB073DDBD4BCDBAB45791AA642C96529B702E5067E502A9A72FD7D7DD38F
CFC473305A7DD4B868A50A01274B9528921C40FDD828B87A4ADFD6959327F4AE
99FC43C72AC981A5DF4DAE50EABDE4AA154B9F6CD3B26951E7D919B2E7A3A60D
0A55AF54FA58D5B2EF2537A9563CF9BB908A8CDBB359D9E416B54A25D7AD51FE
588B660D0BE9E581E68DEBBDD5B67EA543AD6B0524776F5226B947D3B2C99D1B
974BEED2BCEAA1164D1BBCC593079B37AA5380DA3FD020F07D2A3720B96B8BEA
079A350A2E6026FFD37C9FAF47FB2673BBB56B32B77E70503E2B652877EE1748
EE175ED0B5F3FFABC092D5
}
end
object OpenDialog1: TOpenDialog
Filter = 'hUGETracker Instruments|*.ugi'
Left = 80
Top = 56
end
object InstrumentSaveDialog: TSaveDialog
DefaultExt = '.ugi'
Filter = 'hUGETracker Instruments|*.ugi'
Left = 80
Top = 56
end
object OrderEditPopup: TPopupMenu
Left = 128
Top = 40
object MenuItem17: TMenuItem
Caption = 'Insert new row'
Hint = 'Insert a new row filled with brand new patterns'
OnClick = MenuItem17Click
end
object MenuItem18: TMenuItem
Caption = 'Insert empty row'
Hint = 'Insert a new with nothing in it yet'
OnClick = MenuItem18Click
end
object MenuItem21: TMenuItem
Caption = 'Duplicate row'
OnClick = MenuItem21Click
end
object MenuItem22: TMenuItem
Caption = 'Replicate row'
OnClick = MenuItem22Click
end
object MenuItem20: TMenuItem
Caption = '-'
end
object MenuItem19: TMenuItem
Caption = 'Remove row'
Hint = 'Remove a row-- Does not delete the patterns from existence'
OnClick = MenuItem19Click
end
end
object ImageList2: TImageList
Height = 32
Width = 32
Left = 48
Top = 86
Bitmap = {
4C7A020000002000000020000000400200000000000078DAED98818EC3200886
7DF4BED9F666DE6CA54504048BBDE572246659B7F503A4C8BF94662CE77EAD34
8E375ABD6DDB9643D89FFBBCDFEF72AFFDF5B8AFEC43F9DCCF16E221EC62970F
D2EFEFC4DC247067011F1BE65FF1CEF8A0B3536595454DCF81C58731BB18CEBD
CCA7F7B2F83066D3BDE7F95CDC7D4D7AD9C9C4D7727E5C33D52AC386DC6FF533
6A1C1B6AA5CF0DC32FDF8185990D83E74B6CD31ED76BE7B355F99C717C5F9DF7
793EAFE523079A951B800FDC7E8FFB1CF5F1787FDEDFC087679FB2F91E30F2E1
FA2DC4DFD51C7A053EC7BEC34F247ED107863FEAC374B57B75D51E8E1FDED3D7
63FF9B5A1BF4607BFC50FB12FBE83D3996CFD4BF874DFB80BFFEE5FEA3B1612F
43F9F5D9DE17F6C1C8E6EACFC76FAEE7C49F27229B8BDFD6FF2D7EE573F6B09D
FF72EEE5EF71E7755B1BB6F37FBCEFFADEF4396F6A3380EF9E7B910FF6F96F76
0E167FD3E460CDFC6BCC833AFF476A33A51E96EA9F6FD17FDFA07FFFADB3D70B
9F57260BDBFF0FBBD7FF3A77155BD6FFC15CC4B6EBFFD8FDF6EBFF78B65DFFAF
61CF9FFF13CF028DFB26BF9FC57CEC91FEB7CD7F4A3FC1CBA9FFEDF3AFFE5CED
3157BE55FFDFAAC10F2B637D8BDE5BF47F243F1BF9C0DD0673D86CFC16FD1FCD
4F24FE91FE473DDFADFF9B67A2F24E7D5FE3D7F4BF95EF8D1F6A5FD7FF89FC97
11C3F7C48F975F7F1B7A8FE603893F840FBA022FC107CC9FD3FF0E7F381F56F5
7FCD07327B3C72FE313E70B3DFD2F35FF0E1D1F987F1E1F1F98FCBC3D3F32FF5
E137E67FC18747F50FDFAF9ED57F7FC87E0086B1DAE2
}
end
object OscilloscopeUpdateTimer: TTimer
Enabled = False
Interval = 200
OnTimer = OscilloscopeUpdateTimerTimer
Left = 88
Top = 48
end
object GBSSaveDialog: TSaveDialog
DefaultExt = '.gbs'
Filter = 'Gameboy Soundtrack|*.gbs'
Left = 288
Top = 24
end
object WaveSaveDialog: TSaveDialog
DefaultExt = '.ugw'
Filter = 'hUGETracker Waves|*.ugw'
Left = 368
Top = 24
end
object GBSaveDialog: TSaveDialog
DefaultExt = '.gb'
Filter = 'Gameboy ROM|*.gb'
Left = 328
Top = 24
end
object NoteHaltTimer: TTimer
Enabled = False
OnTimer = NoteHaltTimerTimer
Left = 80
Top = 86
end
object TrackerGridPopup: TPopupMenu
Left = 96
Top = 24
object TrackerPopupEditEffect: TMenuItem
Caption = 'Edit effect ...'
OnClick = TrackerPopupEditEffectClick
end
object MenuItem28: TMenuItem
Caption = '-'
end
object TrackerPopupSelectAll: TMenuItem
Caption = 'Select all'
ShortCut = 24652
OnClick = TrackerPopupSelectAllClick
end
object TrackerPopupSelectChannel: TMenuItem
Caption = 'Select channel'
ShortCut = 16460
OnClick = TrackerPopupSelectChannelClick
end
object MenuItem29: TMenuItem
Caption = '-'
end
object TrackerPopupTransposeSemiUp: TMenuItem
Caption = 'Transpose +1 semitone'
ShortCut = 16465
OnClick = TrackerPopupTransposeSemiUpClick
end
object TrackerPopupTransposeSemiDown: TMenuItem
Caption = 'Transpose -1 semitone'
ShortCut = 16449
OnClick = TrackerPopupTransposeSemiDownClick
end
object TrackerPopupTransposeOctaveUp: TMenuItem
Caption = 'Transpose +1 octave'
ShortCut = 24657
OnClick = TrackerPopupTransposeOctaveUpClick
end
object TrackerPopupTransposeOctaveDown: TMenuItem
Caption = 'Transpose -1 octave'
ShortCut = 24641
OnClick = TrackerPopupTransposeOctaveDownClick
end
object MenuItem32: TMenuItem
Caption = '-'
end
object MenuItem31: TMenuItem
Caption = 'Interpolate'
ShortCut = 16459
OnClick = MenuItem31Click
end
object MenuItem56: TMenuItem
Caption = 'Change Instrument'
ShortCut = 16457
OnClick = MenuItem56Click
end
object MenuItem30: TMenuItem
Caption = '-'
end
object TrackerPopupCut: TMenuItem
Caption = 'Cut'
ShortCut = 16472
OnClick = TrackerPopupCutClick
end
object TrackerPopupCopy: TMenuItem
Caption = 'Copy'
ShortCut = 16451
OnClick = TrackerPopupCopyClick
end
object TrackerPopupPaste: TMenuItem
Caption = 'Paste'
ShortCut = 16470
OnClick = TrackerPopupPasteClick
end
object TrackerPopupFloodPaste: TMenuItem
Caption = 'Flood paste'
ShortCut = 8278
OnClick = TrackerPopupFloodPasteClick
end
object TrackerPopupMixPaste: TMenuItem
Caption = 'Mix paste'
ShortCut = 24662
OnClick = TrackerPopupMixPasteClick
end
object TrackerPopupErase: TMenuItem
Caption = 'Erase'
ShortCut = 46
OnClick = TrackerPopupEraseClick
end
object MenuItem27: TMenuItem
Caption = '-'
end
object TrackerPopupUndo: TMenuItem
Caption = 'Undo'
ShortCut = 16474
OnClick = TrackerPopupUndoClick
end
object TrackerPopupRedo: TMenuItem
Caption = 'Redo'
ShortCut = 16473
OnClick = TrackerPopupRedoClick
end
object MenuItem36: TMenuItem
Caption = '-'
Visible = False
end
object MenuItem45: TMenuItem
Caption = 'Hidden stuff'
Visible = False
object MenuItem46: TMenuItem
Caption = '+1'
ShortCut = 16571
OnClick = OnIncrementValueBy1Click
end
object MenuItem47: TMenuItem
Caption = '-1'
ShortCut = 16573
OnClick = OnDecrementValueBy1Click
end
object MenuItem48: TMenuItem
Caption = '+10'
ShortCut = 24763
OnClick = OnIncrementValueBy10Click
end
object MenuItem49: TMenuItem
Caption = '-10'
ShortCut = 24765
OnClick = OnDecrementValueBy10Click
end
object MenuItem50: TMenuItem
Caption = '+1'
ShortCut = 16491
OnClick = OnIncrementValueBy1Click
end
object MenuItem51: TMenuItem
Caption = '-1'
ShortCut = 16493
OnClick = OnDecrementValueBy1Click
end
object MenuItem52: TMenuItem
Caption = '+10'
ShortCut = 24683
OnClick = OnIncrementValueBy10Click
end
object MenuItem53: TMenuItem
Caption = '-10'
ShortCut = 24685
OnClick = OnDecrementValueBy10Click
end
object MenuItem39: TMenuItem
Caption = 'Redo2'
ShortCut = 24666
OnClick = TrackerPopupRedoClick
end
end
end
object SynAnySyn1: TSynAnySyn
Enabled = False
CommentAttri.Foreground = clGreen
Comments = [csAsmStyle]
DetectPreprocessor = False
IdentifierChars = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxyz'
KeyWords.Strings = (
''
'A'
'ADC'
'ADD'
'AF'
'AND'
'B'
'BC'
'BIT'
'C'
'CALL'
'CCF'
'CP'
'CPD'
'CPDR'
'CPI'
'CPIR'
'CPL'
'D'
'DAA'
'DB'
'DE'
'DEC'
'DI'
'DJNZ'
'DS'
'DW'
'E'
'EI'
'ENDM'
'ENDR'
'EQU'
'EX'
'EXX'
'H'
'HALT'
'HL'
'IF'
'IM'
'IN'
'INC'
'INCLUDE'
'IND'
'INDR'
'INI'
'INIR'
'IX'
'IY'
'JP'
'JR'
'L'
'LD'
'LDD'
'LDDR'
'LDI'
'LDIR'
'M'
'MACRO'
'MLT'
'NC'
'NEG'
'NOP'
'NZ'
'OR'
'OTDM'
'OTDMR'
'OTDR'
'OTIM'
'OTIMR'
'OTIR'
'OUT'
'OUTD'
'OUTI'
'PC'
'POP'
'PUSH'
'REPT'
'RES'
'RET'
'RETI'
'RETN'
'RL'
'RLA'
'RLC'
'RLCA'
'RLD'
'RR'
'RRA'
'RRC'
'RRCA'
'RRD'
'RST'
'SBC'
'SCF'
'SECTION'
'SET'
'SLA'
'SLP'
'SP'
'SRA'
'SRL'
'SUB'
'SWAP'
'TST'
'TSTIO'
'XOR'
'Z'
)
NumberAttri.Foreground = 10485760
StringAttri.Foreground = clRed
StringDelim = sdDoubleQuote
Markup = False
Entity = False
DollarVariables = False
ActiveDot = False
Left = 8
Top = 86
end
object MODOpenDialog: TOpenDialog
DefaultExt = '.mod'
Filter = 'GBT Player MOD files|*.mod'
Left = 472
Top = 24
end
object WaveEditPopup: TPopupMenu
Left = 8
Top = 32
object MenuItem37: TMenuItem
Caption = 'Copy'
OnClick = MenuItem37Click
end
object MenuItem38: TMenuItem
Caption = 'Paste'
OnClick = MenuItem38Click
end
end
object ShortcutsActionList: TActionList
Images = ImageList1
Left = 208
Top = 32
object PlayStartAction: TAction
DisableIfNoHandler = False
Hint = 'Play song from start'
ImageIndex = 91
OnExecute = PlayStartActionExecute
SecondaryShortCuts.Strings = (
'F5'
)
ShortCut = 24589
end
object PlayCursorAction: TAction
Hint = 'Play song from cursor'
ImageIndex = 89
OnExecute = PlayCursorActionExecute
SecondaryShortCuts.Strings = (
'F6'
)
ShortCut = 8205
end
object PlayOrderAction: TAction
Hint = 'Play song from start of order'
ImageIndex = 89
OnExecute = PlayOrderActionExecute
SecondaryShortCuts.Strings = (
'F7'
)
ShortCut = 16397
end
object StopAction: TAction
Hint = 'Stop song'
ImageIndex = 88
OnExecute = StopActionExecute
SecondaryShortCuts.Strings = (
'F8'
)
ShortCut = 27
end
object InsertRowAction: TAction
Category = 'TrackerGrid'
Caption = 'Insert Row'
OnExecute = InsertRowActionExecute
OnUpdate = InsertRowActionUpdate
ShortCut = 45
end
object InsertRowForAllAction: TAction
Category = 'TrackerGrid'
Caption = 'InsertRowForAllAction'
OnExecute = InsertRowForAllActionExecute
OnUpdate = InsertRowForAllActionUpdate
SecondaryShortCuts.Strings = (
'Shift+Ins'
)
ShortCut = 16429
end
object DeleteRowAction: TAction
Category = 'TrackerGrid'
Caption = 'DeleteRowAction'
OnExecute = DeleteRowActionExecute
OnUpdate = DeleteRowActionUpdate
ShortCut = 8
end
object DeleteRowForAllAction: TAction
Category = 'TrackerGrid'
Caption = 'DeleteRowForAllAction'
OnExecute = DeleteRowForAllActionExecute
OnUpdate = DeleteRowForAllActionUpdate
ShortCut = 16392
end
object GotoGeneralAction: TAction
Caption = 'GotoGeneralAction'
OnExecute = GotoGeneralActionExecute
ShortCut = 32839
end
object GotoPatternsAction: TAction
Caption = 'GotoPatternsAction'
OnExecute = GotoPatternsActionExecute
ShortCut = 32848
end
object GotoInstrumentsAction: TAction
Caption = 'GotoInstrumentsAction'
OnExecute = GotoInstrumentsActionExecute
ShortCut = 32841
end
object GotoWavesAction: TAction
Caption = 'GotoWavesAction'
OnExecute = GotoWavesActionExecute
ShortCut = 32855
end
object GotoCommentsAction: TAction
Caption = 'GotoCommentsAction'
OnExecute = GotoCommentsActionExecute
ShortCut = 32835
end
object GotoRoutinesAction: TAction
Caption = 'GotoRoutinesAction'
OnExecute = GotoRoutinesActionExecute
ShortCut = 32850
end
object IncrementCurrentInstrumentAction: TAction
Caption = 'IncrementCurrentInstrumentAction'
OnExecute = IncrementCurrentInstrumentActionExecute
SecondaryShortCuts.Strings = (
'Shift+='
)
ShortCut = 8379
end
object DecrementCurrentInstrumentAction: TAction
Caption = 'DecrementCurrentInstrumentAction'
OnExecute = DecrementCurrentInstrumentActionExecute
ShortCut = 8381
end
object IncreaseOctaveAction: TAction
Caption = 'IncreaseOctaveAction'
OnExecute = IncreaseOctaveActionExecute
ShortCut = 106
end
object DecreaseOctaveAction: TAction
Caption = 'DecreaseOctaveAction'
OnExecute = DecreaseOctaveActionExecute
ShortCut = 111
end
object SingleStepAction: TAction
ImageIndex = 92
OnExecute = SingleStepActionExecute
ShortCut = 13
end
end
object GBDKCSaveDialog: TSaveDialog
DefaultExt = '.c'
Filter = 'GBDK C File|*.c'
Left = 248
Top = 24
end
object RGBDSAsmSaveDialog: TSaveDialog
DefaultExt = '.asm'
Filter = 'RGBDS Assembly|*.asm'
Left = 272
Top = 48
end
object VGMSaveDialog: TSaveDialog
DefaultExt = '.vgm'
Filter = 'VGM Rip|*.vgm'
Left = 356
Top = 52
end
object TBMOpenDialog: TOpenDialog
DefaultExt = '.tbm'
Filter = 'TrackerBoy TBM files|*.tbm'
Left = 472
Top = 64
end
object FUROpenDialog: TOpenDialog
DefaultExt = '.fur'
Filter = 'Furnace Tracker modules|*.fur'
Left = 472
Top = 104
end
object InstrumentPopupMenu: TPopupMenu
Images = ImageList1
Left = 568
Top = 296
object MenuItem57: TMenuItem
Caption = 'Copy'
ImageIndex = 9
OnClick = MenuItem57Click
end
object MenuItem58: TMenuItem
Caption = 'Paste'
ImageIndex = 47
OnClick = MenuItem58Click
end
end
end
|
