mirror of
https://github.com/datajerk/c2d.git
synced 2024-06-12 14:29:52 +00:00
splash screen support
This commit is contained in:
parent
accf8e5e5a
commit
e1f98db29c
3
Makefile
3
Makefile
|
@ -7,6 +7,9 @@ windows: bin/c2d.exe
|
||||||
|
|
||||||
dist: all windows
|
dist: all windows
|
||||||
|
|
||||||
|
c2d.h: c2d.h.0 asm/loader.s makeheader
|
||||||
|
./makeheader
|
||||||
|
|
||||||
bin/c2d: c2d.c c2d.h
|
bin/c2d: c2d.c c2d.h
|
||||||
gcc -Wall -Wno-missing-braces -I. -O3 -o bin/c2d c2d.c -lm
|
gcc -Wall -Wno-missing-braces -I. -O3 -o bin/c2d c2d.c -lm
|
||||||
|
|
||||||
|
|
27
asm/Makefile
Normal file
27
asm/Makefile
Normal file
|
@ -0,0 +1,27 @@
|
||||||
|
CL = cl65
|
||||||
|
CL_FLAGS = -t none --listing --list-bytes 100
|
||||||
|
#CL_FLAGS = -t apple1 -C apple1-16k.cfg --listing --list-bytes 100
|
||||||
|
CC = cl65
|
||||||
|
CC_FLAGS = --static-locals -t apple1 -C apple1-16k.cfg
|
||||||
|
C2T = c2t
|
||||||
|
|
||||||
|
ASRC = $(shell echo *.s)
|
||||||
|
AOBJ = $(ASRC:%.s=%.o)
|
||||||
|
ALST = $(ASRC:%.s=%.lst)
|
||||||
|
AMON = $(ASRC:%.s=%.mon)
|
||||||
|
ABIN = $(ASRC:%.s=%)
|
||||||
|
|
||||||
|
all: $(ABIN)
|
||||||
|
|
||||||
|
clean:
|
||||||
|
-rm -f $(ABIN) $(AOBJ) $(ALST) $(AMON)
|
||||||
|
|
||||||
|
%: %.s
|
||||||
|
$(CL) $(CL_FLAGS) $<
|
||||||
|
|
||||||
|
%: %.c
|
||||||
|
$(CC) $(CC_FLAGS) $<
|
||||||
|
|
||||||
|
%.mon: %
|
||||||
|
$(C2T) $< $@
|
||||||
|
|
126
asm/loader.s
Normal file
126
asm/loader.s
Normal file
|
@ -0,0 +1,126 @@
|
||||||
|
;diskload2.s
|
||||||
|
|
||||||
|
; apple vectors
|
||||||
|
|
||||||
|
warm = $FF69 ; back to monitor
|
||||||
|
bell = $FBDD ; ding
|
||||||
|
|
||||||
|
; vars
|
||||||
|
|
||||||
|
lopage = $0800
|
||||||
|
hipage = $B500
|
||||||
|
rwtsprm = $B7E8 ; looked at dos 3.3 disk, not using $3E3 to find
|
||||||
|
rwts = $B7B5
|
||||||
|
preg = $48 ; mon p reg
|
||||||
|
;trkcnt = $00 ; track counter
|
||||||
|
;segcnt = $01 ; loop var
|
||||||
|
;buffer = $02 ; MSB of RWTS buffer
|
||||||
|
;secnum = $03 ; loop var
|
||||||
|
;trknum = $04 ; loop var
|
||||||
|
|
||||||
|
|
||||||
|
start:
|
||||||
|
.org lopage
|
||||||
|
|
||||||
|
ldx #0 ; move code to hi memory
|
||||||
|
move:
|
||||||
|
lda moved,x
|
||||||
|
sta loader,x
|
||||||
|
inx
|
||||||
|
bne move ; move 256 bytes
|
||||||
|
jmp loader
|
||||||
|
|
||||||
|
moved:
|
||||||
|
.org hipage
|
||||||
|
|
||||||
|
loader:
|
||||||
|
lda #1 ; read(1)/write(2) command
|
||||||
|
ldy #$0C ; offset in RWTS
|
||||||
|
sta rwtsprm,y ; write it to RWTS
|
||||||
|
|
||||||
|
lda #0 ; buffer LSB
|
||||||
|
ldy #8 ; offset in RWTS
|
||||||
|
sta rwtsprm,y ; write it to RWTS
|
||||||
|
|
||||||
|
lda #2
|
||||||
|
sta trknum ; start with track 2
|
||||||
|
|
||||||
|
lda loadpage ; where to dump the tracks
|
||||||
|
sta buffer
|
||||||
|
|
||||||
|
ldx lasttrack
|
||||||
|
dex ; because data starts at track 2
|
||||||
|
dex
|
||||||
|
stx trkcnt ; number of complete and partial tracks
|
||||||
|
|
||||||
|
;;;begin track loop
|
||||||
|
trkloop:
|
||||||
|
lda trknum ; track number
|
||||||
|
ldy #4 ; offset in RWTS
|
||||||
|
sta rwtsprm,y ; write it to RWTS
|
||||||
|
|
||||||
|
;;;begin sector loop (16), backwards is faster, much faster
|
||||||
|
lda trkcnt
|
||||||
|
bne fulltrack
|
||||||
|
lda lastsector
|
||||||
|
jmp subtrack
|
||||||
|
fulltrack:
|
||||||
|
lda #$F
|
||||||
|
subtrack:
|
||||||
|
sta secnum
|
||||||
|
secloop:
|
||||||
|
lda secnum ; sector number
|
||||||
|
ldy #5 ; offset in RWTS
|
||||||
|
sta rwtsprm,y ; write it to RWTS
|
||||||
|
|
||||||
|
lda buffer ; buffer MSB
|
||||||
|
clc
|
||||||
|
adc secnum
|
||||||
|
ldy #9 ; offset in RWTS
|
||||||
|
sta rwtsprm,y ; write it to RWTS
|
||||||
|
|
||||||
|
ldy #<rwtsprm ; load rwts paramlist B7E8
|
||||||
|
lda #>rwtsprm
|
||||||
|
jsr rwts ; do it!
|
||||||
|
bcs diskerror
|
||||||
|
lda #0
|
||||||
|
sta preg ; fix p reg so mon is happy
|
||||||
|
|
||||||
|
dec secnum
|
||||||
|
bpl secloop
|
||||||
|
;;;end sector loop
|
||||||
|
|
||||||
|
lda buffer ; buffer += $10
|
||||||
|
clc
|
||||||
|
adc #$10
|
||||||
|
sta buffer
|
||||||
|
|
||||||
|
inc trknum ; next track
|
||||||
|
dec trkcnt ;
|
||||||
|
bpl trkloop ; 0, all done with tracks
|
||||||
|
;;;end track loop
|
||||||
|
|
||||||
|
done:
|
||||||
|
jmp (nextjump)
|
||||||
|
|
||||||
|
diskerror:
|
||||||
|
jmp warm
|
||||||
|
|
||||||
|
lasttrack:
|
||||||
|
.org *+1
|
||||||
|
lastsector:
|
||||||
|
.org *+1
|
||||||
|
loadpage:
|
||||||
|
.org *+1
|
||||||
|
nextjump:
|
||||||
|
.org *+2
|
||||||
|
trkcnt:
|
||||||
|
.org *+1
|
||||||
|
segcnt:
|
||||||
|
.org *+1
|
||||||
|
buffer:
|
||||||
|
.org *+1
|
||||||
|
secnum:
|
||||||
|
.org *+1
|
||||||
|
trknum:
|
||||||
|
.org *+1
|
137
c2d.c
137
c2d.c
|
@ -58,6 +58,7 @@ Bugs:
|
||||||
#define OUTFILE argv[argc-1]
|
#define OUTFILE argv[argc-1]
|
||||||
#define BINARY 0
|
#define BINARY 0
|
||||||
#define MONITOR 1
|
#define MONITOR 1
|
||||||
|
#define LOADER "loader"
|
||||||
|
|
||||||
void usage();
|
void usage();
|
||||||
char *getext(char *filename);
|
char *getext(char *filename);
|
||||||
|
@ -65,14 +66,19 @@ char *getext(char *filename);
|
||||||
int main(int argc, char **argv)
|
int main(int argc, char **argv)
|
||||||
{
|
{
|
||||||
FILE *ifp, *ofp;
|
FILE *ifp, *ofp;
|
||||||
int c, j, k, start, start_override = 0, inputtype, warm = 0, filesize = 0;
|
int c, j, k, start = 0, loadaddress, inputtype, warm = 0, filesize = 0;
|
||||||
|
int loaderstart, loader = 0, loadersize = 0, textpagesize = 0;
|
||||||
struct stat st;
|
struct stat st;
|
||||||
char *filetypes[] = {"BINARY","MONITOR"};
|
char *filetypes[] = {"BINARY","MONITOR"};
|
||||||
char *ext, filename[256], load_address[10];
|
char *ext, filename[256], load_address[10], *textpage=NULL;
|
||||||
|
|
||||||
opterr = 1;
|
opterr = 1;
|
||||||
while((c = getopt(argc, argv, "vmh?s:")) != -1)
|
while((c = getopt(argc, argv, "t:vmh?s:")) != -1)
|
||||||
switch(c) {
|
switch(c) {
|
||||||
|
case 't':
|
||||||
|
loader=1;
|
||||||
|
textpage=optarg;
|
||||||
|
break;
|
||||||
case 'm':
|
case 'm':
|
||||||
warm = 1;
|
warm = 1;
|
||||||
break;
|
break;
|
||||||
|
@ -82,7 +88,7 @@ int main(int argc, char **argv)
|
||||||
break;
|
break;
|
||||||
case 's': // override rate for -1/-2 only
|
case 's': // override rate for -1/-2 only
|
||||||
warm = 0;
|
warm = 0;
|
||||||
start_override = (int)strtol(optarg, (char **)NULL, 16); // todo: input check
|
start = (int)strtol(optarg, (char **)NULL, 16); // todo: input check
|
||||||
break;
|
break;
|
||||||
case 'h': // help
|
case 'h': // help
|
||||||
case '?':
|
case '?':
|
||||||
|
@ -112,9 +118,9 @@ int main(int argc, char **argv)
|
||||||
load_address[k++]=INFILE[j];
|
load_address[k++]=INFILE[j];
|
||||||
load_address[k] = '\0';
|
load_address[k] = '\0';
|
||||||
if(k == 0)
|
if(k == 0)
|
||||||
start = -1;
|
loadaddress = -1;
|
||||||
else
|
else
|
||||||
start = (int)strtol(load_address, (char **)NULL, 16); // todo: input check
|
loadaddress = (int)strtol(load_address, (char **)NULL, 16); // todo: input check
|
||||||
|
|
||||||
if((ext = getext(filename)) != NULL)
|
if((ext = getext(filename)) != NULL)
|
||||||
if(strcmp(ext,"mon") == 0 || strcmp(ext,"MON") == 0)
|
if(strcmp(ext,"mon") == 0 || strcmp(ext,"MON") == 0)
|
||||||
|
@ -133,11 +139,11 @@ int main(int argc, char **argv)
|
||||||
stat(filename,&st);
|
stat(filename,&st);
|
||||||
filesize = st.st_size;
|
filesize = st.st_size;
|
||||||
|
|
||||||
if(start == - 1) {
|
if(loadaddress == - 1) {
|
||||||
fread(&b, 1, 1, ifp);
|
fread(&b, 1, 1, ifp);
|
||||||
start = b;
|
loadaddress = b;
|
||||||
fread(&b, 1, 1, ifp);
|
fread(&b, 1, 1, ifp);
|
||||||
start |= b << 8;
|
loadaddress |= b << 8;
|
||||||
fread(&b, 1, 1, ifp);
|
fread(&b, 1, 1, ifp);
|
||||||
filesize = b;
|
filesize = b;
|
||||||
fread(&b, 1, 1, ifp);
|
fread(&b, 1, 1, ifp);
|
||||||
|
@ -145,7 +151,7 @@ int main(int argc, char **argv)
|
||||||
}
|
}
|
||||||
|
|
||||||
//check for errors
|
//check for errors
|
||||||
fread(&blank.track[1].sector[0].byte[start & 0xFF], filesize, 1, ifp);
|
fread(&blank.track[1+loader].sector[0].byte[loadaddress & 0xFF], filesize, 1, ifp);
|
||||||
}
|
}
|
||||||
|
|
||||||
// todo: lots of input checking
|
// todo: lots of input checking
|
||||||
|
@ -154,14 +160,14 @@ int main(int argc, char **argv)
|
||||||
char addrs[8], s;
|
char addrs[8], s;
|
||||||
unsigned char *p = NULL;
|
unsigned char *p = NULL;
|
||||||
|
|
||||||
start = -1;
|
loadaddress = -1;
|
||||||
filesize = 0;
|
filesize = 0;
|
||||||
|
|
||||||
while(fscanf(ifp,"%s ",addrs) != EOF) {
|
while(fscanf(ifp,"%s ",addrs) != EOF) {
|
||||||
naddr = (int)strtol(addrs, (char **)NULL, 16);
|
naddr = (int)strtol(addrs, (char **)NULL, 16);
|
||||||
if(start == -1) {
|
if(loadaddress == -1) {
|
||||||
start = naddr;
|
loadaddress = naddr;
|
||||||
p = &blank.track[1].sector[0].byte[start & 0xFF];
|
p = &blank.track[1+loader].sector[0].byte[loadaddress & 0xFF];
|
||||||
}
|
}
|
||||||
|
|
||||||
while (fscanf(ifp, "%x%c", &byte, &s) != EOF) {
|
while (fscanf(ifp, "%x%c", &byte, &s) != EOF) {
|
||||||
|
@ -176,39 +182,108 @@ int main(int argc, char **argv)
|
||||||
|
|
||||||
fclose(ifp);
|
fclose(ifp);
|
||||||
|
|
||||||
fprintf(stderr,"%04X, length: %d\n",start,filesize);
|
fprintf(stderr,"%04X, length: %d\n",loadaddress,filesize);
|
||||||
fprintf(stderr,"\n");
|
fprintf(stderr,"\n");
|
||||||
|
|
||||||
blank.track[0].sector[1].byte[0xE0] = ceil((filesize + (start & 0xFF)) / 256.0);
|
if(!start)
|
||||||
blank.track[0].sector[1].byte[0xE7] = ((start + filesize - 1) >> 8) + 1;
|
start = loadaddress;
|
||||||
blank.track[0].sector[1].byte[0x15] = ceil((filesize + (start & 0xFF))/ 4096.0);
|
|
||||||
blank.track[0].sector[1].byte[0x1A] = ceil((filesize + (start & 0xFF))/ 256.0) - 16*(ceil((filesize + (start & 0xFF)) / 4096.0) - 1) - 1;
|
|
||||||
|
|
||||||
fprintf(stderr,"Number of sectors: %d\n",(int)ceil((filesize + (start & 0xFF)) / 256.0));
|
|
||||||
fprintf(stderr,"Memory page range: $%02X - $%02X\n",start >> 8,(start + filesize - 1) >> 8);
|
|
||||||
|
|
||||||
if(warm)
|
if(warm)
|
||||||
start = 0xFF69;
|
start = 0xFF69;
|
||||||
|
|
||||||
if(start_override)
|
if(!loader) {
|
||||||
start = start_override;
|
blank.track[0].sector[1].byte[0xE0] = ceil((filesize + (loadaddress & 0xFF)) / 256.0);
|
||||||
|
blank.track[0].sector[1].byte[0xE7] = ((loadaddress + filesize - 1) >> 8) + 1;
|
||||||
|
blank.track[0].sector[1].byte[0x15] = ceil((filesize + (loadaddress & 0xFF))/ 4096.0);
|
||||||
|
blank.track[0].sector[1].byte[0x1A] = ceil((filesize + (loadaddress & 0xFF))/ 256.0) - 16*(ceil((filesize + (loadaddress & 0xFF)) / 4096.0) - 1) - 1;
|
||||||
|
|
||||||
blank.track[0].sector[1].byte[0x3B] = 0x4C;
|
fprintf(stderr,"Number of sectors: %d\n",(int)ceil((filesize + (loadaddress & 0xFF)) / 256.0));
|
||||||
blank.track[0].sector[1].byte[0x3C] = start & 0xFF;
|
fprintf(stderr,"Memory page range: $%02X - $%02X\n",loadaddress >> 8,(loadaddress + filesize - 1) >> 8);
|
||||||
blank.track[0].sector[1].byte[0x3D] = start >> 8;
|
|
||||||
|
|
||||||
fprintf(stderr,"After boot, jump to: $%04X\n\n",start);
|
blank.track[0].sector[1].byte[0x3B] = 0x4C;
|
||||||
|
blank.track[0].sector[1].byte[0x3C] = start & 0xFF;
|
||||||
|
blank.track[0].sector[1].byte[0x3D] = start >> 8;
|
||||||
|
|
||||||
|
fprintf(stderr,"After boot, jump to: $%04X\n\n",start);
|
||||||
|
|
||||||
|
fprintf(stderr,"Writing %s to T:01/S:00 - T:%02d/S:%02d on %s\n\n",filename,blank.track[0].sector[1].byte[0x15],blank.track[0].sector[1].byte[0x1A],OUTFILE);
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
if ((ifp = fopen(textpage, "rb")) == NULL) {
|
||||||
|
fprintf(stderr,"Cannot read: %s\n\n",textpage);
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
stat(textpage,&st);
|
||||||
|
textpagesize = st.st_size;
|
||||||
|
|
||||||
|
if(textpagesize != 1024) {
|
||||||
|
fprintf(stderr,"textpage %s size %d != 1024\n\n",textpage,textpagesize);
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
fread(&blank.track[1].sector[0].byte[0], textpagesize, 1, ifp);
|
||||||
|
fclose(ifp);
|
||||||
|
|
||||||
|
if ((ifp = fopen(LOADER, "rb")) == NULL) {
|
||||||
|
fprintf(stderr,"Cannot read: %s\n\n",LOADER);
|
||||||
|
return 1;
|
||||||
|
}
|
||||||
|
|
||||||
|
stat(LOADER,&st);
|
||||||
|
loadersize = st.st_size;
|
||||||
|
|
||||||
|
fread(&blank.track[1].sector[4].byte[0], loadersize, 1, ifp);
|
||||||
|
fclose(ifp);
|
||||||
|
|
||||||
|
// loader args
|
||||||
|
// lasttrack
|
||||||
|
blank.track[1].sector[4].byte[loadersize]=1 + (int)ceil(filesize / 4096.0);
|
||||||
|
// lastsector (unused)
|
||||||
|
blank.track[1].sector[4].byte[loadersize+1]= ceil((filesize % 4096) / 256.0) - 1;
|
||||||
|
// loadpage
|
||||||
|
blank.track[1].sector[4].byte[loadersize+2]= loadaddress >> 8;
|
||||||
|
// program start LSB
|
||||||
|
blank.track[1].sector[4].byte[loadersize+3]= start & 0xFF;
|
||||||
|
// program start MSB
|
||||||
|
blank.track[1].sector[4].byte[loadersize+4]= start >> 8;
|
||||||
|
|
||||||
|
loaderstart=0x400;
|
||||||
|
loadersize += (1024 + 5); // textpage + loader + loader args
|
||||||
|
|
||||||
|
blank.track[0].sector[1].byte[0xE0] = ceil((loadersize + (loaderstart & 0xFF)) / 256.0);
|
||||||
|
blank.track[0].sector[1].byte[0xE7] = ((loaderstart + loadersize - 1) >> 8) + 1;
|
||||||
|
blank.track[0].sector[1].byte[0x15] = ceil((loadersize + (loaderstart & 0xFF))/ 4096.0);
|
||||||
|
blank.track[0].sector[1].byte[0x1A] = ceil((loadersize + (loaderstart & 0xFF))/ 256.0) - 16*(ceil((loadersize + (loaderstart & 0xFF)) / 4096.0) - 1) - 1;
|
||||||
|
|
||||||
|
fprintf(stderr,"Loader number of sectors: %d\n",(int)ceil((loadersize + (loaderstart & 0xFF)) / 256.0));
|
||||||
|
fprintf(stderr,"Loader memory page range: $%02X - $%02X\n",loaderstart >> 8,(loaderstart + loadersize - 1) >> 8);
|
||||||
|
fprintf(stderr,"Binary Number of sectors: %d\n",(int)ceil((filesize + (loadaddress & 0xFF)) / 256.0));
|
||||||
|
fprintf(stderr,"Binary Memory page range: $%02X - $%02X\n",loadaddress >> 8,(loadaddress + filesize - 1) >> 8);
|
||||||
|
|
||||||
|
loaderstart = 0x800;
|
||||||
|
//if(warm)
|
||||||
|
// loaderstart = 0xFF69;
|
||||||
|
|
||||||
|
blank.track[0].sector[1].byte[0x3B] = 0x4C;
|
||||||
|
blank.track[0].sector[1].byte[0x3C] = loaderstart & 0xFF;
|
||||||
|
blank.track[0].sector[1].byte[0x3D] = loaderstart >> 8;
|
||||||
|
|
||||||
|
fprintf(stderr,"After boot, jump to: $%04X\n",loaderstart);
|
||||||
|
fprintf(stderr,"After loader, jump to: $%04X\n",start);
|
||||||
|
fprintf(stderr,"\n");
|
||||||
|
fprintf(stderr,"Writing %s to T:02/S:00 - T:%02d/S:%02d on %s\n\n",filename,blank.track[1].sector[4].byte[st.st_size],blank.track[1].sector[4].byte[st.st_size+1],OUTFILE);
|
||||||
|
}
|
||||||
|
|
||||||
if ((ofp = fopen(OUTFILE, "wb")) == NULL) {
|
if ((ofp = fopen(OUTFILE, "wb")) == NULL) {
|
||||||
fprintf(stderr,"Cannot write: %s\n\n",OUTFILE);
|
fprintf(stderr,"Cannot write: %s\n\n",OUTFILE);
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
fprintf(stderr,"Writing %s to T:01/S:00 - T:%02d/S:%02d on %s\n\n",filename,blank.track[0].sector[1].byte[0x15],blank.track[0].sector[1].byte[0x1A],OUTFILE);
|
|
||||||
|
|
||||||
// check for errors
|
// check for errors
|
||||||
fwrite(&blank, 143360, 1, ofp);
|
fwrite(&blank, 143360, 1, ofp);
|
||||||
|
|
||||||
|
fclose(ofp);
|
||||||
|
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -39,6 +39,7 @@ Examples:\n\
|
||||||
\n\
|
\n\
|
||||||
";
|
";
|
||||||
|
|
||||||
|
//$B600
|
||||||
disk blank = {
|
disk blank = {
|
||||||
0x01,0xA5,0x27,0xC9,0x09,0xD0,0x18,0xA5,0x2B,0x4A,0x4A,0x4A,0x4A,0x09,0xC0,0x85,
|
0x01,0xA5,0x27,0xC9,0x09,0xD0,0x18,0xA5,0x2B,0x4A,0x4A,0x4A,0x4A,0x09,0xC0,0x85,
|
||||||
0x3F,0xA9,0x5C,0x85,0x3E,0x18,0xAD,0xFE,0x08,0x6D,0xFF,0x08,0x8D,0xFE,0x08,0xAE,
|
0x3F,0xA9,0x5C,0x85,0x3E,0x18,0xAD,0xFE,0x08,0x6D,0xFF,0x08,0x8D,0xFE,0x08,0xAE,
|
||||||
|
@ -9001,3 +9002,5 @@ disk blank = {
|
||||||
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
|
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
|
||||||
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
|
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user