annotate ringtools/examples/rising-chrom.pwt @ 926:6a0aa8d36d06

rvinterf backslash escape: introduce libprint The new helper function library named libprint is meant to replace the badly misnamed libg23, and will soon contain functions for printing all of the same kinds of GPF TST packets that are now handled in libg23. However, we are also moving safe_print_trace() from libasync to this new library, and changing it to emit our new backslash escape format.
author Mychaela Falconia <falcon@freecalypso.org>
date Tue, 23 May 2023 03:47:46 +0000
parents c4dafcc61cf7
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
826
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
1 # This melody file is intended to be a basic test for the PWT melody play
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
2 # mechanism - it consists of all 48 notes of the chromatic scale supported
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
3 # by Calypso PWT, in rising order, with each note playing for 12 TDMA frames
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
4 # at maximum nominal volume of 64/64.
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
5
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
6 f4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
7 fs4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
8 g4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
9 gs4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
10 a4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
11 as4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
12 b4 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
13 c5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
14 cs5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
15 d5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
16 ds5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
17 e5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
18 f5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
19 fs5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
20 g5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
21 gs5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
22 a5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
23 as5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
24 b5 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
25 c6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
26 cs6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
27 d6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
28 ds6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
29 e6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
30 f6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
31 fs6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
32 g6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
33 gs6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
34 a6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
35 as6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
36 b6 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
37 c7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
38 cs7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
39 d7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
40 ds7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
41 e7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
42 f7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
43 fs7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
44 g7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
45 gs7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
46 a7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
47 as7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
48 b7 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
49 c8 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
50 cs8 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
51 d8 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
52 ds8 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
53 e8 64 12
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
54
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
55 # The purpose of the following line is to test the implementation
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
56 # of 'rest' instruction
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
57
c4dafcc61cf7 ringtools/examples/rising-chrom.pwt: PWT melody test
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff changeset
58 rest 12