ref: 8eecbaff3cde7b4649caecd15f48fac5d0f98a69
dir: /src/Ending.cpp/
#include <stdint.h>
#include <string>
#include <SDL_rwops.h>
#include "WindowsWrapper.h"
#include "Tags.h"
#include "Generic.h"
#include "Ending.h"
#include "Flags.h"
#include "KeyControl.h"
#include "Escape.h"
#include "Organya.h"
#include "Main.h"
#include "Stage.h"
#include "Draw.h"
#include "TextScr.h"
CREDIT Credit;
STRIP Strip[16];
ILLUSTRATION Illust;
//Update casts
void ActionStripper()
{
for (int s = 0; s < 16; s++)
{
//Move up
if (Strip[s].flag & 0x80 && Credit.mode)
Strip[s].y -= 0x100;
//Get removed when off-screen
if (Strip[s].y <= -0x2000)
Strip[s].flag = 0;
}
}
//Draw casts
void PutStripper()
{
for (int s = 0; s < 16; s++)
{
if (Strip[s].flag & 0x80)
{
//Draw text
RECT rc = {0, 16 * s, 320, 16 * s + 16};
PutBitmap3(&grcFull, (Strip[s].x + ((WINDOW_WIDTH - 320) << 8)) / 0x200, Strip[s].y / 0x200, &rc, SURFACE_ID_CREDIT_CAST);
//Draw character
rc.left = 24 * (Strip[s].cast % 13);
rc.right = rc.left + 24;
rc.top = 24 * (Strip[s].cast / 13);
rc.bottom = rc.top + 24;
PutBitmap3(&grcFull, (Strip[s].x + ((WINDOW_WIDTH - 320) << 8)) / 0x200 - 24, Strip[s].y / 0x200 - 8, &rc, SURFACE_ID_CASTS);
}
}
}
//Create a cast object
void SetStripper(int x, int y, char *text, int cast)
{
for (int s = 0; s < 16; s++)
{
if (!(Strip[s].flag & 0x80))
{
//Initialize cast property
Strip[s].flag = 0x80;
Strip[s].x = x;
Strip[s].y = y;
Strip[s].cast = cast;
strcpy(Strip[s].str, text);
//Draw text
RECT rc = {0, 16 * s, 320, 16 * s + 16};
CortBox2(&rc, 0, SURFACE_ID_CREDIT_CAST);
PutText2(0, 16 * s, text, 0xFFFFFE, SURFACE_ID_CREDIT_CAST);
break;
}
}
}
//Regenerate cast text
void RestoreStripper()
{
for (int s = 0; s < 16; s++)
{
if (Strip[s].flag & 0x80)
{
RECT rc = {0, 16 * s, 320, 16 * s + 16};
CortBox2(&rc, 0, SURFACE_ID_CREDIT_CAST);
PutText2(0, rc.top, Strip[s].str, 0xFFFFFE, SURFACE_ID_CREDIT_CAST);
}
}
}
//Handle the illustration
void ActionIllust()
{
switch (Illust.act_no)
{
case 1: //Move in from the left
Illust.x += 0x5000;
if (Illust.x > 0)
Illust.x = 0;
break;
case 2: //Move out from the right
Illust.x -= 0x5000;
if (Illust.x < -0x14000)
Illust.x = -0x14000;
break;
case 0: //Off-screen to the left
Illust.x = -0x14000;
break;
}
}
//Draw illustration
void PutIllust()
{
RECT rcIllust = {0, 0, 160, 240};
RECT rcClip = {(WINDOW_WIDTH - 320) / 2, 0, WINDOW_WIDTH, WINDOW_HEIGHT};
PutBitmap3(&rcClip, (Illust.x + ((WINDOW_WIDTH - 320) << 8)) / 0x200, (WINDOW_HEIGHT - 240) / 2, &rcIllust, SURFACE_ID_CREDITS_IMAGE);
}
//Load illustration
void ReloadIllust(int a)
{
char name[16];
sprintf(name, "CREDIT%02d", a);
ReloadBitmap_Resource(name, SURFACE_ID_CREDITS_IMAGE);
}
//Initialize and release credits
void InitCreditScript()
{
memset(&Credit, 0, sizeof(CREDIT));
memset(Strip, 0, sizeof(Strip));
}
void ReleaseCreditScript()
{
if (Credit.pData)
{
free(Credit.pData);
Credit.pData = NULL;
}
}
//Start playing credits
bool StartCreditScript()
{
//Clear previously existing credits data
if (Credit.pData)
{
free(Credit.pData);
Credit.pData = NULL;
}
//Open file
char path[PATH_LENGTH];
sprintf(path, "%s/%s", gDataPath, "Credit.tsc");
SDL_RWops *fp = SDL_RWFromFile(path, "rb");
if (!fp)
{
printf("Couldn't open %s", path);
return false;
}
//Allcoate buffer data
Credit.size = SDL_RWsize(fp);
Credit.pData = (char*)malloc(Credit.size);
if (!Credit.pData)
return false;
//Read data
fp->read(fp, Credit.pData, 1, Credit.size);
EncryptionBinaryData2((uint8_t*)Credit.pData, Credit.size);
//Reset credits
Credit.offset = 0;
Credit.wait = 0;
Credit.mode = 1;
Illust.x = -0x14000;
Illust.act_no = 0;
//Modify cliprect
grcGame.left = WINDOW_WIDTH / 2;
grcGame.right = ((WINDOW_WIDTH - 320) / 2) + 320;
grcGame.top = (WINDOW_HEIGHT - 240) / 2;
grcGame.bottom = ((WINDOW_HEIGHT - 240) / 2) + 240;
//Reload casts
if (!ReloadBitmap_File("casts", SURFACE_ID_CASTS))
{
return false;
}
//Clear casts
memset(Strip, 0, sizeof(Strip));
SDL_RWclose(fp);
return true;
}
//Get number from text (4 digit)
int GetScriptNumber(const char *text)
{
return 1000 * *text - 48000 + 100 * text[1] - 4800 + 10 * text[2] - 480 + text[3] - 48;
}
//Parse credits
void ActionCredit_Read()
{
while (Credit.offset < Credit.size)
{
uint8_t character = Credit.pData[Credit.offset];
int a, b, len;
switch (character)
{
case '[': //Create cast
//Get the range for the cast text
a = ++Credit.offset;
while (Credit.pData[a] != ']')
{
if (IsShiftJIS(Credit.pData[a]))
a += 2;
else
a++;
}
len = a - Credit.offset;
//Copy the text to the cast text
char text[40];
memcpy(text, &Credit.pData[Credit.offset], a - Credit.offset);
text[len] = 0;
//Get cast id
Credit.offset = a + 1;
len = GetScriptNumber(&Credit.pData[a + 1]);
//Create cast object
SetStripper(Credit.start_x, (WINDOW_HEIGHT << 9) + 0x1000, text, len);
//Change offset
Credit.offset += 4;
return;
case 'j': //Jump to label
//Get number
b = GetScriptNumber(&Credit.pData[++Credit.offset]);
//Change offset
Credit.offset += 4;
//Jump to specific label
while (Credit.offset < Credit.size)
{
if (Credit.pData[Credit.offset] == 'l')
{
//what is this
a = GetScriptNumber(&Credit.pData[++Credit.offset]);
Credit.offset += 4;
if (b == a)
return;
}
else if (IsShiftJIS(Credit.pData[Credit.offset]))
{
Credit.offset += 2;
}
else
{
++Credit.offset;
}
}
return;
case '~': //Start fading out music
++Credit.offset;
SetOrganyaFadeout();
return;
case 'f': //Flag jump
//Read numbers XXXX:YYYY
a = GetScriptNumber(&Credit.pData[++Credit.offset]);
Credit.offset += 5;
b = GetScriptNumber(&Credit.pData[Credit.offset]);
Credit.offset += 4;
//If flag is set
if (GetNPCFlag(a))
{
//Jump to label
while ( Credit.offset < Credit.size )
{
if (Credit.pData[Credit.offset] == 'l')
{
a = GetScriptNumber(&Credit.pData[++Credit.offset]);
Credit.offset += 4;
if ( b == a )
return;
}
else if (IsShiftJIS(Credit.pData[Credit.offset]))
{
Credit.offset += 2;
}
else
{
++Credit.offset;
}
}
}
return;
case '+': //Change casts x-position
Credit.start_x = GetScriptNumber(&Credit.pData[++Credit.offset]) << 9;
Credit.offset += 4;
return;
case '-': //Wait for X amount of frames
Credit.wait = GetScriptNumber(&Credit.pData[++Credit.offset]);
Credit.offset += 4;
Credit.mode = 2;
return;
case '/': //Stop credits
Credit.mode = 0;
return;
case '!': //Change music
a = GetScriptNumber(&Credit.pData[++Credit.offset]);
Credit.offset += 4;
ChangeMusic(a);
return;
}
//Progress through file
++Credit.offset;
}
}
//Update credits
void ActionCredit()
{
if (Credit.offset < Credit.size)
{
if (Credit.mode == 1)
{
ActionCredit_Read();
}
else if (Credit.mode == 2 && --Credit.wait <= 0)
{
Credit.mode = 1;
}
}
}
//Change illustration
void SetCreditIllust(int a)
{
ReloadIllust(a);
Illust.act_no = 1;
}
//Slide illustration off-screen
void CutCreditIllust()
{
Illust.act_no = 2;
}
//Scene of the island falling
int Scene_DownIsland(int mode)
{
RECT rc_sprite;
RECT rc_ground;
RECT rc_sky;
RECT rc_frame;
ISLAND_SPRITE sprite;
rc_frame = {(WINDOW_WIDTH - 160) / 2, (WINDOW_HEIGHT - 80) / 2, (WINDOW_WIDTH + 160) / 2, (WINDOW_HEIGHT + 80) / 2};
rc_sky = {0, 0, 160, 80};
rc_ground = {160, 48, 320, 80};
rc_sprite = {160, 0, 200, 24};
sprite.x = 0x15000;
sprite.y = 0x8000;
for (int wait = 0; wait < 900; wait++)
{
GetTrg();
if (gKey & 0x8000)
{
int escRet = Call_Escape();
if (escRet == 0)
return 0;
if (escRet == 2)
return 2;
}
switch (mode)
{
case 0:
sprite.y += 0x33;
break;
case 1:
if (wait >= 350)
{
if (wait >= 500)
{
if (wait >= 600)
{
if (wait == 750)
wait = 900;
}
else
{
sprite.y += 0xC;
}
}
else
{
sprite.y += 0x19;
}
}
break;
}
CortBox(&grcFull, 0);
PutBitmap3(&rc_frame, 80 + (WINDOW_WIDTH - 320) / 2, 80 + (WINDOW_HEIGHT - 240) / 2, &rc_sky, 21);
PutBitmap3(&rc_frame, sprite.x / 0x200 - 20 + (WINDOW_WIDTH - 320) / 2, sprite.y / 512 - 12 + (WINDOW_HEIGHT - 240) / 2, &rc_sprite, 21);
PutBitmap3(&rc_frame, 80 + (WINDOW_WIDTH - 320) / 2, 128 + (WINDOW_HEIGHT - 240) / 2, &rc_ground, 21);
//PutTimeCounter(16, 8);
PutFramePerSecound();
if (!Flip_SystemTask())
return 0;
}
return 1;
}