Prev: 7A6C Up: Map Next: 7B23
7A9E: Main Initialisation
Input
IY $5c3a
Output
Init 7A9E LD SP,Stack
7AA1 EI
7AA2 LD B,$20
7AA4 LD HL,TempStore
Init_0 7AA7 LD (HL),$00
7AA9 INC HL
7AAA DJNZ Init_0
7AAC LD IX,Bitmap_PtrTable Bitmaps : Create bitmap pointer table.
7AB0 LD B,$00
Init_1 7AB2 LD L,(IX+$00)
7AB5 LD H,(IX+$01)
7AB8 LD DE,_bf8e
7ABB ADD HL,DE
7ABC LD (IX+$00),L
7ABF LD (IX+$01),H
7AC2 LD DE,$0004
7AC5 ADD IX,DE
7AC7 DJNZ Init_1
7AC9 LD IX,Bitmap_HeroMaskPtr Correct masks.
7ACD LD C,$09
Init_2 7ACF LD L,(IX+$00)
7AD2 LD H,(IX+$01)
7AD5 LD E,(IX+$02)
7AD8 RES 7,E
7ADA LD B,(IX+$03)
7ADD RES 7,B
7ADF XOR A
Init_3 7AE0 ADD A,E
7AE1 DJNZ Init_3
7AE3 ADD A,A
7AE4 JR Z,Init_5
7AE6 ADD A,A
7AE7 ADD A,A
7AE8 LD B,A
Init_4 7AE9 LD A,(HL)
7AEA CPL
7AEB LD (HL),A
7AEC INC HL
7AED DJNZ Init_4
Init_5 7AEF LD DE,$0004
7AF2 ADD IX,DE
7AF4 DEC C
7AF5 JR NZ,Init_2
7AF7 LD HL,BmpInfo82_PictureFrame Create table.
7AFA LD DE,$BD98
7AFD LD BC,$000C
7B00 LDIR
7B02 LD HL,Actors_background Create table.
7B05 LD DE,Dictionary_w9
7B08 LD BC,$0024
7B0B LDIR
7B0D LD HL,_7a6c
7B10 LD DE,Dictionary_10w
7B13 LD BC,$0032
7B16 LDIR
7B18 LD A,$01 Set print channel.
7B1A CALL $1601
7B1D CALL _79b7
7B20 JP $0000 If anything goes wrong reset Spectrum.
Prev: 7A6C Up: Map Next: 7B23