/*---------------------------------------------------------

        C64 Game System Cartridge, System 3
          512Kb (64 banks a 8Kb located at $8000-$9fff)

        Cartridge Header File is set up 100%, no need to touch.
        Chip Header File needs to be repeated for each chip
          only update is 'CartridgeChipNumber' which is updated
          automatically when the header data is copied into the
          chip in question.

        Bank switching:
          Write to address $de00 + x, where x is the bank number.

        Kickass Compiling:
          -aom
          -binfile
          -maxaddr -1
          Output as "file.crt"

        VICE Autostart:
          x64sc.exe -cartcrt "${outputFilePath}"

    ---------------------------------------------------------*/


    // Functions
    // ------------------------

    .function _SwitchEndian16(argument) {
        .return floor(argument / $100) + floor([argument/$100-floor(argument / $100)]*256)*256
    }
    .function _SwitchEndian32(argument) {
        .return floor(argument / $1000000) + [floor(argument / $10000) - floor(argument / $1000000)*256]*256 + [floor(argument / $100) - floor(argument / $10000)*256]*$10000 + [argument - floor(argument / $100)*256]*$1000000
    }

    // Variables
    // ------------------------

    .var i                     = 0

    // Cartridge Parameters
    // ------------------------

    // Cartridge Header File
    .const CartridgeHeaderSize     = $40                  // #$40 is default Double Word (Big endian)
    .const CartridgeVersion        = 1.000                // High/Low Order Fixed Point Word
    .const CartridgeType           = 15                   // 15 = C64 GS System 3. Word (Big Endian)
    .const CartridgeEXROM          = 1                    // 0 = Inactive & 1 = Active.
    .const CartridgeGAME           = 0                    // 0 = Inactive & 1 = Active.
    .const CartridgeName           = "C64GS C"            // Maximum 32 bytes.
    // Chip Header File
    .const CartridgeChipHeaderSize = $10                  // Size of Bank Header Integer (#$10 is default)
    .const CartridgeChipSize       = $2000                // Size of Cartridge Banks Integer
    .const CartridgeChipType       = 0                    // 0 = ROM, 1 = RAM, 2 = Flash. Word (Big Endian)
    .var CartridgeChipNumber       = 0                    // ID Number for the Chips
    .const CartridgeLocation       = $8000                // Cartridge ROM address on the C64 Word (Big Endian)

    // Cartridge Header File
    // ------------------------

    .pc = $0000 "Cartridge Header"
    .text "C64 CARTRIDGE   "
    .dword _SwitchEndian32(CartridgeHeaderSize)
    .byte CartridgeVersion, round([CartridgeVersion-floor(CartridgeVersion)]*1000)
    .word _SwitchEndian16(CartridgeType)
    .byte CartridgeGAME
    .byte CartridgeEXROM
    .fill 6,0
    .text CartridgeName
    .byte $61,$72,$74,$72,$69,$64,$67,$65  // Ugly hack due to string handling...
     .fill 32-CartridgeName.size()-8,0


    // Chip Header File - 01
    // ------------------------

    .text "CHIP"
    .dword _SwitchEndian32(CartridgeChipHeaderSize + CartridgeChipSize)
    .word _SwitchEndian16(CartridgeChipType)
    .word _SwitchEndian16(CartridgeChipNumber) .eval CartridgeChipNumber++
    .word _SwitchEndian16(CartridgeLocation)
    .word _SwitchEndian16(CartridgeChipSize)


!Begin:

    .pseudopc CartridgeLocation {

        .word CartridgeColdStart
        .word CartridgeWarmStart
        .byte $c3, $c2, $cd, $38, $30  // CBM80

    CartridgeColdStart:
    CartridgeWarmStart:
        sei
        lda #$35
        sta $01
    !:  inc $d020
        jmp !-
    }

!End:
    .fill CartridgeChipSize - [!End- - !Begin-], $00


    .for (i = 0 ; i < 127 - CartridgeChipNumber ; i++) {
        // Chip Header File - NN
        // ------------------------

        .text "CHIP"
        .dword _SwitchEndian32(CartridgeChipHeaderSize + CartridgeChipSize)
        .word _SwitchEndian16(CartridgeChipType)
        .word _SwitchEndian16(CartridgeChipNumber) .eval CartridgeChipNumber++
        .word _SwitchEndian16(CartridgeLocation)
        .word _SwitchEndian16(CartridgeChipSize)

    !Begin:
        .byte $00
    !End:
        .fill CartridgeChipSize - [!End- - !Begin-], $00
    }

cartconv -i in.bin -o out.crt -t gs -n "cartname"

    .pseudopc CartridgeLocation {

        .word CartridgeColdStart
        .word CartridgeWarmStart
        .byte $c3, $c2, $cd, $38, $30  // CBM80

    CartridgeColdStart:
    CartridgeWarmStart:
	stx $d016
	jsr $fda3
	jsr $fd50
	jsr $fd15
	jsr $ff5b
	cli
	jsr $e453
	jsr $e3bf
	jsr $e422
	ldx #$fb
	txs

        sei
        lda #$35
        sta $01

!:      dec $d020
        jmp !-
    }

LDA #$37
STA $01
LDA #$2F
STA $00