/* Copyright 2004-2006, 2012 Theo Berkau

This file is part of EventEditor.

EventEditor is free software; you can redistribute it and/or modify

it under the terms of the GNU General Public License as published by

the Free Software Foundation; either version 2 of the License, or

(at your option) any later version.

EventEditor is distributed in the hope that it will be useful,

but WITHOUT ANY WARRANTY; without even the implied warranty of

MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

GNU General Public License for more details.

You should have received a copy of the GNU General Public License

along with EventEditor; if not, write to the Free Software

Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

*/

#include <windows.h>

#include <tchar.h>

#include <assert.h>

#include <commctrl.h>

#include <stdio.h>

#include <io.h>

#include "evn.h"

#include "main.h"

#include "util.h"

#include "resource.h"

#include "texttbl.h"

#include "trnstext.h"

#ifdef USE_GUI

#include "uihelper.h"

#endif

//////////////////////////////////////////////////////////////////////////////

#define MAX_LINE_PIXEL_WIDTH 272

bool file_loaded=false;

unsigned char *event_data=NULL;

unsigned long num_commands=0;

command_struct *command=NULL;

textdataheader_struct textdataheader;

transtext_struct maintranstext;

ttentry_struct *names_data=NULL;

unsigned long num_names=0;

short comp_data_table_offset;

typedef struct

{

unsigned short offsets1[8];

unsigned short cmp_tbl_offset;

unsigned short offsets2[8];

unsigned short cmp_data_offset;

unsigned short offsets3[8];

} evn_header_struct;

evn_header_struct header;

unsigned char cmd43_var=0xFF;

int special_flags=0;

char **pattern_list=NULL;

int num_patterns=0;

unsigned char *font_data=NULL;

bool IsDialogueCommand(command_struct *command)

{

if (command->cmd == 0x04)

return true;

return false;

}

int EVNFreeFile()

{

if (event_data)

{

free(event_data);

event_data = NULL;

}

if (command)

{

free(command);

command = NULL;

num_commands = 0;

}

// free commands, etc. here

file_loaded = false;

return 0;

}

void EVNParseHeader(unsigned char *data, evn_header_struct *header)

{

int i;

header->offsets1[0] = 0x40;

for (i = 1; i < 8; i++)

{

header->offsets1[i] = WordSwap(*((unsigned short*)data));

data+=2;

}

header->cmp_tbl_offset = WordSwap(*((unsigned short*)data));

data += 2;

for (i = 0; i < 8; i++)

{

header->offsets2[i] = WordSwap(*((unsigned short*)data));

data+=2;

}

header->cmp_data_offset = WordSwap(*((unsigned short*)data));

data += 2;

for (i = 0; i < 8; i++)

{

header->offsets3[i] = WordSwap(*((unsigned short*)data));

data+=2;

}

}

void null_list_func(command_struct *command, int index, HWND hWnd)

{

}

void jump_list_func(command_struct *cmd, int index, HWND hWnd)

{

#ifdef USE_GUI

unsigned long i;

char text[128];

int offset = DoubleWordSwap(*((unsigned long *)cmd->arg));

if (offset == 0)

ListView_AddTextItem(hWnd, IDC_LVEVENTLIST, index, 2, _T("End"));

for (i = 0; i < num_commands; i++)

{

if (command[i].offset == offset)

{

sprintf_s(text, sizeof(text), "%d", i);

ListView_AddTextItem(hWnd, IDC_LVEVENTLIST, index, 2, text);

break;

}

}

#endif

}

void dodialog_list_func(command_struct *command, int index, HWND hWnd)

{

#ifdef USE_GUI

WCHAR unicode[2048];

GenerateDialogText(command, FALSE, unicode, sizeof(unicode) / sizeof(WCHAR), TRUE);

ListView_AddTextItemW(hWnd, IDC_LVEVENTLIST, index, 2, unicode);

#endif

}

void condbra_list_func(command_struct *cmd, int index, HWND hWnd)

