diff --git a/README.md b/README.md index 9fe8cab..f1b13b1 100644 --- a/README.md +++ b/README.md @@ -404,6 +404,15 @@ rows 48-63: a group of four consecutive notes form a chord, the first note in th [spine.txt](https://raw.githubusercontent.com/attejensen/a773_teletype/master/spine.txt) [spine_patch_notes.txt](https://raw.githubusercontent.com/attejensen/a773_teletype/master/spine_patch_notes.txt) +## sqr1 (2021-08-22) +[![sqr1 on youtube](http://img.youtube.com/vi/ncsKQav632s/0.jpg)](https://www.youtube.com/watch?v=ncsKQav632s) +Sequenced from teletype, first run with grid. + + +[sqr1_1_2.txt](https://raw.githubusercontent.com/attejensen/a773_teletype/master/sqr1_1_2.txt) +[sqr1_2_2.txt](https://raw.githubusercontent.com/attejensen/a773_teletype/master/sqr1_2_2.txt) +[sqr1_patch_notes.txt](https://raw.githubusercontent.com/attejensen/a773_teletype/master/sqr1_patch_notes.txt) + ## stargazer (2020-01-13) [![stargazer on youtube](http://img.youtube.com/vi/x9nc5jUjgTA/0.jpg)](https://www.youtube.com/watch?v=x9nc5jUjgTA) Hand played melody over melodic bassline, middle part is reaching for the stars (aka atonal bleeps, screaming filter and granular glitches). diff --git a/sqr1_1_2.txt b/sqr1_1_2.txt new file mode 100644 index 0000000..477aa8b --- /dev/null +++ b/sqr1_1_2.txt @@ -0,0 +1,206 @@ +SQR1 1/2 +$ 1 BD +$ 2 SD +$ 3 +$ 4 +$ 5 +$ 6 +$ 7 +$ 8 +$ 11 SWITCH +$ 12 +$ 13 +$ 14 +$ 15 +$ 16 +$ 17 GRID SETUP +$ 18 HANDLE BUTTON PRESS +PN 3 0 FIRST SCENE +PN 3 1 NB SCENES +PN 3 2 SWITCH LEN +PN 3 3 DISP LEN +PN 3 4 DISP DIV (TMP) +PN 3 5 NEXT SCENE (TMP) + + + +#1 +IF ! G.BTN.V 1: BRK +IF ! % T 6: SC.TR.P 1 + +#2 +IF ! G.BTN.V 2: BRK +I BGET 64 Y +TO.CV 4 RND V 5 +IF ! I: BRK +DEL.R << 1 RND 2 M: TO.TR.P 4 + +#3 + +#4 + +#5 +J ? * == % T 3 2 RND 2 8 1 +IF ! G.BTN.V 4: J 1 +TO.CV 1 N.B J +K || ! % T 3 ! RND 2 +IF * G.BTN.V 5 K: TO.TR.P 1 +CV 4 ? > % T 6 3 RND V 9 0 + +#6 +TO.CV 2 N.B + B 2 + +#7 +PROB 30: CV 1 RND V 5 +PROB 10: J 5 +PROB 10: J + J 4 +PROB 10: J - J 3 +IF G.BTN.V 7: TO.CV 3 N.B J + +#8 + +#M +G.REC 0 6 16 1 0 0; J PN 3 3 +G.REC 0 6 J 1 5 5; Y % T J +G.LED % / T PN 3 4 PN 3 3 6 15 +L 11 16: $ I +L 1 8: $ I +T + T 1 + +#I +M 100; T 0; $ 17 +L 2 4: TR.TIME I 20 +L 1 8: TO.TR.TIME I 20 +TR.TIME 1 120 +N.B 5 -5 + +#A +G.GBTN.V 1 0 +G.BTN.V + SCENE 32 1 +IF == SCENE PN 3 5: BRK +G.BTN.V + PN 3 5 32 % T 2 +IF % T PN 3 2: BRK +SCENE.G PN 3 5; $ 10 + +#B +IF != % T 3 1: TR.P 4 +IF || ! % T 6 ! RND 6: TR.P 3 +TR.P 1 + +#C +TO.TR 3 G.BTN.V 6 + +#D + +#E + +#F + +#H +M.RESET; PN 3 5 SCENE +J + 32 PN 3 0; K PN 3 1 +G.GBX 0 1 0 7 1 1 1 5 0 9 1 +G.GBX 1 J 10 7 1 1 1 5 18 K 1 +G.GBT 0 0 15 7 1 1 1 5 18 +PN 3 4 / PN 3 2 PN 3 3 + +#J +J G.GRPI; K * J ! M.ACT +IF J: PN 3 5 - G.BTNI 32 +IF K: SCENE.G PN 3 5 +IF J: G.BTN.SW G.BTNI; BRK +M.ACT G.BTN.V 0; $ 10 + +#P +0 0 0 6 +1 1 1 1 +0 0 0 0 +63 63 63 63 + +0 0 0 1 +0 0 0 2 +0 0 0 48 +0 0 0 12 +0 0 0 4 +0 0 0 1 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 + +#G +1000000000000000 +0000000000000000 +0100000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 + +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 diff --git a/sqr1_2_2.txt b/sqr1_2_2.txt new file mode 100644 index 0000000..65f32e7 --- /dev/null +++ b/sqr1_2_2.txt @@ -0,0 +1,228 @@ +SQR1 2/2 +$ 1 BD +$ 2 SD +$ 3 +$ 4 HH +$ 5 BASS +$ 6 OA HARM +$ 7 RINGS +$ 8 JUST FRIENDS +$ 11 SWITCH +$ 12 +$ 13 +$ 14 +$ 15 +$ 16 ADD INIT +$ 17 GRID SETUP +$ 18 HANDLE BUTTON PRESS +PN 3 0 FIRST SCENE +PN 3 1 NB SCENES +PN 3 2 SWITCH LEN +PN 3 3 DISP LEN +PN 3 4 DISP DIV (TMP) +PN 3 5 NEXT SCENE (TMP) + + + +#1 +IF ! G.BTN.V 1: BRK +I ! % % T 48 9 +PROB 15: I 1 +IF I: SC.TR.P 1 + +#2 +IF ! G.BTN.V 2: BRK +I BGET 512 Y +PROB 4: I 1 +IF I: TO.TR.P 4; SC.TR.P 3 +TO.CV 4 RND V 5 + +#3 +IF ! % T 6: TR.P 3 +PROB 20: TR.P 3 +IF ! % T 3: TR.P 4 +PROB 20: TR.P 4 + +#4 +IF ! G.BTN.V 3: BRK +I ! % T 6 +IF I: SC.TR.P 5 + +#5 +J ? - % T 3 2 + B 7 B +IF ! G.BTN.V 4: J B +TO.CV 1 N.B J +K || ! % % T 48 9 ! RND 7 +CV 4 ? > % T 6 3 RND V 9 0 +IF * G.BTN.V 5 K: TO.TR.P 1 + +#6 +TO.CV 2 N.B + B 2 +IF G.BTN.V 9: TO.TR.P 2 + +#7 +PROB 30: CV 1 RND V 5 +PROB 10: J 5 +PROB 10: J + J 4 +PROB 10: J - J 3 +IF G.BTN.V 7: TO.CV 3 N.B J + +#8 +I || ! % T 6 ! RND 5 +J + C * 2 RND 2 +PROB 20: J + J 7 +PROB 20: J + J 3 +IF || ! G.BTN.V 8 ! I: BRK +JF.NOTE N.B J V 5; TR.P 2 + +#M +G.REC 0 6 16 1 0 0; J PN 3 3 +G.REC 0 6 J 1 5 5; Y % T J +G.LED % / T PN 3 4 PN 3 3 6 15 +L 11 15: $ I +L 1 8: $ I +T + T 1 + +#I +M 100; T 0; $ 17 +L 2 4: TR.TIME I 20 +L 1 8: TO.TR.TIME I 20 +TR.TIME 1 150 +TO.TR.TIME 2 200 + +#A +G.GBTN.V 1 0 +G.BTN.V + SCENE 32 1 +IF == SCENE PN 3 5: BRK +G.BTN.V + PN 3 5 32 % T 2 +IF % T PN 3 2: BRK +SCENE.G PN 3 5; $ 10 + +#B +J MIN 3 / % T 48 9 +J + J * % / T 48 2 4 +B PN 0 J; C PN 1 J +N.B 5 PN 2 J +TR.P 1 +JF.RUN VV RRND 423 120 + +#C +TO.TR 3 G.BTN.V 6 + +#D + +#E + +#F +TI.PRM.MAP 1 0 99 +JF.MODE 1; JF.SHIFT V -1 +JF.RMODE 1 + +#H +M.RESET; PN 3 5 SCENE +J + 32 PN 3 0; K PN 3 1 +G.GBX 0 1 0 7 1 1 1 5 0 9 1 +G.GBX 1 J 10 7 1 1 1 5 18 K 1 +G.GBT 0 0 15 7 1 1 1 5 18 +PN 3 4 / PN 3 2 PN 3 3 + +#J +J G.GRPI; K * J ! M.ACT +IF J: PN 3 5 - G.BTNI 32 +IF K: SCENE.G PN 3 5 +IF J: G.BTN.SW G.BTNI; BRK +M.ACT G.BTN.V 0; $ 10 + +#P +8 8 8 6 +1 1 1 1 +0 0 0 0 +63 63 63 63 + +1 1 -4 1 +2 0 -5 2 +3 3 -5 96 +3 3 -5 12 +6 6 -5 8 +5 3 -5 2 +4 4 -1 0 +4 4 -1 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 +0 0 0 0 + +#G +1000000000000000 +0000000000000000 +0010000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 +0000000000000000 + +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 diff --git a/sqr1_patch_notes.txt b/sqr1_patch_notes.txt new file mode 100644 index 0000000..c4f8dae --- /dev/null +++ b/sqr1_patch_notes.txt @@ -0,0 +1,16 @@ +sequenced from teletype +-- +bd: er-301 +sd main: 2opfm +sd add: er-301 +oh: er-301 +bass drone: a110 (sqr) through threeler, sub osc from a160-2 +bass perc: a110 (saw) folded with chopping kinky +harmony drone (10th): orgone accumulator +harmony: piston honda through rings +fm bells: just friends +gen lead: pico vco through dplpg +texture: monsoon +lead: ms-20 +reverb: quadraverb +