Files
kichikuou_xsystem35-sdl2/src/cmde.c
T
kichikuou 5ce1494b59 Match the original engine's patchEC behavior
The patchEC flag is default off, and EC 0 goes through the same
width/height adjustment as EC with a registered rectangle.
2026-09-05 12:23:09 +09:00

125 lines
3.1 KiB
C

/*
* cmde.c SYSTEM35 E command
*
* Copyright (C) 1997-1998 Masaki Chikama (Wren) <chikama@kasumi.ipl.mech.nagoya-u.ac.jp>
* 1998- <masaki-c@is.aist-nara.ac.jp>
*
* This program 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.
*
* This program 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 this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
/* $Id: cmde.c,v 1.11 2003/01/17 23:23:11 chikama Exp $ */
#include <stdio.h>
#include "portab.h"
#include "xsystem35.h"
#include "scenario.h"
#include "ags.h"
typedef struct {
SDL_Rect r;
int pal;
} Ecomtbl;
static Ecomtbl tbl[100];
void commandES() {
int num = getCaliValue();
int pal = getCaliValue();
int x = getCaliValue();
int y = getCaliValue();
int width = getCaliValue();
int height = getCaliValue();
tbl[num - 1].r.x = x;
tbl[num - 1].r.y = y;
tbl[num - 1].r.w = width;
tbl[num - 1].r.h = height;
tbl[num - 1].pal = pal;
TRACE("ES %d,%d,%d,%d,%d,%d:", num, pal, x, y, width, height);
}
void commandEC() {
int num = getCaliValue();
Ecomtbl *e;
SDL_Rect *r;
int adj = nact->patch_ec ? 0 : -1;
if (num == 0) {
r = &nact->ags.view_area;
ags_fillRectangle(r->x, r->y, r->w + adj, r->h + adj, 0);
ags_updateArea(r->x, r->y, r->w + adj, r->h + adj);
} else {
e = &tbl[num - 1];
ags_fillRectangle(e->r.x, e->r.y, e->r.w + adj, e->r.h + adj, e->pal);
ags_updateArea(e->r.x, e->r.y, e->r.w + adj, e->r.h + adj);
}
TRACE("EC %d:", num);
}
void commandEG() {
int num = getCaliValue();
vmvar_t *x = getCaliVariable();
vmvar_t *y = getCaliVariable();
vmvar_t *width = getCaliVariable();
vmvar_t *height = getCaliVariable();
*x = tbl[num -1].r.x;
*y = tbl[num -1].r.y;
*width = tbl[num -1].r.w;
*height = tbl[num -1].r.h;
TRACE("EG %d,%d,%d,%d,%d:", num, *x, *y, *width, *height);
}
void commandEM() {
int num = getCaliValue();
vmvar_t *var = getCaliVariable();
int x = getCaliValue();
int y = getCaliValue();
SDL_Point p = {x, y};
SDL_Rect r = tbl[num - 1].r;
if (!nact->patch_emen) {
r.w -= 1;
r.h -= 1;
}
*var = SDL_PointInRect(&p, &r) ? 1 : 0;
TRACE("EM %d,%d,%d,%d:", num, *var, x, y);
}
void commandEN() {
vmvar_t *var = getCaliVariable();
int min = getCaliValue();
int max = getCaliValue();
int x = getCaliValue();
int y = getCaliValue();
SDL_Point p = {x, y};
*var = 0;
for (int i = min; i <= max; i++) {
SDL_Rect r = tbl[i - 1].r;
if (!nact->patch_emen) {
r.w -= 1;
r.h -= 1;
}
if (SDL_PointInRect(&p, &r))
*var = i;
}
TRACE("EN %d,%d,%d,%d,%d:", *var, min, max, x, y);
}