diff --git a/various_flashers/034M_Action36ACS_orig/ACTION36flashwrite.xex b/various_flashers/034M_Action36ACS_orig/034M_Action36ACS_origflasher.xex similarity index 91% rename from various_flashers/034M_Action36ACS_orig/ACTION36flashwrite.xex rename to various_flashers/034M_Action36ACS_orig/034M_Action36ACS_origflasher.xex index b3b6e83..492f1fe 100644 Binary files a/various_flashers/034M_Action36ACS_orig/ACTION36flashwrite.xex and b/various_flashers/034M_Action36ACS_orig/034M_Action36ACS_origflasher.xex differ diff --git a/various_flashers/034M_Action36ACS_orig/action_128.rom b/various_flashers/034M_Action36ACS_orig/action_128.rom deleted file mode 100644 index d0ff779..0000000 Binary files a/various_flashers/034M_Action36ACS_orig/action_128.rom and /dev/null differ diff --git a/various_flashers/034M_Action36ACS_orig/flashwrite.asx b/various_flashers/034M_Action36ACS_orig/flashwrite.asx deleted file mode 100644 index 91efbe8..0000000 --- a/various_flashers/034M_Action36ACS_orig/flashwrite.asx +++ /dev/null @@ -1,378 +0,0 @@ -; JatariCart256 Action!3.6 flasher -; by Jakub Husak , 04.01.2020 -; All Rights Reserved. -; -; Action!3.6: Copyright 1983 by Clinton W Parker. -; -; JatariCart256 is free software: you can redistribute it and/or modify -; it under the terms of the GNU General Public License as published by -; the Free Software Foundation, either version 3 of the License, or -; (at your option) any later version. -; -; JatariCart256 is distributed in the hope that it will be useful, -; but WITHOUT ANY WARRANTY; without even the implied warranty of -; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -; GNU General Public License for more details. -; -; You should have received a copy of the GNU General Public License -; along with JatariCart256. If not, see . -; - icl '../../lib/atari.hea' -; uncomment when flashing all cart or want to check all blocks written so far. -;.def compareall -BankNum equ $88 -Counter equ $89 -operation equ $8a -start equ 6 ; format chip and program -select equ 5 ; ferify and format sectors -option equ 3 ; verify -outchar equ $F2B0 -memtop equ $2e5 -dmactls equ $22f - -_SOURCE equ $6000 -_DEST equ $A000 - -; test code - org $2000 - jsr $f420 ; clrscr - lda portb - cmp #$fd - beq @+ - jsr print - dta c'Run with BASIC enabled and restart.',0 - jmp * -@ lda #$1 - sta 66 - ; waiting for cart to be inserted - jsr print - dta c'Insert cartridge...',0 -@ lda $D013 - lsr - bcc @- - jsr print - dta c' inserted.',$9b,0 - - ; cart inserted, fake it was not changed - lda $d013 - sta $3fa - - ;lda #$ff - ;sta $d301 - - jsr print - dta c'Press:',$9b - dta c'START - format cart and programm',$9b - dta c'SELECT - verify; repair bad blocks.',$9b - dta c'OPTION - verify only',$9b,0 -@ lda 53279 - cmp #7 - beq @- - sta operation - - cmp #select - beq VERIFYREPAIR - - cmp #option - beq CHECKONLY - ; start -FORMAT - jsr print - dta c'Formatting cart ...',0 - jsr flashformatchip - bcs formatfailed - jsr print - dta c'done:)',$9b,0 - rts -formatfailed - jsr print - dta c'failed:(',$9b,'Waiting for reboot...',$9b,0 - jmp * -VERIFYREPAIR - jsr print - dta c'Verify and ',0 -CHECKONLY - jsr print - dta c'Compare.',$9b,0 - rts -crcsums - :128 dta 0,0 - -CHECKINIT - mwa #_SOURCE _csrc - mwa #_DEST _cdst - sei -CHECK - - mva #0 badcompare_counter - sta badcompare_counter+1 - ldx BankNum - sta $d500,x -checkloop -_csrc equ * + 1 - lda $6000 ; src -_cdst equ * + 1 - cmp $A000 ; dst - beq @+ - lda _csrc - ldx _csrc+1 - jsr BADCOMPARE -@ inw _csrc - inw _cdst - lda _csrc+1 - cmp #>_SOURCE+$20 - bne checkloop - cpw #0 badcompare_counter - beq @+ - sta $d580 - lda $d013 - sta $3fa - cli - jsr print - dta c'non-match byte#:',0 - lda badcompare_counter+1 - jsr printhex - lda badcompare_counter - jsr printhex - jsr printnl - sec - rts -@ sta $d580 - lda $d013 - sta $3fa - cli - lda #'o' - jsr outchar -@ clc -dmaon mva #34 dmactls - sta dmactl - rts -VERIFY - ;mwa #_SOURCE _csrc - ;mwa #_DEST _cdst - jsr CHECKINIT - bcc v_rts - lda #'f' - jsr outchar - ldx BankNum - lda #$a0 - jsr flashformatsector - ldx BankNum - lda #$b0 - jsr flashformatsector - jsr FORMATTED - dec Counter - bne VERIFY -v_rts jmp dmaon - -COMPARE_CRC16_DEST_ALL - lda BankNum - sta _tbanknum -@ sei -_tbanknum equ * + 1 - sta $D500 - clc - mva _tbanknum calccrc_bank - jsr CALCCRC_DEST - jsr status_crc - .ifdef compareall - dec _tbanknum - bpl @- - .endif - sta $D580 - lda $d013 - sta $3fa - cli - rts -status_crc - php - jsr printBank_t - plp - php - sne - lda #'o' - plp - seq - lda #'!' - jsr outchar - lda #',' - jmp outchar - - -CALCCRC_DEST - php - mwa #_DEST _tsrc - bne crccont - -CALCCRC ; c=1 - write; c=0 - check - php - mwa #_SOURCE _tsrc - mwa #$2000 _tcnt -crccont mwa #$ffff crc16.crc -_tsrc equ * + 1 - lda $ffff - jsr crc16.updCRC - inw _tsrc - dew _tcnt - bne _tsrc -1 -calccrc_bank equ * +1 - lda #$ba ; nk number - asl - tax - plp - bcc crccheck - mwa crc16.crc crcsums,x - rts -_tcnt :2 dta 0 -crccheck - cpw crc16.crc crcsums,x - rts - - -printBank_t - lda _tbanknum - bpl @+ -printBank - jsr printnl - lda BankNum -@ pha - lda #'B' - jsr outchar - pla - jsr printhex - lda #':' - jmp outchar - -MAIN_PROCESS - ;mva #0 dmactls - ;sta dmactl - sec - mva BankNum calccrc_bank - jsr CALCCRC - mwa #_DEST flashaddr - jsr printBank - - lda operation - cmp #select - jeq VERIFY - - cmp #option - jeq CHECKINIT - -FORMATTED - mwa #_SOURCE _writeaddr - lda _writeaddr+1 - clc - adc #$20 - sta _cmpaddr - mwa #_DEST flashaddr - sec -formatted_next - ldx BankNum -formatted_next2 -_writeaddr equ *+1 - lda $ffff - jsr flashwritebyte - jsr flashincaddr - inw _writeaddr -_cmpaddr equ * + 1 - lda #$ff - cmp _writeaddr+1 - bne formatted_next2 - - jmp COMPARE_CRC16_DEST_ALL - -FINISH_PROCESS - jsr print - dta $9b,'Finished',0 - jmp * - rts -badcompare_counter dta 0,0 -BADCOMPARE - ldy 53279 - cpy #7 - beq @+ - pha - txa - pha - lda #'!' - jsr outchar - pla - jsr printhex - pla - jsr printhex - lda #':' - jsr outchar - mwa _csrc badcompare_tmp1 -badcompare_tmp1 equ * +1 - lda $ffff - jsr printhex - lda #'/' - jsr outchar - mwa _cdst badcompare_tmp2 -badcompare_tmp2 equ * +1 - lda $ffff - jsr printhex - jsr printnl -@ inw badcompare_counter - sec - jmp dmaon -; ------- - icl '../../lib/flashwritelib.asx' - - icl '../../lib/crc16_v2.asm' - - ;jsr print - ;dta c'AlaMaKota.',$9b,0 - ;lda #$55 - ;jsr printhex - ;lda #$aa - ;jsr printhex - ;jmp * - icl '../../lib/print2.asx' - org $2e2 - dta a($2000) -; --------------------------------------- -; D500 A000 20 6c offset:$0000 -; D503 A000 85 86 offset $1000 -; D504 A000 20 dd offset $2000 -; All: B000 36 01 offset $3000 -; blocks for every 8kb bank -;------------ - org BankNum - dta b(0) ; $d500 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "action.bin",+$0000+$0,$1000 - ins "action.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(3) ; d503 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "action.bin",+$1000+$0,$1000 - ins "action.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(4) ; $d504 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "action.bin",+$2000+$0,$1000 - ins "action.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - -;------------ - org $2e2 - dta a(FINISH_PROCESS) diff --git a/various_flashers/034M_Action36ACS_orig/macroflashname.asx b/various_flashers/034M_Action36ACS_orig/macroflashname.asx new file mode 100644 index 0000000..debeadb --- /dev/null +++ b/various_flashers/034M_Action36ACS_orig/macroflashname.asx @@ -0,0 +1,38 @@ +.define TITLE dta c'Action! 3.6' +.define CARTSIZE dta c'>=128' +.define BANKS 0 + +.macro CUSTOM_CART_LAYOUT + org BankNum + dta b(0) ; $d500 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "action.bin",+$0000+$0,$1000 + ins "action.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(3) ; d503 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "action.bin",+$1000+$0,$1000 + ins "action.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(4) ; $d504 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "action.bin",+$2000+$0,$1000 + ins "action.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +.endm diff --git a/various_flashers/034M_Action36ACS_orig/makeflashwrite.sh b/various_flashers/034M_Action36ACS_orig/makeflashwrite.sh deleted file mode 100755 index e2373cc..0000000 --- a/various_flashers/034M_Action36ACS_orig/makeflashwrite.sh +++ /dev/null @@ -1,3 +0,0 @@ -cd `dirname $0` -mads flashwrite.asx -o:ACTION36flashwrite.xex - diff --git a/various_flashers/034M_Action36ACS_orig/makerom.sh b/various_flashers/034M_Action36ACS_orig/makerom.sh deleted file mode 100755 index fd229f3..0000000 --- a/various_flashers/034M_Action36ACS_orig/makerom.sh +++ /dev/null @@ -1,27 +0,0 @@ -I=action.bin -O=action_128.rom -i=0 -z="" -while [[ $i -lt 512 ]]; do -z+=FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF -(( i = i + 1 )) -done -function out8k() { -echo "$z" | xxd -r -ps -} - -echo -n >$O -dd iseek=0 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -for t in 1 2 ; do out8k >>$O ; done - -dd iseek=1 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -dd iseek=2 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -for t in 1 2 3 1 2 3 4 5 6 7 8 ; do out8k >>$O ; done - - diff --git a/various_flashers/034M_Action36ACS_orig/readme b/various_flashers/034M_Action36ACS_orig/readme.md similarity index 100% rename from various_flashers/034M_Action36ACS_orig/readme rename to various_flashers/034M_Action36ACS_orig/readme.md diff --git a/various_flashers/034M_Mac65_1.02_DDT/MAC65DDTflashwrite.xex b/various_flashers/034M_Mac65_1.02_DDT/034M_Mac65_1.02_DDTflasher.xex similarity index 90% rename from various_flashers/034M_Mac65_1.02_DDT/MAC65DDTflashwrite.xex rename to various_flashers/034M_Mac65_1.02_DDT/034M_Mac65_1.02_DDTflasher.xex index be28d8f..a43d229 100644 Binary files a/various_flashers/034M_Mac65_1.02_DDT/MAC65DDTflashwrite.xex and b/various_flashers/034M_Mac65_1.02_DDT/034M_Mac65_1.02_DDTflasher.xex differ diff --git a/various_flashers/034M_Mac65_1.02_DDT/flashwrite.asx b/various_flashers/034M_Mac65_1.02_DDT/flashwrite.asx deleted file mode 100644 index e96cbf1..0000000 --- a/various_flashers/034M_Mac65_1.02_DDT/flashwrite.asx +++ /dev/null @@ -1,376 +0,0 @@ -; JatariCart256 flasher -; by Jakub Husak , 04.01.2020 -; All Rights Reserved. -; -; JatariCart256 is free software: you can redistribute it and/or modify -; it under the terms of the GNU General Public License as published by -; the Free Software Foundation, either version 3 of the License, or -; (at your option) any later version. -; -; JatariCart256 is distributed in the hope that it will be useful, -; but WITHOUT ANY WARRANTY; without even the implied warranty of -; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -; GNU General Public License for more details. -; -; You should have received a copy of the GNU General Public License -; along with JatariCart256. If not, see . -; - icl '../../lib/atari.hea' -; uncomment when flashing all cart or want to check all blocks written so far. -;.def compareall -BankNum equ $88 -Counter equ $89 -operation equ $8a -start equ 6 ; format chip and program -select equ 5 ; ferify and format sectors -option equ 3 ; verify -outchar equ $F2B0 -memtop equ $2e5 -dmactls equ $22f - -_SOURCE equ $6000 -_DEST equ $A000 - -; test code - org $2000 - jsr $f420 ; clrscr - lda portb - cmp #$fd - beq @+ - jsr print - dta c'Run with BASIC enabled and restart.',0 - jmp * -@ lda #$1 - sta 66 - ; waiting for cart to be inserted - jsr print - dta c'Insert cartridge...',0 -@ lda $D013 - lsr - bcc @- - jsr print - dta c' inserted.',$9b,0 - - ; cart inserted, fake it was not changed - lda $d013 - sta $3fa - - ;lda #$ff - ;sta $d301 - - jsr print - dta c'Press:',$9b - dta c'START - format cart and programm',$9b - dta c'SELECT - verify; repair bad blocks.',$9b - dta c'OPTION - verify only',$9b,0 -@ lda 53279 - cmp #7 - beq @- - sta operation - - cmp #select - beq VERIFYREPAIR - - cmp #option - beq CHECKONLY - ; start -FORMAT - jsr print - dta c'Formatting cart ...',0 - jsr flashformatchip - bcs formatfailed - jsr print - dta c'done:)',$9b,0 - rts -formatfailed - jsr print - dta c'failed:(',$9b,'Waiting for reboot...',$9b,0 - jmp * -VERIFYREPAIR - jsr print - dta c'Verify and ',0 -CHECKONLY - jsr print - dta c'Compare.',$9b,0 - rts -crcsums - :128 dta 0,0 - -CHECKINIT - mwa #_SOURCE _csrc - mwa #_DEST _cdst - sei -CHECK - - mva #0 badcompare_counter - sta badcompare_counter+1 - ldx BankNum - sta $d500,x -checkloop -_csrc equ * + 1 - lda $6000 ; src -_cdst equ * + 1 - cmp $A000 ; dst - beq @+ - lda _csrc - ldx _csrc+1 - jsr BADCOMPARE -@ inw _csrc - inw _cdst - lda _csrc+1 - cmp #>_SOURCE+$20 - bne checkloop - cpw #0 badcompare_counter - beq @+ - sta $d580 - lda $d013 - sta $3fa - cli - jsr print - dta c'non-match byte#:',0 - lda badcompare_counter+1 - jsr printhex - lda badcompare_counter - jsr printhex - jsr printnl - sec - rts -@ sta $d580 - lda $d013 - sta $3fa - cli - lda #'o' - jsr outchar -@ clc -dmaon mva #34 dmactls - sta dmactl - rts -VERIFY - ;mwa #_SOURCE _csrc - ;mwa #_DEST _cdst - jsr CHECKINIT - bcc v_rts - lda #'f' - jsr outchar - ldx BankNum - lda #$a0 - jsr flashformatsector - ldx BankNum - lda #$b0 - jsr flashformatsector - jsr FORMATTED - dec Counter - bne VERIFY -v_rts jmp dmaon - -COMPARE_CRC16_DEST_ALL - lda BankNum - sta _tbanknum -@ sei -_tbanknum equ * + 1 - sta $D500 - clc - mva _tbanknum calccrc_bank - jsr CALCCRC_DEST - jsr status_crc - .ifdef compareall - dec _tbanknum - bpl @- - .endif - sta $D580 - lda $d013 - sta $3fa - cli - rts -status_crc - php - jsr printBank_t - plp - php - sne - lda #'o' - plp - seq - lda #'!' - jsr outchar - lda #',' - jmp outchar - - -CALCCRC_DEST - php - mwa #_DEST _tsrc - bne crccont - -CALCCRC ; c=1 - write; c=0 - check - php - mwa #_SOURCE _tsrc - mwa #$2000 _tcnt -crccont mwa #$ffff crc16.crc -_tsrc equ * + 1 - lda $ffff - jsr crc16.updCRC - inw _tsrc - dew _tcnt - bne _tsrc -1 -calccrc_bank equ * +1 - lda #$ba ; nk number - asl - tax - plp - bcc crccheck - mwa crc16.crc crcsums,x - rts -_tcnt :2 dta 0 -crccheck - cpw crc16.crc crcsums,x - rts - - -printBank_t - lda _tbanknum - bpl @+ -printBank - jsr printnl - lda BankNum -@ pha - lda #'B' - jsr outchar - pla - jsr printhex - lda #':' - jmp outchar - -MAIN_PROCESS - ;mva #0 dmactls - ;sta dmactl - sec - mva BankNum calccrc_bank - jsr CALCCRC - mwa #_DEST flashaddr - jsr printBank - - lda operation - cmp #select - jeq VERIFY - - cmp #option - jeq CHECKINIT - -FORMATTED - mwa #_SOURCE _writeaddr - lda _writeaddr+1 - clc - adc #$20 - sta _cmpaddr - mwa #_DEST flashaddr - sec -formatted_next - ldx BankNum -formatted_next2 -_writeaddr equ *+1 - lda $ffff - jsr flashwritebyte - jsr flashincaddr - inw _writeaddr -_cmpaddr equ * + 1 - lda #$ff - cmp _writeaddr+1 - bne formatted_next2 - - jmp COMPARE_CRC16_DEST_ALL - -FINISH_PROCESS - jsr print - dta $9b,'Finished',0 - jmp * - rts -badcompare_counter dta 0,0 -BADCOMPARE - ldy 53279 - cpy #7 - beq @+ - pha - txa - pha - lda #'!' - jsr outchar - pla - jsr printhex - pla - jsr printhex - lda #':' - jsr outchar - mwa _csrc badcompare_tmp1 -badcompare_tmp1 equ * +1 - lda $ffff - jsr printhex - lda #'/' - jsr outchar - mwa _cdst badcompare_tmp2 -badcompare_tmp2 equ * +1 - lda $ffff - jsr printhex - jsr printnl -@ inw badcompare_counter - sec - jmp dmaon -; ------- - icl '../../lib/flashwritelib.asx' - - icl '../../lib/crc16_v2.asm' - - ;jsr print - ;dta c'AlaMaKota.',$9b,0 - ;lda #$55 - ;jsr printhex - ;lda #$aa - ;jsr printhex - ;jmp * - icl '../../lib/print2.asx' - org $2e2 - dta a($2000) -; --------------------------------------- -; D500 A000 offset:$0000 -; D503 A000 offset $1000 -; D504 A000 offset $2000 -; All: B000 offset $3000 -; blocks for every 8kb bank -;------------ - org BankNum - dta b(0) ; $d500 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "mac65.bin",+0*$1000+$0,$1000 - ins "mac65.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(3) ; d503 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "mac65.bin",+1*$1000+$0,$1000 - ins "mac65.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(4) ; $d504 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "mac65.bin",+2*$1000+$0,$1000 - ins "mac65.bin",+$3000+$0,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - -;------------ - org $2e2 - dta a(FINISH_PROCESS) diff --git a/various_flashers/034M_Mac65_1.02_DDT/mac65_128.rom b/various_flashers/034M_Mac65_1.02_DDT/mac65_128.rom deleted file mode 100644 index 617fd83..0000000 Binary files a/various_flashers/034M_Mac65_1.02_DDT/mac65_128.rom and /dev/null differ diff --git a/various_flashers/034M_Mac65_1.02_DDT/macroflashname.asx b/various_flashers/034M_Mac65_1.02_DDT/macroflashname.asx new file mode 100644 index 0000000..1de6490 --- /dev/null +++ b/various_flashers/034M_Mac65_1.02_DDT/macroflashname.asx @@ -0,0 +1,38 @@ +.define TITLE dta c'Mac65 1.02 DDT' +.define CARTSIZE dta c'>=128' +.define BANKS 0 + +.macro CUSTOM_CART_LAYOUT + org BankNum + dta b(0) ; $d500 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "mac65.bin",+0*$1000+$0,$1000 + ins "mac65.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(3) ; d503 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "mac65.bin",+1*$1000+$0,$1000 + ins "mac65.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(4) ; $d504 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "mac65.bin",+2*$1000+$0,$1000 + ins "mac65.bin",+$3000+$0,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +.endm diff --git a/various_flashers/034M_Mac65_1.02_DDT/makeflashwrite.sh b/various_flashers/034M_Mac65_1.02_DDT/makeflashwrite.sh deleted file mode 100755 index 54d37c5..0000000 --- a/various_flashers/034M_Mac65_1.02_DDT/makeflashwrite.sh +++ /dev/null @@ -1,3 +0,0 @@ -cd `dirname $0` -mads flashwrite.asx -o:MAC65DDTflashwrite.xex - diff --git a/various_flashers/034M_Mac65_1.02_DDT/makerom.sh b/various_flashers/034M_Mac65_1.02_DDT/makerom.sh deleted file mode 100755 index 6c62246..0000000 --- a/various_flashers/034M_Mac65_1.02_DDT/makerom.sh +++ /dev/null @@ -1,27 +0,0 @@ -I=mac65.bin -O=mac65_128.rom -i=0 -z="" -while [[ $i -lt 512 ]]; do -z+=FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF -(( i = i + 1 )) -done -function out8k() { -echo "$z" | xxd -r -ps -} - -echo -n >$O -dd iseek=0 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -for t in 1 2 ; do out8k >>$O ; done - -dd iseek=1 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -dd iseek=2 if=$I of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=3 if=$I of=/dev/stdout bs=4096 count=1 >>$O - -for t in 1 2 3 1 2 3 4 5 6 7 8 ; do out8k >>$O ; done - - diff --git a/various_flashers/034M_Mac65_1.02_DDT/readme b/various_flashers/034M_Mac65_1.02_DDT/readme.md similarity index 100% rename from various_flashers/034M_Mac65_1.02_DDT/readme rename to various_flashers/034M_Mac65_1.02_DDT/readme.md diff --git a/various_flashers/1MBOnEscape/macroflashname.asx b/various_flashers/1MBOnEscape/macroflashname.asx index d313fc7..ca2805f 100644 --- a/various_flashers/1MBOnEscape/macroflashname.asx +++ b/various_flashers/1MBOnEscape/macroflashname.asx @@ -1,5 +1,5 @@ .define TITLE dta c'OnEscape' .define CARTSIZE dta c'1024' .define BANKS 128 -.define BANKS_FILE ins "onEscape (14.12. 2022).rom",+%%1*8192,8192 +.define BANKS_FILE ins "onEscape (14.12. 2022).rom",+:1*8192,8192 .define TWOCHIPS diff --git a/various_flashers/1MBSpaceHarrier/macroflashname.asx b/various_flashers/1MBSpaceHarrier/macroflashname.asx index 808ae80..fc62048 100644 --- a/various_flashers/1MBSpaceHarrier/macroflashname.asx +++ b/various_flashers/1MBSpaceHarrier/macroflashname.asx @@ -1,5 +1,5 @@ .define TITLE dta c'Space Harrier' .define CARTSIZE dta c'1024' .define BANKS 128 -.define BANKS_FILE ins "Space Harrier (2011-07-05)(Hutt, Chris)(GB)[f for older cartridges Tucker, Steve 2011-07-23][!].bin",+%%1*8192,8192 +.define BANKS_FILE ins "Space Harrier (2011-07-05)(Hutt, Chris)(GB)[f for older cartridges Tucker, Steve 2011-07-23][!].bin",+:1*8192,8192 .define TWOCHIPS diff --git a/various_flashers/8kB_PILOT/PILOTflashwrite.xex b/various_flashers/8kB_PILOT/8kB_PILOTflasher.xex similarity index 74% rename from various_flashers/8kB_PILOT/PILOTflashwrite.xex rename to various_flashers/8kB_PILOT/8kB_PILOTflasher.xex index 5023e40..a5c8ce6 100644 Binary files a/various_flashers/8kB_PILOT/PILOTflashwrite.xex and b/various_flashers/8kB_PILOT/8kB_PILOTflasher.xex differ diff --git a/various_flashers/8kB_PILOT/flashwrite.asx b/various_flashers/8kB_PILOT/flashwrite.asx deleted file mode 100644 index 1381cbb..0000000 --- a/various_flashers/8kB_PILOT/flashwrite.asx +++ /dev/null @@ -1,352 +0,0 @@ -; JatariCart256 flasher -; by Jakub Husak , 04.01.2020 -; All Rights Reserved. -; -; JatariCart256 is free software: you can redistribute it and/or modify -; it under the terms of the GNU General Public License as published by -; the Free Software Foundation, either version 3 of the License, or -; (at your option) any later version. -; -; JatariCart256 is distributed in the hope that it will be useful, -; but WITHOUT ANY WARRANTY; without even the implied warranty of -; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -; GNU General Public License for more details. -; -; You should have received a copy of the GNU General Public License -; along with JatariCart256. If not, see . -; - icl '../../lib/atari.hea' -; uncomment when flashing all cart or want to check all blocks written so far. -;.def compareall -BankNum equ $88 -Counter equ $89 -operation equ $8a -start equ 6 ; format chip and program -select equ 5 ; ferify and format sectors -option equ 3 ; verify -outchar equ $F2B0 -memtop equ $2e5 -dmactls equ $22f - -_SOURCE equ $6000 -_DEST equ $A000 - -; test code - org $2000 - jsr $f420 ; clrscr - lda portb - cmp #$fd - beq @+ - jsr print - dta c'Run with BASIC enabled and restart.',0 - jmp * -@ lda #$1 - sta 66 - ; waiting for cart to be inserted - jsr print - dta c'Insert cartridge...',0 -@ lda $D013 - lsr - bcc @- - jsr print - dta c' inserted.',$9b,0 - - ; cart inserted, fake it was not changed - lda $d013 - sta $3fa - - ;lda #$ff - ;sta $d301 - - jsr print - dta c'Press:',$9b - dta c'START - format cart and programm',$9b - dta c'SELECT - verify; repair bad blocks.',$9b - dta c'OPTION - verify only',$9b,0 -@ lda 53279 - cmp #7 - beq @- - sta operation - - cmp #select - beq VERIFYREPAIR - - cmp #option - beq CHECKONLY - ; start -FORMAT - jsr print - dta c'Formatting cart ...',0 - jsr flashformatchip - bcs formatfailed - jsr print - dta c'done:)',$9b,0 - rts -formatfailed - jsr print - dta c'failed:(',$9b,'Waiting for reboot...',$9b,0 - jmp * -VERIFYREPAIR - jsr print - dta c'Verify and ',0 -CHECKONLY - jsr print - dta c'Compare.',$9b,0 - rts -crcsums - :128 dta 0,0 - -CHECKINIT - mwa #_SOURCE _csrc - mwa #_DEST _cdst - sei -CHECK - - mva #0 badcompare_counter - sta badcompare_counter+1 - ldx BankNum - sta $d500,x -checkloop -_csrc equ * + 1 - lda $6000 ; src -_cdst equ * + 1 - cmp $A000 ; dst - beq @+ - lda _csrc - ldx _csrc+1 - jsr BADCOMPARE -@ inw _csrc - inw _cdst - lda _csrc+1 - cmp #>_SOURCE+$20 - bne checkloop - cpw #0 badcompare_counter - beq @+ - sta $d580 - lda $d013 - sta $3fa - cli - jsr print - dta c'non-match byte#:',0 - lda badcompare_counter+1 - jsr printhex - lda badcompare_counter - jsr printhex - jsr printnl - sec - rts -@ sta $d580 - lda $d013 - sta $3fa - cli - lda #'o' - jsr outchar -@ clc -dmaon mva #34 dmactls - sta dmactl - rts -VERIFY - ;mwa #_SOURCE _csrc - ;mwa #_DEST _cdst - jsr CHECKINIT - bcc v_rts - lda #'f' - jsr outchar - ldx BankNum - lda #$a0 - jsr flashformatsector - ldx BankNum - lda #$b0 - jsr flashformatsector - jsr FORMATTED - dec Counter - bne VERIFY -v_rts jmp dmaon - -COMPARE_CRC16_DEST_ALL - lda BankNum - sta _tbanknum -@ sei -_tbanknum equ * + 1 - sta $D500 - clc - mva _tbanknum calccrc_bank - jsr CALCCRC_DEST - jsr status_crc - .ifdef compareall - dec _tbanknum - bpl @- - .endif - sta $D580 - lda $d013 - sta $3fa - cli - rts -status_crc - php - jsr printBank_t - plp - php - sne - lda #'o' - plp - seq - lda #'!' - jsr outchar - lda #',' - jmp outchar - - -CALCCRC_DEST - php - mwa #_DEST _tsrc - bne crccont - -CALCCRC ; c=1 - write; c=0 - check - php - mwa #_SOURCE _tsrc - mwa #$2000 _tcnt -crccont mwa #$ffff crc16.crc -_tsrc equ * + 1 - lda $ffff - jsr crc16.updCRC - inw _tsrc - dew _tcnt - bne _tsrc -1 -calccrc_bank equ * +1 - lda #$ba ; nk number - asl - tax - plp - bcc crccheck - mwa crc16.crc crcsums,x - rts -_tcnt :2 dta 0 -crccheck - cpw crc16.crc crcsums,x - rts - - -printBank_t - lda _tbanknum - bpl @+ -printBank - jsr printnl - lda BankNum -@ pha - lda #'B' - jsr outchar - pla - jsr printhex - lda #':' - jmp outchar - -MAIN_PROCESS - ;mva #0 dmactls - ;sta dmactl - sec - mva BankNum calccrc_bank - jsr CALCCRC - mwa #_DEST flashaddr - jsr printBank - - lda operation - cmp #select - jeq VERIFY - - cmp #option - jeq CHECKINIT - -FORMATTED - mwa #_SOURCE _writeaddr - lda _writeaddr+1 - clc - adc #$20 - sta _cmpaddr - mwa #_DEST flashaddr - sec -formatted_next - ldx BankNum -formatted_next2 -_writeaddr equ *+1 - lda $ffff - jsr flashwritebyte - jsr flashincaddr - inw _writeaddr -_cmpaddr equ * + 1 - lda #$ff - cmp _writeaddr+1 - bne formatted_next2 - - jmp COMPARE_CRC16_DEST_ALL - -FINISH_PROCESS - jsr print - dta $9b,'Finished',0 - jmp * - rts -badcompare_counter dta 0,0 -BADCOMPARE - ldy 53279 - cpy #7 - beq @+ - pha - txa - pha - lda #'!' - jsr outchar - pla - jsr printhex - pla - jsr printhex - lda #':' - jsr outchar - mwa _csrc badcompare_tmp1 -badcompare_tmp1 equ * +1 - lda $ffff - jsr printhex - lda #'/' - jsr outchar - mwa _cdst badcompare_tmp2 -badcompare_tmp2 equ * +1 - lda $ffff - jsr printhex - jsr printnl -@ inw badcompare_counter - sec - jmp dmaon -; ------- - icl '../../lib/flashwritelib.asx' - - icl '../../lib/crc16_v2.asm' - - ;jsr print - ;dta c'AlaMaKota.',$9b,0 - ;lda #$55 - ;jsr printhex - ;lda #$aa - ;jsr printhex - ;jmp * - icl '../../lib/print2.asx' - org $2e2 - dta a($2000) -; --------------------------------------- -; D500 A000 offset:$0000 -; D503 A000 offset $1000 -; D504 A000 offset $2000 -; All: B000 offset $3000 -; blocks for every 8kb bank -;------------ - org BankNum - dta b(0) ; $d500 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "Atari PILOT.rom" - -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org $2e2 - dta a(FINISH_PROCESS) diff --git a/various_flashers/8kB_PILOT/macroflashname.asx b/various_flashers/8kB_PILOT/macroflashname.asx new file mode 100644 index 0000000..77fa9c7 --- /dev/null +++ b/various_flashers/8kB_PILOT/macroflashname.asx @@ -0,0 +1,5 @@ +.define TITLE dta c'PILOT' +.define CARTSIZE dta c'>=128' +.define BANKS 1 +.define BANKS_FILE ins "Atari PILOT.rom",+:1*8192,8192 + diff --git a/various_flashers/8kB_PILOT/makeflashwrite.sh b/various_flashers/8kB_PILOT/makeflashwrite.sh deleted file mode 100755 index 9c2561c..0000000 --- a/various_flashers/8kB_PILOT/makeflashwrite.sh +++ /dev/null @@ -1,3 +0,0 @@ -cd `dirname $0` -mads flashwrite.asx -o:PILOTflashwrite.xex - diff --git a/various_flashers/8kB_PILOT/readme b/various_flashers/8kB_PILOT/readme.md similarity index 100% rename from various_flashers/8kB_PILOT/readme rename to various_flashers/8kB_PILOT/readme.md diff --git a/various_flashers/8kB_WSFN/WSFNflashwrite.xex b/various_flashers/8kB_WSFN/8kB_WSFNflasher.xex similarity index 73% rename from various_flashers/8kB_WSFN/WSFNflashwrite.xex rename to various_flashers/8kB_WSFN/8kB_WSFNflasher.xex index 0260f60..25ecf4b 100644 Binary files a/various_flashers/8kB_WSFN/WSFNflashwrite.xex and b/various_flashers/8kB_WSFN/8kB_WSFNflasher.xex differ diff --git a/various_flashers/8kB_WSFN/flashwrite.asx b/various_flashers/8kB_WSFN/flashwrite.asx deleted file mode 100644 index 6feaaa0..0000000 --- a/various_flashers/8kB_WSFN/flashwrite.asx +++ /dev/null @@ -1,352 +0,0 @@ -; JatariCart256 flasher -; by Jakub Husak , 04.01.2020 -; All Rights Reserved. -; -; JatariCart256 is free software: you can redistribute it and/or modify -; it under the terms of the GNU General Public License as published by -; the Free Software Foundation, either version 3 of the License, or -; (at your option) any later version. -; -; JatariCart256 is distributed in the hope that it will be useful, -; but WITHOUT ANY WARRANTY; without even the implied warranty of -; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -; GNU General Public License for more details. -; -; You should have received a copy of the GNU General Public License -; along with JatariCart256. If not, see . -; - icl '../../lib/atari.hea' -; uncomment when flashing all cart or want to check all blocks written so far. -;.def compareall -BankNum equ $88 -Counter equ $89 -operation equ $8a -start equ 6 ; format chip and program -select equ 5 ; ferify and format sectors -option equ 3 ; verify -outchar equ $F2B0 -memtop equ $2e5 -dmactls equ $22f - -_SOURCE equ $6000 -_DEST equ $A000 - -; test code - org $2000 - jsr $f420 ; clrscr - lda portb - cmp #$fd - beq @+ - jsr print - dta c'Run with BASIC enabled and restart.',0 - jmp * -@ lda #$1 - sta 66 - ; waiting for cart to be inserted - jsr print - dta c'Insert cartridge...',0 -@ lda $D013 - lsr - bcc @- - jsr print - dta c' inserted.',$9b,0 - - ; cart inserted, fake it was not changed - lda $d013 - sta $3fa - - ;lda #$ff - ;sta $d301 - - jsr print - dta c'Press:',$9b - dta c'START - format cart and programm',$9b - dta c'SELECT - verify; repair bad blocks.',$9b - dta c'OPTION - verify only',$9b,0 -@ lda 53279 - cmp #7 - beq @- - sta operation - - cmp #select - beq VERIFYREPAIR - - cmp #option - beq CHECKONLY - ; start -FORMAT - jsr print - dta c'Formatting cart ...',0 - jsr flashformatchip - bcs formatfailed - jsr print - dta c'done:)',$9b,0 - rts -formatfailed - jsr print - dta c'failed:(',$9b,'Waiting for reboot...',$9b,0 - jmp * -VERIFYREPAIR - jsr print - dta c'Verify and ',0 -CHECKONLY - jsr print - dta c'Compare.',$9b,0 - rts -crcsums - :128 dta 0,0 - -CHECKINIT - mwa #_SOURCE _csrc - mwa #_DEST _cdst - sei -CHECK - - mva #0 badcompare_counter - sta badcompare_counter+1 - ldx BankNum - sta $d500,x -checkloop -_csrc equ * + 1 - lda $6000 ; src -_cdst equ * + 1 - cmp $A000 ; dst - beq @+ - lda _csrc - ldx _csrc+1 - jsr BADCOMPARE -@ inw _csrc - inw _cdst - lda _csrc+1 - cmp #>_SOURCE+$20 - bne checkloop - cpw #0 badcompare_counter - beq @+ - sta $d580 - lda $d013 - sta $3fa - cli - jsr print - dta c'non-match byte#:',0 - lda badcompare_counter+1 - jsr printhex - lda badcompare_counter - jsr printhex - jsr printnl - sec - rts -@ sta $d580 - lda $d013 - sta $3fa - cli - lda #'o' - jsr outchar -@ clc -dmaon mva #34 dmactls - sta dmactl - rts -VERIFY - ;mwa #_SOURCE _csrc - ;mwa #_DEST _cdst - jsr CHECKINIT - bcc v_rts - lda #'f' - jsr outchar - ldx BankNum - lda #$a0 - jsr flashformatsector - ldx BankNum - lda #$b0 - jsr flashformatsector - jsr FORMATTED - dec Counter - bne VERIFY -v_rts jmp dmaon - -COMPARE_CRC16_DEST_ALL - lda BankNum - sta _tbanknum -@ sei -_tbanknum equ * + 1 - sta $D500 - clc - mva _tbanknum calccrc_bank - jsr CALCCRC_DEST - jsr status_crc - .ifdef compareall - dec _tbanknum - bpl @- - .endif - sta $D580 - lda $d013 - sta $3fa - cli - rts -status_crc - php - jsr printBank_t - plp - php - sne - lda #'o' - plp - seq - lda #'!' - jsr outchar - lda #',' - jmp outchar - - -CALCCRC_DEST - php - mwa #_DEST _tsrc - bne crccont - -CALCCRC ; c=1 - write; c=0 - check - php - mwa #_SOURCE _tsrc - mwa #$2000 _tcnt -crccont mwa #$ffff crc16.crc -_tsrc equ * + 1 - lda $ffff - jsr crc16.updCRC - inw _tsrc - dew _tcnt - bne _tsrc -1 -calccrc_bank equ * +1 - lda #$ba ; nk number - asl - tax - plp - bcc crccheck - mwa crc16.crc crcsums,x - rts -_tcnt :2 dta 0 -crccheck - cpw crc16.crc crcsums,x - rts - - -printBank_t - lda _tbanknum - bpl @+ -printBank - jsr printnl - lda BankNum -@ pha - lda #'B' - jsr outchar - pla - jsr printhex - lda #':' - jmp outchar - -MAIN_PROCESS - ;mva #0 dmactls - ;sta dmactl - sec - mva BankNum calccrc_bank - jsr CALCCRC - mwa #_DEST flashaddr - jsr printBank - - lda operation - cmp #select - jeq VERIFY - - cmp #option - jeq CHECKINIT - -FORMATTED - mwa #_SOURCE _writeaddr - lda _writeaddr+1 - clc - adc #$20 - sta _cmpaddr - mwa #_DEST flashaddr - sec -formatted_next - ldx BankNum -formatted_next2 -_writeaddr equ *+1 - lda $ffff - jsr flashwritebyte - jsr flashincaddr - inw _writeaddr -_cmpaddr equ * + 1 - lda #$ff - cmp _writeaddr+1 - bne formatted_next2 - - jmp COMPARE_CRC16_DEST_ALL - -FINISH_PROCESS - jsr print - dta $9b,'Finished',0 - jmp * - rts -badcompare_counter dta 0,0 -BADCOMPARE - ldy 53279 - cpy #7 - beq @+ - pha - txa - pha - lda #'!' - jsr outchar - pla - jsr printhex - pla - jsr printhex - lda #':' - jsr outchar - mwa _csrc badcompare_tmp1 -badcompare_tmp1 equ * +1 - lda $ffff - jsr printhex - lda #'/' - jsr outchar - mwa _cdst badcompare_tmp2 -badcompare_tmp2 equ * +1 - lda $ffff - jsr printhex - jsr printnl -@ inw badcompare_counter - sec - jmp dmaon -; ------- - icl '../../lib/flashwritelib.asx' - - icl '../../lib/crc16_v2.asm' - - ;jsr print - ;dta c'AlaMaKota.',$9b,0 - ;lda #$55 - ;jsr printhex - ;lda #$aa - ;jsr printhex - ;jmp * - icl '../../lib/print2.asx' - org $2e2 - dta a($2000) -; --------------------------------------- -; D500 A000 offset:$0000 -; D503 A000 offset $1000 -; D504 A000 offset $2000 -; All: B000 offset $3000 -; blocks for every 8kb bank -;------------ - org BankNum - dta b(0) ; $d500 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "WSFN.rom" - -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org $2e2 - dta a(FINISH_PROCESS) diff --git a/various_flashers/8kB_WSFN/macroflashname.asx b/various_flashers/8kB_WSFN/macroflashname.asx new file mode 100644 index 0000000..4858072 --- /dev/null +++ b/various_flashers/8kB_WSFN/macroflashname.asx @@ -0,0 +1,5 @@ +.define TITLE dta c'WSFN' +.define CARTSIZE dta c'>=128' +.define BANKS 1 +.define BANKS_FILE ins "WSFN.rom",+:1*8192,8192 + diff --git a/various_flashers/8kB_WSFN/makeflashwrite.sh b/various_flashers/8kB_WSFN/makeflashwrite.sh deleted file mode 100755 index 47fe16a..0000000 --- a/various_flashers/8kB_WSFN/makeflashwrite.sh +++ /dev/null @@ -1,3 +0,0 @@ -cd `dirname $0` -mads flashwrite.asx -o:WSFNflashwrite.xex - diff --git a/various_flashers/8kB_WSFN/readme b/various_flashers/8kB_WSFN/readme.gd similarity index 100% rename from various_flashers/8kB_WSFN/readme rename to various_flashers/8kB_WSFN/readme.gd diff --git a/various_flashers/M091_Action36ACS_orig/M091ACTION36flashwrite.xex b/various_flashers/M091_Action36ACS_orig/M091_Action36ACS_origflasher.xex similarity index 91% rename from various_flashers/M091_Action36ACS_orig/M091ACTION36flashwrite.xex rename to various_flashers/M091_Action36ACS_orig/M091_Action36ACS_origflasher.xex index 81c3a0b..5c117a3 100644 Binary files a/various_flashers/M091_Action36ACS_orig/M091ACTION36flashwrite.xex and b/various_flashers/M091_Action36ACS_orig/M091_Action36ACS_origflasher.xex differ diff --git a/various_flashers/M091_Action36ACS_orig/flashwrite.asx b/various_flashers/M091_Action36ACS_orig/flashwrite.asx deleted file mode 100644 index 04a90ce..0000000 --- a/various_flashers/M091_Action36ACS_orig/flashwrite.asx +++ /dev/null @@ -1,378 +0,0 @@ -; JatariCart256 Action!3.6 flasher -; by Jakub Husak , 04.01.2020 -; All Rights Reserved. -; -; Action!3.6: Copyright 1983 by Clinton W Parker. -; -; JatariCart256 is free software: you can redistribute it and/or modify -; it under the terms of the GNU General Public License as published by -; the Free Software Foundation, either version 3 of the License, or -; (at your option) any later version. -; -; JatariCart256 is distributed in the hope that it will be useful, -; but WITHOUT ANY WARRANTY; without even the implied warranty of -; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -; GNU General Public License for more details. -; -; You should have received a copy of the GNU General Public License -; along with JatariCart256. If not, see . -; - icl '../../lib/atari.hea' -; uncomment when flashing all cart or want to check all blocks written so far. -;.def compareall -BankNum equ $88 -Counter equ $89 -operation equ $8a -start equ 6 ; format chip and program -select equ 5 ; ferify and format sectors -option equ 3 ; verify -outchar equ $F2B0 -memtop equ $2e5 -dmactls equ $22f - -_SOURCE equ $6000 -_DEST equ $A000 - -; test code - org $2000 - jsr $f420 ; clrscr - lda portb - cmp #$fd - beq @+ - jsr print - dta c'Run with BASIC enabled and restart.',0 - jmp * -@ lda #$1 - sta 66 - ; waiting for cart to be inserted - jsr print - dta c'Insert cartridge...',0 -@ lda $D013 - lsr - bcc @- - jsr print - dta c' inserted.',$9b,0 - - ; cart inserted, fake it was not changed - lda $d013 - sta $3fa - - ;lda #$ff - ;sta $d301 - - jsr print - dta c'Press:',$9b - dta c'START - format cart and programm',$9b - dta c'SELECT - verify; repair bad blocks.',$9b - dta c'OPTION - verify only',$9b,0 -@ lda 53279 - cmp #7 - beq @- - sta operation - - cmp #select - beq VERIFYREPAIR - - cmp #option - beq CHECKONLY - ; start -FORMAT - jsr print - dta c'Formatting cart ...',0 - jsr flashformatchip - bcs formatfailed - jsr print - dta c'done:)',$9b,0 - rts -formatfailed - jsr print - dta c'failed:(',$9b,'Waiting for reboot...',$9b,0 - jmp * -VERIFYREPAIR - jsr print - dta c'Verify and ',0 -CHECKONLY - jsr print - dta c'Compare.',$9b,0 - rts -crcsums - :128 dta 0,0 - -CHECKINIT - mwa #_SOURCE _csrc - mwa #_DEST _cdst - sei -CHECK - - mva #0 badcompare_counter - sta badcompare_counter+1 - ldx BankNum - sta $d500,x -checkloop -_csrc equ * + 1 - lda $6000 ; src -_cdst equ * + 1 - cmp $A000 ; dst - beq @+ - lda _csrc - ldx _csrc+1 - jsr BADCOMPARE -@ inw _csrc - inw _cdst - lda _csrc+1 - cmp #>_SOURCE+$20 - bne checkloop - cpw #0 badcompare_counter - beq @+ - sta $d580 - lda $d013 - sta $3fa - cli - jsr print - dta c'non-match byte#:',0 - lda badcompare_counter+1 - jsr printhex - lda badcompare_counter - jsr printhex - jsr printnl - sec - rts -@ sta $d580 - lda $d013 - sta $3fa - cli - lda #'o' - jsr outchar -@ clc -dmaon mva #34 dmactls - sta dmactl - rts -VERIFY - ;mwa #_SOURCE _csrc - ;mwa #_DEST _cdst - jsr CHECKINIT - bcc v_rts - lda #'f' - jsr outchar - ldx BankNum - lda #$a0 - jsr flashformatsector - ldx BankNum - lda #$b0 - jsr flashformatsector - jsr FORMATTED - dec Counter - bne VERIFY -v_rts jmp dmaon - -COMPARE_CRC16_DEST_ALL - lda BankNum - sta _tbanknum -@ sei -_tbanknum equ * + 1 - sta $D500 - clc - mva _tbanknum calccrc_bank - jsr CALCCRC_DEST - jsr status_crc - .ifdef compareall - dec _tbanknum - bpl @- - .endif - sta $D580 - lda $d013 - sta $3fa - cli - rts -status_crc - php - jsr printBank_t - plp - php - sne - lda #'o' - plp - seq - lda #'!' - jsr outchar - lda #',' - jmp outchar - - -CALCCRC_DEST - php - mwa #_DEST _tsrc - bne crccont - -CALCCRC ; c=1 - write; c=0 - check - php - mwa #_SOURCE _tsrc - mwa #$2000 _tcnt -crccont mwa #$ffff crc16.crc -_tsrc equ * + 1 - lda $ffff - jsr crc16.updCRC - inw _tsrc - dew _tcnt - bne _tsrc -1 -calccrc_bank equ * +1 - lda #$ba ; nk number - asl - tax - plp - bcc crccheck - mwa crc16.crc crcsums,x - rts -_tcnt :2 dta 0 -crccheck - cpw crc16.crc crcsums,x - rts - - -printBank_t - lda _tbanknum - bpl @+ -printBank - jsr printnl - lda BankNum -@ pha - lda #'B' - jsr outchar - pla - jsr printhex - lda #':' - jmp outchar - -MAIN_PROCESS - ;mva #0 dmactls - ;sta dmactl - sec - mva BankNum calccrc_bank - jsr CALCCRC - mwa #_DEST flashaddr - jsr printBank - - lda operation - cmp #select - jeq VERIFY - - cmp #option - jeq CHECKINIT - -FORMATTED - mwa #_SOURCE _writeaddr - lda _writeaddr+1 - clc - adc #$20 - sta _cmpaddr - mwa #_DEST flashaddr - sec -formatted_next - ldx BankNum -formatted_next2 -_writeaddr equ *+1 - lda $ffff - jsr flashwritebyte - jsr flashincaddr - inw _writeaddr -_cmpaddr equ * + 1 - lda #$ff - cmp _writeaddr+1 - bne formatted_next2 - - jmp COMPARE_CRC16_DEST_ALL - -FINISH_PROCESS - jsr print - dta $9b,'Finished',0 - jmp * - rts -badcompare_counter dta 0,0 -BADCOMPARE - ldy 53279 - cpy #7 - beq @+ - pha - txa - pha - lda #'!' - jsr outchar - pla - jsr printhex - pla - jsr printhex - lda #':' - jsr outchar - mwa _csrc badcompare_tmp1 -badcompare_tmp1 equ * +1 - lda $ffff - jsr printhex - lda #'/' - jsr outchar - mwa _cdst badcompare_tmp2 -badcompare_tmp2 equ * +1 - lda $ffff - jsr printhex - jsr printnl -@ inw badcompare_counter - sec - jmp dmaon -; ------- - icl '../../lib/flashwritelib.asx' - - icl '../../lib/crc16_v2.asm' - - ;jsr print - ;dta c'AlaMaKota.',$9b,0 - ;lda #$55 - ;jsr printhex - ;lda #$aa - ;jsr printhex - ;jmp * - icl '../../lib/print2.asx' - org $2e2 - dta a($2000) -; --------------------------------------- -; D500 A000 20 6c offset:$0000 -; D503 A000 85 86 offset $1000 -; D504 A000 20 dd offset $2000 -; All: B000 36 01 offset $3000 -; blocks for every 8kb bank -;------------ - org BankNum - dta b(0) ; $d500 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "ACTION-36-ROM-OSS.rom",+$1000,$1000 - ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(3) ; d503 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "ACTION-36-ROM-OSS.rom",+$3000,$1000 - ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - org BankNum - dta b(9) ; $d509 - dta b(1) ; Counter -;------------ - org _SOURCE - ins "ACTION-36-ROM-OSS.rom",+$2000,$1000 - ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 -;------------ - org $2e2 - dta a(MAIN_PROCESS) -;------------ - -;------------ - org $2e2 - dta a(FINISH_PROCESS) diff --git a/various_flashers/M091_Action36ACS_orig/macroflashname.asx b/various_flashers/M091_Action36ACS_orig/macroflashname.asx new file mode 100644 index 0000000..5281639 --- /dev/null +++ b/various_flashers/M091_Action36ACS_orig/macroflashname.asx @@ -0,0 +1,45 @@ +; Action!3.6: Copyright 1983 by Clinton W Parker. +; D500 A000 20 6c offset:$0000 +; D503 A000 85 86 offset $1000 +; D504 A000 20 dd offset $2000 +; All: B000 36 01 offset $3000 +; +.define TITLE dta c'Action36ACS' +.define CARTSIZE dta c'>=128' +.define BANKS 0 + +.macro CUSTOM_CART_LAYOUT + org BankNum + dta b(0) ; $d500 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "ACTION-36-ROM-OSS.rom",+$1000,$1000 + ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(3) ; d503 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "ACTION-36-ROM-OSS.rom",+$3000,$1000 + ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ + org BankNum + dta b(9) ; $d509 + dta b(1) ; Counter +;------------ + org _SOURCE + ins "ACTION-36-ROM-OSS.rom",+$2000,$1000 + ins "ACTION-36-ROM-OSS.rom",+$0000,$1000 +;------------ + org $2e2 + dta a(MAIN_PROCESS) +;------------ +.endm diff --git a/various_flashers/M091_Action36ACS_orig/makeflashwrite.sh b/various_flashers/M091_Action36ACS_orig/makeflashwrite.sh deleted file mode 100755 index b1b2ac8..0000000 --- a/various_flashers/M091_Action36ACS_orig/makeflashwrite.sh +++ /dev/null @@ -1,3 +0,0 @@ -cd `dirname $0` -mads flashwrite.asx -o:M091ACTION36flashwrite.xex - diff --git a/various_flashers/M091_Action36ACS_orig/readme b/various_flashers/M091_Action36ACS_orig/readme.md similarity index 100% rename from various_flashers/M091_Action36ACS_orig/readme rename to various_flashers/M091_Action36ACS_orig/readme.md diff --git a/various_flashers/M091_BASICXE41/basicxe_128.rom b/various_flashers/M091_BASICXE41/basicxe_128.rom deleted file mode 100644 index 71b3347..0000000 Binary files a/various_flashers/M091_BASICXE41/basicxe_128.rom and /dev/null differ diff --git a/various_flashers/M091_BASICXE41/makerom.sh b/various_flashers/M091_BASICXE41/makerom.sh deleted file mode 100755 index 62596e6..0000000 --- a/various_flashers/M091_BASICXE41/makerom.sh +++ /dev/null @@ -1,27 +0,0 @@ -I="BASIC XE 4.1.rom" -O=basicxe_128.rom -i=0 -z="" -while [[ $i -lt 512 ]]; do -z+=FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF -(( i = i + 1 )) -done -function out8k() { -echo "$z" | xxd -r -ps -} - -echo -n >$O -dd iseek=1 if="$I" of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=0 if="$I" of=/dev/stdout bs=4096 count=1 >>$O - - -dd iseek=3 if="$I" of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=0 if="$I" of=/dev/stdout bs=4096 count=1 >>$O -for t in 2 3 4 5 6 7 8 ; do out8k >>$O ; done - -dd iseek=2 if="$I" of=/dev/stdout bs=4096 count=1 >>$O -dd iseek=0 if="$I" of=/dev/stdout bs=4096 count=1 >>$O - -for t in a b c d e f ; do out8k >>$O ; done - -