Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-05 21:34:30 +00:00
Code Issues Projects Releases Wiki Activity

pt3: update dumper to print to printer

Browse Source
This commit is contained in:
Vince Weaver 2019-05-13 16:18:26 -04:00
parent 3d49c8dbae
commit 32a5db8905
4 changed files with 22 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pt3_player/Makefile
View File

@ -8,9 +8,10 @@ all: pt3_player.dsk
$(DOS33):
cd ../dos33fs-utils && make
pt3_player.dsk: PT3_PLAYER PT3_DUMPER HELLO
pt3_player.dsk: PT3_PLAYER PT3_DUMPER HELLO DUMP
cp empty.dsk pt3_player.dsk
$(DOS33) -y pt3_player.dsk SAVE A HELLO
$(DOS33) -y pt3_player.dsk SAVE A DUMP
$(DOS33) -y pt3_player.dsk BSAVE -a 0x1000 PT3_DUMPER
$(DOS33) -y pt3_player.dsk BSAVE -a 0x1000 PT3_PLAYER
$(DOS33) -y pt3_player.dsk BSAVE -a 0x3000 EA.PT3
@ -36,6 +37,9 @@ pt3_player.dsk: PT3_PLAYER PT3_DUMPER HELLO
HELLO: hello.bas
../asoft_basic-utils/tokenize_asoft < hello.bas > HELLO
DUMP: dump.bas
../asoft_basic-utils/tokenize_asoft < dump.bas > DUMP
PT3_PLAYER: pt3_player.o
ld65 -o PT3_PLAYER pt3_player.o -C ../linker_scripts/apple2_1000.inc

3
pt3_player/dump.bas Normal file
View File

@ -0,0 +1,3 @@
10 PRINT CHR$(4);"PR#1"
20 PRINT CHR$(4);"BRUN PT3_DUMPER"

4
pt3_player/hello.bas
View File

@ -1,2 +1,2 @@
10 PRINT "LOADING PT3 DUMPER V0.0"
100 PRINT CHR$ (4)"BRUN PT3_DUMPER"
10 PRINT "PT3 DUMPER V0.0"
100 PRINT CHR$ (4)"CATALOG"

16
pt3_player/pt3_dumper.s
View File

@ -17,6 +17,7 @@ pt3_setup:
jsr HOME
jsr TEXT
; Init disk code
jsr rts_init
@ -33,8 +34,15 @@ pt3_setup:
; load first song
;==================
jsr new_song
; Set COUT to the printer in PR#1
lda #$02
sta $36
lda #$C1
sta $37
jsr new_song
;============================
; Loop forever
@ -182,9 +190,9 @@ six_space:
inc FRAMEH
no_frame_oflo:
lda FRAMEL
cmp #16
beq all_done
; lda FRAMEL
; cmp #16
; beq all_done
lda DONE_PLAYING
bne all_done