/* PVM形式テクスチャメモリに20個のテクスチャがある場合 */
#define NUM 20
NJS_TEXNAME texname[NUM];
NJS_TEXLIST texlist;
char filename[NUM][28];
Uint8 *PvmTexture;
GDFS fp;
Sint32 file_size;
Sint32 file_sect;
/* File open */
fp = gdFsOpen("f40.pvm",NULL);
/* Determine file size */
gdFsGetFileSize(fp,&file_size);
/* Finish calculating maximum sectors */
file_sect = gdFsCalcSctSize(file_size);
/* Secure space required for loading */
PvmTexture = syMalloc(file_sect*2048);
/* Load file */
gdFsRead(fp,file_sect,PvmTexture);
/* Close file */
gdFsClose(fp);
nuSetPvmTextureList( &texlist, texname,(char*)filename,NUM);
/* Load PVM texture */
nuLoadTexturePvmMemory(PvmTexture,&texlist);
syFree(PvmTexture);