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 latest sound chip revision

Browse Source
This commit is contained in:
Dennis Ranke
2022-04-18 11:52:07 +02:00
parent a5edeb21d8
commit 6f20d303c8
1 changed files with 14 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
examples/curlywas/tim_ges.cwa
View File

@@ -1,3 +1,7 @@
// Steady On Tim, It's Only A Budget Game
// original bytebeat by Gasman / Hooy-Program
// ported to MicroW8/GES by exoticorn/icebird
import "env.memory" memory(4); import "env.memory" memory(4);
fn melody(ch: i32, t: i32, T: i32) { fn melody(ch: i32, t: i32, T: i32) {
@@ -9,7 +13,7 @@ fn melody(ch: i32, t: i32, T: i32) {
let inline riff_note = 5514 >> (riff_pos % note_count * 4) & 15; let inline riff_note = 5514 >> (riff_pos % note_count * 4) & 15;
let inline melody_note = shift + octave - riff_note; let inline melody_note = shift + octave - riff_note;
ch?1 = 248 - riff_pos * 15; ch?1 = 230 - riff_pos * 14;
ch?3 = melody_note + 64; ch?3 = melody_note + 64;
let inline arp_note = shift + ((0x85>>((t/2)%3*4)) & 15) - 1; let inline arp_note = shift + ((0x85>>((t/2)%3*4)) & 15) - 1;
@@ -22,13 +26,13 @@ export fn upd() {
melody(98, t, T - 3); melody(98, t, T - 3);
melody(92, t, T); melody(92, t, T);
80?0 = ((T >= 256) & (T/12+(T-3)/12)) * 2 | 0x44; // arp trigger 80?0 = ((T >= 256) & (T/12+(T-3)/12)) * 2 | 0x48; // arp trigger
if T >= 128 { if T >= 128 {
let inline bass_step = T % 8; let inline bass_step = T % 8;
86?3 = if bass_step / 2 == 2 { 86?3 = if bass_step / 2 == 2 {
86?0 = 0xc2; 86?0 = 0xd6;
80 81
} else { } else {
86?0 = ((197 >> bass_step) & 1) | 0x48; 86?0 = ((197 >> bass_step) & 1) | 0x48;
((T & 4) * ((T & 7) - 1)) / 2 + 28 ((T & 4) * ((T & 7) - 1)) / 2 + 28
@@ -38,12 +42,12 @@ export fn upd() {
data 80 { data 80 {
i8( i8(
0, 0x81, 0, 0, 0, 0x90, 0, 0x90, 0, 0, 0, 0x90,
0, 0x4c, 0, 0, 0, 0x5c, 0, 0x4c, 0, 0, 0, 0x4c,
5, 0, 0, 0, 0, 0x4c, 0x19, 0, 0, 0, 0, 0x4c,
5, 0, 0, 0, 0, 0x4c, 0x19, 0, 0, 0, 0, 0x4c,
0xfa, 0x85, 0xfa, 0x84,
0x81, 0x81, 0, 110, 0, 90 0xc1, 0xc1, 0, 107, 0, 0x4c
) )
} }