Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.lang.forth > #135229
| From | Hans Bezemer <the.beez.speaks@gmail.com> |
|---|---|
| Newsgroups | comp.lang.forth |
| Subject | Re: Back & Forth - It still sounds MID.. [7b] |
| Date | 2026-07-09 18:18 +0200 |
| Organization | A noiseless patient Spider |
| Message-ID | <112ohl4$h5ci$1@dont-email.me> (permalink) |
| References | <10t2opl$1jcba$1@dont-email.me> <1128d70$2c3qg$1@dont-email.me> |
On 03-07-2026 15:24, marcel hendrix wrote:
> On 5/1/2026 7:44 PM, Hans Bezemer wrote:
>> Now on YT: https://youtu.be/ExDbY0X7Cvg
>>
>> Hans Bezemer
>
> What about chords and multiple players?
>
> https://iforth.nl/canonc.mid
>
> -marcel
What about this?
: m.Chord ( p1 p2 p3 px x duration delay --)
>MID rot swap \ setup (duration n delay)
[: over if .delay 90 emit rot mid&C dup emit m.Velocity emit >r 1- 0
recurse
swap dup .delay 80 emit r> emit m.Velocity emit >zero ;then drop ;]
execute drop drop ; \ execute the chord
Hans Bezemer
Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread
Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-05-01 19:44 +0200
Re: Back & Forth - It still sounds MID.. [7b] marcel hendrix <mhx@iae.nl> - 2026-07-03 15:24 +0200
Re: Back & Forth - It still sounds MID.. [7b] dxf <dxforth@gmail.com> - 2026-07-05 18:33 +1000
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-05 19:08 +0200
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-09 18:18 +0200
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-10 14:43 +0200
Re: Back & Forth - It still sounds MID.. [7b] albert@SPENARNC.XS4ALL.NL - 2026-07-11 17:09 +0200
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-11 18:21 +0200
Re: Back & Forth - It still sounds MID.. [7b] dxf <dxforth@gmail.com> - 2026-07-12 15:02 +1000
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-12 16:15 +0200
Re: Back & Forth - It still sounds MID.. [7b] Hans Bezemer <the.beez.speaks@gmail.com> - 2026-07-11 18:49 +0200
csiph-web