Apple-2-SW
/
4sports
mirror of https://github.com/a2-4am/4sports.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

add Draw Poker

This commit is contained in:
4am 2024-04-26 11:47:27 -04:00
parent a859e5f9ce
commit 1464c1c50e
69 changed files with 198 additions and 61 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
res/ACTION.HGR.UNCOMPRESSED/DRAW.POKER Normal file
View File

Binary file not shown.

BIN
res/ACTION.HGR/DRAW.POKER Normal file
View File

Binary file not shown.

8
res/ATTRACT/DRAW.POKER Normal file
View File

@ -0,0 +1,8 @@
#
# Attract mode for DRAW.POKER
# This file is automatically generated
#
DRAW.POKER=A
[eof]

BIN
res/CACHE00.IDX
View File

Binary file not shown.

BIN
res/CACHE01.IDX
View File

Binary file not shown.

BIN
res/CACHE10.IDX
View File

Binary file not shown.

BIN
res/CACHE11.IDX
View File

Binary file not shown.

1
res/GAMES.CONF
View File

@ -39,6 +39,7 @@
10000,CHUCK.YEAGER=Chuck Yeager's Flight Sim/1987
10001,CMPTR.FOOSBALL=Computer Foosball/1981
10000,DIVE.BOMBER=Dive Bomber/1988
00001,DRAW.POKER=Draw Poker/1981
10000,F15.STRK.EGL=F-15 Strike Eagle/1985
01100,FAMILY.FEUD=All New Family Feud/1989
10000,FIGHT.NIGHT=Fight Night/1985

1
res/SS/ACTBOARD.CONF
View File

@ -6,6 +6,7 @@ REVERSI
CHECKERS
MICROCHESS
GO.FOUR.IT
DRAW.POKER
ODIN
PENSATE
ULTRACHECKERS

2
res/SS/ACTDEF1.CONF
View File

@ -4,8 +4,8 @@
DIVE.BOMBER2=DIVE.BOMBER
FIGHT.NIGHT
F15.STRK.EGL
DIVE.BOMBER
F15.STRK.EGL
DIVE.BOMBER5=DIVE.BOMBER
FORMULA.1.RACER

1
res/SS/ACTDEF2.CONF
View File

@ -5,6 +5,7 @@
DIVE.BOMBER3=DIVE.BOMBER
FS2
DIVE.BOMBER4=DIVE.BOMBER
DRAW.POKER
FOX.AND.GEESE
DIVE.BOMBER6=DIVE.BOMBER

1
res/SS/CATBOARD.CONF
View File

@ -6,6 +6,7 @@ PENSATE
ODIN
GO.FOUR.IT
ULTRACHECKERS
DRAW.POKER
REVERSI
GO
CHECKERS

1
res/SS/TITLEDEF.CONF
View File

@ -5,6 +5,7 @@
DIVE.BOMBER
FIGHT.NIGHT
F15.STRK.EGL
DRAW.POKER
FORMULA.1.RACER
FOX.AND.GEESE
FS2

BIN
res/TITLE.HGR.UNPACKED/DRAW.POKER Normal file
View File

Binary file not shown.

BIN
res/TITLE.HGR/DRAW.POKER Normal file
View File

Binary file not shown.

BIN
res/dsk/draw poker (4am pack).po Normal file
View File

Binary file not shown.

1
res/history.md
View File

@ -10,6 +10,7 @@
- Card Sharks
- Checkers
- Chuck Yeager's Advanced Flight Trainer
- Draw Poker
- F-15 Strike Eagle
- Fox & Geese
- Go

51
res/ports/draw-poker/Makefile Normal file
View File

