year updates and other minor things

This commit is contained in:
4am 2020-03-16 21:58:05 -04:00
parent 8100a03c48
commit 6ac049d44c
16 changed files with 28 additions and 22 deletions

View File

@ -70,8 +70,6 @@ SUMMER.EDITION=Type(06),AuxType(3FF8),Access(C3)
SUMMER.EDITION2=Type(06),AuxType(3FF8),Access(C3)
SUMMER.EDITION3=Type(06),AuxType(3FF8),Access(C3)
TECHNOCOP=Type(06),AuxType(3FF8),Access(C3)
TECHNOCOP.AUX=Type(06),AuxType(3FF8),Access(C3)
TECHNOCOP.BIN=Type(06),AuxType(3FF8),Access(C3)
TETRIS=Type(06),AuxType(3FF8),Access(C3)
TETRIS2=Type(06),AuxType(3FF8),Access(C3)
TETRIS3=Type(06),AuxType(3FF8),Access(C3)

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-20 by 4am
;(c) 2018-2020 by 4am
;
!cpu 6502
!to "build/LAUNCHER.SYSTEM",plain

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-20 by 4am
;(c) 2018-2020 by 4am
;
; first-run initialization code
;

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2019 by 4am & qkumba
;(c) 2019-2020 by 4am & qkumba
;
; Functions to enable and disable acceleration on various
; Apple II models, cards, and environments

View File

@ -1,6 +1,5 @@
;license:MIT
;(c) 2019-20 by Andrew Roughan, qkumba
; in the style of 4am for Total Replay
;(c) 2019-2020 by Andrew Roughan, qkumba, 4am
;
; Mockingboard support functions
;

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; Parser for global preferences file
;

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; ProDOS - functions for constructing and passing around ProDOS pathnames
;

View File

@ -9,6 +9,8 @@
; - DHGRSingle
; - BlankHGR
; - HGRMode
; - ForceHGRMOde
; - DrawGameTitleInActionSlideshowHGR
; - RedrawForDHGR
;
@ -108,9 +110,17 @@ GRMode
bit $C050
DHGRRTS rts
;------------------------------------------------------------------------------
; ForceHGRMode
; if machine is in DHGR mode, switch it back to HGR mode
; otherwise do nothing
;
; in: none
; out: see BlankHGR
;------------------------------------------------------------------------------
ForceHGRMode
gMachineInDHGRMode=*+1
lda #$00
lda #$00 ; SMC
bne BlankHGR
beq DHGRRTS

View File

@ -17,11 +17,11 @@
; graphics mode set to display hi-res screen
;------------------------------------------------------------------------------
GRActionSlideshow
jsr .LoadGRTransition ; load transition effect code at $6000
jsr LoadGRTransition ; load transition effect code at $6000
jsr BlankGR ; switch GR mode with initial blank screen
jsr okvs_iter ; cycle through all listed GR files
!word gSlideshowStore
!word .GRActionCallback ; address of callback (called on each file)
!word GRActionCallback ; address of callback (called on each file)
jmp BlankHGR ; switch back to HGR mode with initial blank screen on exit
;------------------------------------------------------------------------------
@ -39,7 +39,7 @@ GRSingle
!word kRootDirectory
@fname !word $FDFD ; SMC
!word $6000
jsr .LoadGRTransition ; load transition effect code at $6400
jsr LoadGRTransition ; load transition effect code at $6400
jsr ExecuteTransitionAt6400AndWait
jmp BlankHGR ; switch back to HGR mode with initial blank screen on exit
@ -70,7 +70,7 @@ BlankGR
; $6400..$BFFF/main contains transition effect code (probably not all
; of that, but no promises)
;------------------------------------------------------------------------------
.LoadGRTransition
LoadGRTransition
jsr LoadFile
!word kFXDirectory
!word kGRFizzleFile
@ -89,7 +89,7 @@ GRRTS rts
; $0800..$1EFF preserved (this contains the gSlideshowStore OKVS data)
; $2000..$BFFF clobbered by graphics data and transition code
;------------------------------------------------------------------------------
.GRActionCallback
GRActionCallback
bit KBD
bmi GRRTS

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; Browse Mode - main UI
;

View File

@ -1,5 +1,5 @@
;License:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; miscellaneous UI functions
;

View File

@ -14,7 +14,6 @@
; - DrawBuffer
;
; /!\ execution falls through from ui.attract.hgr/HGRActionCallback
DrawString
jsr SwitchToBank2
jsr DrawStringInternal

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; hi-res font drawing routines
;

View File

@ -1,5 +1,5 @@
;License:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; routines for drawing the UI overlay (search bar, browse bar, instructions, cheat mode)
; on top of whatever else is on the screen

View File

@ -1,5 +1,5 @@
;license:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; Search Mode - main UI
;

View File

@ -1,5 +1,5 @@
;License:MIT
;(c) 2018-9 by 4am
;(c) 2018-2020 by 4am
;
; UI functions for doing things then waiting, or waiting then doing things
;