romdev-mcp 0.1.1

package/src/platforms/gba/lib/libtonc/src/asm/clr_fade_fast.s

@@ -0,0 +1,74 @@
+//
+//	Color fade with 33 alpha levels
+//
+//! \file tonc_memcpy.s
+//! \author J Vijn
+//! \date 20071130 - 20071130
+
+#include "tonc_asminc.h"
+
+#ifndef CLR_ROUND
+#define CLR_ROUND 1
+#endif
+
+/*
+void clr_fade_fast(COLOR *src, COLOR clr, COLOR *dst, 
+	int nclrs, u32 alpha) IWRAM_CODE;
+*/
+//!	Fades color arrays \a srca to \a clr into \a dst.
+/*!	\param src	Source array.
+*	\param clr	Final color (at alpha=32).
+*	\param dst	Destination array.
+*	\param nclrs	Number of colors.
+*	\param alpha	Blend weight (range: 0-32).
+*	\note u32 version, 2 clrs/loop. Loop: 18i/32c, Barrel shifter FTW.
+*/
+	.section .iwram,"ax", %progbits
+	.align 2
+	.arm
+	.global clr_fade_fast
+clr_fade_fast:
+	movs	r3, r3, lsr #1			@ adjust nclrs for u32 run
+	bxeq	lr						@ quit on nclrs=0
+	ldr		r12, [sp]				@ get alpha from stack
+	stmfd	sp!, {r4-r10, lr}
+#if(CLR_ROUND==1)
+	ldr		lr, =0x00200401			@ -1-|1-1
+	rsb		r7, lr, lr, lsl #5		@ MASKLO: -g-|b-r
+#else
+	ldr		r7, =0x03E07C1F			@ MASKLO: -g-|b-r
+#endif
+	mov		r6, r7, lsl #5			@ MASKHI: g-|b-r-
+
+	@ Precalc y1 and y2
+	orr		r1, r1, r1, lsl #16
+	and		r9, r7, r1, ror #16		@ precalc: y2= -g-|b-r (ror16)
+	and		r1, r7, r1				@ precalc: y1= -g-|b-r
+.Lfade_fast_loop:
+		ldr		r8, [r0], #4			@ a= *pa++
+		@ --- -g-|b-r
+		and		r4, r6, r8, lsl #5		@ x/32: (-g-|b-r)
+		sub		r5, r1, r4, lsr #5		@ z: y1-x
+		mla		r4, r5, r12, r4			@ z: (y1-x)*w + x*32
+#if(CLR_ROUND==1)
+		add		r4, r4, lr, lsl #4		@ round
+#endif
+		and		r10, r7, r4, lsr #5		@ blend(-g-|b-r)			
+		@ --- b-r|-g- (rotated by 16 for great awesome)
+		and		r4, r6, r8, ror #11		@ x/32: -g-|b-r (ror16)
+		sub		r5, r9, r4, lsr #5		@ z: y2-x
+		mla		r4, r5, r12, r4			@ z: (y2-x)*w + x*32
+#if(CLR_ROUND==1)
+		add		r4, r4, lr, lsl #4		@ round
+#endif
+		and		r4, r7, r4, lsr #5		@ blend(-g-|b-r (ror16))
+		@ --- mix -g-|b-r and b-r|-g-
+		orr		r10, r10, r4, ror #16
+		@ --- write faded, loop
+		str		r10, [r2], #4			@ *dst++= c
+		subs	r3, r3, #1
+		bgt		.Lfade_fast_loop		
+	ldmfd	sp!, {r4-r10, lr}
+	bx		lr
+
+@ EOF

package/src/platforms/gba/lib/libtonc/src/asm/div_lut.s