{

#ifdef USE_GUI

unsigned long i;

char text[128];

int offset = DoubleWordSwap(*((unsigned long *)(cmd->arg+3)));

for (i = 0; i < num_commands; i++)

{

if (command[i].offset == offset)

{

sprintf_s(text, sizeof(text), "%d", i);

ListView_AddTextItem(hWnd, IDC_LVEVENTLIST, index, 2, text);

break;

}

}

#endif

}

void cmd31_list_func(command_struct *cmd, int index, HWND hWnd)

{

#ifdef USE_GUI

char text[128];

sprintf_s(text, sizeof(text), "%d", cmd->arg[0]);

ListView_AddTextItem(hWnd, IDC_LVEVENTLIST, index, 2, text);

#endif

}

void print_hex2str(unsigned char* arg, int arg_length){

for(int i=0; i<arg_length; i++) {

printf("%02X",(int)arg[i]);

}

printf("\n");

}

int DoCommandParse(int cmd, char *name, unsigned char *buf, int size, BOOL count_events, void (*list_func)(command_struct *command, int index, HWND), command_struct *command)

{

if (!count_events)

{

command->cmd = cmd;

command->offset = (int)(buf-event_data)-1;

command->name = name;

command->arg_length = size;

memcpy(command->arg, buf, command->arg_length);

command->list_func = list_func;

}

#ifdef DEBUG_MODE

printf("\n--- command parsed:\n");

printf("name: %s\n", name );

printf("value: ");

print_hex2str(command->arg, command->arg_length);

printf("offset: %X\n", (int)(buf-event_data)-1 );

#endif

return size;

}

int EVNParse(unsigned char *evn_buf, int index, BOOL count_events, command_struct *command)

