From dcf07fa39805e47c0bc4b2eb0ec2f71814e9b94b Mon Sep 17 00:00:00 2001 From: Zack Buhman Date: Wed, 18 Jun 2025 12:22:06 -0500 Subject: [PATCH] example/aica/aica_xm: (more) correct timing and pitch behavior --- base.mk | 3 + example/aica/aica_xm.cpp | 138 ++++++++++++++++++++++++--------------- xm/middle_c.xm | Bin 0 -> 21588 bytes xm/middle_c.xm.h | 15 +++++ 4 files changed, 102 insertions(+), 54 deletions(-) create mode 100644 xm/middle_c.xm create mode 100644 xm/middle_c.xm.h diff --git a/base.mk b/base.mk index 4921b48..3ec7705 100644 --- a/base.mk +++ b/base.mk @@ -75,6 +75,9 @@ endef %.pcm.o: %.pcm $(BUILD_BINARY_O) +%.pcm.h: %.pcm + $(BUILD_BINARY_H) + %.data.o: %.data $(BUILD_BINARY_O) diff --git a/example/aica/aica_xm.cpp b/example/aica/aica_xm.cpp index 558eb3b..3f708aa 100644 --- a/example/aica/aica_xm.cpp +++ b/example/aica/aica_xm.cpp @@ -13,9 +13,7 @@ //#include "example/arm/xm.bin.h" #include "xm/xm.h" #include "xm/milkypack01.xm.h" - -extern void * _binary_start __asm("_binary_example_arm_channel_bin_start"); -extern void * _binary_size __asm("_binary_example_arm_channel_bin_size"); +#include "xm/middle_c.xm.h" constexpr int max_patterns = 64; constexpr int max_instruments = 128; @@ -103,10 +101,26 @@ int unpack_sample(int buf, int offset, xm_sample_header_t * sample_header) return size; } +void debug_xm_sample_header(int instrument_ix, xm_sample_header_t * sample_header) +{ + printf("sample header: instrument_ix: %d:\n", instrument_ix); + printf(" volume %d\n", sample_header->volume); + printf(" finetune %d\n", sample_header->finetune); + printf(" type %x\n", sample_header->type); + printf(" panning %d\n", sample_header->panning); + printf(" relative_note_number %d\n", sample_header->relative_note_number); + printf(" sample_length % 6d\n", s32(&sample_header->sample_length)); + printf(" sample_loop_start % 6d\n", s32(&sample_header->sample_loop_start)); + printf(" sample_loop_length % 6d\n", s32(&sample_header->sample_loop_length)); +} + int xm_samples_init(int buf, int offset, int instrument_ix, int number_of_samples) { xm_sample_header_t * sample_header[number_of_samples]; xm.sample_header[instrument_ix] = (xm_sample_header_t *)(buf + offset); + if (instrument_ix <= 12) + debug_xm_sample_header(instrument_ix, xm.sample_header[instrument_ix]); + for (int i = 0; i < number_of_samples; i++) { sample_header[i] = (xm_sample_header_t *)(buf + offset); offset += (sizeof (xm_sample_header_t)); @@ -115,7 +129,7 @@ int xm_samples_init(int buf, int offset, int instrument_ix, int number_of_sample for (int i = 0; i < number_of_samples; i++) { int sample_length = s32(&sample_header[i]->sample_length); if (sample_length > 0) { - printf("instrument % 2d sample_length % 6d ix %d\n", instrument_ix, sample_length, sample_data_ix); + //printf(" sample_length % 6d\n", sample_length); xm.sample_data_offset[instrument_ix] = sample_data_ix; sample_data_ix += unpack_sample(buf, offset, sample_header[i]); assert(sample_data_ix <= (int)(sizeof (sample_data))); @@ -213,34 +227,39 @@ void writeback(void const * const buf, uint32_t size) } } +// quater-semitones +const static int cent_to_fns[] = { + 0, 15, 30, 45, 61, 77, 93, 109, 125, 142, 159, 176, + 194, 211, 229, 248, 266, 285, 304, 323, 343, 363, 383, 403, + 424, 445, 467, 488, 510, 533, 555, 578, 601, 625, 649, 673, + 698, 723, 749, 774, 801, 827, 854, 881, 909, 937, 966, 995 +}; +const int cent_to_fns_length = (sizeof (cent_to_fns)) / (sizeof (cent_to_fns[0])); + uint16_t note_to_oct_fns(const int8_t note) { - static const uint16_t _cent_to_fns[] = { - 0x0, - 0x3d, - 0x7d, - 0xc2, - 0x10a, - 0x157, - 0x1a8, - 0x1fe, - 0x25a, - 0x2ba, - 0x321, - 0x38d, - }; + const float base_ratio = -2.3986861877015477; - const int8_t a440_note = note - 42; - const int8_t a440_note_d = (a440_note < 0) ? a440_note - 11 : a440_note; - const int8_t div12 = a440_note_d / static_cast(12); - const int8_t mod12 = a440_note % static_cast(12); + float c4_note = (float)note - 49.0; + float ratio = base_ratio + (c4_note / 12.0); - const uint16_t oct = div12; - const uint16_t cent = (a440_note < 0) ? 12 + mod12 : mod12; - const uint16_t fns = _cent_to_fns[cent]; + float whole = (int)ratio; + float fraction; + if (ratio < 0) { + if (whole > ratio) + whole -= 1; + fraction = -(whole - ratio); + } else { + fraction = ratio - whole; + } - return aica::oct_fns::OCT(oct - 1) | aica::oct_fns::FNS(fns); + assert(fraction >= 0.0); + assert(fraction <= 1.0); + + int fns = cent_to_fns[(int)(fraction * cent_to_fns_length)]; + + return aica::oct_fns::OCT((int)whole) | aica::oct_fns::FNS((int)fns); } void debug_note(interpreter_state& state, int ch, xm_pattern_format_t * pf) @@ -274,10 +293,17 @@ void debug_note(interpreter_state& state, int ch, xm_pattern_format_t * pf) void play_note_effect(interpreter_state& state, int ch, xm_pattern_format_t * pf) { + int effect_tick = (state.tick / 2) % state.ticks_per_line; + switch (pf->effect_type) { - case 0xD: + case 0x0d: // D pattern break state.pattern_break = pf->effect_parameter; break; + case 0x14: // K delayed tick + if (effect_tick == pf->effect_parameter) { + wait(); aica_sound.channel[ch].KYONB(0); + } + break; } } @@ -287,11 +313,24 @@ void play_note(interpreter_state& state, int ch, xm_pattern_format_t * pf) wait(); aica_sound.channel[ch].KYONB(0); } else if (pf->note != 0 && pf->instrument != 0) { wait(); aica_sound.channel[ch].SA(xm.sample_data_offset[pf->instrument - 1]); - int lsa = xm.sample_header[pf->instrument - 1]->sample_loop_start / 2; - int lea = xm.sample_header[pf->instrument - 1]->sample_loop_length / 2; + + xm_sample_header_t * sample_header = xm.sample_header[pf->instrument - 1]; + + int lsa = s32(&sample_header->sample_loop_start) / 2; + int len = s32(&sample_header->sample_loop_length) / 2; + int loop_type = sample_header->type & 0b11; + int lpctl = (loop_type == 2) ? 3 : loop_type; + int disdl = (sample_header->volume * 0xf) / 64; + if (!(disdl <= 0xf)) + printf("%d\n", sample_header->volume); + assert(disdl >= 0); + assert(disdl <= 0xf); + + wait(); aica_sound.channel[ch].LPCTL(lpctl); wait(); aica_sound.channel[ch].LSA(lsa); - wait(); aica_sound.channel[ch].LEA(lsa + lea); - wait(); aica_sound.channel[ch].oct_fns = note_to_oct_fns(pf->note); + wait(); aica_sound.channel[ch].LEA(lsa + len); + wait(); aica_sound.channel[ch].oct_fns = note_to_oct_fns(pf->note + sample_header->relative_note_number); + wait(); aica_sound.channel[ch].DISDL(disdl); wait(); aica_sound.channel[ch].KYONB(1); } @@ -344,15 +383,13 @@ int parse_pattern_line(interpreter_state& state, xm_pattern_header_t * pattern_h void next_pattern(interpreter_state& state, int pattern_break) { state.line_index = 0; - state.note_offset = 0; state.next_note_offset = 0; state.pattern_break = -1; - /* state.pattern_index += 1; + printf("pattern_index: %d\n", state.pattern_index); if (state.pattern_index >= 0xe) - state.pattern_index = 0; - */ + state.pattern_index = 1; } uint8_t __attribute__((aligned(32))) zero[0x28c0] = {}; @@ -362,6 +399,7 @@ void main() serial::init(0); int buf = (int)&_binary_xm_milkypack01_xm_start; + //int buf = (int)&_binary_xm_middle_c_xm_start; xm_init(buf); wait(); aica_sound.common.vreg_armrst = aica::vreg_armrst::ARMRST(1); @@ -425,19 +463,19 @@ void main() for (int i = 0; i < 8; i++) { wait(); aica_sound.channel[i].KYONB(0); - wait(); aica_sound.channel[i].LPCTL(1); + wait(); aica_sound.channel[i].LPCTL(0); wait(); aica_sound.channel[i].PCMS(0); wait(); aica_sound.channel[i].LSA(0); wait(); aica_sound.channel[i].LEA(0); - wait(); aica_sound.channel[i].D2R(0xa); - wait(); aica_sound.channel[i].D1R(0xa); - wait(); aica_sound.channel[i].RR(0xa); + wait(); aica_sound.channel[i].D2R(0x0); + wait(); aica_sound.channel[i].D1R(0x0); + wait(); aica_sound.channel[i].RR(0xc); wait(); aica_sound.channel[i].AR(0x1f); wait(); aica_sound.channel[i].OCT(0); wait(); aica_sound.channel[i].FNS(0); - wait(); aica_sound.channel[i].DISDL(0xf); - wait(); aica_sound.channel[i].DIPAN(0x0); + wait(); aica_sound.channel[i].DISDL(0); + wait(); aica_sound.channel[i].DIPAN(0); wait(); aica_sound.channel[i].Q(0b00100); wait(); aica_sound.channel[i].TL(0); @@ -451,18 +489,8 @@ void main() | aica::mono_mem8mb_dac18b_ver_mvol::MVOL(0xf) // 15/15 volume ; - wait(); aica_sound.channel[0].SA(xm.sample_data_offset[0]); - int lsa = xm.sample_header[0]->sample_loop_start / 2; - int lea = xm.sample_header[0]->sample_loop_length / 2; - printf("sa %d lsa %d lea %d\n", xm.sample_data_offset[0], lsa, lsa + lea); - wait(); aica_sound.channel[0].LSA(lsa); - wait(); aica_sound.channel[0].LEA(lsa + lea); - //wait(); aica_sound.channel[0].KYONB(1); - //wait(); aica_sound.channel[0].KYONEX(1); - // 195 = 1ms // 2500 / bpm milliseconds - printf("default_bpm %d\n", xm.header->default_bpm); printf("default_tempo %d\n", xm.header->default_tempo); @@ -472,7 +500,7 @@ void main() state.ticks_per_line = xm.header->default_tempo; state.tick = 0; state.pattern_break = -1; - state.pattern_index = 0; + state.pattern_index = 0xc; state.line_index = 0; state.note_offset = 0; state.next_note_offset = 0; @@ -503,17 +531,19 @@ void main() bool effect_tick = (state.tick & 1) == 0; if (note_tick) { state.note_offset = state.next_note_offset; - //state.next_note_offset = parse_pattern_line(state, pattern_header, state.note_offset, play_debug_note); - state.next_note_offset = parse_pattern_line(state, pattern_header, state.note_offset, play_note); + state.next_note_offset = parse_pattern_line(state, pattern_header, state.note_offset, play_debug_note); + //state.next_note_offset = parse_pattern_line(state, pattern_header, state.note_offset, play_note); state.line_index += 1; wait(); aica_sound.channel[0].KYONEX(1); } if (effect_tick && !note_tick) { // execute effects state.next_note_offset = parse_pattern_line(state, pattern_header, state.note_offset, play_note_effect); + wait(); aica_sound.channel[0].KYONEX(1); } if (state.pattern_break >= 0 || state.next_note_offset >= pattern_data_size) { + printf("%d %d\n", state.pattern_break, state.next_note_offset); next_pattern(state, -1); } diff --git a/xm/middle_c.xm b/xm/middle_c.xm new file mode 100644 index 0000000000000000000000000000000000000000..b3eecd49dea197624540475fc2596608b80c0d5d GIT binary patch literal 21588 zcmeI)b(~e@+W+y@H$6jlNS8>Xz)*s8H`3iDUD915-QAtiqBJUvC|%Mp40W%5zW24) zZ1KF#@8$Ey@4p8;N6$IVat||mulIbe>)xlrfIjWIw{6!pQ}rHg`*v+tJd^Zaex<42 zscV;k^?J8z)1_VSOa=1gFOn~R0ZmROOA`Ji#lfG4EI z0`l~9nQ?Z5qMP*#%e z<6}z27q67W!zHO(r?zdow)?bAzW%NHeR#zqHlIl>ixF2ppjK6mOGW%mZj=*a{b4%1 z9Z$(q^Nw6KZ=0S~#o6bU^Djz`l~ZaGJ+BdmEn<(^Uu-tBjC6*hZBt7ryQQ4|GPi*9 z&^m9v;ap>-WZ9E*V;<8fU-_X z?ay?xIXA82W;Acglk;@E7mqOCm`Uu`&K0-0|4izm+);DtQARShnmuLr*i`n+h-*C7 z=Bing`BDOZoSWLYXdN~m@y0wU&%pcg6sBjUv%5R@+^)VY4OgD4h4czWTDFcoV|Up^ z_P~&g>)K>Br7}fwy}@om=cKjEyvG~h`b>NvPiN{@PJ4*+(jDx_k*6qJEv;8KGO!aJPEEJ#8{tpeQWQuR+(3LO`e!%=A(ITGnG}!p6SH%X8T#> zwMwK`M{i-|Wjk0jyUqr)3&wr@fYx4pDYub+_iDS3?RC~7^E|JL>$CGQys(+ks$ws7 zQh6)<0`hJpt=3#`XB1+4aQz>wKRaz))3<3&)H`y0>6BN&yeQPvT#g zxvl#4CMUbM)h{C-QF3S<^qxjBwhz}|Wxd(Y#sz(qRztlgSC;m9pSu_AS=JQu7%$Hw zc~1TvFKZUETH1S^Lf&D&y8N3`Nb9ZlGfJ_8>=nDry0iVpNqwPKT0Jh8ls0;~-4pgC zYqa?zFUuqNr+g-_Y?idT*vFi*-miWW`MOd{8>|mE%CRGO{7bA8+i4uqr)h=NeR5uD ziI>6MZx6SInfrJYuFuEk^O|NwtDk+*sqS6#JIargs@fQRoKcA#Wijj=Yt1$ryY$go z4t0Z^QJUc;cDLC5t$yZCUL4mK;EQ=9vz9f&zU?&e9{K&{w@L$Tsy@}I$xh(<-&ixY z+Ss5E)Y7Vp6Sl}$u6NTCso%+})X(G29J{U6&RoZf;_-{{^}K`G+L~vZPG3)#rppm(4{e#g z$Y_FVU*Vrom(4Ne=&dzb9VNf>J9v;R+CLJrs)l|w@P36q5rja%Nb$Uv>KU<@q16iOY)t(ui4+)YA1GQ zcp0Tlat?L0wp-t1v|$(U_(xeKHr5!eSJfUV9pyj$YTiYsull~}))=Ul(f(AvmVfcfc*mU1c9d1ooXzv% z^DoN}^D*Wm>x7-x-Q<;!j>~1$h1yB|fYA-lofvk2m16yko_b;JSEagq$S>sm;Iy<0 zS*6YIcrHBuD)6IxsyWNLV1ME6^D0Z1dw+&SVud$MI}<{Z!%S`C@aO_0+EIUh&#VFXi^?A?==i!5G4>;qiB{ zPg!%LwjQaiRkF%6{dnH@PANN;mB$>(v*7v~{CB?E++n@5Te|nWZzMwg&E z;@Iqv&v6gS$Z8m+^!MsiC5}AEf9Vc#a@v}e!5oNtR}x;I-{X7ClU71!uzCEG%5ABZf6}e*F#D+)*X+vE zz@L`IwhB7S+#LQMsf@Bk^|iEyWz1#|*(0`?F_zazqMuY7E9a$h{(iTz<65^( z)$GVq;g9y*;(wYkRw-wTTf{#mRaFkE@$@W)1UDb!pD>@vEVB`Z^gJ5Y^Qvj{wy-m# z=N;39o(J47{R`0Zw3?LkTuge-Vz!am@StZD^vvNeB|XoY?|2J*_Gx%G(ld_Tz&YvG z3F}$Jh=86?*?smMdu=2!Vo1-mq-R#=2K0Q%n~|P9d8GN;OlG%nF1aoJ=cH$Dy`+(x zt;Bc#F6kM^ctm>h!hBa|0vLH#S}xt{bLPkP>f zp2O&G)T{AcaR?!dRl5Jy@v4#+lXiHEjA{sXI$v{((CHV z&OvLld7bpk%!l%IQnABR#Y6vAmG^ ziB;KN=A?$6h2)(|daaq>!6+E$Ie?uq{v^qlp9o+Y4XJ?NRu+fI7s zf}TB$&jUTbVLut?^wrSwf?SF8JP$o52YTk>)1hY((zCF4$gcrCi)g*{{$V}4u>;U^ zzE%c$7KfgB+++4cYfPYLUOtOgGD}&V?GsKJ?>FdqLn)&Tgr4QukGT6@WF1M*=~_Y3 zb8(>O5a?M7ckj=jXRScb8l>kF=s8*+4?U0J?soxtZZdWTdS;Nm^OCrm?S58Y=ve}H z@BDlT={d^2=`{5o`~9G2Bj`B|dLF~$pJUD0O42ipx>$}RJy$@_Zh@YK13jnNPn}NQ zd+4c@@EFr&(jR#8^stP7CYV270cCoQZfb(z6ZpXq33daG4wpc zUbB;|9-C#%g`N`hd<#9FIFq4g3v&f8jO#y#o;}QN(9>{7lb-1UJzGHjSL`^e!KNBh z^oH7-K+l`baJ!b(z+6Ilmf*X1KhiS^^von}lyjwjjINzW?UL+JU3 zU){R^Ju5)Z`Oq^0--CU8m^s4QZ-3%0hMxQ6!s>V0A$@nC=a1}5(z7)5Yyv$?L(fij zDd;(i=OI0RPF<$fw}iBk!B7BI)-wVNcY=QFzw=@|_@4{8qr zJ)@y#Ug%j%Ppqwmp5OcNp=XqxlJv}s*MCjYbC>lNdfq2J`=}?i7tnJ!yMf2w3O(yX zPc5wHSf?QL%wi7XpWyygn_uT!&BK=Lbc3EFq`1)YqQ>=G#u#=7dTnB#uxdsW^qc}c z2l%+hIoWO9N)J6V;{IEY-{-r{Q&u8pkSqC9pyw3zrY0GGLC?Fm|E^_epl2cdDfG0U z=UwQT4tl0A`+lJ3MJp}zOyDn+vO&)$(DS)51^51^&@(CY%n3bvE6%;8(Vj=8!v03IXEfT=4%)L5+Vd{yc@TPDl$!iQ&xdR#+A}TMb1UhY z9qsuU+Vhxk>FGDLNzik$^SmMSY^T1ETT7SFo=@yG)?)JlB&~vNSSiLRRgPx*27oj~*;m#3>pT8&b;?T2!y*beHXC)`K z=jXWdgxWKtXEn5EMQJbE^Su4NHPt-Izr^F`qV_CowL*Iq_I^Zro+Uj81bSX!-PpcB z&tuSY1KRVrJt3@T9zGlG8Pc;X^lU0$Q_5MeiQEo+Ovk$5PIgv*h&&_C0p=YQ)N9jV(4y5O~f9P47@8#b@&jWTwcNys^+Ve+!m(eNQo}bMQo1&jV=B%V^Ja)SkUbzmT5o^c-lY;pgq@HPwcwx?`Y3x zxno$*>(rhhJtLuKW@^tFq-Snw&m_D${{!v06YbfG^mOHro_`u60zI=q&x*QAdX7PR z3Oy4BdM3e7@S;5rqdmL1G0-!fG6H(O*YBV`LwaT+J-IqrVe&x#1@z2;_Dn~5Cd2$q zw5QN>u zb|#RXqCFpL@r)PY_Dsr3qCIbuo=r*5#MGX>s2xM?dDF__%tU(%Jy%nEzD0Y6^i05t z80mDO=PjuQ+OwWxpgoz{4cDhYd%makECfAs_&-Qxm2K3Xjxh^*KBo4}O?oy|E=Xnl zz0lJ}dn#zp)M(GP(DP5ybE{j-KPuIr_RJdAa~|~k#9;bCwX*WFREQ?GAwAoYex0~t z-h-ai(4OT3J(KDA42DO3g3n+UGtr)Ipl3FJiJRZ~3wpjqd#1qTHq@SR?S{~^F7)i6 zT!Eg2jmU6&zA++6&(D;#QcC}OH!JiM?I|X=>A7gnH`Jb2+*YLLJxp#(qdiyQXQ$BQ z*1+U;wwhU)C&l+iV{&^w+@2YDKQ8pli1xhic7vWH(Vm6%ibfht9Ynj1XMY*KehuxJ zOqqnq?Eq@e-R2#d+=kkdS-CK|eTB(we0i#3t5JF_YEPl>7}b!TXiwjr;HQ!oD!Nvg+EeIxgY?q8b`b>1jCwsXZgno-5Fv zUqjv)2rTrRLwb%td$z;mb`sh%q-P=sz7><(9@Z-8InGNgEt7?wn*u#!s68heLeJOG zQ%r8Jlb#JQxy_HyKMH#GBR!M3-+P~6a+^~f7uGWdU&D%QoFVl5OKA^1t9j>~KA7Cr z2--7>AE5R;U}vVu?S4#dXONzq@srOhd=I~5L!f7A?JDV68hUnuo)w|zr_j3`7wtKP zCbwIl=P9)3BJDILw>_Y544y+J13iBwJqw^co1;BTQ+q~YdvKgjGiO^DF}Xe9RfV24 z)wO8PpNu}F=RQ`H^)Q5?qCOl~8zRZ14<8ONL9l(bU>?U^Lp zp6{XO1GJ|HJx`%MWA)s^va<$81+?c}Om4^cjys0hGqX8_Ccky~O}^Ru(Ndl6XwQ*S zg0P-r!js$TMoIl0^fXA%f&ZcBUH${~jDVh!FZ7(E-U{>-lULE6LeD4A(}JFN+-}sK z$;^J#j*a;f=y?f~+wpD$wdZ{386WK#JGo8DN|2ttl&5IVi)c@wXF{`AxIM+>HYeIM zt-oF>jP`ts_7r+PfImwyxh;sv?IlcZZ=gMoqdg7#u^A^kxqZhkpgjvYE8JXxo{}DF z&xg=cv}YbnZcnHUm2;$LCFm*IGo)ub?m*8sR%uLbi}}aVo`DCX`nr; zC_h0@(Vj1@tJr(CfxW4Ds69Qas&k0+{8~AqCeuH~-g61c^&#n*2JN{8?YUDDdW!Zu zi}q|udUoaU%x7jCyAk%Db^W{8d;ShRi=sVO;CCOI+$J_&p*=rSR!gbSo>`r1q-Qhy z>>~D_qCLgr_A1&lTI#FZRdeg5pyz6Q_wKSO*n2YLFKtd(&y@ervoG}Y(4IY=2hh`% zMq%$+1bT)hw;??}{kk>*?J4x^4?U05-cw9&Kf&HJy(#n@>co(qq4unWz2|1=b&K|% zZ=mPUK+n$9o*PNeB-EbSu=gxtPr&4MBJ^B@y=P^;5$!!idwz?_?Q`ha6Ybekx(z*F zqdiw*?^zu`J7?u1`KP4kY|=A3^h}D$Z42YmU~)SMd(S)6p3l&pv3f2v&th^LN$n~0 ztcuBP8t7RVd(RA*+;*b&e2F_iU+g{qKzlY)Z=pSpdtU~6o}~5+>6yoBi1y40JRY=btyrR^eQ_!B}arYJN`6cPOKhX0W+Osz%w`JHN+^c3wm4|>)o zJwxre1e4nY>QrjachIv{u=h+zliT)YdrWQ}Ol}RdXJY8Nk|wvYd(V)bk~&;|?RUWB zc9Pu)daelXJ$qp9xyp`%_Dm`*mD5vut}$BTbB{rPSEtEsJuL>4+XsGQwCA_jd)BA+ zjKJ4mH}o86Z9{tsJvYm_0zKQ|YahdY!rpTX_MVls2hj6spl1crGcTThV(x=d*fW2oGv}XZtH}ot(d(WJB{e<+KV_mX~L(eMG6}c8oZjaIA_7&TU z$!$02DJHj3&@&4rx3x*niI}?xJczq?!noi1z#h?HL#CDfB#uy=TK$LJtLs!M6{>Sb20R+5^hg1xxIqD=P|7p z+EeJ+l-l!eJwxqThT3zkp97QIq*{IGnUD0mhEqf5FuC1}$?bEw74)oy_FQ8vz^S1s zc=cxE<8f+8=(!wvu7;j_pl5TM-0sDz=TB-+p{Hoiy3n&6={fTs?U@&+hPFb_9nkY< zC9l>Id(SVh_k4xjQ7?9c^sK6$$K-Yo^gM^j?PT+3(la-ofxTx@>^%=SMZF_vPod{G z`an!>g`QVf7n~Y8q0d8m9+iusJwtkqLVK2hzMrB!tC&$%H~SP$4W0FyWA7Q#vjR>H zy+V6-4D>7z=$Q_Bev8TNUUX9=c5fj)2LyU{L3;{4#~W3H_H2#z+@X&|d#;nyqdg6$5nG7%?1IVdRJ7+e-aDKcYDs#Ey=PIr0h8PI)_mJ? z26%CxXQbK_?YWfNQ=A&AgZ7+__Vkqzat!o*>`eSX&(G1GJ*Yi}p2^Xk>9P0Rq_4r` z_AEaC6VP*tF4!Q}QLzJH=U#~LHi zo#9qp3T zo}s>Yu=mU#=vfVuThX4+?D}ZW4$>>RGxYom zd(WZa_H1g@r1ty-d(SxDbm*DV%7w|TIQ3J5CbzqwXPZFJzUpc1CG97>% zbcUckzmrlcQv*FGqFiFzvjEz2n8MMXLeDg|13mkM^*n<1Ooz#>&@(&qd`fywBYnl* zvxJddze##F!Q{3D+EeJ+gY;|0U*XhHNYC{C2DImD^_`Z?c!Ty7d&{NJQ?%y=wY73n zs*d)oi}rkk_WWDV3+9tR&%IJPWjpl5DOWl*^q4KgsiE9PV$$1 zpP1ZUGvA^;x4ECAJ!?YG1bS9O4NeUSJ;mg9pIRx(DOdpGs;MT_7s!X$=G`uXwO-Jo}=6p)SeIN)KF-0 z>yw@jNYByGv#?&tNJo>~+nC%6J+GlX#pKrU`l3CLk)HMO?9IdnqdnuIJ%^z^hhlO& zU2$;cwx*F88+S3e9gWHD8~q&G)4<;Inb(>0+!*XVGx6crdnSRN;~m+X=%+?|#-aAi zNoQ_j^*l;?b`SL2hW5OSS5Bxs^O|X`()JuD5hk}eB2v}eme&+BXuJCF9=sNYAs-b5hWrdC;C>a@)oh z?fEnGJg*c*dk!>8^%?YQ*df%x138_=%sV_LeIg_GjwVwR?o{$ZM0`s`KeNa^sJ1X-7EA{s69t& zS)pe-v}c67F|4OJbGwu`HtS$=dlz~>_6N!wdVYt=t!U2}(sP9&^h~8Lp!QVVrFIug zZa34JTXAZrmD$9aj`r;8nKZc-dd>^l^KU&9sFMRdMSHfTy=MgU6lZSRTMMA)AhhSq zpgot;ncLXO?JVf&k)G{I&jxhnwjlHsliQwX&(+kP$))9T2I#q2UrT#WF}W3bPQv6i zM(K_AY)I`{9qk!==2o=lAhc(4cNXcH8|}GA-x8b}5_``v#t5|MeWe}Rv#R$SCb#9o zdY0k`F}WRO9YT99hn@$a=l7W0?lC&kncX9-EE^i=*+@Q#_WT)oiplNwm^+Bct_B>2`&uBVx+XwBLpY+@hJ@-IQ(Vo-Lt`YbN?gZ(11?_ndliRCkPcgYY z7U;PjliO~F(DRT|0(;NQ-g>lWPV7A=2YXMU=W^>#SkLBY&l}X9*P&Nzd#2X5E1$|s z13fcB&vAI|B}RJ+JvUma%6rnYi<8ziacbzB;MC9){!^f5q`w4uE+9Q$8q-MMmC&;|Cbu`B=M$+3 zCbuo9Jrm)~Z93FT3!EAX={d(u?{9>jYoMoS&kyxXM|$3Xp2wi49_X1Gezit>3Ox&> zJ@fecu=m`d%B1HU+Ix!0Z7$NYKH5|0`Bk82d)m9U;~wc*hV(oEJ%6P3R57^~lh=@* z2I+YOliT&K(DMq~Q|OtRcSd{OM|)O>o?rP_s6A8S%xygADc-R%llGoA+Oq`OGYi@? zANHQV(d1T4Uc2%5&@;Z>*g1nUx1v3Tp2Y$^AF%1rGt!8Lp81qj*n0{+uUR2IlVR`K zizkJi$*DbCV{+RMdW!Z;8J^re4eL3F+B1c7&N_foL!v!}o~fxldt-7d+H7n9p@q^IrmbK}zF_71O0?K+s+GY|B9L+v>od(Sd@ZE8<3c@=uT*3WB$Ri+G) zoPSUfU-iju-(U`mrW@nAN(6cq#v!!&N^j!T9J&RC#u5i+!J&T|{ zGf{gM#?&g*o+mN6-Hi6UCD*3*{1c~!zQ>u{ub`Kh+zLG#p*?eWyP)S$>^(c`y+7D{ z9tre34?TB#MO>k0YE7*JPHIAV@OQ}DjJ=c1< zpyzn(JrAN=B5`tL4%)Lc=~*6nwvcZs6Yd!-5V z{EkiyiOFp8uCbt`~_iSe^#HpcyXwUEEB-EbEpy#jn{7+JQhV&ec_H6Gxawgaf zt)@6NR1kW6!M9O+3O&bDduD{5Tc|zH;qi~+%`W zoEqwkseLr|o*_L;V(-~dKINChjX6Ls`(cV*>xjn(BqdhO%C84Ki&pJ3YbWuMJJ;j;Z(B!ra^gM|6+yp(> zQF|6MC*Zj+&fNaW=RnWfc4haB*F<`N$?Z<^*Pb^|u3)ThX2gF}ckIJsI>Yj=g8DKu^)0Ys@{C z2|fSv`eJh1Pd%fF$?eGC9V^+WJ!NeUCbvS*QE1NuALx0VZ!?cT&+hJ9>^&2bo+k7h zhwGoyh)SmH;m)LuXQ$M0TiyLBc+e3LQeeGX>o)KtIp{F?Y z(;Rx9Hg8+GoLD{AQhUB5Js)Fon*i;Z2B(HvE7x#p=qTy=5T}Mh?fJK!E1~CpwC7H= zXL@Q+ab|WA)6t%hXwL@9Z&GQ059xUe?b#moiS~@ua|hbzLe1c6H}4^t>!JQ+`oXU~(HTd}@f})R3iZ#N>7d z^jw6!=Y8u}Om3UwcmKDZjhtVx_q;E4hMu2<^}I*#SV;sum!dsaNhzRbX6Mg;=$Y7j zkI8L&=MPutIRKN}ym}ezJ=f6WcM|rVqCID-nUpzF987MLJ7;lf=r4Td#QQz_^Hk6? zlil0-%k3G~Q?%y>Odjr_J?}%$Yub1`#NIO#-m#L=jAIEsU%SKn zglJD&EsIk_nS;IONa*<%lUt$ZVCdNqdLFPgpgn8-L(j>M^!z>0 zlS9v&&@+bgyo|l4(03H}o@t<`XwP|mE_nk^4b_L9pN03HXVISfwN~m=wC8!RCfai~ zCbwsKWxRT`)8sabRo#x&bFY$7Yk|FIVQSCNsiEKXEm{Nh2HNweS2o<9v3i!I_T1{^ z@^<6Y&@t%QN$-Wp?E&0{ozb2`&mw5gmS!{T zJ)_Z{7AChLJ?9z?XzzKNCbvuU&RRUuvv;7UXwT5(b|batLfa)hXF|_j+A2(L8$<4B zn%sVm$!!a?=eN+aE%cmdHy}L=g!SxYtqJrL?Ky<>Y)O;bQRnSrL=lw({?OWwfWzvl>nfiBmtN zacU@}XJ$-p3rGj#;-sh8d&cTH1bfdC(6a%x=TFeHgjIpsGlJT4yeag|=Wg>#L(lT+ z673B1>_KO4_hawb$LL0SR+9JmpFvMCxs8IJLcfrnb4kxb(DSNX8+u+2+EeH$+Ov(G z6?#U=8%WPu)Si>*{hpO+@44K%8`iVAx{KO#0Df|PiBm)Qp=T34wYH7gGpV-_liLi| zXF+?$>iGigc@2}>*O=V?NP3FNt=N0!4)k1s_WaH_Fu5&ZCkrOGiE$4R?YY~saBAo= z^pup4p4WoCr + +#ifdef __cplusplus +extern "C" { +#endif + +extern uint32_t _binary_xm_middle_c_xm_start __asm("_binary_xm_middle_c_xm_start"); +extern uint32_t _binary_xm_middle_c_xm_end __asm("_binary_xm_middle_c_xm_end"); +extern uint32_t _binary_xm_middle_c_xm_size __asm("_binary_xm_middle_c_xm_size"); + +#ifdef __cplusplus +} +#endif