@@ -0,0 +1,54 @@
+@ ======================================================================
+@	  Look-Up Tables
+@		div_lut: ceil(2^16/x)
+@
+@	Exported by Cearn's excellut v1.0
+@	(comments, kudos, flames to daytshen@hotmail.com)
+@
+@ ======================================================================
+
+	.section .rodata
+@ -----------------------------------------------------------------------
+@ div_lut: a 257 long LUT of 32bit values in 16.16 format
+@ ceil(1/x)
+	.global	div_lut
+	.align	2
+div_lut:
+	.word	0x7FFFFFFF,0x00010000,0x00008000,0x00005556,0x00004000,0x00003334,0x00002AAB,0x00002493
+	.word	0x00002000,0x00001C72,0x0000199A,0x00001746,0x00001556,0x000013B2,0x0000124A,0x00001112
+	.word	0x00001000,0x00000F10,0x00000E39,0x00000D7A,0x00000CCD,0x00000C31,0x00000BA3,0x00000B22
+	.word	0x00000AAB,0x00000A3E,0x000009D9,0x0000097C,0x00000925,0x000008D4,0x00000889,0x00000843
+	.word	0x00000800,0x000007C2,0x00000788,0x00000751,0x0000071D,0x000006EC,0x000006BD,0x00000691
+	.word	0x00000667,0x0000063F,0x00000619,0x000005F5,0x000005D2,0x000005B1,0x00000591,0x00000573
+	.word	0x00000556,0x0000053A,0x0000051F,0x00000506,0x000004ED,0x000004D5,0x000004BE,0x000004A8
+	.word	0x00000493,0x0000047E,0x0000046A,0x00000457,0x00000445,0x00000433,0x00000422,0x00000411
+
+	.word	0x00000400,0x000003F1,0x000003E1,0x000003D3,0x000003C4,0x000003B6,0x000003A9,0x0000039C
+	.word	0x0000038F,0x00000382,0x00000376,0x0000036A,0x0000035F,0x00000354,0x00000349,0x0000033E
+	.word	0x00000334,0x0000032A,0x00000320,0x00000316,0x0000030D,0x00000304,0x000002FB,0x000002F2
+	.word	0x000002E9,0x000002E1,0x000002D9,0x000002D1,0x000002C9,0x000002C1,0x000002BA,0x000002B2
+	.word	0x000002AB,0x000002A4,0x0000029D,0x00000296,0x00000290,0x00000289,0x00000283,0x0000027D
+	.word	0x00000277,0x00000271,0x0000026B,0x00000265,0x0000025F,0x0000025A,0x00000254,0x0000024F
+	.word	0x0000024A,0x00000244,0x0000023F,0x0000023A,0x00000235,0x00000231,0x0000022C,0x00000227
+	.word	0x00000223,0x0000021E,0x0000021A,0x00000215,0x00000211,0x0000020D,0x00000209,0x00000205
+
+	.word	0x00000200,0x000001FD,0x000001F9,0x000001F5,0x000001F1,0x000001ED,0x000001EA,0x000001E6
+	.word	0x000001E2,0x000001DF,0x000001DB,0x000001D8,0x000001D5,0x000001D1,0x000001CE,0x000001CB
+	.word	0x000001C8,0x000001C4,0x000001C1,0x000001BE,0x000001BB,0x000001B8,0x000001B5,0x000001B3
+	.word	0x000001B0,0x000001AD,0x000001AA,0x000001A7,0x000001A5,0x000001A2,0x0000019F,0x0000019D
+	.word	0x0000019A,0x00000198,0x00000195,0x00000193,0x00000190,0x0000018E,0x0000018B,0x00000189
+	.word	0x00000187,0x00000184,0x00000182,0x00000180,0x0000017E,0x0000017B,0x00000179,0x00000177
+	.word	0x00000175,0x00000173,0x00000171,0x0000016F,0x0000016D,0x0000016B,0x00000169,0x00000167
+	.word	0x00000165,0x00000163,0x00000161,0x0000015F,0x0000015D,0x0000015B,0x00000159,0x00000158
+
+	.word	0x00000156,0x00000154,0x00000152,0x00000151,0x0000014F,0x0000014D,0x0000014B,0x0000014A
+	.word	0x00000148,0x00000147,0x00000145,0x00000143,0x00000142,0x00000140,0x0000013F,0x0000013D
+	.word	0x0000013C,0x0000013A,0x00000139,0x00000137,0x00000136,0x00000134,0x00000133,0x00000131
+	.word	0x00000130,0x0000012F,0x0000012D,0x0000012C,0x0000012A,0x00000129,0x00000128,0x00000126
+	.word	0x00000125,0x00000124,0x00000122,0x00000121,0x00000120,0x0000011F,0x0000011D,0x0000011C
+	.word	0x0000011B,0x0000011A,0x00000119,0x00000117,0x00000116,0x00000115,0x00000114,0x00000113
+	.word	0x00000112,0x00000110,0x0000010F,0x0000010E,0x0000010D,0x0000010C,0x0000010B,0x0000010A
+	.word	0x00000109,0x00000108,0x00000107,0x00000106,0x00000105,0x00000104,0x00000103,0x00000102
+	.word	0x00000100
+	
+	.size	div_lut, .-div_lut

package/src/platforms/gba/lib/libtonc/src/asm/sin_lut.s

