mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-10-25 14:26:11 +00:00
sa: update title screen
This commit is contained in:
parent
329aa0047c
commit
b4150b234e
@ -1,12 +1,14 @@
|
|||||||
include ../Makefile.inc
|
include ../Makefile.inc
|
||||||
|
|
||||||
DOS33 = ../dos33fs-utils/dos33
|
DOS33 = ../dos33fs-utils/dos33
|
||||||
|
TOKENIZE = ../asoft_basic-utils/tokenize_asoft
|
||||||
|
|
||||||
all: still_alive.dsk lyrics_to_asm
|
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 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
|
STILL_ALIVE: still_alive.o
|
||||||
ld65 -o STILL_ALIVE still_alive.o -C ../linker_scripts/apple2_c00.inc
|
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
|
lyrics_to_asm: lyrics_to_asm.c
|
||||||
gcc -O2 -Wall -o 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:
|
clean:
|
||||||
rm -f *~ *.o *.lst STILL_ALIVE lyrics_to_asm
|
rm -f *~ *.o *.lst STILL_ALIVE lyrics_to_asm
|
||||||
|
24
still_alive/title.bas
Normal file
24
still_alive/title.bas
Normal 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"
|
Loading…
Reference in New Issue
Block a user