credits and SHR artwork

Makefile

@@ -43,6 +43,7 @@ dsk: md asm
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/" "build/PITCH.DARK"
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/" "res/PITCH.DARK.CONF"
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/" "res/GAMES.CONF"
+	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/" "res/CREDITS.TXT"
 	$(CADIUS) CREATEFOLDER build/"$(DISK)" "/PITCH.DARK/LIB/"
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/LIB/" "build/ONBEYONDZ1"
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/LIB/" "build/ONBEYONDZ2"
@@ -65,6 +66,7 @@ txt: dsk
 artwork: dsk
 	$(CADIUS) ADDFOLDER build/"$(DISK)" "/PITCH.DARK/ARTWORK" "res/artwork"
 	$(CADIUS) ADDFILE build/"$(DISK)" "/PITCH.DARK/ARTWORK/" "res/DHRSLIDE.SYSTEM"
+	$(CADIUS) ADDFOLDER build/"$(DISK)" "/PITCH.DARK/ARTWORKGS" "res/artworkgs"
 
 mount: dsk
 	osascript bin/V2Make.scpt "`pwd`" bin/pitchdark.vii build/"$(DISK)"

res/_FileInformation.txt

@@ -2,6 +2,7 @@ GRUE.SYSTEM=Type(FF),AuxType(2000),Access(C3)
 PITCH.DARK=Type(06),AuxType(kPitchDarkBinaryAddress),Access(C3)
 PITCH.DARK.CONF=Type(04),AuxType(0000),Access(C3)
 GAMES.CONF=Type(04),AuxType(0000),Access(C3)
+CREDITS.TXT=Type(04),AuxType(0000),Access(C3)
 ONBEYOND.SYSTEM=Type(FF),AuxType(2000),Access(C3)
 ONBEYONDZ1=Type(06),AuxType(3000),Access(C3)
 ONBEYONDZ2=Type(06),AuxType(3000),Access(C3)

res/artworkgs/_FileInformation.txt

@@ -0,0 +1,31 @@
+AMFV=Type(C1),AuxType(0000),Access(C3)
+BALLYHOO=Type(C1),AuxType(0000),Access(C3)
+BEYOND.ZORK=Type(C1),AuxType(0000),Access(C3)
+BORDER.ZONE=Type(C1),AuxType(0000),Access(C3)
+BUREAUCRACY=Type(C1),AuxType(0000),Access(C3)
+CUTTHROATS=Type(C1),AuxType(0000),Access(C3)
+DEADLINE=Type(C1),AuxType(0000),Access(C3)
+ENCHANTER=Type(C1),AuxType(0000),Access(C3)
+HGTTG=Type(C1),AuxType(0000),Access(C3)
+HOLLYWOOD=Type(C1),AuxType(0000),Access(C3)
+INFIDEL=Type(C1),AuxType(0000),Access(C3)
+LGOP=Type(C1),AuxType(0000),Access(C3)
+LURKING.HORROR=Type(C1),AuxType(0000),Access(C3)
+MOONMIST=Type(C1),AuxType(0000),Access(C3)
+NORD.AND.BERT=Type(C1),AuxType(0000),Access(C3)
+PLANETFALL=Type(C1),AuxType(0000),Access(C3)
+PLUNDERED=Type(C1),AuxType(0000),Access(C3)
+SEASTALKER=Type(C1),AuxType(0000),Access(C3)
+SHERLOCK=Type(C1),AuxType(0000),Access(C3)
+SORCERER=Type(C1),AuxType(0000),Access(C3)
+SPELLBREAKER=Type(C1),AuxType(0000),Access(C3)
+STARCROSS=Type(C1),AuxType(0000),Access(C3)
+STATIONFALL=Type(C1),AuxType(0000),Access(C3)
+SUSPECT=Type(C1),AuxType(0000),Access(C3)
+SUSPENDED=Type(C1),AuxType(0000),Access(C3)
+TRINITY=Type(C1),AuxType(0000),Access(C3)
+WISHBRINGER=Type(C1),AuxType(0000),Access(C3)
+WITNESS=Type(C1),AuxType(0000),Access(C3)
+ZORK.I=Type(C1),AuxType(0000),Access(C3)
+ZORK.II=Type(C1),AuxType(0000),Access(C3)
+ZORK.III=Type(C1),AuxType(0000),Access(C3)

