romdevtools 0.71.1 → 0.84.1

package/src/platforms/gametank/lib/gt/audio/music.h

@@ -0,0 +1,35 @@
+#ifndef MUSIC_H
+#define MUSIC_H
+
+#include "audio_coprocessor.h"
+#include "instruments.h"
+
+#define REPEAT_NONE 0
+#define REPEAT_LOOP 1
+#define REPEAT_RESUME 2
+
+#define SFX_PRIORITY(x) (x<<4)
+
+void init_music();
+
+void play_song(const unsigned char* song, char bank_num, char loop);
+
+void tick_music();
+
+void silence_all_channels();
+
+void stop_music();
+
+void pause_music();
+
+void unpause_music();
+
+void set_note(char ch, char n);
+
+extern unsigned char audio_amplitudes[NUM_FM_OPS];
+
+void load_instrument(char channel, const Instrument* instr);
+
+void play_sound_effect(char sfx_id, char channel);
+
+#endif

package/src/platforms/gametank/lib/gt/audio/note_numbers.h

@@ -0,0 +1,132 @@
+#ifndef NOTE_NUMBERS_H
+#define NOTE_NUMBERS_H
+
+#define RST 0
+#define NUP 128
+
+#define Cn1 24
+#define Cs1 25
+#define Df1 25
+#define Dn1 26
+#define Ds1 27
+#define Ef1 27
+#define En1 28
+#define Fn1 29
+#define Fs1 30
+#define Gf1 30
+#define Gn1 31
+#define Gs1 32
+#define Af1 32
+#define An1 33
+#define As1 34
+#define Bf1 34
+#define Bn1 35
+
+#define Cn2 36
+#define Cs2 37
+#define Df2 37
+#define Dn2 38
+#define Ds2 39
+#define Ef2 39
+#define En2 40
+#define Fn2 41
+#define Fs2 42
+#define Gf2 42
+#define Gn2 43
+#define Gs2 44
+#define Af2 44
+#define An2 45
+#define As2 46
+#define Bf2 46
+#define Bn2 47
+
+#define Cn3 48
+#define Cs3 49
+#define Df3 49
+#define Dn3 50
+#define Ds3 51
+#define Ef3 51
+#define En3 52
+#define Fn3 53
+#define Fs3 54
+#define Gf3 54
+#define Gn3 55
+#define Gs3 56
+#define Af3 56
+#define An3 57
+#define As3 58
+#define Bf3 58
+#define Bn3 59
+
+#define Cn4 60
+#define Cs4 61
+#define Df4 61
+#define Dn4 62
+#define Ds4 63
+#define Ef4 63
+#define En4 64
+#define Fn4 65
+#define Fs4 66
+#define Gf4 66
+#define Gn4 67
+#define Gs4 68
+#define Af4 68
+#define An4 69
+#define As4 70
+#define Bf4 70
+#define Bn4 71
+
+#define Cn5 72
+#define Cs5 73
+#define Df5 73
+#define Dn5 74
+#define Ds5 75
+#define Ef5 75
+#define En5 76
+#define Fn5 77
+#define Fs5 78
+#define Gf5 78
+#define Gn5 79
+#define Gs5 80
+#define Af5 80
+#define An5 81
+#define As5 82
+#define Bf5 82
+#define Bn5 83
+
+#define Cn6 84
+#define Cs6 85
+#define Df6 85
+#define Dn6 86
+#define Ds6 87
+#define Ef6 87
+#define En6 88
+#define Fn6 89
+#define Fs6 90
+#define Gf6 90
+#define Gn6 91
+#define Gs6 92
+#define Af6 92
+#define An6 93
+#define As6 94
+#define Bf6 94
+#define Bn6 95
+
+#define Cn7 96
+#define Cs7 97
+#define Df7 97
+#define Dn7 98
+#define Ds7 99
+#define Ef7 99
+#define En7 100
+#define Fn7 101
+#define Fs7 102
+#define Gf7 102
+#define Gn7 103
+#define Gs7 104
+#define Af7 104
+#define An7 105
+#define As7 106
+#define Bf7 106
+#define Bn7 107
+#endif

