mirror of https://github.com/nmlgc/ReC98.git
[C decompilation] ZUNSOFT.COM, all of it
And, of course, it recompiles into the exact binary ZUN shipped in 1997. Success! This project is so going to happen now.
This commit is contained in:
nmlgc
parent
cc219ff2b4
commit
f861b0a5c3
14
build16b.bat
14
build16b.bat
|
|
@ -4,13 +4,20 @@ echo If this fails or shows other weird behavior, run BUILD16B separately in DOS
|
||||||
REM (Yes, we don't use %0%, as it actually has to be %0 on DOS. Just spelling
|
REM (Yes, we don't use %0%, as it actually has to be %0 on DOS. Just spelling
|
||||||
REM out the name saves us that trouble.)
|
REM out the name saves us that trouble.)
|
||||||
|
|
||||||
|
set ReC98_CFLAGS=-Ilibs\master.lib\
|
||||||
|
set ReC98_LFLAGS=-Lbin\
|
||||||
set ReC98_LINK=tlink
|
set ReC98_LINK=tlink
|
||||||
|
|
||||||
%ReC98_LINK% 1>NUL 2>NUL
|
%ReC98_LINK% 1>NUL 2>NUL
|
||||||
if errorlevel 9009 goto no_tlink
|
if errorlevel 9009 goto no_tlink
|
||||||
if errorlevel 216 goto 64_bit
|
if errorlevel 216 goto 64_bit
|
||||||
|
|
||||||
%ReC98_LINK% /t bin\th01\zunsoft.obj
|
tcc 1>NUL 2>NUL
|
||||||
|
if errorlevel 9009 goto no_tcc
|
||||||
|
if errorlevel 216 goto 64_bit
|
||||||
|
|
||||||
|
tcc -lt -mt %ReC98_CFLAGS% %ReC98_LFLAGS% -O -a2 -nbin\th01\ th01\zunsoft.c masters.lib
|
||||||
|
|
||||||
%ReC98_LINK% bin\th01\op.obj
|
%ReC98_LINK% bin\th01\op.obj
|
||||||
%ReC98_LINK% bin\th01\reiiden.obj
|
%ReC98_LINK% bin\th01\reiiden.obj
|
||||||
%ReC98_LINK% bin\th01\fuuin.obj
|
%ReC98_LINK% bin\th01\fuuin.obj
|
||||||
|
|
@ -39,8 +46,13 @@ goto eof
|
||||||
echo You're running a 64-bit OS. Run BUILD16B.BAT separately in DOSBox instead.
|
echo You're running a 64-bit OS. Run BUILD16B.BAT separately in DOSBox instead.
|
||||||
goto eof
|
goto eof
|
||||||
|
|
||||||
|
:no_tcc
|
||||||
|
echo Could not find TCC.
|
||||||
|
goto tc4j_bin
|
||||||
:no_tlink
|
:no_tlink
|
||||||
echo Could not find TLINK.
|
echo Could not find TLINK.
|
||||||
|
goto tc4j_bin
|
||||||
|
:tc4j_bin
|
||||||
echo Please make sure that the BIN directory of Turbo C++ 4.0J is in your PATH.
|
echo Please make sure that the BIN directory of Turbo C++ 4.0J is in your PATH.
|
||||||
goto eof
|
goto eof
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -8,7 +8,6 @@ for /L %%i in (1,1,5) do mkdir bin\th0%%i 2>NUL
|
||||||
%ReC98_ASM% 1>NUL 2>NUL
|
%ReC98_ASM% 1>NUL 2>NUL
|
||||||
if errorlevel 9009 goto no_tasm32
|
if errorlevel 9009 goto no_tasm32
|
||||||
|
|
||||||
%ReC98_ASM% th01_zunsoft.asm bin\th01\zunsoft.obj
|
|
||||||
%ReC98_ASM% th01_op.asm bin\th01\op.obj
|
%ReC98_ASM% th01_op.asm bin\th01\op.obj
|
||||||
%ReC98_ASM% th01_reiiden.asm bin\th01\reiiden.obj
|
%ReC98_ASM% th01_reiiden.asm bin\th01\reiiden.obj
|
||||||
%ReC98_ASM% th01_fuuin.asm bin\th01\fuuin.obj
|
%ReC98_ASM% th01_fuuin.asm bin\th01\fuuin.obj
|
||||||
|
|
|
||||||
|
|
@ -0,0 +1,254 @@
|
||||||
|
/* ReC98
|
||||||
|
* -----
|
||||||
|
* ZUN Soft logo used in TH01, TH02 and TH03
|
||||||
|
*/
|
||||||
|
|
||||||
|
#include <master.h>
|
||||||
|
|
||||||
|
#define CIRCLE_COUNT 4
|
||||||
|
#define STAR_COUNT 50
|
||||||
|
|
||||||
|
const char LOGO_FILENAME[] = "touhou.dat";
|
||||||
|
static char CIRCLE_COLORS[] = {4, 3, 2, 1};
|
||||||
|
|
||||||
|
char page_write;
|
||||||
|
char page_show;
|
||||||
|
char tone;
|
||||||
|
char logo_num;
|
||||||
|
char wave_len;
|
||||||
|
char wave_phase;
|
||||||
|
char wave_amp;
|
||||||
|
Point circle_pos[CIRCLE_COUNT];
|
||||||
|
Point star_pos[STAR_COUNT];
|
||||||
|
int frame;
|
||||||
|
int circle_speed_x[CIRCLE_COUNT];
|
||||||
|
int circle_speed_y[CIRCLE_COUNT];
|
||||||
|
char star_angle;
|
||||||
|
unsigned char star_speed[STAR_COUNT];
|
||||||
|
|
||||||
|
void graph_clear_both(void)
|
||||||
|
{
|
||||||
|
graph_accesspage(1);
|
||||||
|
graph_clear();
|
||||||
|
graph_accesspage(0);
|
||||||
|
graph_clear();
|
||||||
|
graph_showpage(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
void zunsoft_init(void)
|
||||||
|
{
|
||||||
|
mem_assign_all();
|
||||||
|
graph_start();
|
||||||
|
key_beep_off();
|
||||||
|
text_systemline_hide();
|
||||||
|
text_cursor_hide();
|
||||||
|
egc_start();
|
||||||
|
graph_clear_both();
|
||||||
|
text_clear();
|
||||||
|
page_write = 0;
|
||||||
|
page_show = 1;
|
||||||
|
grc_setclip(96, 100, 543, 299);
|
||||||
|
graph_hide();
|
||||||
|
super_entry_bfnt(LOGO_FILENAME);
|
||||||
|
palette_show();
|
||||||
|
palette_black();
|
||||||
|
graph_show();
|
||||||
|
}
|
||||||
|
|
||||||
|
void zunsoft_exit(void)
|
||||||
|
{
|
||||||
|
super_free();
|
||||||
|
graph_clear_both();
|
||||||
|
mem_unassign();
|
||||||
|
text_clear();
|
||||||
|
egc_start();
|
||||||
|
}
|
||||||
|
|
||||||
|
void pascal cossin_times(int *cos, int *sin, unsigned char angle, int x)
|
||||||
|
{
|
||||||
|
*cos = (x * (long)Cos8(angle)) >> 8;
|
||||||
|
*sin = (x * (long)Sin8(angle)) >> 8;
|
||||||
|
}
|
||||||
|
|
||||||
|
void objects_setup(void)
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
|
||||||
|
circle_pos[0].x = 128; circle_speed_x[0] = -8;
|
||||||
|
circle_pos[0].y = 320; circle_speed_y[0] = 8;
|
||||||
|
|
||||||
|
circle_pos[1].x = 256; circle_speed_x[1] = -8;
|
||||||
|
circle_pos[1].y = 240; circle_speed_y[1] = 8;
|
||||||
|
|
||||||
|
circle_pos[2].x = 384; circle_speed_x[2] = -8;
|
||||||
|
circle_pos[2].y = 160; circle_speed_y[2] = 8;
|
||||||
|
|
||||||
|
circle_pos[3].x = 512; circle_speed_x[3] = -8;
|
||||||
|
circle_pos[3].y = 80; circle_speed_y[3] = 8;
|
||||||
|
|
||||||
|
frame = 0;
|
||||||
|
tone = 0;
|
||||||
|
logo_num = 0;
|
||||||
|
wave_len = 23;
|
||||||
|
wave_phase = 0;
|
||||||
|
wave_amp = 0;
|
||||||
|
|
||||||
|
for(i = 0; i < STAR_COUNT; i++) {
|
||||||
|
star_pos[i].x = rand() % 640;
|
||||||
|
star_pos[i].y = rand() % 400;
|
||||||
|
star_speed[i] = (rand() % 32) + 6;
|
||||||
|
}
|
||||||
|
star_angle = 64;
|
||||||
|
}
|
||||||
|
|
||||||
|
void circles_render_and_update(void)
|
||||||
|
{
|
||||||
|
int i = CIRCLE_COUNT - 1;
|
||||||
|
while(i >= 0) {
|
||||||
|
grcg_setcolor(GC_RMW, CIRCLE_COLORS[i]);
|
||||||
|
grcg_circlefill(circle_pos[i].x, circle_pos[i].y, 96);
|
||||||
|
|
||||||
|
circle_pos[i].x += circle_speed_x[i];
|
||||||
|
circle_pos[i].y += circle_speed_y[i];
|
||||||
|
if(circle_pos[i].x <= 32 || circle_pos[i].x > 607) {
|
||||||
|
circle_speed_x[i] *= -1;
|
||||||
|
}
|
||||||
|
if(circle_pos[i].y <= 32 || circle_pos[i].y > 367) {
|
||||||
|
circle_speed_y[i] *= -1;
|
||||||
|
}
|
||||||
|
i--;
|
||||||
|
}
|
||||||
|
grcg_off();
|
||||||
|
}
|
||||||
|
|
||||||
|
void stars_render_and_update(void)
|
||||||
|
{
|
||||||
|
int i;
|
||||||
|
grcg_setcolor(GC_RMW, 5);
|
||||||
|
for(i = 0; i < STAR_COUNT; i++) {
|
||||||
|
int cos, sin;
|
||||||
|
|
||||||
|
grcg_pset(star_pos[i].x, star_pos[i].y);
|
||||||
|
|
||||||
|
cossin_times(&cos, &sin, star_angle, star_speed[i]);
|
||||||
|
star_pos[i].x += cos;
|
||||||
|
star_pos[i].y += sin;
|
||||||
|
if(star_pos[i].x < 0) {
|
||||||
|
star_pos[i].x += 640;
|
||||||
|
} else if(star_pos[i].x >= 640) {
|
||||||
|
star_pos[i].x -= 640;
|
||||||
|
}
|
||||||
|
if(star_pos[i].y < 0) {
|
||||||
|
star_pos[i].y += 400;
|
||||||
|
} else if(star_pos[i].y >= 400) {
|
||||||
|
star_pos[i].y -= 400;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
star_angle++;
|
||||||
|
grcg_off();
|
||||||
|
}
|
||||||
|
|
||||||
|
void wait(void)
|
||||||
|
{
|
||||||
|
do {
|
||||||
|
__asm out 0x5F, al
|
||||||
|
__asm in al, 0xA0
|
||||||
|
} while((_AL & 0x20) != 0);
|
||||||
|
do {
|
||||||
|
__asm out 0x5F, al
|
||||||
|
__asm in al, 0xA0
|
||||||
|
} while((_AL & 0x20) == 0);
|
||||||
|
}
|
||||||
|
|
||||||
|
void logo_render_and_update(void)
|
||||||
|
{
|
||||||
|
if(frame < 50) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
if(frame < 90) {
|
||||||
|
if(frame == 55 || frame == 60 || frame == 65) {
|
||||||
|
logo_num += 2;
|
||||||
|
}
|
||||||
|
super_put_8(256, 192, logo_num+0);
|
||||||
|
super_put_8(320, 192, logo_num+1);
|
||||||
|
} else if(frame < 110) {
|
||||||
|
super_wave_put(256, 192, logo_num+0, wave_len, wave_amp, wave_phase);
|
||||||
|
super_wave_put(320, 192, logo_num+1, wave_len, wave_amp, wave_phase);
|
||||||
|
wave_len--;
|
||||||
|
wave_phase += 4;
|
||||||
|
wave_amp += 4;
|
||||||
|
} else if(frame < 130) {
|
||||||
|
if(frame == 110) {
|
||||||
|
logo_num += 2;
|
||||||
|
}
|
||||||
|
super_wave_put(256, 192, logo_num+0, wave_len, wave_amp, wave_phase);
|
||||||
|
super_wave_put(320, 192, logo_num+1, wave_len, wave_amp, wave_phase);
|
||||||
|
wave_len++;
|
||||||
|
wave_phase += 4;
|
||||||
|
wave_amp -= 4;
|
||||||
|
} else if(frame < 170) {
|
||||||
|
if(frame == 155 || frame == 160 || frame == 165) {
|
||||||
|
logo_num += 2;
|
||||||
|
}
|
||||||
|
super_put_8(256, 192, logo_num+0);
|
||||||
|
super_put_8(320, 192, logo_num+1);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
void main(void)
|
||||||
|
{
|
||||||
|
int keygroup, quit;
|
||||||
|
// Do some setup if we are running on a PC-9821
|
||||||
|
__asm {
|
||||||
|
xor ax, ax
|
||||||
|
mov es, ax
|
||||||
|
test byte ptr es:0x45C, 0x40
|
||||||
|
jz hw_setup_done
|
||||||
|
mov al, 0x7
|
||||||
|
out 0x6a, al
|
||||||
|
mov al, 0x20
|
||||||
|
out 0x6a, al
|
||||||
|
mov al, 0x6
|
||||||
|
out 0x6a, al
|
||||||
|
// Activate all graphics hardware in 16-color mode
|
||||||
|
and byte ptr es:0x54d, 0x7f
|
||||||
|
hw_setup_done:
|
||||||
|
}
|
||||||
|
zunsoft_init();
|
||||||
|
objects_setup();
|
||||||
|
while(1) {
|
||||||
|
if(frame > 180) {
|
||||||
|
if(tone <= 0) {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
palette_settone(tone -= 2);
|
||||||
|
} else if(tone < 100) {
|
||||||
|
palette_settone(tone += 2);
|
||||||
|
}
|
||||||
|
|
||||||
|
grcg_setcolor(GC_RMW, 0);
|
||||||
|
grcg_byteboxfill_x(12, 100, 67, 299);
|
||||||
|
stars_render_and_update();
|
||||||
|
circles_render_and_update();
|
||||||
|
logo_render_and_update();
|
||||||
|
wait();
|
||||||
|
wait();
|
||||||
|
__asm {
|
||||||
|
mov al, page_write
|
||||||
|
mov page_show, al
|
||||||
|
out 0xa4, al
|
||||||
|
xor page_write, 1
|
||||||
|
mov al, page_write
|
||||||
|
out 0xa6, al
|
||||||
|
}
|
||||||
|
quit = 0;
|
||||||
|
for(keygroup = 0; keygroup < 8; keygroup++) {
|
||||||
|
quit |= key_sense(keygroup);
|
||||||
|
}
|
||||||
|
if(quit) {
|
||||||
|
break;
|
||||||
|
}
|
||||||
|
frame++;
|
||||||
|
};
|
||||||
|
zunsoft_exit();
|
||||||
|
}
|
||||||
835
th01_zunsoft.asm
835
th01_zunsoft.asm
|
|
@ -1,835 +0,0 @@
|
||||||
;
|
|
||||||
; +-------------------------------------------------------------------------+
|
|
||||||
; | This file has been generated by The Interactive Disassembler (IDA) |
|
|
||||||
; | Copyright (c) 2009 by Hex-Rays, <support@hex-rays.com> |
|
|
||||||
; +-------------------------------------------------------------------------+
|
|
||||||
;
|
|
||||||
; Input MD5 : DE5454973591EBD937B11452A8B4882D
|
|
||||||
|
|
||||||
; File Name : th01/ZUNSOFT.COM
|
|
||||||
; Format : MS-DOS COM-file
|
|
||||||
; Base Address: 0h Range: 100h-2870h Loaded length: 2770h
|
|
||||||
; OS type : MS DOS
|
|
||||||
; Application type: Executable 16bit
|
|
||||||
|
|
||||||
.286 ; Force the .model directive to create 16-bit default segments...
|
|
||||||
.model tiny
|
|
||||||
__TINY__ equ 1
|
|
||||||
.386 ; ... then switch to what we actually need.
|
|
||||||
; And yes, we can't move this to an include file for some reason.
|
|
||||||
|
|
||||||
include ReC98.inc
|
|
||||||
include th01/th01.asm
|
|
||||||
|
|
||||||
CIRCLE_COUNT = 4
|
|
||||||
STAR_COUNT = 50
|
|
||||||
|
|
||||||
; ===========================================================================
|
|
||||||
|
|
||||||
; Segment type: Pure code
|
|
||||||
_TEXT segment word public 'CODE' use16
|
|
||||||
assume cs:_TEXT
|
|
||||||
org 100h
|
|
||||||
assume es:nothing, ss:_TEXT, ds:_TEXT, fs:nothing, gs:nothing
|
|
||||||
|
|
||||||
include libs/BorlandC/c0.asm
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_367 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
mov dx, 0A6h
|
|
||||||
mov al, 1
|
|
||||||
out dx, al
|
|
||||||
call graph_clear
|
|
||||||
mov dx, 0A6h
|
|
||||||
mov al, 0
|
|
||||||
out dx, al
|
|
||||||
call graph_clear
|
|
||||||
mov dx, 0A4h
|
|
||||||
mov al, 0
|
|
||||||
out dx, al
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_367 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_384 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
call mem_assign_all
|
|
||||||
call graph_start
|
|
||||||
call key_beep_off
|
|
||||||
call text_systemline_hide
|
|
||||||
call text_cursor_hide
|
|
||||||
call egc_start
|
|
||||||
call sub_367
|
|
||||||
call text_clear
|
|
||||||
mov page_write, 0
|
|
||||||
mov page_show, 1
|
|
||||||
call grc_setclip pascal, 96, 100, 543, 299
|
|
||||||
call graph_hide
|
|
||||||
call super_entry_bfnt pascal, offset aTouhou_dat
|
|
||||||
call palette_show
|
|
||||||
mov PaletteTone, 0
|
|
||||||
call palette_show
|
|
||||||
call graph_show
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_384 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_3D0 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
call super_free
|
|
||||||
call sub_367
|
|
||||||
call mem_unassign
|
|
||||||
call text_clear
|
|
||||||
call egc_start
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_3D0 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_3E4 proc near
|
|
||||||
|
|
||||||
arg_0 = word ptr 4
|
|
||||||
arg_2 = byte ptr 6
|
|
||||||
arg_4 = word ptr 8
|
|
||||||
arg_6 = word ptr 0Ah
|
|
||||||
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
push si
|
|
||||||
push di
|
|
||||||
mov si, [bp+arg_6]
|
|
||||||
mov di, [bp+arg_4]
|
|
||||||
mov ax, [bp+arg_0]
|
|
||||||
cwd
|
|
||||||
mov bl, [bp+arg_2]
|
|
||||||
mov bh, 0
|
|
||||||
and bx, 0FFh
|
|
||||||
add bx, bx
|
|
||||||
push ax
|
|
||||||
mov ax, _CosTable8[bx]
|
|
||||||
push dx
|
|
||||||
cwd
|
|
||||||
pop cx
|
|
||||||
pop bx
|
|
||||||
call N_LXMUL@
|
|
||||||
mov cl, 8
|
|
||||||
call N_LXRSH@
|
|
||||||
mov [si], ax
|
|
||||||
mov ax, [bp+arg_0]
|
|
||||||
cwd
|
|
||||||
mov bl, [bp+arg_2]
|
|
||||||
mov bh, 0
|
|
||||||
and bx, 0FFh
|
|
||||||
add bx, bx
|
|
||||||
push ax
|
|
||||||
mov ax, _SinTable8[bx]
|
|
||||||
push dx
|
|
||||||
cwd
|
|
||||||
pop cx
|
|
||||||
pop bx
|
|
||||||
call N_LXMUL@
|
|
||||||
mov cl, 8
|
|
||||||
call N_LXRSH@
|
|
||||||
mov [di], ax
|
|
||||||
pop di
|
|
||||||
pop si
|
|
||||||
pop bp
|
|
||||||
retn 8
|
|
||||||
sub_3E4 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_439 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
push si
|
|
||||||
mov (circle_pos[0 * size Point]).x, 128
|
|
||||||
mov circle_speed_x[0*2], -8
|
|
||||||
mov (circle_pos[0 * size Point]).y, 320
|
|
||||||
mov circle_speed_y[0*2], 8
|
|
||||||
mov (circle_pos[1 * size Point]).x, 256
|
|
||||||
mov circle_speed_x[1*2], -8
|
|
||||||
mov (circle_pos[1 * size Point]).y, 240
|
|
||||||
mov circle_speed_y[1*2], 8
|
|
||||||
mov (circle_pos[2 * size Point]).x, 384
|
|
||||||
mov circle_speed_x[2*2], -8
|
|
||||||
mov (circle_pos[2 * size Point]).y, 160
|
|
||||||
mov circle_speed_y[2*2], 8
|
|
||||||
mov (circle_pos[3 * size Point]).x, 512
|
|
||||||
mov circle_speed_x[3*2], -8
|
|
||||||
mov (circle_pos[3 * size Point]).y, 80
|
|
||||||
mov circle_speed_y[3*2], 8
|
|
||||||
mov frame, 0
|
|
||||||
mov tone, 0
|
|
||||||
mov logo_num, 0
|
|
||||||
mov wave_len, 23
|
|
||||||
mov wave_phase, 0
|
|
||||||
mov byte ptr wave_amp, 0
|
|
||||||
xor si, si
|
|
||||||
jmp short loc_4F5
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_4C0:
|
|
||||||
call IRand
|
|
||||||
mov bx, 640
|
|
||||||
cwd
|
|
||||||
idiv bx
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
mov star_pos[bx].x, dx
|
|
||||||
call IRand
|
|
||||||
mov bx, 400
|
|
||||||
cwd
|
|
||||||
idiv bx
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
mov star_pos[bx].y, dx
|
|
||||||
call IRand
|
|
||||||
mov bx, 32
|
|
||||||
cwd
|
|
||||||
idiv bx
|
|
||||||
add dl, 6
|
|
||||||
mov star_speed[si], dl
|
|
||||||
inc si
|
|
||||||
|
|
||||||
loc_4F5:
|
|
||||||
cmp si, STAR_COUNT
|
|
||||||
jl short loc_4C0
|
|
||||||
mov star_angle, 64
|
|
||||||
pop si
|
|
||||||
|
|
||||||
loc_500:
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_439 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_502 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
push si
|
|
||||||
mov si, CIRCLE_COUNT - 1
|
|
||||||
jmp loc_5A6
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_50C:
|
|
||||||
push GC_RMW
|
|
||||||
mov al, CIRCLE_COLORS[si]
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call grcg_setcolor
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
push circle_pos[bx].x
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
push circle_pos[bx].y
|
|
||||||
push 96
|
|
||||||
call grcg_circlefill
|
|
||||||
mov bx, si
|
|
||||||
add bx, bx
|
|
||||||
mov ax, circle_speed_x[bx]
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
add circle_pos[bx].x, ax
|
|
||||||
mov bx, si
|
|
||||||
add bx, bx
|
|
||||||
mov ax, circle_speed_y[bx]
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
add circle_pos[bx].y, ax
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp circle_pos[bx].x, 32
|
|
||||||
jle short loc_56A
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp circle_pos[bx].x, 607
|
|
||||||
jle short loc_57B
|
|
||||||
|
|
||||||
loc_56A:
|
|
||||||
mov bx, si
|
|
||||||
add bx, bx
|
|
||||||
mov dx, -1
|
|
||||||
mov ax, circle_speed_x[bx]
|
|
||||||
imul dx
|
|
||||||
mov circle_speed_x[bx], ax
|
|
||||||
|
|
||||||
loc_57B:
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp circle_pos[bx].y, 32
|
|
||||||
jle short loc_594
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp circle_pos[bx].y, 367
|
|
||||||
jle short loc_5A5
|
|
||||||
|
|
||||||
loc_594:
|
|
||||||
mov bx, si
|
|
||||||
add bx, bx
|
|
||||||
mov dx, -1
|
|
||||||
mov ax, circle_speed_y[bx]
|
|
||||||
imul dx
|
|
||||||
mov circle_speed_y[bx], ax
|
|
||||||
|
|
||||||
loc_5A5:
|
|
||||||
dec si
|
|
||||||
|
|
||||||
loc_5A6:
|
|
||||||
or si, si
|
|
||||||
jl short loc_5AD
|
|
||||||
jmp loc_50C
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_5AD:
|
|
||||||
mov dx, 7Ch
|
|
||||||
mov al, GC_OFF
|
|
||||||
out dx, al
|
|
||||||
pop si
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_502 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_5B6 proc near
|
|
||||||
|
|
||||||
var_4 = word ptr -4
|
|
||||||
var_2 = word ptr -2
|
|
||||||
|
|
||||||
enter 4, 0
|
|
||||||
push si
|
|
||||||
call grcg_setcolor pascal, GC_RMW, 5
|
|
||||||
xor si, si
|
|
||||||
jmp loc_66E
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_5C8:
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
push star_pos[bx].x
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
push star_pos[bx].y
|
|
||||||
call grcg_pset
|
|
||||||
lea ax, [bp+var_2]
|
|
||||||
push ax
|
|
||||||
lea ax, [bp+var_4]
|
|
||||||
push ax
|
|
||||||
push word ptr star_angle
|
|
||||||
mov al, star_speed[si]
|
|
||||||
mov ah, 0
|
|
||||||
push ax
|
|
||||||
call sub_3E4
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
mov ax, [bp+var_2]
|
|
||||||
add star_pos[bx].x, ax
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
mov ax, [bp+var_4]
|
|
||||||
add star_pos[bx].y, ax
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp star_pos[bx].x, 0
|
|
||||||
jge short loc_624
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
add star_pos[bx].x, 640
|
|
||||||
jmp short loc_63C
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_624:
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp star_pos[bx].x, 640
|
|
||||||
jl short loc_63C
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
sub star_pos[bx].x, 640
|
|
||||||
|
|
||||||
loc_63C:
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp star_pos[bx].y, 0
|
|
||||||
jge short loc_655
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
add star_pos[bx].y, 400
|
|
||||||
jmp short loc_66D
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_655:
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
cmp star_pos[bx].y, 400
|
|
||||||
jl short loc_66D
|
|
||||||
mov bx, si
|
|
||||||
shl bx, 2
|
|
||||||
sub star_pos[bx].y, 400
|
|
||||||
|
|
||||||
loc_66D:
|
|
||||||
inc si
|
|
||||||
|
|
||||||
loc_66E:
|
|
||||||
cmp si, STAR_COUNT
|
|
||||||
jge short loc_676
|
|
||||||
jmp loc_5C8
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_676:
|
|
||||||
inc star_angle
|
|
||||||
mov dx, 7Ch
|
|
||||||
mov al, GC_OFF
|
|
||||||
out dx, al
|
|
||||||
pop si
|
|
||||||
leave
|
|
||||||
retn
|
|
||||||
sub_5B6 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_683 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
|
|
||||||
loc_686:
|
|
||||||
out 5Fh, al
|
|
||||||
in al, 0A0h ; PIC 2 same as 0020 for PIC 1
|
|
||||||
test al, 20h
|
|
||||||
jnz short loc_686
|
|
||||||
|
|
||||||
loc_68E:
|
|
||||||
out 5Fh, al
|
|
||||||
in al, 0A0h ; PIC 2 same as 0020 for PIC 1
|
|
||||||
test al, 20h
|
|
||||||
jz short loc_68E
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_683 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
sub_698 proc near
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
cmp frame, 50
|
|
||||||
jge short loc_6A5
|
|
||||||
jmp loc_7CB
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_6A5:
|
|
||||||
cmp frame, 90
|
|
||||||
jge short loc_6CD
|
|
||||||
cmp frame, 55
|
|
||||||
jnz short loc_6B6
|
|
||||||
jmp loc_7A6
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_6B6:
|
|
||||||
cmp frame, 60
|
|
||||||
jnz short loc_6C0
|
|
||||||
jmp loc_7A6
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_6C0:
|
|
||||||
cmp frame, 65
|
|
||||||
jz short loc_6CA
|
|
||||||
jmp loc_7AE
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_6CA:
|
|
||||||
jmp loc_7A6
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_6CD:
|
|
||||||
cmp frame, 110
|
|
||||||
jge short loc_720
|
|
||||||
push 256
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
mov al, wave_len
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
push wave_amp
|
|
||||||
mov al, wave_phase
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call super_wave_put
|
|
||||||
push 320
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
inc ax
|
|
||||||
push ax
|
|
||||||
mov al, wave_len
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
push wave_amp
|
|
||||||
mov al, wave_phase
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call super_wave_put
|
|
||||||
dec wave_len
|
|
||||||
|
|
||||||
loc_711:
|
|
||||||
mov al, wave_phase
|
|
||||||
add al, 4
|
|
||||||
mov wave_phase, al
|
|
||||||
mov al, byte ptr wave_amp
|
|
||||||
add al, 4
|
|
||||||
jmp short loc_781
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_720:
|
|
||||||
cmp frame, 130
|
|
||||||
jge short loc_786
|
|
||||||
cmp frame, 110
|
|
||||||
jnz short loc_737
|
|
||||||
mov al, logo_num
|
|
||||||
add al, 2
|
|
||||||
mov logo_num, al
|
|
||||||
|
|
||||||
loc_737:
|
|
||||||
push 256
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
mov al, wave_len
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
push wave_amp
|
|
||||||
mov al, wave_phase
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call super_wave_put
|
|
||||||
push 320
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
inc ax
|
|
||||||
push ax
|
|
||||||
mov al, wave_len
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
push wave_amp
|
|
||||||
mov al, wave_phase
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call super_wave_put
|
|
||||||
inc wave_len
|
|
||||||
mov al, wave_phase
|
|
||||||
add al, 4
|
|
||||||
mov wave_phase, al
|
|
||||||
mov al, byte ptr wave_amp
|
|
||||||
add al, -4
|
|
||||||
|
|
||||||
loc_781:
|
|
||||||
mov byte ptr wave_amp, al
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_786:
|
|
||||||
cmp frame, 170
|
|
||||||
jge short loc_7CB
|
|
||||||
cmp frame, 155
|
|
||||||
jz short loc_7A6
|
|
||||||
cmp frame, 160
|
|
||||||
jz short loc_7A6
|
|
||||||
cmp frame, 165
|
|
||||||
jnz short loc_7AE
|
|
||||||
|
|
||||||
loc_7A6:
|
|
||||||
mov al, logo_num
|
|
||||||
add al, 2
|
|
||||||
mov logo_num, al
|
|
||||||
|
|
||||||
loc_7AE:
|
|
||||||
push 256
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
push ax
|
|
||||||
call super_put_8
|
|
||||||
push 320
|
|
||||||
push 192
|
|
||||||
mov al, logo_num
|
|
||||||
cbw
|
|
||||||
inc ax
|
|
||||||
push ax
|
|
||||||
call super_put_8
|
|
||||||
|
|
||||||
loc_7CB:
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
sub_698 endp
|
|
||||||
|
|
||||||
|
|
||||||
; =============== S U B R O U T I N E =======================================
|
|
||||||
|
|
||||||
; Attributes: bp-based frame
|
|
||||||
|
|
||||||
; int __cdecl main(int argc, const char **argv, const char **envp)
|
|
||||||
_main proc near
|
|
||||||
|
|
||||||
_argc = word ptr 4
|
|
||||||
_argv = word ptr 6
|
|
||||||
_envp = word ptr 8
|
|
||||||
|
|
||||||
push bp
|
|
||||||
mov bp, sp
|
|
||||||
push si
|
|
||||||
push di
|
|
||||||
xor ax, ax
|
|
||||||
mov es, ax
|
|
||||||
test byte ptr es:[045Ch], 40h
|
|
||||||
jz short loc_7F0
|
|
||||||
mov al, 7
|
|
||||||
out 6Ah, al ; PC-98 GDC (6a):
|
|
||||||
;
|
|
||||||
mov al, 20h
|
|
||||||
out 6Ah, al ; PC-98 GDC (6a):
|
|
||||||
;
|
|
||||||
mov al, 6
|
|
||||||
out 6Ah, al ; PC-98 GDC (6a):
|
|
||||||
;
|
|
||||||
and byte ptr es:[54Dh], 7Fh
|
|
||||||
|
|
||||||
loc_7F0:
|
|
||||||
call sub_384
|
|
||||||
call sub_439
|
|
||||||
|
|
||||||
loc_7F6:
|
|
||||||
cmp frame, 180
|
|
||||||
jle short loc_80C
|
|
||||||
cmp tone, 0
|
|
||||||
jle short loc_873
|
|
||||||
mov al, tone
|
|
||||||
add al, -2
|
|
||||||
jmp short loc_818
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_80C:
|
|
||||||
cmp tone, 100
|
|
||||||
jge short loc_822
|
|
||||||
mov al, tone
|
|
||||||
add al, 2
|
|
||||||
|
|
||||||
loc_818:
|
|
||||||
mov tone, al
|
|
||||||
cbw
|
|
||||||
mov PaletteTone, ax
|
|
||||||
call palette_show
|
|
||||||
|
|
||||||
loc_822:
|
|
||||||
call grcg_setcolor pascal, GC_RMW, 0
|
|
||||||
call grcg_byteboxfill_x pascal, 12, 100, 67, 299
|
|
||||||
call sub_5B6
|
|
||||||
call sub_502
|
|
||||||
call sub_698
|
|
||||||
call sub_683
|
|
||||||
call sub_683
|
|
||||||
mov al, page_write
|
|
||||||
mov page_show, al
|
|
||||||
out 0A4h, al
|
|
||||||
xor page_write, 1
|
|
||||||
mov al, page_write
|
|
||||||
out 0A6h, al
|
|
||||||
xor di, di
|
|
||||||
xor si, si
|
|
||||||
jmp short loc_864
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_85D:
|
|
||||||
push si
|
|
||||||
call key_sense
|
|
||||||
or di, ax
|
|
||||||
inc si
|
|
||||||
|
|
||||||
loc_864:
|
|
||||||
cmp si, 8
|
|
||||||
jl short loc_85D
|
|
||||||
or di, di
|
|
||||||
jnz short loc_873
|
|
||||||
inc frame
|
|
||||||
jmp short loc_7F6
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
|
|
||||||
loc_873:
|
|
||||||
call sub_3D0
|
|
||||||
pop di
|
|
||||||
pop si
|
|
||||||
pop bp
|
|
||||||
retn
|
|
||||||
_main endp
|
|
||||||
|
|
||||||
include libs/master.lib/text_clear.asm
|
|
||||||
include libs/master.lib/txesc.asm
|
|
||||||
include libs/master.lib/graph_400line.asm
|
|
||||||
include libs/master.lib/graph_clear.asm
|
|
||||||
include libs/master.lib/graph_hide.asm
|
|
||||||
include libs/master.lib/graph_show.asm
|
|
||||||
include libs/master.lib/graph_start.asm
|
|
||||||
include libs/master.lib/palette_show.asm
|
|
||||||
include libs/master.lib/palette_init.asm
|
|
||||||
include libs/master.lib/keybeep.asm
|
|
||||||
include libs/master.lib/key_sense.asm
|
|
||||||
include libs/master.lib/bfnt_header_read.asm
|
|
||||||
include libs/master.lib/bfnt_entry_pat.asm
|
|
||||||
include libs/master.lib/bfnt_header_analysis.asm
|
|
||||||
include libs/master.lib/bfnt_palette_set.asm
|
|
||||||
include libs/master.lib/dos_close.asm
|
|
||||||
include libs/master.lib/dos_ropen.asm
|
|
||||||
include libs/master.lib/super_entry_bfnt.asm
|
|
||||||
include libs/master.lib/super_cancel_pat.asm
|
|
||||||
include libs/master.lib/super_entry_pat.asm
|
|
||||||
include libs/master.lib/super_put_8.asm
|
|
||||||
include libs/master.lib/super_free.asm
|
|
||||||
include libs/master.lib/super_entry_at.asm
|
|
||||||
include libs/master.lib/super_wave_put.asm
|
|
||||||
include libs/master.lib/smem_wget.asm
|
|
||||||
include libs/master.lib/smem_release.asm
|
|
||||||
include libs/master.lib/memheap.asm
|
|
||||||
include libs/master.lib/mem_assign.asm
|
|
||||||
include libs/master.lib/mem_unassign.asm
|
|
||||||
include libs/master.lib/grc_setclip.asm
|
|
||||||
include libs/master.lib/grcg_hline.asm
|
|
||||||
include libs/master.lib/grcg_setcolor.asm
|
|
||||||
include libs/master.lib/grcg_pset.asm
|
|
||||||
include libs/master.lib/egc.asm
|
|
||||||
include libs/master.lib/grcg_circlefill.asm
|
|
||||||
include libs/master.lib/grcg_byteboxfill_x.asm
|
|
||||||
include libs/master.lib/random.asm
|
|
||||||
include libs/BorlandC/_abort.asm
|
|
||||||
include libs/BorlandC/atexit.asm
|
|
||||||
include libs/BorlandC/errormsg.asm
|
|
||||||
include libs/BorlandC/exit.asm
|
|
||||||
include libs/BorlandC/H_LRSH.ASM
|
|
||||||
include libs/BorlandC/ioerror.asm
|
|
||||||
include libs/BorlandC/_isatty.asm
|
|
||||||
include libs/BorlandC/lseek.asm
|
|
||||||
include libs/BorlandC/N_LXMUL.ASM
|
|
||||||
include libs/BorlandC/setupio.asm
|
|
||||||
include libs/BorlandC/brk.asm
|
|
||||||
include libs/BorlandC/nearheap.asm
|
|
||||||
include libs/BorlandC/fflush.asm
|
|
||||||
include libs/BorlandC/flushall.asm
|
|
||||||
include libs/BorlandC/fseek.asm
|
|
||||||
include libs/BorlandC/setvbuf.asm
|
|
||||||
include libs/BorlandC/_strlen.asm
|
|
||||||
include libs/BorlandC/write.asm
|
|
||||||
include libs/BorlandC/writea.asm
|
|
||||||
include libs/BorlandC/xfflush.asm
|
|
||||||
|
|
||||||
; ---------------------------------------------------------------------------
|
|
||||||
db 0
|
|
||||||
db 0
|
|
||||||
db 0
|
|
||||||
include libs/BorlandC/c0[data].asm
|
|
||||||
aTOUHOU_DAT db 'touhou.dat',0
|
|
||||||
CIRCLE_COLORS db 4, 3, 2, 1, 0
|
|
||||||
include libs/master.lib/version[data].asm
|
|
||||||
include libs/master.lib/grp[data].asm
|
|
||||||
include libs/master.lib/pal[data].asm
|
|
||||||
include libs/master.lib/bfnt_id[data].asm
|
|
||||||
include libs/master.lib/dos_ropen[data].asm
|
|
||||||
include libs/master.lib/super_entry_bfnt[data].asm
|
|
||||||
include libs/master.lib/superpa[data].asm
|
|
||||||
include libs/master.lib/mem[data].asm
|
|
||||||
include libs/master.lib/clip[data].asm
|
|
||||||
include libs/master.lib/edges[data].asm
|
|
||||||
include libs/master.lib/sin8[data].asm
|
|
||||||
include libs/master.lib/sin7[data].asm
|
|
||||||
include libs/master.lib/rand[data].asm
|
|
||||||
include libs/BorlandC/_abort[data].asm
|
|
||||||
include libs/BorlandC/atexit[data].asm
|
|
||||||
include libs/BorlandC/exit[data].asm
|
|
||||||
include libs/BorlandC/files[data].asm
|
|
||||||
__heaplen dw 0
|
|
||||||
include libs/BorlandC/ioerror[data].asm
|
|
||||||
include libs/BorlandC/stklen[data].asm
|
|
||||||
include libs/BorlandC/nearheap[data].asm
|
|
||||||
include libs/BorlandC/setvbuf[data].asm
|
|
||||||
include libs/BorlandC/sysnerr[data].asm
|
|
||||||
|
|
||||||
InitStart label byte
|
|
||||||
include libs/BorlandC/setupio[initdata].asm
|
|
||||||
InitEnd label byte
|
|
||||||
|
|
||||||
ExitStart label byte
|
|
||||||
ExitEnd label byte
|
|
||||||
|
|
||||||
bdata@ label byte
|
|
||||||
; TODO: Missing clip[bss].asm (8 bytes) somewhere in there...
|
|
||||||
page_write db ?
|
|
||||||
page_show db ?
|
|
||||||
tone db ?
|
|
||||||
logo_num db ?
|
|
||||||
wave_len db ?
|
|
||||||
wave_phase db ?
|
|
||||||
wave_amp dw ?
|
|
||||||
circle_pos Point CIRCLE_COUNT dup(<?>)
|
|
||||||
star_pos Point STAR_COUNT dup(<?>)
|
|
||||||
frame dw ?
|
|
||||||
circle_speed_x dw CIRCLE_COUNT dup(?)
|
|
||||||
circle_speed_y dw CIRCLE_COUNT dup(?)
|
|
||||||
star_angle db ?
|
|
||||||
star_speed db STAR_COUNT dup(?)
|
|
||||||
db ? ;
|
|
||||||
include libs/master.lib/pal[bss].asm
|
|
||||||
include libs/master.lib/superpa[bss].asm
|
|
||||||
include libs/master.lib/super_wave_put[bss].asm
|
|
||||||
include libs/master.lib/mem[bss].asm
|
|
||||||
dd ?
|
|
||||||
dd ?
|
|
||||||
dd ?
|
|
||||||
dd ?
|
|
||||||
include libs/BorlandC/atexit[bss].asm
|
|
||||||
edata@ label byte
|
|
||||||
|
|
||||||
_TEXT ends
|
|
||||||
|
|
||||||
|
|
||||||
end startx
|
|
||||||
Loading…
Reference in New Issue