dranke/microw8
1
0
Fork 0
mirror of https://github.com/exoticorn/microw8.git synced 2026-01-20 11:16:42 +01:00
Code Issues Projects Releases Wiki Activity

adjust tim_ges to new soundchip version

Browse Source
This commit is contained in:
Dennis Ranke
2022-03-19 22:55:40 +01:00
parent 0f82e6e711
commit 8713aa8930
1 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
examples/curlywas/tim_ges.cwa
View File

@@ -9,7 +9,7 @@ fn melody(ch: i32, t: i32, T: i32) {
let inline riff_note = 5514 >> (riff_pos % note_count * 4) & 15;
let inline melody_note = shift + octave - riff_note;
ch?1 = riff_pos * 10 + 63;
ch?1 = 248 - riff_pos * 15;
ch?3 = melody_note + 64;
let inline arp_note = shift + ((0x85>>((t/2)%3*4)) & 15) - 1;
@@ -22,13 +22,13 @@ export fn upd() {
melody(98, t, T - 3);
melody(92, t, T);
80?0 = ((T >= 256) & (T/12+(T-3)/12)) * 2 | 0x4; // arp trigger
80?0 = ((T >= 256) & (T/12+(T-3)/12)) * 2 | 0x44; // arp trigger
if T >= 128 {
let inline bass_step = T % 8;
86?3 = if bass_step / 2 == 2 {
86?0 = 0xc2;
90
80
} else {
86?0 = ((197 >> bass_step) & 1) | 0x48;
((T & 4) * ((T & 7) - 1)) / 2 + 28
@@ -38,12 +38,12 @@ export fn upd() {
data 80 {
i8(
0, 80, 0, 128, 0, 0x90,
0, 80, 0, 128, 0, 0x4c,
5, 128, 0, 128, 0, 0x4c,
5, 128, 0, 128, 0, 0x4c,
0xf8, 0x85,
0x81, 0x81, 0, 110, 0, 80
0, 0x81, 0, 0, 0, 0x90,
0, 0x4c, 0, 0, 0, 0x5c,
5, 0, 0, 0, 0, 0x4c,
5, 0, 0, 0, 0, 0x4c,
0xfa, 0x85,
0x81, 0x81, 0, 110, 0, 90
)
}