package/src/platforms/gametank/lib/gt/banking.c

@@ -0,0 +1,29 @@
+#include "gametank.h"
+
+//must be power of 2
+#define BANK_STACK_SIZE 8
+//must be BANK_STACK_SIZE-1
+#define BANK_WRAP_MASK 7
+
+unsigned char romBankMirror;
+unsigned char romBankStack[BANK_STACK_SIZE];
+unsigned char romBankStackIdx;
+
+void bank_shift_out(unsigned char banknum);
+
+void change_rom_bank(unsigned char banknum) {
+    if(banknum != romBankMirror)
+        bank_shift_out(banknum);
+}
+
+void push_rom_bank() {
+    romBankStackIdx = (romBankStackIdx + 1) & BANK_WRAP_MASK;
+    romBankStack[romBankStackIdx] = romBankMirror;
+}
+
+void pop_rom_bank() {
+    change_rom_bank(romBankStack[romBankStackIdx]);
+    if(romBankStackIdx == 0)
+        romBankStackIdx = BANK_STACK_SIZE;
+    --romBankStackIdx;
+}

package/src/platforms/gametank/lib/gt/banking.h

@@ -0,0 +1,8 @@
+#ifndef BANKING_H
+#define BANKING_H
+
+void push_rom_bank();
+void change_rom_bank(unsigned char banknum);
+void pop_rom_bank();
+
+#endif

package/src/platforms/gametank/lib/gt/banking2.s

@@ -0,0 +1,41 @@
+.export _bank_shift_out
+.import _romBankMirror
+
+; ---------------------------------------------------------------
+; void __near__ bank_shift_out ()
+; ---------------------------------------------------------------
+
+OutBits = $2801
+
+.segment	"CODE"
+
+.proc	_bank_shift_out: near
+    sta _romBankMirror;
+    stz OutBits
+    clc
+    rol
+    rol
+    rol
+    tay
+
+.repeat 7
+    and #2
+    sta OutBits
+    ora #1
+    sta OutBits
+    tya
+    rol
+    tay
+.endrepeat
+
+    and #2
+    sta OutBits
+    ora #1
+    sta OutBits
+    ora #4
+    sta OutBits
+    stz OutBits
+    
+    rts
+
+.endproc

package/src/platforms/gametank/lib/gt/crt0.s

@@ -0,0 +1,102 @@
+; ---------------------------------------------------------------------------
+; crt0.s
+; ---------------------------------------------------------------------------
+;
+; Startup code for cc65 (GameTank version)
+
+.export   _init, _exit
+.import   _main, _sdk_init
+
+.export   __STARTUP__ : absolute = 1        ; Mark as startup
+.import   __RAM_START__, __RAM_SIZE__       ; Linker generated
+
+.import    copydata, zerobss, initlib, donelib
+
+.import _romBankMirror
+.import _bankflip
+.import _bank_shift_out
+
+.export _AudioFWPkg
+
+.PC02
+
+BankReg = $2005
+VIA = $2800
+ORB = 0
+ORAr = 1
+DDRB = 2
+DDRA = 3
+T1C = 5
+ACR = $B
+PCR = $C
+IFR = $D
+IER = $E
+
+.include  "zeropage.inc"
+
+; ----------------------------------------------------------<.BANK (_sdk_init)----------------
+; Place the startup code in a special segment
+
+.segment  "STARTUP"
+
+; ---------------------------------------------------------------------------
+; A little light 6502 housekeeping
+
+_init:    LDX     #$FF                 ; Initialize stack pointer to $01FF
+          TXS
+          CLD                          ; Clear decimal mode
+
+    ldx #0
+viaWakeup:
+	inx
+	bne viaWakeup
+	
+	LDA #40
+	STA BankReg
+	STA $1FFF
+	STZ BankReg
+	STZ $1FFF
+
+	LDA #%00000111
+	STA VIA+DDRA
+    LDA #$FF
+    STA VIA+ORAr
+	LDA #$FD
+	jsr _bank_shift_out
+
+
+; ---------------------------------------------------------------------------
+; Set cc65 argument stack pointer
+
+          LDA     #<(__RAM_START__ + __RAM_SIZE__)
+          STA     c_sp
+          LDA     #>(__RAM_START__ + __RAM_SIZE__)
+          STA     c_sp+1
+
+; ---------------------------------------------------------------------------
+; Initialize memory storage
+
+          JSR     zerobss              ; Clear BSS segment
+          JSR     copydata             ; Initialize DATA segment
+          JSR     initlib              ; Run constructors
+
+		  STZ _bankflip
+
+; ---------------------------------------------------------------------------
+; Call main()
+
+		  LDA #$FD
+		  jsr _bank_shift_out
+
+		  JSR	  _sdk_init
+          JSR     _main
+
+; ---------------------------------------------------------------------------
+; Back from main (this is also the _exit entry):  force a software break
+
+_exit:    JSR     donelib              ; Run destructors
+          BRK
+
+	.segment "COMMON"
+_AudioFWPkg:
+    .incbin "build/assets/audio_fw.bin.deflate"

