Miner 2049er (Apple II)
Please consider supporting The Cutting Room Floor on Patreon. Thanks for all your support!
Miner 2049er (Apple II)
From The Cutting Room Floor
Miner 2049er |
---|
Developer: This game has uncompiled source code. |
Miner 2049er has Bounty Bob trying to traverse through every tiny square meter in each mine, but this version also has loads of Apple logos.
Source Code Remnants
To do: Get the offsets from a legit disk copy. |
Scattered throughout the disk are some source code remnants.
S ;RETURN TO SYSTEM.
;
;-----------------------------
;
IF (* AND 00FFH)=0FFH
DB 00
ENDIF
:ACTION_PTR: DW 0
;
; STATE TABLE
;
:ST_TABLE:
DW :ST0
DW :ST1
DW :ST2
DW :ST3
DW :ST4
DW :
DY #OIACOUNT ;SET DOT A COUNT TO 0
LDA #0 ;TO MAKE SURE IT IS PLOTTED
STA [:DOTPTR],Y ;ON BOTH SCREENS
LDY #OISTATE
LDA #2
STA [ELVPTR],Y
:ST1EXIT:
RTS
;
;------------------------------
;
; - STATE 2 -
;
;------------------------------
;
:ST2:
LDY #OIDETECT
LDA #TRUE
STA [BOBPTR],Y
LDY #OIACOUNT
LDA [:DOTPTR],Y
BEQ :ST2DOTOK
TAX
DEX
TXA
STA [:DOTPTR],Y
JMP :ST2EXIT
:ST2DOTOK:
LDY #OIPLOT
LDA #FALSE
STA [:DOTPTR],Y
LDA BOB_DEAD
BNE :ST2HALT
LDA HALT
BNE :ST2HALT
JMP :ST2NHLT
:ST2HALT:
LDY #OIDETECL
73,79
DB 122,126 ;#4
DB 101,143
:LVL9:
DB 5
DB 128,132
DB 39,44
DB 114,118
DB 66,71
DB 122,126
DB 93,98
DB 110,114
DB 120,125
DB 126,130
DB 147,167
:LVL10:
DB 1
DB 122,126
DB 148,167
;
;
SLD
DB 101,143
DB 5
32
DB 39
114,118
DB 122,1
93,98
DB
DB 120,
126,130
167
:LVL1
VL1
DW :LVL2
DW :LVL3
DW :LVL4
DW :LVL5
DW :LVL6
DW :LVL7
DW :LVL8
DW :LVL9
DW :LVL10
:LVL1:
DB 00
:LVL2:
DB 7 ;NUMBER OF SLIDES
DB 130,141 ;(X,Y) CAPTURE #1
DB -1,+1 ;(X,Y) VECTOR #1
DB 46,102 ;#2
DB +1,+1
:ST2OK:
STA [CANPTR],Y
RTS
;
AY
LDA PLATPTRS,Y
STA PLTFPTR
LDA PLATPTRS+1,Y
STA PLTFPTR+1
TXA
PHA
LDY #OIACT
LDA [PLTFPTR],Y
BEQ :NOTACTIVE
JSR PLATFORM_STATE_MACHINE
:NOTACTIVE:
PLA
TAX
INX
CPX PLTS_SPAWNED
BCC :NXTPLATFORM
LDA HALT ;IF HALT FLAG SET THEN
BEQ :EXIT ;CHECK TO SEE IF PLATFORM IS ACIVE
LDX #00
:NXTCHK:
TXA
ASL A
TAY
LDA PLATPTRS,Y
STA PLTFPTR
LDA PLATPTRS+1,Y
STA PLTFPTR+1
LDY #OIACT
LDA [PLTFPTR],Y
BEQ :OK
LDY #OIRDY
LDA [PLTFPTR],Y
BEQ :NOTRDY
:OK:
INX
CPX PLTS_SPAWNED
BCC :NXTCHK
LDA #TRUE
STA LDM_READY
LDA #00
STA PLTS_SPAWNED
:NOTRDY:
:EXIT:
RTS
;
:VIPTR: EQU PTR1
;
:INDVPTR: DW 0000H
;
:NOPLATFORMS: DB 00
;
;*****************************
;
PLTFPTR: EQU PTR0
;
;*****************************
;PROCEDURE:PLATFORM_STATE_MACHINE
;INPUTS: PLTFPTR - PTR TO OIBLOCK
;OUTPUTS:NONE
;CALLS:
;DESTROYS:ALL
;DESCRIPTION: DOES PLATFORM LOGIC.
;
PLATFORM_STATE_MACHINE: PROC
LDY #OIPRIOR
LDA [PLTFPTR],Y
TAX
LDA PRIORITY_FLAGS,X
BEQ :ALRIGHT
RTS
:ALRIGHT:
LDY #OIXVECT ;GET PI PTR
LDA [PLTFPTR],Y
STA :VIPTR
LDY #OIYVECT
LDA [PLTFPTR],Y
STA :VIPTR+1
LDA HALT
BEQ :NOHALT
LDY #OIDETECT ;CHECK DETECTED FLAG
LDA [PLTFPTR],Y
BNE :NOHALT
LDA #4
LDY #OISTATE
STA [PLTFPTR],Y
:NOHALT:
LDY #OISTATE
LDA [PLTFPTR],Y
ASL A ;STATE NO.
TAX
LDA :ST_TABLE,X
STA :ACTION_PTR
LDA :ST_TABLE+1,X
STA :ACTION_PTR+1
JMP [:ACTION_PTR] ;GOTO PROPER STATE
;
:VIPTR: EQU PTR1
;
;-----------------------------
;
; - STATE 0 -
;
;--------------------------
;
:ST0:
LDY #OIPLOT ;SET PLOT
LDA #TRUE
STA [PLTFPTR],Y
LDY #OIFUNC ;SET DRAW
LDA #FDRSHP
STA [PLTFPTR],Y
LDY #OISTINX ;SET AI TO PLATFORM POS
LDA #00
STA [PLTFPTR],Y
LDY #VIXLOC
LDA [:VIPTR],Y
LDY #OINX ;GET XPOS
STA [PLTFPTR],Y
LDY #VIYLOC
LDA [:VIPTR],Y
LDY #OINY
STA [PLTFPTR],Y
LDA #FALSE ;RESET READY
LDY #OIRDY
STA [P
TITLE 'SIGNON LEVEL DATA MODULE (6)'
;******************************
;
; SIGNON LEVEL DATA MODULE
;
;******************************
;
; REVISION LOG:
;
; 06/09/82 - FILE CREATED
;
;*****************************
;
; JUMP'S:
;
LDM_INIT:
DS 3
LDM_ENTRY:
JMP RUN_LVL
;
;******************************
;
; DATA STRUCTURE'S:
;
LDMSTB:
DW MICROFUN_IMG ; DS
The Bounty Bob series | |
---|---|
Apple II | Miner 2049er |
Atari 5200 | Bounty Bob Strikes Back! |
ZX Spectrum | Bounty Bob Strikes Back! |
Game Boy | Miner 2049er |
Categories:
- Games developed by Livesay Computer Games
- Games published by Micro Fun
- Apple II games
- Games released in 1982
- Games with uncompiled source code
- To do
- Bounty Bob series
Cleanup > To do
Games > Games by content > Games with uncompiled source code
Games > Games by developer > Games developed by Livesay Computer Games
Games > Games by platform > Apple II games
Games > Games by publisher > Games published by Micro Fun
Games > Games by release date > Games released in 1982
Games > Games by series > Bounty Bob series
if(window.jQuery)jQuery.ready();if(window.mw){
mw.loader.state({"site":"loading","user":"ready","user.groups":"ready"});
}if(window.mw){
mw.loader.load(["mediawiki.action.view.postEdit","mediawiki.user","mediawiki.hidpi","mediawiki.page.ready","mediawiki.searchSuggest","ext.uls.pt"],null,true);
}if(window.mw){
document.write("u003Cscript src="https://tcrf.net/load.php?debug=falseu0026amp;lang=enu0026amp;modules=siteu0026amp;only=scriptsu0026amp;skin=vectoru0026amp;*"u003Eu003C/scriptu003E");
}
var pkBaseURL = (("https:" == document.location.protocol) ? "https://stats.tcrf.net/" : "http://stats.tcrf.net/");
document.write(unescape("%3Cscript src='" + pkBaseURL + "piwik.js' type='text/javascript'%3E%3C/script%3E"));
try {
var piwikTracker = Piwik.getTracker(pkBaseURL + "piwik.php", 2);
piwikTracker.trackPageView();
piwikTracker.enableLinkTracking();
} catch( err ) {}
if(window.mw){
mw.config.set({"wgBackendResponseTime":183});
}