mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-06-16 07:29:29 +00:00
92 lines
1.2 KiB
ArmAsm
92 lines
1.2 KiB
ArmAsm
|
; Peasant's Quest / New Game
|
||
|
|
||
|
; included by intro.s
|
||
|
|
||
|
; by Vince `deater` Weaver vince@deater.net
|
||
|
|
||
|
;=============================
|
||
|
; start new game
|
||
|
;=============================
|
||
|
start_new_game:
|
||
|
|
||
|
;===================================================
|
||
|
; load inventory code to language card $d000 bank 2
|
||
|
|
||
|
; switch in language card
|
||
|
; read/write RAM, $d000 bank 2
|
||
|
|
||
|
lda $C083
|
||
|
lda $C083
|
||
|
|
||
|
; actually load it
|
||
|
lda #LOAD_INVENTORY
|
||
|
sta WHICH_LOAD
|
||
|
|
||
|
jsr load_file
|
||
|
|
||
|
|
||
|
; start in PEASANT2 file
|
||
|
|
||
|
lda #LOAD_PEASANT2
|
||
|
sta WHICH_LOAD
|
||
|
|
||
|
;=========================
|
||
|
; init peasant position
|
||
|
; draw at 18,108
|
||
|
|
||
|
lda #18
|
||
|
sta PEASANT_X
|
||
|
lda #108
|
||
|
sta PEASANT_Y
|
||
|
|
||
|
; set direction
|
||
|
|
||
|
lda #PEASANT_DIR_RIGHT
|
||
|
sta PEASANT_DIR
|
||
|
|
||
|
; set not walking
|
||
|
|
||
|
lda #0
|
||
|
sta PEASANT_XADD
|
||
|
sta PEASANT_YADD
|
||
|
|
||
|
; set score to 0
|
||
|
|
||
|
lda #0
|
||
|
sta SCORE_HUNDREDS
|
||
|
|
||
|
lda #$00
|
||
|
sta SCORE_TENSONES
|
||
|
|
||
|
; map location
|
||
|
|
||
|
lda #4
|
||
|
sta MAP_X
|
||
|
lda #1
|
||
|
sta MAP_Y
|
||
|
|
||
|
; inventory is only t-shirt
|
||
|
|
||
|
lda #$00
|
||
|
sta INVENTORY_1
|
||
|
sta INVENTORY_2
|
||
|
lda #INV3_SHIRT
|
||
|
sta INVENTORY_3
|
||
|
|
||
|
; inventory items gone
|
||
|
|
||
|
; 1100 1011
|
||
|
lda #$00
|
||
|
sta INVENTORY_1_GONE
|
||
|
; 0001 1101
|
||
|
; lda #$00
|
||
|
sta INVENTORY_2_GONE
|
||
|
;
|
||
|
; lda #$00
|
||
|
sta INVENTORY_3_GONE
|
||
|
|
||
|
|
||
|
|
||
|
rts
|
||
|
|