Eldred Habert ISSOtm

## cpp11.cpp
template<typename Ts...>
char * reassembleString(Ts... ts) {
    char * fragments[]{ts...};
    size_t size = 0;
    for(size_t i = 0; i < sizeof...(Ts); i++) {
        size += strlen(fragments[i]);
    }

    char * output = new char[size + 1];
    char * ptr = output;

## joypad.asm
    ld c, LOW(rP1)
    ld a, $20 ; Select D-pad
    ld [$ff00+c], a
REPT 6
    ld a, [$ff00+c]
ENDR
    or $F0 ; Set 4 upper bits (give them consistency)
    ld b, a

    ; Filter impossible D-pad combinations

## language_menu.asm

SECTION "Language menu header", ROMX

LanguageMenuHeader::
    db BANK("Language menu")
    dw LanguageMenuInit
    db PADF_START | PADF_DOWN | PADF_UP
    db 0 ; Prevent repeat press
    dw 0, 0, 0, ForceMenuValidation, 0, 0, 0, 0
    db 0 ; Previous item

## vblank_copy.asm
    jr z, .noVRAMTransfer ; This JR is out of range
    ld c, a
    ldh a, [hConsoleType]
    and a
    jr z, .GDMA
    ld [wSP], sp
    ldh a, [hVRAMCopySrc]
    ld l, a
    ldh a, [hVRAMCopySrc+1]
    ld h, a

## fade.asm
Fadeout::
	xor a
	ld [wFadeCount], a
	ld a, [wFadeSpeed]
	add a, a
	jr c, FadeOutToBlack
FadeOutToWhite:
	ld a, [wFadeSpeed]
	and $7F
	jr z, .maxSpeed

## popslide.asm
    push de
    ld [wSP], sp
    ldh a, [hVRAMCopySrc]
    ld l, a
    ldh a, [hVRAMCopySrc+1]
    ld h, a
    ld sp, hl
    ldh a, [hVRAMCopyDest]
    ld l, a
    ldh a, [hVRAMCopyDest+1]

## hardest_part_in_lexer.c

#define keepOnGetc(var, handle) \
	do { \
		(var) = fgetc(handle); \
	} while ((var) == EOF && ferror(handle) && errno == EINTR)

/* Pointer to chars to inject in lexer input */
static char const *insertPtr = NULL;
/* TODO: this doesn't handle interactive buffers; should it try to? */
/*

## set_data.s
	.include        "global.s"

	.globl  .copy_vram

	;; BANKED:      checked
	.area   _BASE

_set_bkg_data::
_set_win_data::
	ld d, #0x90

## pal_fade.asm

INCLUDE "defines.asm"

SECTION "Palette buffer fading", ROM0

; Applies fade to both palette buffers
;
FadePaletteBuffers::
	ld hl, wFadeSteps
	dec [hl]

## header.asm
Reset::
	di ; Disable interrupts while we set up

	; Kill sound
	xor a
	ldh [rNR52], a

	; Wait for VBlank and turn LCD off
.waitVBlank
	ldh a, [rLY]
	template<typename Ts...>
	char * reassembleString(Ts... ts) {
	char * fragments[]{ts...};
	size_t size = 0;
	for(size_t i = 0; i < sizeof...(Ts); i++) {
	size += strlen(fragments[i]);
	}

	char * output = new char[size + 1];
	char * ptr = output;
	ld c, LOW(rP1)
	ld a, $20 ; Select D-pad
	ld [$ff00+c], a
	REPT 6
	ld a, [$ff00+c]
	ENDR
	or $F0 ; Set 4 upper bits (give them consistency)
	ld b, a

	; Filter impossible D-pad combinations

	SECTION "Language menu header", ROMX

	LanguageMenuHeader::
	db BANK("Language menu")
	dw LanguageMenuInit
	db PADF_START \| PADF_DOWN \| PADF_UP
	db 0 ; Prevent repeat press
	dw 0, 0, 0, ForceMenuValidation, 0, 0, 0, 0
	db 0 ; Previous item
	jr z, .noVRAMTransfer ; This JR is out of range
	ld c, a
	ldh a, [hConsoleType]
	and a
	jr z, .GDMA
	ld [wSP], sp
	ldh a, [hVRAMCopySrc]
	ld l, a
	ldh a, [hVRAMCopySrc+1]
	ld h, a
	Fadeout::
	xor a
	ld [wFadeCount], a
	ld a, [wFadeSpeed]
	add a, a
	jr c, FadeOutToBlack
	FadeOutToWhite:
	ld a, [wFadeSpeed]
	and $7F
	jr z, .maxSpeed
	push de
	ld [wSP], sp
	ldh a, [hVRAMCopySrc]
	ld l, a
	ldh a, [hVRAMCopySrc+1]
	ld h, a
	ld sp, hl
	ldh a, [hVRAMCopyDest]
	ld l, a
	ldh a, [hVRAMCopyDest+1]

	#define keepOnGetc(var, handle) \
	do { \
	(var) = fgetc(handle); \
	} while ((var) == EOF && ferror(handle) && errno == EINTR)

	/* Pointer to chars to inject in lexer input */
	static char const *insertPtr = NULL;
	/* TODO: this doesn't handle interactive buffers; should it try to? */
	/*
	.include "global.s"

	.globl .copy_vram

	;; BANKED: checked
	.area _BASE

	_set_bkg_data::
	_set_win_data::
	ld d, #0x90

	INCLUDE "defines.asm"

	SECTION "Palette buffer fading", ROM0

	; Applies fade to both palette buffers
	;
	FadePaletteBuffers::
	ld hl, wFadeSteps
	dec [hl]