mirror of
https://github.com/marketideas/qasm.git
synced 2026-10-24 22:02:28 +00:00
Shawn Quick
dfcaae62dd
Move the assembler to src/qasm. qlink links OMF 1.0 and 2.0 from a script. makeBin flattens a load file, qomf dumps OMF, and qpro builds ProDOS volumes. APW and MPW assemble through the ORCA front end. Relocatable modules emit OMF objects. Listings stay off unless -l is set. make boot assembles the GS/OS 6.0.1 ProDOS 8 kernel and BASIC.SYSTEM into an 800K volume. BASIC.SYSTEM accepts ls and pfx, and its splash reports PRODOS BASIC 2.0, copyright 1983-2026. IIGS.601.SRC is the source and the BASIC.SYSTEM oracle that image is built from.
1 line
2.2 KiB
Plaintext
1 line
2.2 KiB
Plaintext
*******************************************************************************
|
|
* Game.Data.aii
|
|
*
|
|
* (C) Copyright Two guys and a cabbage software 1988
|
|
* All rights reserved.
|
|
*
|
|
* by Mensch and Williamson
|
|
* 7/18/88
|
|
*
|
|
* This is a data segment definition for GAME! It will start with 4K of variables
|
|
* These variables will not have initial vaues (other than 0 that is). The
|
|
* remaining 28K will be devoted to variables that can be initialized to a value
|
|
* as desired.
|
|
*
|
|
* Files: None
|
|
*
|
|
*
|
|
*
|
|
* Modification History:
|
|
*
|
|
* Version 1.0 Mensch and Williamson
|
|
*
|
|
* 7/18/88 Initial release
|
|
*
|
|
* -------------------------------------------------------------------------
|
|
* 4/16/90 Mensch
|
|
* Started 5.0.3 conversion work today in this file
|
|
*
|
|
*
|
|
*******************************************************************************
|
|
Include 'Anim.Globals'
|
|
seg 'GLOBALDATA'
|
|
Dummy proc
|
|
dc.L Dummy
|
|
EndP
|
|
SetMyDataBank proc Export
|
|
;
|
|
; This proc makes the globals data bank the current data bank for this application
|
|
; This way any time you want to use our data bank you simply call SetMyDataBank
|
|
phk
|
|
plb
|
|
rtl
|
|
nop
|
|
EndP
|
|
;
|
|
; This next record is the standard global data used by this application
|
|
Globals Record Export
|
|
ds GlobalsTemplate
|
|
EndOfStdData
|
|
ds.B $4000-(EndOfStdData-Globals)
|
|
EndR
|
|
|
|
Constants Record Export
|
|
theMessage dc.B 'You found me!',0
|
|
TitleString dc.B 'Apple IIgs Game ',0
|
|
AutString dc.B 'By Jim Mensch and Steve Williamson',0
|
|
|
|
MethMasks dc.b %01010101, %11111111, %01010101
|
|
|
|
DirMasks dc.b %01111100, %11111000, %11110001, %11100011
|
|
dc.b %11000111, %10001111, %00011111, %00111110
|
|
dc.b %11111111
|
|
Cascade dc.W $0001,$0002,$0004,$0008,$0010,$0020,$0040,$0080
|
|
dc.W $0100,$0200,$0400,$0800,$1000,$2000,$4000,$8000
|
|
|
|
WandShotCost dc.W 1,2,3,4,1,2,3,4,1,2,3,4,1,2,3,4 ; price of each wand shot
|
|
WandShotDam dc.W 1,2,3,4,2,3,4,5,3,4,5,6,4,5,6,7 ; amount of damage each wand inflicts
|
|
EndOfConst
|
|
Padding ds.B $2000-(EndOfConst-Constants) ; padd us out to the end of the bank
|
|
Endr
|
|
;
|
|
; NOTE At this point in the file I have used $6000 bytes of my global storage
|
|
ExtraData Record Export
|
|
Export MyBackSaveArea
|
|
MyBackSaveArea ds.B $8000
|
|
MyBackGrafPort ds.B $0100 ; area for grafport storage ...
|
|
StrikeArea ds.B $1EF0
|
|
EndR
|
|
END |