1[
2  Emit the uppercase alphabet
3]
4
5cell 0 = 26
6++++++++++++++++++++++++++
7
8cell 1 = 65
9>+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++<
10
11while cell#0 != 0
12[
13 >
14 .      emit cell#1
15 +      increment cell@1
16 <-     decrement cell@0
17]
18