mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-07 08:30:20 +00:00
deceptive_listings: messing around with basic listings
though it turns out that DOS re-interprets programs you load so manually messing with the line offsets is lost if you do it in advance
This commit is contained in:
parent
38994ef9a8
commit
b04dc5070b
14
deceptive_list/Makefile
Normal file
14
deceptive_list/Makefile
Normal file
|
@ -0,0 +1,14 @@
|
||||||
|
DOS33 = ../dos33fs-utils/dos33
|
||||||
|
TXT2BAS = ../asoft_basic-utils/tokenize_asoft
|
||||||
|
|
||||||
|
all: deceptive.dsk
|
||||||
|
|
||||||
|
BACKWARD.BAS: backward.basd
|
||||||
|
$(TXT2BAS) < backward.basd > BACKWARD.BAS
|
||||||
|
|
||||||
|
deceptive.dsk: BACKWARD.BAS
|
||||||
|
$(DOS33) -y deceptive.dsk SAVE A BACKWARD.BAS
|
||||||
|
|
||||||
|
clean:
|
||||||
|
rm -f *~ *.BAS *.SHAPE sound_test.bas shape_test.bas *.lst
|
||||||
|
|
BIN
deceptive_list/deceptive.dsk
Normal file
BIN
deceptive_list/deceptive.dsk
Normal file
Binary file not shown.
11
deceptive_list/hidden.bas
Normal file
11
deceptive_list/hidden.bas
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
5 REM FUN TIMES
|
||||||
|
7 PRINT
|
||||||
|
10 PRINT "** DECEPTIVE LIST **"
|
||||||
|
20 PRINT " BY "
|
||||||
|
30 PRINT " VINCE WEAVER "
|
||||||
|
40 PRINT "********************"
|
||||||
|
50 PRINT
|
||||||
|
55 PRINT "WHATEVER YOU DO, DON'T TYPE LIST"
|
||||||
|
60 PRINT
|
||||||
|
70 END
|
||||||
|
|
21
deceptive_list/hidden.basd
Normal file
21
deceptive_list/hidden.basd
Normal file
|
@ -0,0 +1,21 @@
|
||||||
|
'0811
|
||||||
|
*08BB 5 REM FUN TIMES
|
||||||
|
'0817
|
||||||
|
*0817 7 PRINT
|
||||||
|
'0833
|
||||||
|
*0833 10 PRINT "** DECEPTIVE LIST **"
|
||||||
|
'084F
|
||||||
|
*084F 20 PRINT " BY "
|
||||||
|
'086B
|
||||||
|
*086B 30 PRINT " VINCE WEAVER "
|
||||||
|
'0887
|
||||||
|
*0887 40 PRINT "********************"
|
||||||
|
'088D
|
||||||
|
*088D 50 PRINT
|
||||||
|
'08B5
|
||||||
|
*08B5 55 PRINT "WHATEVER YOU DO, DON'T TYPE LIST"
|
||||||
|
'08BB
|
||||||
|
*08BB 60 PRINT
|
||||||
|
'08C1
|
||||||
|
*08C1 70 END
|
||||||
|
|
Loading…
Reference in New Issue
Block a user