AntonioND/palib
1
Fork 0
mirror of https://github.com/AntonioND/palib.git synced 2025-06-18 14:45:43 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity
d0eb8f9865
palib/include/arm9/PA_BgTiles.h
Antonio Niño Díaz d0eb8f9865 chore: Re-encode text files as UTF-8
2025-01-13 22:37:05 +00:00

1111 lines
44 KiB
C
Raw Blame History

#ifndef _PA_BGTILES
#define _PA_BGTILES
#include <nds.h>
#include "PA_General.h"
#include "../PA_BgStruct.h"
#define BG_TILEDBG 2
#define BG_ROTBG 3
#define BG_LARGEMAP 4
#define BG_INFINITEMAP 5
void PA_EasyBgLoadEx(u8 screen, u8 bg_number, u32 *Infos, void *Tiles, u32 TileSize, void *Map, u32 MapSize, void *Palette) DEPRECATED;
// Extracts the size from PAGfx convertions
static inline u8 PA_GetPAGfxBgSize(u16 width, u16 height){
u8 bg_size = 0;
if (height == 512) bg_size = 2;
if (width == 512) bg_size ++;
return bg_size;
}
// Extracts the size from PAGfx convertions
static inline u8 PA_GetPAGfxRotBgSize(u16 width){
u8 bg_size = 1; //256x256 by default
if (width <= 128) bg_size = 0;
else if (width <= 256) bg_size = 1;
else if (width <= 512) bg_size = 2;
else if (width <= 1024) bg_size = 3;
return bg_size;
}
typedef u8 (*EasyBgPixels)(u8, u8, s32, s32);
extern EasyBgPixels PA_EasyBgPixel[6];
/*! \file PA_BgTiles.h
\brief Everything concerning the Bg Tile modes
This file contains all the macros and variables regarding Tile modes, loading tiles and Bg, etc...
*/
//background memory offset macros
#define CharBaseBlock(screen, n) (((n)*0x4000) + 0x6000000 + (0x200000 * screen))
#define ScreenBaseBlock(screen, n) (((n)*0x800) + 0x6000000 + (0x200000 * screen))
// Pointers towards background arrays
typedef struct{
void *Tiles;
void *Map;
void *Palette;
u32 TileSize, MapSize;
u32 Type, Width, Height;
} PA_BgDefaultInfos;
typedef struct{
// Memory management info...
u32 tilesetsize; // Place utilisée pour chaque tileset
u16 mapsize; // Place utilisée pour chaque map
u8 mapchar; // Emplacement mémoire de chaque map
u8 TileSetChar;
u32 Map; // Map pointer
u32 NTiles;
u32 *TilePos;
void *Tiles;
PA_BgDefaultInfos Infos; // Pointers towards background arrays
s32 ScrollX, ScrollY; // Scroll values
u8 BgMode; // Background mode
} PA_BgInfos;
extern PA_BgInfos PA_BgInfo[2][4];
extern u8 charblocks[2][70];
// Quantité de données à charger en fonction de la taille de la map...
extern u16 *PA_DrawBg[2]; // Fond dessinable
extern u16 bg_sizes[4];
extern u8 bg_place[4];
extern u8 charsetstart[2];
extern s32 PA_parallaxX[2][4];
extern s32 PA_parallaxY[2][4];
typedef struct {
u8 infscroll; // Passe à 1 si scrolling infini activé...
u16* bg_map; // Map
s32 lx, ly;
s32 scrollx, scrolly;
s32 maxx; // 32 ou 64, en fonction de la largeur...
}scrollpositions;
extern scrollpositions scrollpos[2][4]; // Pour chaque écran et pour chaque fond :)
// Mode de couleur
#define BG_COLOR16 0x00
#define BG_COLOR256 0x80
#define CHAR_SHIFT 2
#define SCREEN_SHIFT 8
#define WRAPAROUND 0x1
#define SCREEN_TILES 24576 // Taille à convertir pour avoir un écran complet...
//scrolling registers for background 0
// Registre pour les controles de chaque écran
#define REG_BGSCREEN0 0x04000000
#define REG_BGSCREEN1 0x04001000
#define REG_BGSCREEN(screen) (0x04000000 + (screen * 0x1000))
#define REG_BGCNT(screen, bg_number) (0x4000008 + (screen * 0x1000) + (bg_number << 1))
// Premier registre pour les scroll. On en déduit les autres en ajoutant pour le screen et le numéro du Bg
#define REG_BGSCROLLX 0x4000010
#define REG_BGSCROLLY 0x4000012
// Tailles pour les Bg :
#define BG_256X256 0
#define BG_512X256 1
#define BG_256X512 2
#define BG_512X512 3
//ALL_BUT() pour faire tout sauf...
#define TILE_N 1023
#define TILE_PAL 61440
#define TILE_HFLIP 1024
#define TILE_VFLIP 2048
/** @defgroup BgTiles Tiled Background Modes
* Load a background, scroll it, etc...
* @{
*/
/*!
\fn void PA_ResetBgSys(void)
\brief
\~english Reset the background system
\~french Reinitialise le systeme de fonds
*/
void PA_ResetBgSys(void);
/*!
\fn void PA_ResetBgSysScreen(u8 screen)
\brief
\~english Reset the background system on 1 screen
\~french Reinitialise le systeme de fonds pour 1 écran
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
*/
void PA_ResetBgSysScreen(u8 screen);
/*!
\fn void PA_InitBg(u8 screen, u8 bg_select, u8 bg_size, u8 wraparound, u8 color_mode)
\brief
\~english Initialise a given background. Do this only after having loaded a tileset and a map.
\~french Initialise un fond. A faire uniquement après avoir chargé un tileset et une map.
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_size
\~english Background size. This is important, because it also determines whether the Bg is rotatable or not. To use a normal background, use the macros BG_256X256, BG_256X512, etc... For a rotatable Bg, use the macros BG_ROT_128X128...
\~french Taille du fond. Ceci est très important, car ça détermine aussi si le Bg est rotatif ou non. Pour un fond normal, on utilise les macros BG_256X256, BG_256X512, etc... Pour un fond rotatif, il suffit d'utiliser BG_ROT_128X128...
\~\param wraparound
\~english If the background wraps around or not. More important for rotating backgrounds.
\~french Si le fond boucle ou non. C'est plus important pour les fonds rotatifs...
\~\param color_mode
\~english Color mode : 0 for 16 color mode, 1 for 256...
\~french Nombre de couleurs : 0 pour 16 couleurs, 1 pour 256
*/
void PA_InitBg(u8 screen, u8 bg_select, u8 bg_size, u8 wraparound, u8 color_mode);
/*!
\def PA_HideBg(screen, bg_select)
\brief
\~english Hide a screen's background.
\~french Cacher un fond.
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
*/
#define PA_HideBg(screen, bg_select) _REG16(REG_BGSCREEN(screen)) &= ~(0x100 << (bg_select))
/*!
\def PA_ShowBg(screen, bg_select)
\brief
\~english Show a hidden background.
\~french Afficher un fond auparavant caché.
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
*/
#define PA_ShowBg(screen, bg_select) _REG16(REG_BGSCREEN(screen)) |= (0x100 << (bg_select))
/*!
\def PA_ResetBg(screen)
\brief
\~english Reinitialize de Bg system of a screen. It only hides all the backgrounds in reality...
\~french Reinitialiser les fonds d'un écran. En fait ca ne fait que cacher tous les fonds
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
*/
#define PA_ResetBg(screen) _REG16(REG_BGSCREEN(screen)) &= ~(0xF00)
/*!
\def PA_LoadBgTiles(screen, bg_select, bg_tiles)
\deprecated
\brief
\~english [DEPRECATED] Load a tileset into memory
\~french [DEPRECATED] Charger un tileset en mémoire
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_tiles
\~english Name of the tiles' info (example: ship_Tiles)
\~french Nom du tableau contenant les tiles (exemple: ship_Tiles)
*/
#define PA_LoadBgTiles(screen, bg_select, bg_tiles) PA_LoadBgTilesEx(screen, bg_select, (void*)bg_tiles, SIZEOF_16BIT(bg_tiles))
/*!
\fn void PA_LoadBgTilesEx(u8 screen, u8 bg_select, void* bg_tiles, u32 size)
\brief
\~english Load a tileset into memory with a given size
\~french Charger un tileset en mémoire avec une taille donnée
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_tiles
\~english Name of the tiles' info (example: ship_Tiles)
\~french Nom du tableau contenant les tiles (exemple: ship_Tiles)
\~\param size
\~english 16 bit size...
\~french Taille en 16 bits...
*/
void PA_LoadBgTilesEx(u8 screen, u8 bg_select, void* bg_tiles, u32 size);
/*!
\fn void PA_ReLoadBgTiles(u8 screen, u8 bg_select, void* bg_tiles)
\brief
\~english ReLoad a tileset into memory
\~french ReCharger un tileset en mémoire
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_tiles
\~english Name of the tiles' info (example: ship_Tiles)
\~french Nom du tableau contenant les tiles (exemple: ship_Tiles)
*/
void PA_ReLoadBgTiles(u8 screen, u8 bg_select, void* bg_tiles);
/*!
\fn void PA_DeleteTiles(u8 screen, u8 bg_select)
\brief
\~english Delete a tilest in memory. Note that loading a tileset automatically deletes the preceding one, so you won't need to use this function often
\~french Effacer un tileset en mémoire. A noter que charger un tileset efface automatiquement le tileset précédent, donc on n'aura pas souvent besoin de cette fonction...
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
*/
void PA_DeleteTiles(u8 screen, u8 bg_select);
/*!
\fn void PA_DeleteMap(u8 screen, u8 bg_select)
\brief
\~english Delete a map in memory. Note that loading a map automatically deletes the preceding one, so you won't need to use this function often
\~french Effacer une map en mémoire. A noter que charger une map efface automatiquement la map précédent, donc on n'aura pas souvent besoin de cette fonction...
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
*/
void PA_DeleteMap(u8 screen, u8 bg_select);
/*!
\fn static inline void PA_DeleteBg(u8 screen, u8 bg_select)
\brief
\~english Delete and reset a complete background
\~french Effacer et reinitialiser un fond complètement
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
*/
static inline void PA_DeleteBg(u8 screen, u8 bg_select) {
// By Maple, June 2008
// This is a small piece of PA_ResetBgSysScreen()
PA_HideBg(screen, bg_select);
PA_DeleteTiles(screen, bg_select);
PA_DeleteMap(screen, bg_select);
PA_BgInfo[screen][bg_select].tilesetsize = 0;
PA_BgInfo[screen][bg_select].mapsize = 0;
PA_BgInfo[screen][bg_select].TileSetChar = 0;
PA_BgInfo[screen][bg_select].mapchar = 0;
PA_parallaxX[screen][bg_select] = 0;
PA_parallaxY[screen][bg_select] = 0;
scrollpos[screen][bg_select].infscroll = 0;
}
/*!
\fn void PA_LoadBgMap(u8 screen, u8 bg_select, void* bg_map, u8 bg_size)
\brief
\~english Load a background's map info
\~french Charge la carte d'un fond
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_map
\~english Name of the map's info (example : (void*)ship_Map) Don't forget the void...
\~french Nom du tableau contenant les infos sur la map (exemple : (void*)ship_Map) n'oublie pas le void...
\~\param bg_size
\~english Background size. This is important, because it also determines whether the Bg is rotatable or not. To use a normal background, use the macros BG_256X256, BG_256X512, etc...
\~french Taille du fond. Ceci est très important, car ça détermine aussi si le Bg est rotatif ou non. Pour un fond normal, on utilise les macros BG_256X256, BG_256X512, etc...
*/
void PA_LoadBgMap(u8 screen, u8 bg_select, void* bg_map, u8 bg_size);
/*! \fn void PA_LoadBackground(u8 screen, u8 bg_number, const PA_BgStruct* bg_name)
\brief
\~english Load a background (EasyBg or RotBg).
\~french Charger un fond (EasyBg ou RotBg).
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number... (0-3)
\~french Numéro du fond... (0-3)
\~\param bg_name
\~english Pointer to the background (struct)
\~french Pointeur vers le fond
*/
void PA_LoadBackground(u8 screen, u8 bg_select, const PA_BgStruct* bg_name);
/*!
\def PA_LoadTiledBg(screen, bg_number, bg_name)
\deprecated
\brief
\~english [DEPRECATED] This will never get easier... Loads a background TiledBg converted with PAGfx, with its tiles, map, and palette. Only 256 color mode available.
\~french [DEPRECATED] On ne pourra jamais rendre ca plus simple... Charge un fond de type TiledBg converti avec PAGfx, en mettant les tiles, la map, et meme la palette ! Seulement en mode 256 couleurs
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_name
\~english Background name, like bg0
\~french Nom du fond, comme bg0
*/
#define PA_LoadTiledBg(screen, bg_number, bg_name) do{\
PA_DEPRECATED_MACRO;\
PA_LoadBgPal(screen, bg_number, (void*)bg_name##_Pal); \
PA_LoadSimpleBg(screen, bg_number, bg_name##_Tiles, bg_name##_Map, PA_GetPAGfxBgSize(bg_name##_Info[1], bg_name##_Info[2]), 0, 1);}while(0)
/*!
\def PA_LoadSimpleBg(screen, bg_select, bg_tiles, bg_map, bg_size, wraparound, color_mode)
\deprecated
\brief
\~english [DEPRECATED] Simple way to load a Background. Combines PA_InitBg, PA_LoadBgTiles, and PA_LoadBgMap
\~french [DEPRECATED] Façon simple de cahrger un fond. Combine PA_InitBg, PA_LoadBgTiles, et PA_LoadBgMap
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_tiles
\~english Name of the tiles' info (example: ship_Tiles)
\~french Nom du tableau contenant les tiles (exemple: ship_Tiles)
\~\param bg_map
\~english Name of the map's info (example : ship_Map)
\~french Nom du tableau contenant les infos sur la map (exemple : ship_Map)
\~\param bg_size
\~english Background size. To use a normal background, use the macros BG_256X256, BG_256X512, etc...
\~french Taille du fond. Pour un fond normal, on utilise les macros BG_256X256, BG_256X512, etc...
\~\param wraparound
\~english If the background wraps around or not. More important for rotating backgrounds.
\~french Si le fond boucle ou non. C'est plus important pour les fonds rotatifs...
\~\param color_mode
\~english Color mode : 0 for 16 color mode, 1 for 256...
\~french Nombre de couleurs : 0 pour 16 couleurs, 1 pour 256
*/
#define PA_LoadSimpleBg(screen, bg_select, bg_tiles, bg_map, bg_size, wraparound, color_mode) do{\
PA_DEPRECATED_MACRO;\
PA_DeleteBg(screen, bg_select);\
PA_LoadBgTiles(screen, bg_select, bg_tiles); \
PA_LoadBgMap(screen, bg_select, (void*)bg_map, bg_size); \
PA_InitBg(screen, bg_select, bg_size, 0, color_mode);\
PA_BGScrollXY(screen, bg_select, 0, 0);}while(0)
/*!
\def PA_LoadBg(screen, bg_select, bg_tiles, tile_size, bg_map, bg_size, wraparound, color_mode)
\deprecated
\brief
\~english [DEPRECATED] Simplest way to load a Background. Combines PA_InitBg, PA_LoadBgTiles, and PA_LoadBgMap
\~french [DEPRECATED] Facon la plus simple de cahrger un fond. Combine PA_InitBg, PA_LoadBgTiles, et PA_LoadBgMap
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number to load (from 0 to 3)
\~french Numéro du fond que l'on veut charger (de 0 à 3 en mode 0, uniquement 2 et 3 en mode 2)
\~\param bg_tiles
\~english Name of the tiles' info (example: ship_Tiles)
\~french Nom du tableau contenant les tiles (exemple: ship_Tiles)
\~\param tile_size
\~english Size of your tileset
\~french Taille du tilset
\~\param bg_map
\~english Name of the map's info (example : ship_Map)
\~french Nom du tableau contenant les infos sur la map (exemple : ship_Map)
\~\param bg_size
\~english Background size. This is important, because it also determines whether the Bg is rotatable or not. To use a normal background, use the macros BG_256X256, BG_256X512, etc... For a rotatable Bg, use the macros BG_ROT_128X128...
\~french Taille du fond. Ceci est très important, car ça détermine aussi si le Bg est rotatif ou non. Pour un fond normal, on utilise les macros BG_256X256, BG_256X512, etc... Por un fond rotatif, il suffit d'utiliser BG_ROT_128X128...
\~\param wraparound
\~english If the background wraps around or not. More important for rotating backgrounds.
\~french Si le fond boucle ou non. C'est plus important pour les fonds rotatifs...
\~\param color_mode
\~english Color mode : 0 for 16 color mode, 1 for 256...
\~french Nombre de couleurs : 0 pour 16 couleurs, 1 pour 256
*/
#define PA_LoadBg(screen, bg_select, bg_tiles, tile_size, bg_map, bg_size, wraparound, color_mode) do{\
PA_DEPRECATED_MACRO;\
PA_LoadBgTilesEx(screen, bg_select, (void*)bg_tiles, tile_size); \
PA_LoadBgMap(screen, bg_select, (void*)bg_map, bg_size); \
PA_InitBg(screen, bg_select, bg_size, 0, color_mode);\
PA_BGScrollXY(screen, bg_select, 0, 0);}while(0)
/*!
\fn static inline void PA_BGScrollX(u8 screen, u8 bg_number, s32 x)
\brief
\~english Scroll horizontaly a Tiled background
\~french Scroll horizontal d'un fond de type Tiled
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer, horizontalement...
*/
static inline void PA_BGScrollX(u8 screen, u8 bg_number, s32 x) {
PA_BgInfo[screen][bg_number].ScrollX = (x)&1023;
_REG16(REG_BGSCROLLX + ((screen) * 0x1000) + ((bg_number) << 2)) = (x)&1023;
}
/*!
\fn static inline void PA_BGScrollY(u8 screen, u8 bg_number, s32 y)
\brief
\~english Scroll vertically a Tiled background
\~french Scroll vertical d'un fond de type Tiled
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer, verticalement...
*/
static inline void PA_BGScrollY(u8 screen, u8 bg_number, s32 y) {
PA_BgInfo[screen][bg_number].ScrollY = (y)&1023;
_REG16(REG_BGSCROLLY + ((screen) * 0x1000) + ((bg_number) << 2)) = (y)&1023;
}
/*!
\def PA_BGScrollXY(screen, bg_number, x, y)
\brief
\~english Scroll horizontaly and vertically a Tiled background
\~french Scroll horizontal et vertical d'un fond de type Tiled
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer, horizontalement...
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer, verticalement...
*/
static inline void PA_BGScrollXY(u8 screen, u8 bg_number, s32 x, s32 y) {
PA_BGScrollX(screen, bg_number, x);
PA_BGScrollY(screen, bg_number, y);
}
/*!
\fn static inline void PA_SetMapTile(u8 screen, u8 bg_select, s16 x, s16 y, s16 tile_number)
\brief
\~english Change the tile gfx used by a given tile in the map
\~french Change la tile gfx utilisée pour une tile donnée dans la map
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param tile_number
\~english New tile number to put
\~french Nouveau numéro de tile que l'on veut mettre
*/
static inline void PA_SetMapTile(u8 screen, u8 bg_select, s16 x, s16 y, s16 tile_number) {
*(u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6)) &= ~(TILE_N);
*(u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6)) |= ((tile_number)&TILE_N);
}
/*!
\def PA_SetMapTileAll(screen, bg_select, x, y, tile_info)
\brief
\~english Change the tile info used by a given tile in the map
\~french Change les infos tiles utilisée pour une tile donnée dans la map
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param tile_info
\~english New tile to put (tile + palette + flips...)
\~french Nouveau numéro de tile que l'on veut mettre (tile + palette + flips...)
*/
#define PA_SetMapTileAll(screen, bg_select, x, y, tile_info) *(u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6)) = (tile_info)
/*!
\fn static inline void PA_SetLargeMapTile(u8 screen, u8 bg_select, s32 x, s32 y, u32 tile_info)
\brief
\~english Change the tile info used by a given tile in the map, only for big background (512 large or wide)
\~french Change les infos tiles utilisée pour une tile donnée dans la map, seulement pour les grands fonds (512 de large ou haut)
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param tile_info
\~english New tile to put (tile + palette + flips...)
\~french Nouveau numéro de tile que l'on veut mettre (tile + palette + flips...)
*/
static inline void PA_SetLargeMapTile(u8 screen, u8 bg_select, s32 x, s32 y, u32 tile_info) {
u32 truex;
u32 mapblock = 0;
truex = x&31;
mapblock = ((x >> 5) << 11) + ((y >> 5) << 12); // Permet d'avoir le bon block...
*(u16*)(PA_BgInfo[screen][bg_select].Map + ((truex) << 1) + ((y&31) << 6) + mapblock) = tile_info;
}
/*!
\fn void PA_SetMapTileHflip(u8 screen, u8 bg_select, u8 x, u8 y, u8 hflip)
\brief
\~english Flip a given tile horizontaly
\~french Flipper une tile de la carte, horizontalement
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param hflip
\~english Set the map tile to horizontal flip
\~french Mettre la tile de la carte en flip horizontal
*/
static inline void PA_SetMapTileHflip(u8 screen, u8 bg_select, u8 x, u8 y, u8 hflip) {
u16 *pointer = (u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6));
*pointer &= ~TILE_HFLIP;
*pointer |= ((hflip) << 10);
}
/*!
\fn static inline void PA_SetMapTileVflip(u8 screen, u8 bg_select, u8 x, u8 y, u8 vflip)
\brief
\~english Flip a given tile verticaly
\~french Flipper une tile de la carte, verticalement
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param vflip
\~english Set the map tile to vertical flip
\~french Mettre la tile de la carte en flip vertical
*/
static inline void PA_SetMapTileVflip(u8 screen, u8 bg_select, u8 x, u8 y, u8 vflip) {
u16 *pointer = (u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6));
*pointer &= ~TILE_VFLIP;
*pointer |= ((vflip) << 10);
}
/*!
\fn static inline void PA_SetMapTilePal(u8 screen, u8 bg_select, u8 x, u8 y, u8 palette_number)
\brief
\~english Change the 16 color palette used by a tile. Works only if the Bg is in 16 colors...
\~french Changer la palette de 16 couleurs utilisée par une tile de la carte. Marche uniquement en mode 16 couleurs pour le Bg.
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param palette_number
\~english Palette number (0-15)
\~french Numéro de la palette (0-15)
*/
static inline void PA_SetMapTilePal(u8 screen, u8 bg_select, u8 x, u8 y, u8 palette_number) {
u16 *pointer = (u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6));
*pointer &= ~TILE_PAL;
*pointer |= ((palette_number) << 12);
}
/*!
\def PA_SetMapTileEx(screen, bg_select, x, y, tile_number, hflip, vflip, palette_number)
\brief
\~english Change every aspect of a given map tile
\~french Changer tous les aspect d'une tile donnée dans la map.
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value of the tile to change
\~french Valeur X de la tile à changer
\~\param y
\~english Y value of the map tile to change
\~french Valeur Y de la tile à changer dans la carte
\~\param tile_number
\~english New tile number to put
\~french Nouveau numéro de tile que l'on veut mettre
\~\param hflip
\~english Set the map tile to horizontal flip
\~french Mettre la tile de la carte en flip horizontal
\~\param vflip
\~english Set the map tile to vertical flip
\~french Mettre la tile de la carte en flip vertical
\~\param palette_number
\~english Palette number (0-15)
\~french Numéro de la palette (0-15)
*/
static inline void PA_SetMapTileEx(u8 screen, u8 bg_select, s16 x, s16 y, u16 tile_number, u8 hflip, u8 vflip, u8 palette_number) {
*(u16*)(PA_BgInfo[screen][bg_select].Map + ((x) << 1) + ((y) << 6)) = (tile_number) + ((hflip) << 10) + ((vflip) << 11) + ((palette_number) << 12);
}
/*!
\fn static inline void PA_SetBgPrio(u8 screen, u8 bg, u8 prio)
\brief
\~english Change a backgrounds priority
\~french Changer la priorité d'un fond
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg
\~english Background...
\~french Numéro du fond...
\~\param prio
\~english Priority level (0-3, 0 being the highest)
\~french Niveau de priorité, de 0 à 3, 0 étant priorité la plus élevée
*/
static inline void PA_SetBgPrio(u8 screen, u8 bg, u8 prio) {
_REG16(REG_BGCNT(screen, bg)) &= ~3;
_REG16(REG_BGCNT(screen, bg)) |= prio;
}
static inline void PA_CreateBgFromTiles(u8 screen, u8 bg_select, u8 bg_tiles, void *bg_map, u8 bg_size){
PA_LoadBgMap(screen, bg_select, bg_map, bg_size);
scrollpos[screen][bg_select].infscroll = 0; // Par défaut pas de scrolling infini...
PA_BgInfo[screen][bg_select].Map = ScreenBaseBlock(screen, PA_BgInfo[screen][bg_select].mapchar);
PA_BgInfo[screen][bg_select].TileSetChar = PA_BgInfo[screen][bg_tiles].TileSetChar;
PA_BgInfo[screen][bg_select].tilesetsize = PA_BgInfo[screen][bg_tiles].tilesetsize;
_REG16(REG_BGSCREEN(screen)) |= (0x100 << (bg_select));
_REG16(REG_BGCNT(screen, bg_select)) = bg_select | (bg_size << 14) |(PA_BgInfo[screen][bg_select].mapchar << SCREEN_SHIFT) | (1 << 13) | (PA_BgInfo[screen][bg_select].TileSetChar << 2) | (1 << 7);
PA_BGScrollXY(screen, bg_select, 0, 0);
}
/*!
\fn static inline void PA_SetBgPrioSeq(u8 screen, u8 priority0, u8 priority1, u8 priority2, u8 priority3)
\brief
\~english Change all the background priorities to a given background order
\~french Changer la priorité des fonds pour qu'ils soient dans un ordre donné
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param priority0
\~english Background to show on top
\~french Fond à mettre en premier
\~\param priority1
\~english Next one...
\~french Suivant...
\~\param priority2
\~english Next one...
\~french Suivant...
\~\param priority3
\~english Last one...
\~french Dernier...
*/
static inline void PA_SetBgPrioSeq(u8 screen, u8 priority0, u8 priority1, u8 priority2, u8 priority3){
PA_SetBgPrio(screen, priority0, 0);
PA_SetBgPrio(screen, priority1, 1);
PA_SetBgPrio(screen, priority2, 2);
PA_SetBgPrio(screen, priority3, 3);
}
/*! \fn static inline void PA_ClearBg(u8 screen, u8 bg_select)
\brief
\~english Erase a given background (just the tilemap)
\~french Effacer un fond donné (juste la map)
\~\param screen
\~english Choose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_select
\~english Background...
\~french Fond...
*/
static inline void PA_ClearBg(u8 screen, u8 bg_select){
int i, j;
for (i = 0; i < 32; i++) for (j = 0; j < 32; j++) PA_SetMapTileAll(screen, bg_select, i, j, 0);
}
/*! \def PA_EasyBgLoad(screen, bg_number, bg_name)
\deprecated
\brief
\~english [DEPRECATED] Easiest way to load a background converted with PAGfx...
\~french [DEPRECATED] Moyen le plus simple de charger un fond créé avec PAGfx
\~\param screen
\~english Choose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number... (0-3)
\~french Numéro du fond... (0-3)
\~\param bg_name
\~english Background name
\~french Nom du fond
*/
#define PA_EasyBgLoad(screen, bg_number, bg_name) do{PA_BgInfo[screen][bg_number].BgMode = bg_name##_Info[0];\
PA_DEPRECATED_MACRO;\
PA_StoreEasyBgInfos(screen, bg_number, bg_name##_Info[0], bg_name##_Info[1], bg_name##_Info[2], (void*)bg_name##_Tiles, SIZEOF_16BIT(bg_name##_Tiles), (void*)bg_name##_Map, SIZEOF_16BIT(bg_name##_Map), (void*)bg_name##_Pal);\
if(PA_BgInfo[screen][bg_number].BgMode == BG_TILEDBG){ PA_LoadTiledBg(screen, bg_number, bg_name);}\
else{PA_LoadPAGfxLargeBg(screen, bg_number, bg_name);}}while(0)
/*! \def PA_EasyBgLoadPtr(screen, bg_number, bg_name)
\deprecated
\brief
\~english [DEPRECATED] Easiest way to load a background converted with PAGfx... Can take pointers !
\~french [DEPRECATED] Moyen le plus simple de charger un fond créé avec PAGfx... Peut prendre des pointeurs !
\~\param screen
\~english Choose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number... (0-3)
\~french Numéro du fond... (0-3)
\~\param bg_name
\~english Background, like &bg0
\~french Fond, par exemple &bg0
*/
#define PA_EasyBgLoadPtr(screen, bg_number, bg_name) do{\
PA_DEPRECATED_MACRO;\
PA_EasyBgLoadEx(screen, bg_number, (u32*)bg_name->Info, bg_name->Tiles, bg_name->TileSize, bg_name->Map, bg_name->MapSize, bg_name->Palette);\
}while(0)
/*!
\fn void PA_EasyBgScrollX(u8 screen, u8 bg_number, s32 x)
\brief
\~english Scroll horizontaly any background
\~french Scroll horizontal de n'importe quel fond
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer, horizontalement...
*/
void PA_EasyBgScrollX(u8 screen, u8 bg_number, s32 x);
/*!
\fn void PA_EasyBgScrollY(u8 screen, u8 bg_number, s32 y)
\brief
\~english Scroll vertically any background
\~french Scroll vertical de n'importe quel fond
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer, verticalement...
*/
void PA_EasyBgScrollY(u8 screen, u8 bg_number, s32 y);
/*!
\fn static inline void PA_EasyBgScrollXY(u8 screen, u8 bg_number, s32 x, s32 y)
\brief
\~english Scroll horizontaly and vertically any background
\~french Scroll horizontal et vertical de n'importe quel fond
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer, horizontalement...
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer, verticalement...
*/
static inline void PA_EasyBgScrollXY(u8 screen, u8 bg_number, s32 x, s32 y){
PA_EasyBgScrollX(screen, bg_number, x);
PA_EasyBgScrollY(screen, bg_number, y);
}
/*!
\fn static inline u8 PA_EasyBgGetPixel(u8 screen, u8 bg_number, s32 x, s32 y)
\brief
\~english Returns the color (number in the palette) of the screen pixel...
\~french Renvoie le numéro dans la palette du pixel à l'écran...
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X screen pixel position
\~french Valeur X du pixel à l'écran
\~\param y
\~english Y screen pixel position
\~french Valeur Y du pixel à l'écran
*/
static inline u8 PA_EasyBgGetPixel(u8 screen, u8 bg_number, s32 x, s32 y){
return PA_EasyBgPixel[PA_BgInfo[screen][bg_number].Infos.Type](screen, bg_number, x, y);
}
/*!
\fn static inline u16 PA_EasyBgGetPixelCol(u8 screen, u8 bg_number, s32 x, s32 y)
\brief
\~english Returns the color (u16 value) of the screen pixel...
\~french Renvoie la couleur (valeur u16) du pixel à l'écran...
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg_number
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param x
\~english X screen pixel position
\~french Valeur X du pixel à l'écran
\~\param y
\~english Y screen pixel position
\~french Valeur Y du pixel à l'écran
*/
static inline u16 PA_EasyBgGetPixelCol(u8 screen, u8 bg_number, s32 x, s32 y){
return ((u16*)(PA_BgInfo[screen][bg_number].Infos.Palette))[PA_EasyBgGetPixel(screen, bg_number, x, y)];
}
/*!
\fn static inline void PA_SetBgWrap(u8 screen, u8 bg, u8 wrap)
\brief
\~english Set on/off the background wrapping (for rotating, 8bit, and 16bit backgrounds)
\~french Active ou non le wrapping des fonds (rotatifs, 8bit, et 16bit)
\~\param screen
\~english Choose the screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg
\~english Background number (0-3)
\~french Numéro du fond que l'on veut tourner (0-3)
\~\param wrap
\~english Wrap around on or off...
\~french Wrap activé ou désactivé...
*/
static inline void PA_SetBgWrap(u8 screen, u8 bg, u8 wrap){
_REG16(REG_BGCNT(screen, bg)) &= ~(1<<13); // Remove
_REG16(REG_BGCNT(screen, bg)) |= (wrap<<13);
}
/*!
\fn static inline void PA_InitParallaxX(u8 screen, s32 bg0, s32 bg1, s32 bg2, s32 bg3)
\brief
\~english Initialise Parallax Scrolling for multiple backgrounds, horizontaly. Chose the speed at which each background will scroll compared to the others. Then use PA_ParallaxScrollX to scroll...
\~french Initialiser le Parallax Scrolling pour plusieurs fonds, horizontalement. Choix de la vitesse à laquelle les fonds vont défiler par rapport aux autres... Utiliser PA_ParallaxScrollX par la suite pour scroller
\~\param screen
\~english Chose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg0
\~english Value for the first background (0). Set to 256 for normal scroll speed, lower for lower speed (128 is half speed...), higher for faster (512 is twice as fast...). You can set negative values. 0 inactivates parallax scrolling for this background
\~french Valeur pour le premier fond (0). 256 met en vitesse normal, moins pour moins lent (128 pour moitié de vitesse), plus pour plus rapide (512 équivaut à 2 fois plus vite). On peut utiliser des valeurs négatives. 0 désactive le scrolling parallax pour ce fond
\~\param bg1
\~english Same thing for Background 1
\~french Idem, pour le Fond 1
\~\param bg2
\~english Same thing for Background 2
\~french Idem, pour le Fond 2
\~\param bg3
\~english Same thing for Background 3
\~french Idem, pour le Fond 3
*/
static inline void PA_InitParallaxX(u8 screen, s32 bg0, s32 bg1, s32 bg2, s32 bg3) {
PA_parallaxX[screen][0] = bg0;
PA_parallaxX[screen][1] = bg1;
PA_parallaxX[screen][2] = bg2;
PA_parallaxX[screen][3] = bg3;
}
/*!
\fn static inline void PA_InitParallaxY(u8 screen, s32 bg0, s32 bg1, s32 bg2, s32 bg3)
\brief
\~english Initialise Parallax Scrolling for multiple backgrounds, horizontaly. Chose the speed at which each background will scroll compared to the others. Then use PA_ParallaxScrollX to scroll...
\~french Initialiser le Parallax Scrolling pour plusieurs fonds, horizontalement. Choix de la vitesse à laquelle les fonds vont défiler par rapport aux autres... Utiliser PA_ParallaxScrollX par la suite pour scroller
\~\param screen
\~english Chose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param bg0
\~english Value for the first background (0). Set to 256 for normal scroll speed, lower for lower speed (128 is half speed...), higher for faster (512 is twice as fast...). You can set negative values. 0 inactivates parallax scrolling for this background
\~french Valeur pour le premier fond (0). 256 met en vitesse normal, moins pour moins lent (128 pour moitié de vitesse), plus pour plus rapide (512 équivaut à 2 fois plus vite). On peut utiliser des valeurs négatives. 0 désactive le scrolling parallax pour ce fond
\~\param bg1
\~english Same thing for Background 1
\~french Idem, pour le Fond 1
\~\param bg2
\~english Same thing for Background 2
\~french Idem, pour le Fond 2
\~\param bg3
\~english Same thing for Background 3
\~french Idem, pour le Fond 3
*/
static inline void PA_InitParallaxY(u8 screen, s32 bg0, s32 bg1, s32 bg2, s32 bg3) {
PA_parallaxY[screen][0] = bg0;
PA_parallaxY[screen][1] = bg1;
PA_parallaxY[screen][2] = bg2;
PA_parallaxY[screen][3] = bg3;
}
/*!
\fn static inline void PA_ParallaxScrollX(u8 screen, s32 x)
\brief
\~english Scroll the backgrounds
\~french Déplacer les fonds activés pour le parallax...
\~\param screen
\~english Chose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer
*/
static inline void PA_ParallaxScrollX(u8 screen, s32 x){
int i;
for(i = 0; i < 4; i++) {
if (PA_parallaxX[screen][i]) {
/*if(scrollpos[screen][i].infscroll)*/ PA_EasyBgScrollX(screen, i, (PA_parallaxX[screen][i] * x) >> 8); // Si bg en scrolling infini
/*else PA_BGScrollX(screen, i, (PA_parallaxX[screen][i] * x) >> 8); // Sinon scrolling normal*/
}
}
}
/*!
\fn static inline void PA_ParallaxScrollY(u8 screen, s32 y)
\brief
\~english Scroll the backgrounds
\~french Déplacer les fonds activés pour le parallax...
\~\param screen
\~english Chose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer
*/
static inline void PA_ParallaxScrollY(u8 screen, s32 y){
int i;
for(i = 0; i < 4; i++) {
if (PA_parallaxY[screen][i]) {
/*if(scrollpos[screen][i].infscroll)*/ PA_EasyBgScrollY(screen, i, (PA_parallaxY[screen][i] * y) >> 8); // Si bg en scrolling infini
/*else PA_BGScrollY(screen, i, (PA_parallaxY[screen][i] * y) >> 8); // Sinon scrolling normal*/
}
}
}
/*!
\fn static inline void PA_ParallaxScrollXY(u8 screen, s32 x, s32 y)
\brief
\~english Scroll the backgrounds
\~french Déplacer les fonds activés pour le parallax...
\~\param screen
\~english Chose de screen (0 or 1)
\~french Choix de l'écran (0 ou 1)
\~\param x
\~english X value to scroll
\~french Valeur X à déplacer
\~\param y
\~english Y value to scroll
\~french Valeur Y à déplacer
*/
static inline void PA_ParallaxScrollXY(u8 screen, s32 x, s32 y){
PA_ParallaxScrollX(screen, x);
PA_ParallaxScrollY(screen, y);
}
/** @} */ // end of BgTiles
// Get pixel functions
u8 PAEasyBgGetPixelTiled(u8 screen, u8 bg_number, s32 x, s32 y);
u8 PAEasyBgGetPixelLarge(u8 screen, u8 bg_number, s32 x, s32 y);
u8 PAEasyBgGetPixelInf(u8 screen, u8 bg_number, s32 x, s32 y);
u8 PANoPixel(u8 screen, u8 bg_number, s32 x, s32 y);
static inline void PA_UpdateBgTile(u8 screen, u8 bg_select, u16 tilepos, void *tile){
tilepos = tilepos << 4;
u32 *tilecopy = (u32*)tile;
int i;
for (i = 0; i < 16; i++)
PA_BgInfo[screen][bg_select].TilePos[tilepos+i] = tilecopy[i];
}
void PA_StoreEasyBgInfos(u8 screen, u8 bg_number, u32 Type, u32 Width, u32 Height, void *Tiles, u32 TileSize, void *Map, u32 MapSize, void *Palette);
#endif
Reference in New Issue View Git Blame Copy Permalink