<?phpnamespace App\Tests;use App\Audio\{ProceduralScore,Sampler};use PHPUnit\Framework\TestCase;final class ProceduralMusicTest extends TestCase{ public function testSeededMotifsRepeatAndEvolveWithoutTouchingGameplayRandomness(): void { $a=new ProceduralScore(42);$b=new ProceduralScore(42);self::assertSame($a->phrase(0),$b->phrase(0)); self::assertSame($a->phrase(0),$a->phrase(1));self::assertNotSame($a->phrase(0),$a->phrase(3)); self::assertNotSame($a->phrase(0),(new ProceduralScore(17))->phrase(0)); $run=new \App\Game\Run(\App\Game\HordeArena::build(),42);$rng=new \ReflectionProperty($run,'rng');$before=$rng->getValue($run); for($i=0;$i<100;$i++)$a->events($i%16,intdiv($i,16),18,true,25);self::assertSame($before,$rng->getValue($run)); } public function testSustainedCounterpointIsConsonantAtStructuralBeatsAndNeverCrosses(): void { foreach(range(1,64)as$seed)foreach(range(0,15)as$bar){ $score=new ProceduralScore($seed);$p=$score->phrase($bar);$lead=$counter=0; foreach(range(0,15)as$t){$lead=$p['lead'][$t]??$lead;$counter=$p['counter'][$t]??$counter; self::assertGreaterThanOrEqual(8,$lead-$counter); if($t%4===0)self::assertContains(($lead-$counter)%12,[0,3,4,7,8,9]); foreach(['lead'=>$lead,'counter'=>$counter,'bass'=>$p['bass']]as$v=>$n)self::assertStringStartsWith('sr_',Sampler::key($v,$n)); } self::assertLessThan(3,count(array_intersect(array_keys($p['lead']),array_keys($p['counter'])))); } } public function testSamplerFrequencyAndArrangementProgression(): void { self::assertEqualsWithDelta(440,Sampler::frequency(69),.001);self::assertEqualsWithDelta(220,Sampler::frequency(57),.001); $s=new ProceduralScore(1);self::assertSame([['kick',null],['bass',$s->phrase(0)['bass']]],$s->events(0,0,1)); self::assertGreaterThan(count($s->events(0,0,1)),count($s->events(0,0,16,true,20))); self::assertSame('rift_hat',Sampler::key('hat')); }}