{

unsigned char cmd = evn_buf[index];

index++;

switch(cmd)

{

case 0x00: // Jump command

{

int offset=DoubleWordSwap(*((unsigned long *)(evn_buf+index)));

#ifndef NEW_FIXES

index += DoCommandParse(cmd, "Jump", evn_buf+index, 4, count_events, jump_list_func, command);

#else

int arg_len = 4;

if (evn_buf[index+1]) //nonzero 2nd argument

arg_len = evn_buf[index + 1]; //fixes 041_00_1, might break others

if (DoubleWordSwap(*((unsigned long*)(evn_buf + index - 3))) == 0 && index > 0x1000) //0x00000000 padding detected, including command & previous two (timing) bytes

{

arg_len = 1;

offset = 0;

}

index += DoCommandParse(cmd, "Jump", evn_buf+index, arg_len, count_events, jump_list_func, command);

#endif

if (offset == 0)

return -1;

break;

}

case 0x01: // Start Loop command

index += DoCommandParse(cmd, "StartLoop", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x02: // Another Loop command

index += DoCommandParse(cmd, "StartLoop2", evn_buf+index, 9, count_events, null_list_func, command);

break;

case 0x03: // End Loop command

index += DoCommandParse(cmd, "End Loop", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x04: // Do Dialogue

index += DoCommandParse(cmd, "Do Dialogue", evn_buf+index, 1, count_events, dodialog_list_func, command);

break;

case 0x05: // Conditional Branch

index += DoCommandParse(cmd, "Conditional Branch", evn_buf+index, 7, count_events, condbra_list_func, command);

break;

case 0x06: // Stub

index += DoCommandParse(cmd, "Null1", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x07: // Stub

index += DoCommandParse(cmd, "Null2", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x08: // ??

index += DoCommandParse(cmd, "CMD08", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x09: // ??

index += DoCommandParse(cmd, "CMD09", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x0A: // ??

index += DoCommandParse(cmd, "CMD0A", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x0B: // ??

index += DoCommandParse(cmd, "CMD0B", evn_buf+index, 2, count_events,null_list_func, command);

break;

case 0x0C: // ??

index += DoCommandParse(cmd, "CMD0C", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x0D: // ??

index += DoCommandParse(cmd, "CMD0D", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x0E: // ??

index += DoCommandParse(cmd, "CMD0E", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x0F: // ??

index += DoCommandParse(cmd, "CMD0F", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x10: // ??

index += DoCommandParse(cmd, "CMD10", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x11: // ??

index += DoCommandParse(cmd, "CMD11", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x12: // ??

index += DoCommandParse(cmd, "CMD12", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x13: // Stub

index += DoCommandParse(cmd, "Null3", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x14: // ??

index += DoCommandParse(cmd, "CMD14", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x15: // Fade in. arg: mask?(byte), rate of transition(byte). If rate of transition is greater than 5, it doesn't fade in at all.

index += DoCommandParse(cmd, "Fade In", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x16: // ??

index += DoCommandParse(cmd, "CMD16", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x17: // ??

index += DoCommandParse(cmd, "CMD17", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x18: // ??

index += DoCommandParse(cmd, "CMD18", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x19: // ??

index += DoCommandParse(cmd, "CMD19", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x1A: // ??

index += DoCommandParse(cmd, "CMD1A", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x1B: // ???

index += DoCommandParse(cmd, "CMD1B", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x1C: // ???

index += DoCommandParse(cmd, "CMD1C", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x1D: // ???

index += DoCommandParse(cmd, "CMD1D", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x1E: // ??

index += DoCommandParse(cmd, "CMD1E", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x1F: // Stub

index += DoCommandParse(cmd, "Null4", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x20: // ??

index += DoCommandParse(cmd, "CMD20", evn_buf+index, 0x22, count_events, null_list_func, command);

break;

case 0x21: // ??

index += DoCommandParse(cmd, "CMD21", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x22: // ??

index += DoCommandParse(cmd, "CMD22", evn_buf+index, 13, count_events, null_list_func, command);

break;

case 0x23: // Scroll Screen. arg: number of x increments(word), increment size(word). First arg should always be larger

index += DoCommandParse(cmd, "Scroll Screen", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x24: // ??

index += DoCommandParse(cmd, "CMD24", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x25: // ??

index += DoCommandParse(cmd, "CMD25", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x26: // ??

index += DoCommandParse(cmd, "CMD26", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x27: // ??

index += DoCommandParse(cmd, "CMD27", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x28: // ??

index += DoCommandParse(cmd, "CMD28", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x29: // ??

index += DoCommandParse(cmd, "CMD29", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x2A: // ??

index += DoCommandParse(cmd, "CMD2A", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x2B: // ??

index += DoCommandParse(cmd, "CMD2B", evn_buf+index, 9, count_events, null_list_func, command);

break;

case 0x2C: // Stub

index += DoCommandParse(cmd, "Null5", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x2D: // Stub

index += DoCommandParse(cmd, "Null6", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x2E: // ??

index += DoCommandParse(cmd, "CMD2E", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x2F: // Draw Sprite. arg: arg1(word), orientation(byte), xpos(word), ypos(byte)

index += DoCommandParse(cmd, "Draw Sprite", evn_buf+index, 6, count_events, null_list_func, command);

break;

case 0x30: // ??

index += DoCommandParse(cmd, "CMD30", evn_buf+index, 7, count_events, null_list_func, command);

break;

case 0x31: // ??

{

int arg = evn_buf[index];

index += DoCommandParse(cmd, "CMD31", evn_buf+index, 1, count_events, cmd31_list_func, command);

switch (arg)

{

case 0:

command->arg_length += 1;

memcpy(command->arg+1, evn_buf+index, 1);

index += 1;

break;

case 3:

command->arg_length += 8;

memcpy(command->arg+1, evn_buf+index, 8);

index += 8;

break;

case 4:

command->arg_length += 7;

memcpy(command->arg+1, evn_buf+index, 7);

index += 7;

break;

case 9:

case 11:

// no additional args

break;

case 10:

case 12:

// no additional args

break;

case 13:

case 14:

command->arg_length += 2;

memcpy(command->arg+1, evn_buf+index, 2);

index += 2;

break;

case 15:

command->arg_length += 6;

memcpy(command->arg+1, evn_buf+index, 6);

index += 6;

break;

case 18:

command->arg_length += 6;

memcpy(command->arg+1, evn_buf+index, 6);

index += 6;

break;

default: break;

}

break;

}

case 0x32: // ??

index += DoCommandParse(cmd, "CMD32", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x33: // ??

index += DoCommandParse(cmd, "CMD33", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x34: // ??

index += DoCommandParse(cmd, "CMD34", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x35: // ??

index += DoCommandParse(cmd, "CMD35", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x36: // ???

index += DoCommandParse(cmd, "CMD36", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x37: // ???

index += DoCommandParse(cmd, "CMD37", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x38: // ???

index += DoCommandParse(cmd, "CMD38", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x39: // ???

index += DoCommandParse(cmd, "CMD39", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x3A: // ???

index += DoCommandParse(cmd, "CMD3A", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x3B: // ???

index += DoCommandParse(cmd, "CMD3B", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x3C: // ??

index += DoCommandParse(cmd, "CMD3C", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x3D: // ??

index += DoCommandParse(cmd, "CMD3D", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x3E: // ??

index += DoCommandParse(cmd, "CMD3E", evn_buf+index, 14, count_events, null_list_func, command);

break;

case 0x3F: // ??

index += DoCommandParse(cmd, "CMD3F", evn_buf+index, 6, count_events, null_list_func, command);

break;

case 0x40: // Character Walk

index += DoCommandParse(cmd, "Character Walk", evn_buf+index, 9, count_events, null_list_func, command);

if (!(special_flags & 0x400))

{

memcpy(&command->arg[command->arg_length], evn_buf+index, 1);

command->arg_length++;

index++;

}

break;

case 0x41: // ???

index += DoCommandParse(cmd, "CMD41", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x42: // ??

index += DoCommandParse(cmd, "CMD42", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x43: // ???

index += DoCommandParse(cmd, "CMD43", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x44: // Character Animate

index += DoCommandParse(cmd, "Character Animate", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x45: // ???

index += DoCommandParse(cmd, "CMD45", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x46: // ???

{

int length = 8 + 2;

if (evn_buf[index+7] != 0)

length += 4;

else

length += 4;

index += DoCommandParse(cmd, "CMD46", evn_buf+index, length, count_events, null_list_func, command);

break;

}

case 0x47: // ???

index += DoCommandParse(cmd, "CMD47", evn_buf+index, 7, count_events, null_list_func, command);

break;

case 0x48: // ???

index += DoCommandParse(cmd, "CMD48", evn_buf+index, 9, count_events, null_list_func, command);

break;

case 0x49: // ???

index += DoCommandParse(cmd, "CMD49", evn_buf+index, 11, count_events, null_list_func, command);

break;

case 0x4A: // ???

index += DoCommandParse(cmd, "CMD4A", evn_buf+index, 6, count_events, null_list_func, command);

break;

case 0x4B: // ???

index += DoCommandParse(cmd, "CMD4B", evn_buf+index, 7, count_events, null_list_func, command);

break;

case 0x4C: // ???

index += DoCommandParse(cmd, "CMD4C", evn_buf+index, 8, count_events, null_list_func, command);

break;

case 0x4D: // Change Sprite Priority

index += DoCommandParse(cmd, "Change Sprite Priority", evn_buf+index, 5, count_events, null_list_func, command);

break;

case 0x4E: // ???

index += DoCommandParse(cmd, "CMD4E", evn_buf+index, 9, count_events, null_list_func, command);

break;

case 0x4F: // ???

index += DoCommandParse(cmd, "CMD4F", evn_buf+index, 10, count_events, null_list_func, command);

break;

case 0x50: // ??

index += DoCommandParse(cmd, "CMD50", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x51: // ??

index += DoCommandParse(cmd, "CMD51", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x52: // ??

index += DoCommandParse(cmd, "CMD52", evn_buf+index, 6, count_events, null_list_func, command);

break;

case 0x53: // ??

index += DoCommandParse(cmd, "CMD53", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x54: // ??

index += DoCommandParse(cmd, "CMD54", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x55: // ??

index += DoCommandParse(cmd, "CMD55", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x56: // ??

index += DoCommandParse(cmd, "CMD56", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x57: // ??

index += DoCommandParse(cmd, "CMD57", evn_buf+index, 5, count_events, null_list_func, command);

break;

case 0x58: // ??

index += DoCommandParse(cmd, "CMD58", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x59: // ??

index += DoCommandParse(cmd, "CMD59", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x5A: // ??

index += DoCommandParse(cmd, "CMD5A", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x5B: // ??

index += DoCommandParse(cmd, "CMD5B", evn_buf+index, 9, count_events, null_list_func, command);

break;

case 0x5C: // ??

index += DoCommandParse(cmd, "CMD5C", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x5D: // ??

index += DoCommandParse(cmd, "CMD5D", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x5E: // ??

index += DoCommandParse(cmd, "CMD5E", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x5F: // ??

index += DoCommandParse(cmd, "CMD5F", evn_buf+index, 7, count_events, null_list_func, command);

break;

case 0x60: // ??

index += DoCommandParse(cmd, "CMD60", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x61: // ??

index += DoCommandParse(cmd, "CMD61", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x62: // ??

index += DoCommandParse(cmd, "CMD62", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x63: // ??

index += DoCommandParse(cmd, "CMD63", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x64: // ??

index += DoCommandParse(cmd, "CMD64", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x65: // ??

index += DoCommandParse(cmd, "CMD65", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x66: // ??

index += DoCommandParse(cmd, "CMD66", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x67: // ??

index += DoCommandParse(cmd, "CMD67", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x68: // ??

index += DoCommandParse(cmd, "CMD68", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x69: // ??

index += DoCommandParse(cmd, "CMD69", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x6A: // ??

index += DoCommandParse(cmd, "CMD6A", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x6B: // ??

index += DoCommandParse(cmd, "CMD6B", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x6C: // ??

index += DoCommandParse(cmd, "CMD6C", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x6D: // ??

index += DoCommandParse(cmd, "CMD6D", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x6E: // ??

index += DoCommandParse(cmd, "CMD6E", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x6F: // ??

index += DoCommandParse(cmd, "CMD6F", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x70: // ??

index += DoCommandParse(cmd, "CMD70", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x71: // ??

index += DoCommandParse(cmd, "CMD71", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x72: // Stub

index += DoCommandParse(cmd, "Null7", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x73: // ??

index += DoCommandParse(cmd, "CMD73", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x74: // ??

index += DoCommandParse(cmd, "CMD74", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x75: // ??

index += DoCommandParse(cmd, "CMD75", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x76: // ??

#ifdef NEW_FIXES

// fix for https://github.com/eadmaster/pcrown/issues/88

puts("CMD76 found");

index += DoCommandParse(cmd, "CMD76", evn_buf+index, 5, count_events, null_list_func, command);

#else

index += DoCommandParse(cmd, "CMD76", evn_buf+index, 6, count_events, null_list_func, command);

#endif

break;

case 0x77: // ??

index += DoCommandParse(cmd, "CMD77", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x78: // ??

index += DoCommandParse(cmd, "CMD78", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x79: // ??

index += DoCommandParse(cmd, "CMD79", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x7A: // ??

index += DoCommandParse(cmd, "CMD7A", evn_buf+index, 4, count_events, null_list_func, command);

break;

case 0x7B: // ??

index += DoCommandParse(cmd, "CMD7B", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x7C: // ??

index += DoCommandParse(cmd, "CMD7C", evn_buf+index, 5, count_events, null_list_func, command);

break;

case 0x7D: // ??

index += DoCommandParse(cmd, "CMD7D", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x7E: // ??

index += DoCommandParse(cmd, "CMD7E", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x7F: // ??

index += DoCommandParse(cmd, "CMD7F", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x80: // ??

index += DoCommandParse(cmd, "CMD80", evn_buf+index, 2, count_events, null_list_func, command);

break;

case 0x81: // ??

index += DoCommandParse(cmd, "CMD81", evn_buf+index, 3, count_events, null_list_func, command);

break;

case 0x82: // ??

index += DoCommandParse(cmd, "CMD82", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x83: // ??

index += DoCommandParse(cmd, "CMD83", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x84: // ??

index += DoCommandParse(cmd, "CMD84", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x85: // ??

index += DoCommandParse(cmd, "CMD85", evn_buf+index, 1, count_events, null_list_func, command);

break;

case 0x86: // ??

index += DoCommandParse(cmd, "CMD86", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x87: // ??

index += DoCommandParse(cmd, "CMD87", evn_buf+index, 0, count_events, null_list_func, command);

break;

case 0x88: // ??

index += DoCommandParse(cmd, "CMD88", evn_buf+index, 0, count_events, null_list_func, command);

break;

/*

case 0xA8: // ?? found in 015_00_1 https://github.com/eadmaster/pcrown/issues/30

index += DoCommandParse(cmd, "CMDA8", evn_buf+index, 2, count_events, null_list_func, command);

// TESTED len: 6, 0, 1, 2, 3, 4, 9 (Character Walk), 8

break;

*/

default:

{

printf("Unknown command %02X at offset %08X\n", cmd, index);

/*

char tempstr[512];

if (count_events)

{

sprintf_s(tempstr, sizeof(tempstr), "Unknown command %02X at offset %08X", cmd, index);

MessageBoxA(NULL, tempstr, "Notice",

MB_OK | MB_ICONINFORMATION);

}*/

return -2;

}

}

return index;

}

int EVNLoadFile(const char *filename)

{

FILE *fp;

unsigned long f_size;

unsigned long cmdoffset=0;

int done = 0;

unsigned char *buf;

unsigned long i;

int index;

int max_command=0;

int *list=NULL, max_list=0, list_size=0;

if (file_loaded)

EVNFreeFile();

cmd43_var = 0xFF;

special_flags=0;

if (fopen_s(&fp, filename, "rb") != 0)

return -1;

f_size = _filelength(_fileno(fp));

if ((event_data = (unsigned char *)malloc(f_size)) == NULL)

{

fclose(fp);

return -3;

}

// Read event data in

fread((void *)event_data, 1, f_size, fp);

fclose(fp);

EVNParseHeader(event_data+0x1000, &header);

buf = event_data;

comp_data_table_offset = event_data[0x100e]*256 + event_data[0x100f] + 0x1000;

index = 0;

while (!done)

{

command_struct cmd;

if (event_data[index] == 0x43 && header.offsets1[event_data[index+1]] != 0)

{

ReallocMem((void **)&list, sizeof(int), &max_list, list_size);

list[list_size] = event_data[index+1];

//printf("list_size++: list[%d]\n", list_size, list[list_size]);

list_size++;

}

index = EVNParse(event_data, index, FALSE, &cmd);

#ifdef NEW_FIXES

if (index >= comp_data_table_offset)

done = true;

#endif

if (index < 0)

{

if (index != -2)

{

cmd.cmd43_var = cmd43_var;

ReallocMem((void **)&command, sizeof(command_struct), &max_command, num_commands);

memcpy(&command[num_commands], &cmd, sizeof(command_struct));

num_commands++;

}

/*

printf("list_size = %d\n", list_size);

if (list_size > 1)

{

printf("Error unsupported list size > 1\n");

fclose(fp);

if (list)

free(list);

EVNFreeFile();

return -4;

}

*/

for (i = 0; i < (unsigned long)list_size; i++)

{

unsigned short unknown;

cmd43_var = list[i];

special_flags |= 0x400;

index = 0x1000+header.offsets1[list[i]];

unknown = WordSwap(*((unsigned short *)(event_data+index)));

for (;;)

{

int old_index=index;

index += 2;

index = EVNParse(event_data, index, FALSE, &cmd);

cmd.time_diff = (event_data[old_index] << 8) | event_data[old_index+1];

if (index < 0)

{

if (index != -2)

{

cmd.cmd43_var = cmd43_var;

ReallocMem((void **)&command, sizeof(command_struct), &max_command, num_commands);

memcpy(&command[num_commands], &cmd, sizeof(command_struct));

num_commands++;

}

break;

}

else

{

cmd.cmd43_var = cmd43_var;

ReallocMem((void **)&command, sizeof(command_struct), &max_command, num_commands);

memcpy(&command[num_commands], &cmd, sizeof(command_struct));

num_commands++;

}

#ifdef NEW_FIXES

// fix for https://github.com/eadmaster/pcrown/issues/30

//if (i != list_size-1 && (index+2) > 0x1000+header.offsets1[list[i+1]])

// puts("015 fix diff");

if (i != list_size-1 && (index+2) == 0x1000+header.offsets1[list[i+1]])

break;

if (index >= comp_data_table_offset)

break;

#else

if (i != list_size-1 && (index+2) >= 0x1000+header.offsets1[list[i+1]])

break;

#endif

}

}

done = 1;

}

else

{

cmd.cmd43_var = cmd43_var;

ReallocMem((void **)&command, sizeof(command_struct), &max_command, num_commands);

memcpy(&command[num_commands], &cmd, sizeof(command_struct));

num_commands++;

}

}

// I shouldn't have to this, but I screwed up with my original dumps

for (i = 0; i < num_commands-1; i++)

{

// Check for any overlapping commands

if (command[i].offset+command[i].arg_length >= command[i+1].offset)

{

command[i].arg_length = 0;

//printf("command overlap: %d. offset = %08X, length = %d", i, command[i].offset, command[i].length);

}

}

//cmd43_var = 0xFF;

file_loaded = true;

fclose(fp);

if (list)

free(list);

return 0;

}

unsigned long EVNGetCompressionNum(int index)

{

unsigned long start, end, i;

if (index == -1)

{

if (header.cmp_data_offset != 0)

{

start = header.cmp_tbl_offset;

end = header.cmp_data_offset;

}

else

return 0;

}

else

{

if (header.offsets2[index] == 0 && index != 0)

return 0;

end = header.offsets2[index+1];

if (end == 0 || index == 7)

{

end = header.cmp_data_offset;

if (end == 0)

end = header.offsets3[0];

}

start = header.offsets2[index];

}

for (i = start+2; i < end; i+=2)

{

if (WordSwap(*((unsigned short *)(event_data+0x1000+i))) == 0)

{

end = i;

break;

}

}

return ((end-start)/2)-1;

}

unsigned long EVNGetCompressionOffsetAlt(int i)

{

return header.offsets3[i];

}

void EVNBuildHeader(unsigned char *data, evn_header_struct *header)

{

int i;

for (i = 1; i < 8; i++)

{

*((unsigned short*)data) = WordSwap(header->offsets1[i]);

data+=2;

}

*((unsigned short*)data) = WordSwap(header->cmp_tbl_offset);

data += 2;

for (i = 0; i < 8; i++)

{

*((unsigned short*)data) = WordSwap(header->offsets2[i]);

data+=2;

}

*((unsigned short*)data) = WordSwap(header->cmp_data_offset);

data += 2;

for (i = 0; i < 8; i++)

{

*((unsigned short*)data) = WordSwap(header->offsets3[i]);

data+=2;

}

}

void CompressCheckWriteMagicNumber(unsigned char *enc_count, unsigned char *magic_number, unsigned char **outbuf, int *out_size)

{

if (enc_count[0] == 4)

{

#ifdef DEBUG_MODE

printf("%02X", (unsigned char)magic_number[0]);

#endif

outbuf[0][0] = magic_number[0];

outbuf[0]++;

out_size[0]++;

enc_count[0] = 0;

magic_number[0] = 0;

}

}