res/credits.txt

@@ -0,0 +1,88 @@
+Games, descriptions, and artwork are
+copyright 1979-1988 Infocom, Inc.
+
+Invisiclues are copyright 1993, 1999
+Activision, Inc.
+
+Zork and all other game names are
+registered trademarks of Activision.
+
+                   ~
+
+Pitch Dark is a frontend for exploring
+and playing Infocom text adventures.
+
+Copyright 2018 4am
+
+https://github.com/a2-4am/pitch-dark
+
+                   ~
+
+On Beyond Z-Machine! is a ProDOS port of
+Infocom's Z-Machine interpreters.
+
+Copyright 2018 qkumba
+
+based on code from six different games
+copyright 1979-1988 Infocom, Inc.
+
+                   ~
+
+WeeGUI is a compact and easy to use GUI
+library for 8-bit Apple ][ computers.
+
+Copyright 2014-8 Quinn Dunki
+
+https://github.com/blondie7575/WeeGUI/
+
+                   ~
+
+Artwork was scanned from original retail
+boxes and converted to Apple II native
+formats with the help of
+
+Bmp2DHR copyright 2014 Bill Buckels
+A2FCBmp copyright 2012-5 Bill Buckels
+buckshot copyright 2017 Dagen Brock
+
+http://www.appleoldies.ca/bmp2dhr/
+https://apple2.gs/buckshot/
+
+                   ~
+
+The PRIZM Project (Pretty Reliable
+Invisiclues for Z-Machine) are genuine
+Infocom Invisiclues, accessible in your
+favorite Z-Machine interpreter.
+
+Copyright 1999 Digby McWiggle and
+Steven Marsh
+
+Compiled, edited, and Z-coded by
+  Digby McWiggle
+  Steven Marsh
+
+from material supplied by
+  Henrik Dittmann
+  Paul David Doherty
+  Volker Blasius
+  Mike Threepoint
+
+Thanks also to
+  Brian Hall
+  L. Ross Raszewski
+  Graham Nelson
+
+http://www.waitingforgo.com/
+
+                   ~
+
+The authors also wish to express their
+gratitude to their wonderfully patient
+beta testers, who will be named here:
+
+  - TODO1
+  - TODO2
+  - TODO3
+
+                 [EOF]

src/pitchdark.init.a

@@ -56,7 +56,7 @@
 ; load file with master game list
 ;------------------------------------------------------------------------------
          jsr   LoadFile              ; load prefs file at $2000
-         !word kGamesListFilename
+         !word @kGamesListFilename
 -        !word $2000
          !word kProDOSFileBuffer
 
@@ -69,7 +69,7 @@
          +STAY gGlobalPrefsStore     ; save pointer to free space for next store
          bra   +
 
-kGamesListFilename
+@kGamesListFilename
          !byte 10
          !raw  "GAMES.CONF"
 +

src/ui.common.a

@@ -21,6 +21,7 @@
 ; - gViewInUse                       array of byte (each 0=false, nonzero=true)
 
 ; Public constants
+; - kStringGlobalTitle
 ; - kStringOK
 ; - kStringCancel
 ;
@@ -28,6 +29,12 @@
 gViewInUse
          !byte 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
 
+kStringGlobalTitle
+         !raw  "                                   "
+         !byte 16                    ; inverse P
+         !raw  "itch "
+         !byte 4                     ; inverse D
+         !raw  "ark                                   ",0
 kStringOK
          !byte $0F                   ; 'O' inverse
          !byte 139,0
@@ -176,13 +183,6 @@ PaintTitleBar
          ldx   #WGSyncGlobalCursor
          jmp   WeeGUI
 
-kStringGlobalTitle
-         !raw  "                                   "
-         !byte 16                    ; inverse P
-         !raw  "itch "
-         !byte 4                     ; inverse D
-         !raw  "ark                                   ",0
-
 ;------------------------------------------------------------------------------
 ; PrintAt
 ; print a null-terminated string at a specified position