@@ -0,0 +1,90 @@
+@ ======================================================================
+@	  Look-Up Tables
+@		sin_lut: sin(x*pi/256)
+@
+@	Exported by Cearn's excellut v1.0
+@	(comments, kudos, flames to daytshen@hotmail.com)
+@
+@ ======================================================================
+
+	.section .rodata
+@ -----------------------------------------------------------------------
+@ sin_lut: a 514 long LUT of 16bit values in 4.12 format
+@ sin(x*pi/256)
+	.global	sin_lut
+	.align	2
+sin_lut:
+	.hword	0x0000,0x0032,0x0064,0x0096,0x00C8,0x00FB,0x012D,0x015F
+	.hword	0x0191,0x01C3,0x01F5,0x0227,0x0259,0x028A,0x02BC,0x02ED
+	.hword	0x031F,0x0350,0x0381,0x03B2,0x03E3,0x0413,0x0444,0x0474
+	.hword	0x04A5,0x04D5,0x0504,0x0534,0x0563,0x0593,0x05C2,0x05F0
+	.hword	0x061F,0x064D,0x067B,0x06A9,0x06D7,0x0704,0x0731,0x075E
+	.hword	0x078A,0x07B7,0x07E2,0x080E,0x0839,0x0864,0x088F,0x08B9
+	.hword	0x08E3,0x090D,0x0936,0x095F,0x0987,0x09B0,0x09D7,0x09FF
+	.hword	0x0A26,0x0A4D,0x0A73,0x0A99,0x0ABE,0x0AE3,0x0B08,0x0B2C
+
+	.hword	0x0B50,0x0B73,0x0B96,0x0BB8,0x0BDA,0x0BFC,0x0C1D,0x0C3E
+	.hword	0x0C5E,0x0C7D,0x0C9D,0x0CBB,0x0CD9,0x0CF7,0x0D14,0x0D31
+	.hword	0x0D4D,0x0D69,0x0D84,0x0D9F,0x0DB9,0x0DD2,0x0DEB,0x0E04
+	.hword	0x0E1C,0x0E33,0x0E4A,0x0E60,0x0E76,0x0E8B,0x0EA0,0x0EB4
+	.hword	0x0EC8,0x0EDB,0x0EED,0x0EFF,0x0F10,0x0F21,0x0F31,0x0F40
+	.hword	0x0F4F,0x0F5D,0x0F6B,0x0F78,0x0F85,0x0F91,0x0F9C,0x0FA7
+	.hword	0x0FB1,0x0FBA,0x0FC3,0x0FCB,0x0FD3,0x0FDA,0x0FE1,0x0FE7
+	.hword	0x0FEC,0x0FF0,0x0FF4,0x0FF8,0x0FFB,0x0FFD,0x0FFE,0x0FFF
+
+	.hword	0x1000,0x0FFF,0x0FFE,0x0FFD,0x0FFB,0x0FF8,0x0FF4,0x0FF0
+	.hword	0x0FEC,0x0FE7,0x0FE1,0x0FDA,0x0FD3,0x0FCB,0x0FC3,0x0FBA
+	.hword	0x0FB1,0x0FA7,0x0F9C,0x0F91,0x0F85,0x0F78,0x0F6B,0x0F5D
+	.hword	0x0F4F,0x0F40,0x0F31,0x0F21,0x0F10,0x0EFF,0x0EED,0x0EDB
+	.hword	0x0EC8,0x0EB4,0x0EA0,0x0E8B,0x0E76,0x0E60,0x0E4A,0x0E33
+	.hword	0x0E1C,0x0E04,0x0DEB,0x0DD2,0x0DB9,0x0D9F,0x0D84,0x0D69
+	.hword	0x0D4D,0x0D31,0x0D14,0x0CF7,0x0CD9,0x0CBB,0x0C9D,0x0C7D
+	.hword	0x0C5E,0x0C3E,0x0C1D,0x0BFC,0x0BDA,0x0BB8,0x0B96,0x0B73
+
+	.hword	0x0B50,0x0B2C,0x0B08,0x0AE3,0x0ABE,0x0A99,0x0A73,0x0A4D
+	.hword	0x0A26,0x09FF,0x09D7,0x09B0,0x0987,0x095F,0x0936,0x090D
+	.hword	0x08E3,0x08B9,0x088F,0x0864,0x0839,0x080E,0x07E2,0x07B7
+	.hword	0x078A,0x075E,0x0731,0x0704,0x06D7,0x06A9,0x067B,0x064D
+	.hword	0x061F,0x05F0,0x05C2,0x0593,0x0563,0x0534,0x0504,0x04D5
+	.hword	0x04A5,0x0474,0x0444,0x0413,0x03E3,0x03B2,0x0381,0x0350
+	.hword	0x031F,0x02ED,0x02BC,0x028A,0x0259,0x0227,0x01F5,0x01C3
+	.hword	0x0191,0x015F,0x012D,0x00FB,0x00C8,0x0096,0x0064,0x0032
+
+	.hword	0x0000,0xFFCE,0xFF9C,0xFF6A,0xFF38,0xFF05,0xFED3,0xFEA1
+	.hword	0xFE6F,0xFE3D,0xFE0B,0xFDD9,0xFDA7,0xFD76,0xFD44,0xFD13
+	.hword	0xFCE1,0xFCB0,0xFC7F,0xFC4E,0xFC1D,0xFBED,0xFBBC,0xFB8C
+	.hword	0xFB5B,0xFB2B,0xFAFC,0xFACC,0xFA9D,0xFA6D,0xFA3E,0xFA10
+	.hword	0xF9E1,0xF9B3,0xF985,0xF957,0xF929,0xF8FC,0xF8CF,0xF8A2
+	.hword	0xF876,0xF849,0xF81E,0xF7F2,0xF7C7,0xF79C,0xF771,0xF747
+	.hword	0xF71D,0xF6F3,0xF6CA,0xF6A1,0xF679,0xF650,0xF629,0xF601
+	.hword	0xF5DA,0xF5B3,0xF58D,0xF567,0xF542,0xF51D,0xF4F8,0xF4D4
+
+	.hword	0xF4B0,0xF48D,0xF46A,0xF448,0xF426,0xF404,0xF3E3,0xF3C2
+	.hword	0xF3A2,0xF383,0xF363,0xF345,0xF327,0xF309,0xF2EC,0xF2CF
+	.hword	0xF2B3,0xF297,0xF27C,0xF261,0xF247,0xF22E,0xF215,0xF1FC
+	.hword	0xF1E4,0xF1CD,0xF1B6,0xF1A0,0xF18A,0xF175,0xF160,0xF14C
+	.hword	0xF138,0xF125,0xF113,0xF101,0xF0F0,0xF0DF,0xF0CF,0xF0C0
+	.hword	0xF0B1,0xF0A3,0xF095,0xF088,0xF07B,0xF06F,0xF064,0xF059
+	.hword	0xF04F,0xF046,0xF03D,0xF035,0xF02D,0xF026,0xF01F,0xF019
+	.hword	0xF014,0xF010,0xF00C,0xF008,0xF005,0xF003,0xF002,0xF001
+
+	.hword	0xF000,0xF001,0xF002,0xF003,0xF005,0xF008,0xF00C,0xF010
+	.hword	0xF014,0xF019,0xF01F,0xF026,0xF02D,0xF035,0xF03D,0xF046
+	.hword	0xF04F,0xF059,0xF064,0xF06F,0xF07B,0xF088,0xF095,0xF0A3
+	.hword	0xF0B1,0xF0C0,0xF0CF,0xF0DF,0xF0F0,0xF101,0xF113,0xF125
+	.hword	0xF138,0xF14C,0xF160,0xF175,0xF18A,0xF1A0,0xF1B6,0xF1CD
+	.hword	0xF1E4,0xF1FC,0xF215,0xF22E,0xF247,0xF261,0xF27C,0xF297
+	.hword	0xF2B3,0xF2CF,0xF2EC,0xF309,0xF327,0xF345,0xF363,0xF383
+	.hword	0xF3A2,0xF3C2,0xF3E3,0xF404,0xF426,0xF448,0xF46A,0xF48D
+
+	.hword	0xF4B0,0xF4D4,0xF4F8,0xF51D,0xF542,0xF567,0xF58D,0xF5B3
+	.hword	0xF5DA,0xF601,0xF629,0xF650,0xF679,0xF6A1,0xF6CA,0xF6F3
+	.hword	0xF71D,0xF747,0xF771,0xF79C,0xF7C7,0xF7F2,0xF81E,0xF849
+	.hword	0xF876,0xF8A2,0xF8CF,0xF8FC,0xF929,0xF957,0xF985,0xF9B3
+	.hword	0xF9E1,0xFA10,0xFA3E,0xFA6D,0xFA9D,0xFACC,0xFAFC,0xFB2B
+	.hword	0xFB5B,0xFB8C,0xFBBC,0xFBED,0xFC1D,0xFC4E,0xFC7F,0xFCB0
+	.hword	0xFCE1,0xFD13,0xFD44,0xFD76,0xFDA7,0xFDD9,0xFE0B,0xFE3D
+	.hword	0xFE6F,0xFEA1,0xFED3,0xFF05,0xFF38,0xFF6A,0xFF9C,0xFFCE
+	.hword	0x0000,0x0032
+	
+	.size	sin_lut, .-sin_lut