package/src/platforms/gametank/lib/gt/draw_logo.s

@@ -0,0 +1,55 @@
+; ---------------------------------------------------------------------------
+; draw_logo.s
+; ---------------------------------------------------------------------------
+;
+; Draw the GameTank logo
+
+.export  _draw_gametank_logo
+
+DMA_VX = $4000
+DMA_VY = $4001
+DMA_GX = $4002
+DMA_GY = $4003
+DMA_WIDTH = $4004
+DMA_HEIGHT = $4005
+DMA_Start = $4006
+DMA_Color = $4007
+
+.segment  "LOADERS"
+
+;includes labels LogoXVals and LogoWVals
+.include "gametank_logo.inc"
+
+.proc _draw_gametank_logo: near
+        PHY
+        LDY #1
+        STY DMA_HEIGHT
+        STA DMA_Color
+        LDX #0
+        LDY #56
+DrawLoop:
+        LDA LogoWVals, x
+DrawLoopSkipW:
+        BEQ NextLine
+        STA DMA_WIDTH
+        LDA LogoXVals, x
+        STA DMA_VX
+        LDA #1
+        STA DMA_Start
+        INX
+        BRA DrawLoop
+NextLine:
+        INY
+        STY DMA_VY
+        INX
+        LDA LogoWVals, x
+        BEQ EndLoop
+        BRA DrawLoopSkipW
+EndLoop:
+
+        SEI
+        CLI
+        PLY
+        RTS                    ; Return to caller
+
+.endproc

package/src/platforms/gametank/lib/gt/feature/persist/persist.c

