mirror of
https://github.com/kichikuou/xsystem35-sdl2.git
synced 2026-09-22 22:48:08 +03:00
kichikuou
a627a8ea3d
Define a dedicated `vmvar_t` type for values stored in variable pages and propagate it through interfaces that expose those values. Keep the type as int for now so this commit does not change runtime behavior. This separates VM storage from ordinary int buffers and makes a later conversion to 16-bit storage mechanically checkable.
82 lines
2.1 KiB
C
82 lines
2.1 KiB
C
/*
|
|
* RandMT.c 王子さま Lv1: (おそらく Mersenne Twister使用の)乱数生成
|
|
*
|
|
* 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: RandMT.c,v 1.3 2002/09/01 11:54:51 chikama Exp $ */
|
|
|
|
#include "config.h"
|
|
|
|
#include <stdio.h>
|
|
|
|
#include "portab.h"
|
|
#include "system.h"
|
|
#include "xsystem35.h"
|
|
#include "modules.h"
|
|
#include "nact.h"
|
|
#include "randMT.h"
|
|
|
|
static void Init() {
|
|
/*
|
|
乱数初期化
|
|
|
|
p1: 初期化用 seed
|
|
*/
|
|
int p1 = getCaliValue(); /* ITimer */
|
|
|
|
TRACE_UNIMPLEMENTED("RandMT.Init %p:", p1);
|
|
}
|
|
|
|
static void Get() {
|
|
/*
|
|
1 から num までの乱数を生成
|
|
|
|
num: 最大値
|
|
var: 結果を返す変数
|
|
*/
|
|
int num = getCaliValue();
|
|
vmvar_t *var = getCaliVariable();
|
|
|
|
if (num == 0 || num == 1) {
|
|
*var = num;
|
|
} else {
|
|
*var = (int)(genrand() * num) + 1;
|
|
}
|
|
|
|
TRACE("RandMT.Get %d,%p:", num, var);
|
|
}
|
|
|
|
static void GetNoOverlap() {
|
|
int min = getCaliValue();
|
|
int n = getCaliValue();
|
|
vmvar_t *var = getCaliVariable();
|
|
|
|
*var = (int)(genrand() * n) + min;
|
|
|
|
TRACE("RandMT.GetNoOverlap %d,%d,%p:", min, n, var);
|
|
}
|
|
|
|
static const ModuleFunc functions[] = {
|
|
{"Get", Get},
|
|
{"GetNoOverlap", GetNoOverlap},
|
|
{"Init", Init},
|
|
};
|
|
|
|
const Module module_RandMT = {"RandMT", functions, sizeof(functions) / sizeof(ModuleFunc)};
|