package/src/platforms/gba/lib/libtonc/src/asm/tonc_bios.s

@@ -0,0 +1,289 @@
+//
+//	Main GBA BIOS functions.
+//
+//! \file tonc_bios.s
+//! \author J Vijn
+//! \date 20071130 - 20090801
+
+#include "tonc_asminc.h"
+
+@ === SoftReset [00h] =================================================
+@ DECL: void SoftReset();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoftReset, CSEC_TEXT)
+	swi		0x00
+	bx		lr
+END_FUNC(SoftReset)
+
+@ === RegisterRamReset [01h] ==========================================
+@ DECL: void RegisterRamReset(u32 flags);
+@ DESC: 
+BEGIN_FUNC_THUMB(RegisterRamReset, CSEC_TEXT)
+	swi		0x01
+	bx		lr
+END_FUNC(RegisterRamReset)
+
+@ === Halt [02h] ======================================================
+@ DECL: void Halt();
+@ DESC: 
+BEGIN_FUNC_THUMB(Halt, CSEC_TEXT)
+	swi		0x02
+	bx		lr
+END_FUNC(Halt)
+
+@ === Stop [03h] ======================================================
+@ DECL: void Stop();
+@ DESC: 
+BEGIN_FUNC_THUMB(Stop, CSEC_TEXT)
+	swi		0x03
+	bx		lr
+END_FUNC(Stop)
+
+@ === IntrWait [04h] ==================================================
+@ DECL: void IntrWait(u32 flagClear, u32 irq);
+@ DESC: 
+BEGIN_FUNC_THUMB(IntrWait, CSEC_TEXT)
+	swi		0x04
+	bx		lr
+END_FUNC(IntrWait)
+
+@ === VBlankIntrWait [05h] ============================================
+@ DECL: void VBlankIntrWait();
+@ DESC: 
+BEGIN_FUNC_THUMB(VBlankIntrWait, CSEC_TEXT)
+	swi		0x05
+	bx		lr
+END_FUNC(VBlankIntrWait)
+
+@ === Div [06h] =======================================================
+@ DECL: s32 Div(s32 num, s32 den);
+@ DESC: 
+BEGIN_FUNC_THUMB(Div, CSEC_TEXT)
+	swi		0x06
+	bx		lr
+END_FUNC(Div)
+
+@ === DivArm [07h] ====================================================
+@ DECL: s32 DivArm(s32 den, s32 num);
+@ DESC: 
+BEGIN_FUNC_THUMB(DivArm, CSEC_TEXT)
+	swi		0x07
+	bx		lr
+END_FUNC(DivArm)
+
+@ === Sqrt [08h] ======================================================
+@ DECL: u32 Sqrt(u32 num);
+@ DESC: 
+BEGIN_FUNC_THUMB(Sqrt, CSEC_TEXT)
+	swi		0x08
+	bx		lr
+END_FUNC(Sqrt)
+
+@ === ArcTan [09h] ====================================================
+@ DECL: s16 ArcTan(s16 dydx);
+@ DESC: 
+BEGIN_FUNC_THUMB(ArcTan, CSEC_TEXT)
+	swi		0x09
+	bx		lr
+END_FUNC(ArcTan)
+
+@ === ArcTan2 [0Ah] ===================================================
+@ DECL: s16 ArcTan2(s16 x, s16 y);
+@ DESC: 
+BEGIN_FUNC_THUMB(ArcTan2, CSEC_TEXT)
+	swi		0x0A
+	bx		lr
+END_FUNC(ArcTan2)
+
+@ === CpuSet [0Bh] ====================================================
+@ DECL: void CpuSet(const void *src, void *dst, u32 mode);
+@ DESC: 
+BEGIN_FUNC_THUMB(CpuSet, CSEC_TEXT)
+	swi		0x0B
+	bx		lr
+END_FUNC(CpuSet)
+
+@ === CpuFastSet [0Ch] ================================================
+@ DECL: void CpuFastSet(const void *src, void *dst, u32 mode);
+@ DESC: 
+BEGIN_FUNC_THUMB(CpuFastSet, CSEC_TEXT)
+	swi		0x0C
+	bx		lr
+END_FUNC(CpuFastSet)
+
+@ === BiosCheckSum [0Dh] ================================================
+@ DECL: u32 BiosCheckSum();
+@ DESC: 
+BEGIN_FUNC_THUMB(BiosCheckSum, CSEC_TEXT)
+	swi		0x0D
+	bx		lr
+END_FUNC(BiosCheckSum)
+
+@ === BgAffineSet [0Eh] ===============================================
+@ DECL: void ObjAffineSet(const ObjAffineSource *src, void *dst, s32 num, s32 offset);
+@ DESC: 
+BEGIN_FUNC_THUMB(BgAffineSet, CSEC_TEXT)
+	swi		0x0E
+	bx		lr
+END_FUNC(BgAffineSet)
+
+@ === ObjAffineSet [0Fh] ==============================================
+@ DECL: void BgAffineSet(const BGAffineSource *src, BGAffineDest *dst, s32 num);
+@ DESC: 
+BEGIN_FUNC_THUMB(ObjAffineSet, CSEC_TEXT)
+	swi		0x0F
+	bx		lr
+END_FUNC(ObjAffineSet)
+
+@ === BitUnPack [10h] =================================================
+@ DECL: void BitUnPack(const void *src, void *dst, BUP *bup);
+@ DESC: 
+BEGIN_FUNC_THUMB(BitUnPack, CSEC_TEXT)
+	swi		0x10
+	bx		lr
+END_FUNC(BitUnPack)
+
+@ === LZ77UnCompWram [11h] ============================================
+@ DECL: void LZ77UnCompWram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(LZ77UnCompWram, CSEC_TEXT)
+	swi		0x11
+	bx		lr
+END_FUNC(LZ77UnCompWram)
+
+@ === LZ77UnCompVram [12h] ============================================
+@ DECL: void LZ77UnCompVram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(LZ77UnCompVram, CSEC_TEXT)
+	swi		0x12
+	bx		lr
+END_FUNC(LZ77UnCompVram)
+
+@ === HuffUnComp [13h] ================================================
+@ DECL: void HuffUnComp(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(HuffUnComp, CSEC_TEXT)
+	swi		0x13
+	bx		lr
+END_FUNC(HuffUnComp)
+
+@ === RLUnCompWram [14h] ==============================================
+@ DECL: void RLUnCompWram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(RLUnCompWram, CSEC_TEXT)
+	swi		0x14
+	bx		lr
+END_FUNC(RLUnCompWram)
+
+@ === RLUnCompVram [15h] ==============================================
+@ DECL: void RLUnCompVram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(RLUnCompVram, CSEC_TEXT)
+	swi		0x15
+	bx		lr
+END_FUNC(RLUnCompVram)
+
+@ === Diff8bitUnFilterWram [16h] ======================================
+@ DECL: void Diff8bitUnFilterWram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(Diff8bitUnFilterWram, CSEC_TEXT)
+	swi		0x16
+	bx		lr
+END_FUNC(Diff8bitUnFilterWram)
+
+@ === Diff8bitUnFilterVram [17h] ======================================
+@ DECL: void Diff8bitUnFilterVram(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(Diff8bitUnFilterVram, CSEC_TEXT)
+	swi		0x17
+	bx		lr
+END_FUNC(Diff8bitUnFilterVram)
+
+@ === Diff16bitUnFilter [18h] =========================================
+@ DECL: void Diff16bitUnFilter(const void *src, void *dst);
+@ DESC: 
+BEGIN_FUNC_THUMB(Diff16bitUnFilter, CSEC_TEXT)
+	swi		0x18
+	bx		lr
+END_FUNC(Diff16bitUnFilter)
+
+@ === SoundBias [19h] =================================================
+@ DECL: void SoundBias(u32 bias);
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundBias, CSEC_TEXT)
+	swi		0x19
+	bx		lr
+END_FUNC(SoundBias)
+
+@ === SoundDriverInit [1Ah] ===========================================
+@ DECL: void SoundDriverInit(void *src);
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverInit, CSEC_TEXT)
+	swi		0x1A
+	bx		lr
+END_FUNC(SoundDriverInit)
+
+@ === SoundDriverMode [1Bh] ===========================================
+@ DECL: void SoundDriverMode(u32 mode);
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverMode, CSEC_TEXT)
+	swi		0x1B
+	bx		lr
+END_FUNC(SoundDriverMode)
+
+@ === SoundDriverMain [1Ch] ===========================================
+@ DECL: void SoundDriverMain();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverMain, CSEC_TEXT)
+	swi		0x1C
+	bx		lr
+END_FUNC(SoundDriverMain)
+
+@ === SoundDriverVSync [1Dh] ==========================================
+@ DECL: void SoundDriverVSync();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverVSync, CSEC_TEXT)
+	swi		0x1D
+	bx		lr
+END_FUNC(SoundDriverVSync)
+
+@ === SoundChannelClear [1Eh] =========================================
+@ DECL: void SoundChannelClear();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundChannelClear, CSEC_TEXT)
+	swi		0x1E
+	bx		lr
+END_FUNC(SoundChannelClear)
+
+@ === MidiKey2Freq [1Fh] ==============================================
+@ DECL: u32 MidiKey2Freq(void *wa, u8 mk, u8 fp);
+@ DESC: 
+BEGIN_FUNC_THUMB(MidiKey2Freq, CSEC_TEXT)
+	swi		0x1F
+	bx		lr
+END_FUNC(MidiKey2Freq)
+
+@ === MultiBoot [25h] =================================================
+@ DECL: int MultiBoot(MultiBootParam* mb, u32 mode);
+@ DESC: 
+BEGIN_FUNC_THUMB(MultiBoot, CSEC_TEXT)
+	swi		0x25
+	bx		lr
+END_FUNC(MultiBoot)
+
+@ === SoundDriverVSyncOff [28h] =======================================
+@ DECL: void SoundDriverVSyncOff();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverVSyncOff, CSEC_TEXT)
+	swi		0x28
+	bx		lr
+END_FUNC(SoundDriverVSyncOff)
+
+@ === SoundDriverVSyncOn [29h] ========================================
+@ DECL: void SoundDriverVSyncOn();
+@ DESC: 
+BEGIN_FUNC_THUMB(SoundDriverVSyncOn, CSEC_TEXT)
+	swi		0x29
+	bx		lr
+END_FUNC(SoundDriverVSyncOn)
+

