[CODE] Fallow Stylus

#include <PA9.h>
#include "gfx/all_gfx.c"
#include "gfx/all_gfx.h"
#include "transition.h"
#include "scrollsprites.h"
#include "collision.h"

int Room_1();
int main (void){
PA_Init();
PA_InitVBL();
PA_InitText(0, 0);
PA_InitText(1, 0);

PA_LoadSpritePal(1, 0, (void*)DefaultPalet_Pal);

PA_LoadSpritePal(0, 0, (void*)DefaultPalet_Pal);

Room_1();
}
int Room_1(void) {
PA_ResetBgSys();
PA_ResetSpriteSys();
PA_LoadSpritePal(1, 0, (void*)DefaultPalet_Pal);
PA_LoadSpritePal(0, 0, (void*)DefaultPalet_Pal);
PA_InitText(0, 0);
PA_InitText(1, 0);
PA_CreateSprite(0, 0, (void*)Sprite_935_Sprite, OBJ_SIZE_32X32, 1, 0, 0, 160);
PA_SetSpriteRotEnable(0,0,0);
s32 x0 = (PA_GetSpriteX(0,0)) << 8;
s32 y0 = (PA_GetSpriteY(0,0)) << 8;
u16 angle0 = 0;

while(1) {
angle0 = PA_GetAngle(x0>>8, y0>>8, Stylus.X, Stylus.Y);
PA_SetRotsetNoZoom(0, 0, angle0);
if (Stylus.Held){
x0 += PA_Cos(angle0);
y0 -= PA_Sin(angle0);
}
PA_SetSpriteXY(0, 0, (x0>>8)-PA_GetSpriteLx(0,0), (y0>>8)-PA_Get
PA_EasyBgScrollXY(0,SpriteLy(0,0)); 2, (x0>>8), (y0>>8));

PA_CheckLid();
PA_WaitForVBL();
}
return 0;
}