@ -0,0 +1,51 @@
# https://sourceforge.net/projects/acme-crossass/
ACME=acme
# https://github.com/mach-kernel/cadius
CADIUS=cadius
EXOMIZER=exomizer mem -lnone -P23 -f -q
BUILDDIR=build
DISKVOLUME=DRAW.POKER
LOADER=$(BUILDDIR)/LOADER.SYSTEM\#FF2000
EXE=$(BUILDDIR)/DRAW.POKER\#068000
COMPRESSED=src/OBJ.X
SOURCES=$(wildcard src/*.a) $(COMPRESSED)
RES=$(wildcard res/*) $(wildcard ../common/res/*)
BUILDDISK=$(BUILDDIR)/$(DISKVOLUME).po
.PHONY: clean mount all
$(BUILDDISK): $(EXE) $(LOADER) $(RES)
$(LOADER): $(SOURCES) | $(BUILDDIR)
$(ACME) src/loader.a
$(CADIUS) REPLACEFILE "$(BUILDDISK)" "/$(DISKVOLUME)/" "$(LOADER)" -C
@touch "$@"
$(EXE): $(SOURCES) $(COMPRESSED) | $(BUILDDIR)
$(ACME) src/draw.poker.a
$(CADIUS) REPLACEFILE "$(BUILDDISK)" "/$(DISKVOLUME)/" "$(EXE)" -C
@touch "$@"
$(RES): $(BUILDDIR)
$(CADIUS) REPLACEFILE "$(BUILDDISK)" "/$(DISKVOLUME)/" "$@" -C
@touch "$@"
$(COMPRESSED):
$(EXOMIZER) src/OBJ@0x1500 -o "$@"
mount: $(BUILDDISK)
@open "$(BUILDDISK)"
clean:
rm -rf "$(BUILDDIR)"
$(BUILDDIR):
mkdir -p "$@"
$(CADIUS) CREATEVOLUME "$(BUILDDISK)" "$(DISKVOLUME)" 140KB -C
all: clean mount
.NOTPARALLEL:

BIN
res/ports/draw-poker/src/OBJ Normal file
View File

Binary file not shown.

BIN
res/ports/draw-poker/src/OBJ.X Normal file
View File

Binary file not shown.

29
res/ports/draw-poker/src/draw.poker.a Normal file
View File

@ -0,0 +1,29 @@
!cpu 6502
*=$8000
!to "build/DRAW.POKER#068000",plain
!src "../common/src/constants.a"
!src "../common/src/macros.a"
jmp start
compressed_data
!bin "src/OBJ.X"
FORWARD_DECRUNCHING = 1
SHOW_PROGRESS_DURING_DECRUNCH = 0
!src "../common/src/exodecrunch.a"
start
+INIT_MACHINE
!if * != $9FE9 {
!serious "Adjust prelaunch to patch JSR at ", *, " to JMP"
}
jsr decrunch ; compressed data contains target address
jmp $1500
get_crunched_byte
lda compressed_data
inc get_crunched_byte+1
bne +
inc get_crunched_byte+2
+ rts

25
res/ports/draw-poker/src/loader.a Normal file
View File

@ -0,0 +1,25 @@
!cpu 6502
*=$2000
!to "build/LOADER.SYSTEM#FF2000",plain
!src "../common/src/constants.a"
!src "../common/src/macros.a"
+READ_ENTIRE_FILE parm_boot_open, parm_boot_read
jmp (entry)
parm_boot_open
!byte 3
!word filename
!word $2100
!byte 0
parm_boot_read
!byte 4
!byte 1
entry !word $8000
!word $FFFF
!word 0
filename
!text 10,"DRAW.POKER"

2
src/index/artwork.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2661759
!be24 2679622
!le16 630

2
src/index/attract.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2645966
!be24 2663761
!le16 1543

4
src/index/cache00.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2633185
!le16 567
!be24 2650825
!le16 574

4
src/index/cache01.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2635902
!le16 928
!be24 2653581
!le16 935

4
src/index/cache10.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2639032
!le16 910
!be24 2656750
!le16 924

4
src/index/cache11.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2643105
!le16 1356
!be24 2660869
!le16 1370

2
src/index/count00.a
View File

@ -3,4 +3,4 @@
;
; This file is automatically generated
;
!word 42
!word 43

2
src/index/count01.a
View File

@ -3,4 +3,4 @@
;
; This file is automatically generated
;
!word 61
!word 62

2
src/index/count10.a
View File

@ -3,4 +3,4 @@
;
; This file is automatically generated
;
!word 63
!word 64

2
src/index/count11.a
View File

@ -3,4 +3,4 @@
;
; This file is automatically generated
;
!word 87
!word 88

2
src/index/coverfade.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2662389
!be24 2680252
!le16 306

2
src/index/credits.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2663039
!be24 2680902
!le16 336

2
src/index/decrunch.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2663375
!be24 2681238
!le16 303

2
src/index/demo.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2128189
!be24 2137591
!le16 69

2
src/index/dfx.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2650149
!be24 2667944
!le16 1640

2
src/index/dgr.fizzle.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2662771
!be24 2680634
!le16 67

2
src/index/dgr.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2661747
!be24 2679610
!le16 12

2
src/index/dhgr.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2660633
!be24 2678496
!le16 1062

2
src/index/dtitle.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2658116
!be24 2675962
!le16 365

2
src/index/fx.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2647509
!be24 2665304
!le16 2640

4
src/index/gamehelp.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2652147
!le16 1505
!be24 2669942
!le16 1522

2
src/index/gr.fizzle.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2662695
!be24 2680558
!le16 76

2
src/index/gr.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2661695
!be24 2679558
!le16 52

2
src/index/helptext.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2662838
!be24 2680701
!le16 201

4
src/index/hgr0.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2658481
!le16 421
!be24 2676327
!le16 438

2
src/index/hgr1.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2658902
!be24 2676765
!le16 209

2
src/index/hgr2.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2659111
!be24 2676974
!le16 107

2
src/index/hgr3.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2659218
!be24 2677081
!le16 292

2
src/index/hgr4.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2659510
!be24 2677373
!le16 791

2
src/index/hgr5.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2660301
!be24 2678164
!le16 305

2
src/index/hgr6.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2660606
!be24 2678469
!le16 27

2
src/index/joystick.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2663678
!be24 2681541
!le16 2370

4
src/index/miniattract0.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2655409
!le16 880
!be24 2673221
!le16 897

2
src/index/miniattract1.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2656289
!be24 2674118
!le16 629

4
src/index/prelaunch.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2644461
!le16 1505
!be24 2662239
!le16 1522

2
src/index/res.cover.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 842795
!be24 850475
!le16 8184

2
src/index/res.help.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 859171
!be24 866851
!le16 8184

2
src/index/res.title.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 850979
!be24 858659
!le16 8192

4
src/index/search00.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2631794
!le16 1391
!be24 2649402
!le16 1423

4
src/index/search01.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2633752
!le16 2150
!be24 2651399
!le16 2182

4
src/index/search10.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2636830
!le16 2202
!be24 2654516
!le16 2234

4
src/index/search11.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2639942
!le16 3163
!be24 2657674
!le16 3195

2
src/index/sfx.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2651789
!be24 2669584
!le16 358

2
src/index/slideshow.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2653652
!be24 2671464
!le16 1757

4
src/index/title.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2656918
!le16 1198
!be24 2674747
!le16 1215

4
src/index/xsingle.idx.a
View File

@ -4,5 +4,5 @@
; This file is automatically generated
;
!byte 0
!be24 2631116
!le16 678
!be24 2648705
!le16 697

18
src/prelaunch/draw.poker.a Normal file
View File

@ -0,0 +1,18 @@
;license:MIT
!cpu 6502
!to "build/PRELAUNCH.INDEXED/DRAW.POKER",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$4C
sta $9FE9
jsr $8000
+DISABLE_ACCEL
jmp $9FE9+3
!if * > $1C0 {
!error "code is too large, ends at ", *
}