package/src/platforms/gba/lib/libtonc/src/asm/tonc_bios_ex.s

@@ -0,0 +1,97 @@
+//
+//  Additional BIOS functions
+//
+//! \file tonc_bios_ex.s
+//! \author J Vijn
+//! \date 20060508 - 20090801
+
+	.file	"tonc_bios_ex.s"
+	
+#include "tonc_asminc.h"
+
+@ === VBlankIntrDelay [05h] ===========================================
+@ DECL: void VBlankIntrDelay(u32 count);
+@ DESC: wait count frames
+@ NOTE: swi 5 uses r0, which is why I need r4 here
+BEGIN_FUNC_THUMB(VBlankIntrDelay, CSEC_TEXT)
+	push	{r4}
+	sub		r4, r0, #0
+	beq		.LVIDelay_done
+.LVIDelay_loop:
+	swi		0x05
+	sub		r4, #1
+	bhi		.LVIDelay_loop
+.LVIDelay_done:
+	pop		{r4}
+	bx		lr
+END_FUNC(VBlankIntrDelay)
+
+
+@ === DivSafe [06h] ===================================================
+@ DECL: int DivSafe(int num, int den);
+@ DESC: a div by 0 safe version
+BEGIN_FUNC_THUMB(DivSafe, CSEC_TEXT)
+	cmp		r1, #0
+	beq		.Ldiv_bad
+	swi		0x06
+	bx		lr
+.Ldiv_bad:
+	mvn		r1, r1			@ 0xFFFF:FFFF
+	lsr		r1, r1, #1		@ 0x7FFF:FFFF
+	asr		r0, r0, #31		@ r0= r0<0 ? -1 : 0
+	sub		r0, r1, r0
+	bx		lr
+END_FUNC(DivSafe)	
+
+@ === Mod [06h] =======================================================
+@ DECL: int Mod(int num, int den);
+@ DESC: 
+BEGIN_FUNC_THUMB(Mod, CSEC_TEXT)
+	swi		0x06
+	mov		r0, r1
+	bx		lr
+END_FUNC(Mod)
+
+@ === DivAbs [06h] ====================================================
+@ DECL: u32 DivAbs(int num, int den);
+@ DESC: 
+BEGIN_FUNC_THUMB(DivAbs, CSEC_TEXT)
+	swi		0x06
+	mov		r0, r3
+	bx		lr
+END_FUNC(DivAbs)
+
+@ === DivArmMod [07h] =================================================
+@ DECL: int DivArmMod(int den, int num);
+@ DESC: 
+BEGIN_FUNC_THUMB(DivArmMod, CSEC_TEXT)
+	swi		0x07
+	mov		r0, r1
+	bx		lr
+END_FUNC(DivArmMod)
+
+@ === DivArmAbs [07h] ====================================================
+@ DECL: u32 DivArmAbs(int den, int num);
+@ DESC: 
+BEGIN_FUNC_THUMB(DivArmAbs, CSEC_TEXT)
+	swi		0x07
+	mov		r0, r3
+	bx		lr
+END_FUNC(DivArmAbs)
+
+
+@ === CpuFastFill [0Ch] ===============================================
+@ DECL: void CpuFastFill(u32 wd, void *dst, u32 count);
+@ DESC: 
+BEGIN_FUNC_THUMB(CpuFastFill, CSEC_TEXT)
+	push	{r0}			@ push wd on stack
+	mov		r0, #128
+	lsl		r0, r0, #17
+	orr		r2, r2, r0		@ add fill flag
+	mov		r0, sp			@ point to stack (where wd is)
+	swi		0x0C
+	add		sp, sp, #4		@ 'pop'
+	bx		lr
+END_FUNC(CpuFastFill)
+
+@ EOF