@@ -0,0 +1,103 @@
+#include "banking.h"
+#include "gametank.h"
+#include "persist.h"
+#include "bank_nums.h"
+#include "modules_enabled.h"
+
+#define MAGIC_SAVE_NUM 0x42
+
+#pragma rodata-name (push, "SAVE")
+const char save_canary = MAGIC_SAVE_NUM;
+#pragma rodata-name (pop)
+
+#ifdef ENABLE_MODULE_PERSIST
+
+char executing_from_rom() {
+    asm("PLX");
+    asm("PLA");
+    asm("PHA");
+    asm("PHX");
+    return __A__ > 0xC0;
+}
+
+#pragma code-name (push, "DATA")
+#pragma optimize (push, on)
+
+char i, k;
+void clear_save_sector() {
+    if(executing_from_rom()) {
+        while(1) {}
+    }
+    *dma_flags = flagsMirror & ~(DMA_IRQ | DMA_NMI);
+    asm("SEI");
+    push_rom_bank();
+    change_rom_bank(BANK_SAVE);
+    //unlock
+    *((unsigned char*) 0x8AAA) = 0xAA;
+    *((unsigned char*) 0x8555) = 0x55;
+    //setup
+    *((unsigned char*) 0x8AAA) = 0x80;
+    
+    //unlock
+    *((unsigned char*) 0x8AAA) = 0xAA;
+    *((unsigned char*) 0x8555) = 0x55;
+
+    //erase
+    *((unsigned char*) 0x8000) = 0x30;
+
+    i = *((unsigned char*) 0x8000);
+    k = *((unsigned char*) 0x8000);
+    while(i != k) {
+        i = k;
+        k = *((unsigned char*) 0x8000);
+    }
+    *dma_flags = flagsMirror;
+    asm("CLI");
+    pop_rom_bank();
+}
+
+void unlock_bypass() {
+    *((unsigned char*) 0x8AAA) = 0xAA;
+    *((unsigned char*) 0x8555) = 0x55;
+    *((unsigned char*) 0x8AAA) = 0x20;
+}
+
+void lock_bypass() {
+    *((unsigned char*) 0x8000) = 0x90;
+    *((unsigned char*) 0x8000) = 0x00;
+}
+
+//src assumed not Flash ROM
+//dest assumned to be in Flash ROM
+void save_write(void *src, void *dest, char len) {
+    if(executing_from_rom()) {
+        while(1) {}
+    }
+    *dma_flags = flagsMirror & ~(DMA_IRQ | DMA_NMI);
+    asm("SEI");
+    push_rom_bank();
+    change_rom_bank(BANK_SAVE);
+    i = 0;
+    k = len;
+    unlock_bypass();
+    while(k) {
+        *((unsigned char*) 0x8000) = 0xA0;
+        ((char *)dest)[i] = ((char *)src)[i];
+        while(((char *) dest)[i] != ((char *) src)[i]) {
+            
+        }
+        i++;
+        k--;
+    }
+    lock_bypass();
+    *dma_flags = flagsMirror;
+    asm("CLI");
+    pop_rom_bank();
+}
+
+
+#pragma optimize (pop)
+#pragma code-name (pop)
+
+
+#endif

package/src/platforms/gametank/lib/gt/feature/persist/persist.h

@@ -0,0 +1,13 @@
+#ifndef PERSIST_H
+#define PERSIST_H
+
+#include "modules_enabled.h"
+
+#ifndef ENABLE_MODULE_PERSIST
+#error "Module PERSIST included but not enabled!"
+#endif
+
+void clear_save_sector();
+void save_write(void *src, void *dest, char len);
+
+#endif

package/src/platforms/gametank/lib/gt/feature/random/random.c

@@ -0,0 +1,40 @@
+#include "random.h"
+#include "modules_enabled.h"
+
+#ifdef ENABLE_MODULE_RANDOM
+
+int xorshift16(int x) {
+    x |= x == 0;   /* if x == 0, set x = 1 instead */
+    x ^= (x & 0x07ff) << 5;
+    x ^= x >> 7;
+    x ^= (x & 0x0003) << 14;
+    return x;
+}
+
+int rnd_seed = 234;
+
+int rnd() {
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    rnd_seed = xorshift16(rnd_seed);
+    return rnd_seed;
+}
+
+int rnd_range(int low, int high) {
+    return ((rnd() & 0x7FFF) % (high - low)) + low;
+}
+
+#endif

package/src/platforms/gametank/lib/gt/feature/random/random.h

@@ -0,0 +1,18 @@
+/*
+ * Provides random numbers
+ */
+
+#ifndef RANDOM_H
+#define RANDOM_H
+
+#include "modules_enabled.h"
+
+#ifndef ENABLE_MODULE_RANDOM
+#error "Module RANDOM included but not enabled!"
+#endif
+
+int rnd();
+
+int rnd_range(int low, int high);
+
+#endif

package/src/platforms/gametank/lib/gt/feature/text/text.c

