mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-04 20:06:09 +00:00
lovebyte: update last bits
This commit is contained in:
parent
75ad84da5b
commit
a891b33bb9
@ -1,7 +1,7 @@
|
||||
; Tiny Entropy Boxes
|
||||
; by Vince `Deater` Weaver / dSr
|
||||
|
||||
; based on:
|
||||
; roughly based on:
|
||||
|
||||
; Entropy
|
||||
; by Dave McKellar of Toronto
|
||||
@ -117,6 +117,9 @@ shape_table: ; C B A
|
||||
; .byte 54 ; $36 00 110 110 DN DN nop
|
||||
; .byte 63 ; $3F 00 111 111 LT LT nop
|
||||
; .byte 0
|
||||
|
||||
; this is half the size but we have to scale *2
|
||||
|
||||
.byte 58
|
||||
.byte 36
|
||||
.byte 45
|
23
demos/lovebyte2024/box_entropy_64/file_id.diz
Normal file
23
demos/lovebyte2024/box_entropy_64/file_id.diz
Normal file
@ -0,0 +1,23 @@
|
||||
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-==-
|
||||
box_entropy 64
|
||||
--------------------------------------
|
||||
Hi-res Xdraw Pattern
|
||||
by Deater / dSr
|
||||
|
||||
I attempted this before as a 64-byter
|
||||
but managed to fit a more complete
|
||||
version this time.
|
||||
|
||||
roughly based on:
|
||||
|
||||
; Entropy
|
||||
; by Dave McKellar of Toronto
|
||||
; Two-line BASIC program
|
||||
; Found on Beagle Brother's Apple Mechanic Disk
|
||||
|
||||
XORs a box pattern, but randomly doubles the
|
||||
size of the box. It's hard to generate good
|
||||
random numbers on 6502 in 64 bytes.
|
||||
|
||||
Lovebyte 2024
|
||||
--------------------------------------
|
11
demos/lovebyte2024/box_entropy_64/hello.bas
Normal file
11
demos/lovebyte2024/box_entropy_64/hello.bas
Normal file
@ -0,0 +1,11 @@
|
||||
5 HOME
|
||||
10 PRINT " -= BOX_ENTROPY 64 =-"
|
||||
11 PRINT " ''''''''''''''''"
|
||||
12 PRINT " FOR LOVEBYTE 2024"
|
||||
15 PRINT " BY DEATER / DSR"
|
||||
17 PRINT " BASED ON 2-LINER BY D. MCKELLAR"
|
||||
20 PRINT CHR$(4)"CATALOG"
|
||||
25 PRINT:PRINT "PRESS ANY KEY TO 'BRUN BOX_ENTROPY'"
|
||||
30 GET A$
|
||||
35 PRINT
|
||||
40 PRINT CHR$(4)"BRUN BOX_ENTROPY"
|
24
demos/lovebyte2024/box_entropy_64/shape.table
Normal file
24
demos/lovebyte2024/box_entropy_64/shape.table
Normal file
@ -0,0 +1,24 @@
|
||||
# box
|
||||
2
|
||||
START
|
||||
NDN NDN
|
||||
LT LT
|
||||
UP UP
|
||||
UP UP
|
||||
RT RT
|
||||
RT RT
|
||||
DN DN
|
||||
DN DN
|
||||
LT LT
|
||||
STOP
|
||||
START
|
||||
NDN
|
||||
LT
|
||||
UP
|
||||
UP
|
||||
RT
|
||||
RT
|
||||
DN
|
||||
DN
|
||||
LT
|
||||
STOP
|
Loading…
Reference in New Issue
Block a user