;
; FATTY commander for ELITE 128
;

.org		$0000			; Does not matter
.localchar	'@'
.case		+
.listmacro	+
.lfcond		+
.p02					; Assemble for 6502 CPU

.include commandr.inc
.include systems.inc


	.word	$0000			; Load address (ignored)

DataStart:
	.byte	$00			; Missions (bitmapped flags)
	.word	LAVE			; Planet code (LAVE)
	.byte	$4A,$5A,$48,$02,$53,$B7 ; Galaxy data
	.dbyt	0, 10000		; Money
	.byte	70			; Fuel
	.byte	$00			; Unused
	.byte	$00			; Number of current galaxy
	.byte	L_Pulse			; Front laser type
	.byte	L_None			; Rear laser type
	.byte	L_None			; Left laser type
	.byte	L_None			; Right laser type
	.word	$0000			; Additional mission data
	.byte	$00			; Food
	.byte	$00			; Textilia
	.byte	$00			; Radioactive materials
	.byte	$00			; Slaves
	.byte	$00			; Liquor
	.byte	$00			; Luxury goods
	.byte	$00			; Narcotica
	.byte	$00			; Computer
	.byte	$00			; Machines
	.byte	$00			; Alloy
	.byte	$00			; Firearms
	.byte	$00			; Furs
	.byte	$00			; Minerals
	.byte	$00			; Gold
	.byte	$00			; Platinum
	.byte	$00			; Gems
	.byte	$00			; Alien goods
	.byte	$00			; ECM
	.byte	$00			; IFF
	.byte	$00			; Fuel scoops
	.byte	$00			; Hyperspace unit
	.byte	$00			; Energy unit (= production value -1)
	.byte	$80			; Docking computer
	.byte	$00			; Galactic hyperdrive
	.byte	$00			; Escape capsule
	.byte	$00			; Extra cargo bay
	.word	0			; Count of trumbels
	.byte	$00			; Rating fraction
	.byte	$03			; Missile count
	.byte	$00			; Legal status
	.byte	$10			; Food available
	.byte	$0F			; Textilia available
	.byte	$11			; Radioactive materials available
	.byte	$00			; Slaves available
	.byte	$03			; Liquor available
	.byte	$1C			; Luxury goods available
	.byte	$0E			; Narcotica available
	.byte	$00			; Computer available
	.byte	$00			; Machines available
	.byte	$0A			; Alloy available
	.byte	$00			; Firearms available
	.byte	$11			; Furs available
	.byte	$3A			; Minerals available
	.byte	$07			; Gold available
	.byte	$09			; Platinum available
	.byte	$08			; Gems available
	.byte	$00			; Alien goods available
	.byte	$00			; Price factor
	.word	0			; Rating/kills
	.word	0			; Special cargo target
	.word	0			; Time left for special cargo delivery
	.byte	0			; Payment for special cargo
	.byte	0			; Type/illegality of special cargo

.if	(* - DataStart) <> (C_Size - C_Data)
.out Structure size mismatch
.endif