@@ -0,0 +1,111 @@
+#include "text.h"
+
+#include "gametank.h"
+#include "banking.h"
+#include "draw_direct.h"
+#include "sdk_default.h"
+#include "modules_enabled.h"
+#include "bank_nums.h"
+
+#define SPRITE_CHAR_W 8
+#define SPRITE_CHAR_H 8
+#define SPRITE_ROW_0_F 0x68
+#define SPRITE_ROW_G_V 0x70
+#define SPRITE_ROW_W_Z 0x78
+#define SPRITE_CHAR_BLANK_X 0x70
+#define SPRITE_CHAR_BLANK_Y 0x78
+
+#define TEXT_CHAR_WIDTH 8
+#define TEXT_CHAR_HEIGHT 8
+#define TEXT_LINE_HEIGHT 8
+
+#ifdef ENABLE_MODULE_TEXT
+
+char font_slot;
+char text_cursor_x, text_cursor_y;
+char text_print_width, text_print_line_start;
+unsigned char text_color;
+char font_offset_x, font_offset_y;
+
+void text_init() {
+    text_cursor_x = 0;
+    text_cursor_y = 0;
+    text_print_width = 128;
+    text_print_line_start = 0;
+    text_color = TEXT_COLOR_BLACK;
+}
+
+SpriteSlot text_load_font() {
+    font_slot = allocate_sprite(&ASSET__sdk_default__bios8_bmp_load_list);
+    font_offset_x = SPRITE_OFFSET_X(font_slot);
+    font_offset_y = SPRITE_OFFSET_Y(font_slot);
+    return font_slot;
+}
+
+char text_tmp;
+void text_print_string(char* str) {
+    *dma_flags = (flagsMirror | DMA_GCARRY) & ~(DMA_COLORFILL_ENABLE | DMA_OPAQUE);
+    banksMirror = bankflip | GRAM_PAGE(font_slot);
+    *bank_reg = banksMirror;
+    vram[WIDTH] = TEXT_CHAR_WIDTH;
+    vram[HEIGHT] = TEXT_CHAR_HEIGHT;
+    vram[VY] = text_cursor_y;
+    while(*str != 0) {
+        switch(*str) {
+            case ' ':
+                text_cursor_x += TEXT_CHAR_WIDTH;
+                break;
+            case '\n':
+                text_cursor_y += TEXT_CHAR_HEIGHT;
+                vram[VY] = text_cursor_y;
+                break;
+            case '\r':
+                text_cursor_x = text_print_line_start;
+                break;
+            default:
+                text_tmp = *str + text_color;
+                if(text_cursor_x >= (text_print_width + text_print_line_start)) {
+                    text_cursor_x -= text_print_width;
+                    text_cursor_y += TEXT_CHAR_HEIGHT;
+                    vram[VY] = text_cursor_y;
+                }
+                vram[VX] = text_cursor_x;
+                vram[GX] = ((text_tmp & 0x0F) << 3) | font_offset_x;
+                vram[GY] = ((text_tmp & 0xF0) >> 1) | font_offset_y;
+                vram[START] = 1;
+                text_cursor_x += TEXT_CHAR_WIDTH;
+                wait();
+        }
+
+        ++str;
+    }
+}
+
+#pragma rodata-name (push, "PROG0")
+
+const unsigned char decimal_conversion_table[100] = {
+    0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09,
+    0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19,
+    0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29,
+    0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39,
+    0x40, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49,
+    0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59,
+    0x60, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69,
+    0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79,
+    0x80, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89,
+    0x90, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 0x97, 0x98, 0x99
+};
+
+#pragma rodata-name (pop)
+
+void text_sprint_num(char* s, unsigned char num) {
+    if(num > 99) return;
+    push_rom_bank();
+    change_rom_bank(BANK_PROG0);
+    num = decimal_conversion_table[num];
+    *s = (num >> 4) + '0';
+    *(s+1) = (num & 0xF) + '0';
+    pop_rom_bank();
+}
+
+#endif