mirror of https://github.com/nmlgc/ReC98.git
47 lines
911 B
C++
47 lines
911 B
C++
#pragma option -zCmain_03_TEXT
|
|
|
|
#include "platform.h"
|
|
#include "pc98.h"
|
|
#include "master.hpp"
|
|
#include "th02/gaiji/gaiji.h"
|
|
#include "th02/main/playfld.hpp"
|
|
#include "th02/main/hud/overlay.hpp"
|
|
|
|
void pascal near overlay_int_put(
|
|
tram_x_t left, tram_y_t y, int digits, long val
|
|
)
|
|
{
|
|
enum {
|
|
DIGITS_MAX = 8,
|
|
};
|
|
|
|
int i;
|
|
int gaiji = gb_0_; // ACTUAL TYPE: gaiji_th02_t
|
|
long divisor = 10000000; // Must match DIGITS_MAX!
|
|
long digit;
|
|
bool past_leading_zeroes = false;
|
|
|
|
for(i = DIGITS_MAX; i > digits; i--) {
|
|
divisor /= 10;
|
|
}
|
|
for(i = 0; i < digits; i++) {
|
|
digit = ((val / divisor) % 10);
|
|
divisor /= 10;
|
|
gaiji = (digit + gb_0_);
|
|
if(digit != 0) {
|
|
past_leading_zeroes = true;
|
|
}
|
|
if(i == (digits - 1)) {
|
|
past_leading_zeroes = true;
|
|
}
|
|
if(past_leading_zeroes) {
|
|
gaiji_putca((left + (i * GAIJI_TRAM_W)), y, gaiji, TX_WHITE);
|
|
}
|
|
}
|
|
}
|
|
|
|
void overlay_wipe(void)
|
|
{
|
|
overlay_fill(TX_WHITE);
|
|
}
|