BitSS Teletype bit sequencer with song mode

BitSS v 1.0

BitSS is inspired by the Teletype Talk video serie by Joe Filbrun on youtube. It is a sequencer with 4 patterns of 16 steps each, and a song mode wich allows you to sequence patterns. You can set the length of each pattern (non destructive), and loop them in the song mode.

Each step of a pattern allows you to trig up to 4 TR at a time or none, it’s up to you. A step is based on a decimal number (from 0 to 15) and its binary representation.

https://youtu.be/GVjFnozhVbw

Documentation

BitSS.pdf (102.1 KB)

Script

BITSS
BIT SEQUENCER WITH SONG MODE
4 PATTERNS OF 16 STEPS

#1
IF >= B A: $ 7

B + B 1; $ + Y 1

#2
PN X 8 PN 3 Y
J PN X 8
IF >= PN X 9 J: PN X 9 0
PN.+ X 9 1
Z PN X + PN X 9 9
L 0 3: $ 6

#3
PN X 8 PN 3 Y
J PN X 8
IF >= PN X 9 J: PN X 9 0
PN.+ X 9 1
Z PN X + PN X 9 9
L 0 3: $ 6

#4
PN X 26 PN 3 Y
J PN X 26
IF >= PN X 27 J: PN X 27 0
PN.+ X 27 1
Z PN X + PN X 27 27
L 0 3: $ 6

#5
PN X 26 PN 3 Y
J PN X 26
IF >= PN X 27 J: PN X 27 0
PN.+ X 27 1
Z PN X + PN X 27 27
L 0 3: $ 6

#6
J BGET Z I
IF J: TR.P + I 1

#7
PN.I 1 C; PN.I 0 C
X PN.HERE 0; Y X
X ? MOD X 2 0 2; B 0
A * PN.HERE 1 PN 3 PN.HERE 0
C + C 1; C WRAP C 0 7

#8

#M
$ 1

#I
M 500; M.ACT 0; X PN 0 0; Y X
X ? MOD X 2 2 0; B 0; C 0
A * PN.HERE 1 PN.HERE X; D 0
L 1 4: PN 3 2 I
L 1 4: PN 3 I 16

10 Likes