Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-01-26 16:33:43 +00:00
Code Issues Projects Releases Wiki Activity

sa: update title screen

Browse Source
This commit is contained in:
Vince Weaver 2018-05-22 12:14:29 -04:00
parent 329aa0047c
commit b4150b234e
2 changed files with 31 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
still_alive/Makefile
View File

@ -1,12 +1,14 @@
include ../Makefile.inc
DOS33 = ../dos33fs-utils/dos33
TOKENIZE = ../asoft_basic-utils/tokenize_asoft
all: still_alive.dsk lyrics_to_asm
still_alive.dsk: STILL_ALIVE ./SA.KRW
still_alive.dsk: STILL_ALIVE TITLE.BAS
$(DOS33) -y still_alive.dsk BSAVE -a 0x0C00 STILL_ALIVE
$(DOS33) -y still_alive.dsk SAVE B ./SA.KRW
$(DOS33) -y still_alive.dsk SAVE A TITLE.BAS
STILL_ALIVE: still_alive.o
ld65 -o STILL_ALIVE still_alive.o -C ../linker_scripts/apple2_c00.inc
@ -22,5 +24,8 @@ still_alive.o: still_alive.s \
lyrics_to_asm: lyrics_to_asm.c
gcc -O2 -Wall -o lyrics_to_asm lyrics_to_asm.c
TITLE.BAS: title.bas
$(TOKENIZE) < title.bas> TITLE.BAS
clean:
rm -f *~ *.o *.lst STILL_ALIVE lyrics_to_asm

24
still_alive/title.bas Normal file
View File

@ -0,0 +1,24 @@
5 HOME
10 PRINT " __ ___ ___ _ ___ __"
15 PRINT "/ | | | | / \ | | | | |"
20 PRINT "\_ | | | | |_| | | | | |_"
25 PRINT " \ | | | | | | | | | | |"
30 PRINT "__/ | _|_ |_ |_ | | |_ _|_ \/ |__"
35 PRINT " ______"
40 PRINT " A \/\/\/ SOFTWARE PRODUCTION"
45 PRINT
50 PRINT " FROM PORTAL BY VALVE"
55 PRINT " MUSIC BY: JONATHAN COLTON"
60 PRINT " XMP VERSION: DJ ODIN"
65 PRINT " XMP->YM5 CONVERSION: DEATER"
70 PRINT " LZ4 CODE: QKUMBA"
75 PRINT " ELECTRIC DUET: P. LUTUS"
80 PRINT
85 PRINT " PLEASE SELECT:"
90 PRINT " 1. 80 COLUMN + MOCKINGBOARD"
92 PRINT " 2. 40 COLUMN + MOCKINGBOARD"
94 PRINT " 3. 40 COLUMN + SPEAKER"
95 PRINT " ----> ";
100 INPUT A
105 IF A<1 OR A>3 THEN PRINT CHR$(7): GOTO 95
110 PRINT CHR$(4);"BRUN STILL_ALIVE"