package/src/platforms/gba/lib/libtonc/src/asm/tonc_isr_master.s

@@ -0,0 +1,92 @@
+//
+//  Default ISR for interrupts. No automatic nestings.
+//
+//! \file tonc_isr_master.s
+//! \author J Vijn
+//! \date 20080320 - 20090801
+//
+// === NOTES ===
+
+#include "tonc_asminc.h"
+
+	.file	"tonc_isr_master.s"
+	.extern	__isr_table;
+
+/*! \fn IWRAM_CODE void isr_master()
+	\brief	Default irq dispatcher (no automatic nesting)
+*/
+	@ Register list
+	@ r0 : &REG_IE
+	@ r1 : __isr_table / isr
+	@ r2 : IF & IE
+	@ r3 : tmp
+	@ ip : (IF,IE)	
+BEGIN_FUNC_ARM(isr_master, CSEC_IWRAM)
+	@ Read IF/IE 
+	mov		r0, #0x04000000
+	ldr		ip, [r0, #0x200]!
+	and		r2, ip, ip, lsr #16		@ irq= IE & IF
+
+	@ Acknowledge irq in IF and for BIOS
+	strh	r2, [r0, #2]
+	ldr		r3, [r0, #-0x208]
+	orr		r3, r3, r2
+	str		r3, [r0, #-0x208]
+
+	@ Search for irq.
+	ldr		r1, =__isr_table
+
+.Lirq_search:
+		ldr		r3, [r1], #8 
+		tst		r3, r2
+		bne		.Lpost_search		@ Found one, break off search
+		cmp		r3, #0
+		bne		.Lirq_search		@ Not here; try next irq
+
+	@ Search over : return if no isr, otherwise continue.
+.Lpost_search:
+	ldrne	r1, [r1, #-4]		@ isr= __isr_table[ii-1].isr
+	cmpne	r1, #0
+	bxeq	lr					@ If no isr: quit
+
+	@ --- If we're here, we have an isr ---
+
+	ldr		r3, [r0, #8]			@ Read IME 
+	strb	r0, [r0, #8]			@ Clear IME
+	bic		r2, ip, r2
+	strh	r2, [r0]				@ Clear current irq in IE
+	
+	mrs		r2, spsr
+	stmfd	sp!, {r2-r3, ip, lr}	@ sprs, IME, (IE,IF), lr_irq
+
+	@ Set mode to usr
+	mrs		r3, cpsr
+	bic		r3, r3, #0xDF
+	orr		r3, r3, #0x1F
+	msr		cpsr, r3
+
+	@ Call isr
+	stmfd	sp!, {r0,lr}		@ &REG_IE, lr_sys
+	mov		lr, pc
+	bx		r1
+	ldmfd	sp!, {r0,lr}		@ &REG_IE, lr_sys
+
+	@ --- Unwind ---
+	strb	r0, [r0, #8]		@ Clear IME again (safety)
+
+	@ Reset mode to irq
+	mrs		r3, cpsr
+	bic		r3, r3, #0xDF
+	orr		r3, r3, #0x92
+	msr		cpsr, r3
+
+	ldmfd	sp!, {r2-r3, ip, lr}	@ sprs, IME, (IE,IF), lr_irq
+	msr		spsr, r2			@ Restore spsr
+	strh	ip, [r0]			@ Restore IE
+	str		r3, [r0, #8]		@ Restore IME
+	
+	bx		lr
+END_FUNC(isr_master)
+
+@ EOF
+