Through the Trap Door: Routine at 48934

48934: Script routine: (30) Check Berk's fall velocity, and react to landing

Used by the routine at 48096.

Input
IX	Address of complex state data (current level) for Berk

Output
HL	New address in script data

48934

BIT 6,(IX+10)

If Berk's can-fall flag is reset (i.e. Berk has landed)...

48938

JR Z,48958

...then skip ahead to 48958

48940

BIT 3,(IX+12)

If bit 3 of Berk's velocity factor is set (i.e. Berk has a velocity factor of 8)...

48944

JR NZ,48952

...then skip ahead to 48952

48946

LD HL,35363

Load HL with address of script data for Berk starting to fall...

48949

...and execute

48952

LD HL,35367

Point HL at script data for Berk falling rapidly (horizontal, arms outstretched)...

48955

...and execute

48958

BIT 3,(IX+12)

If bit 3 of Berk's velocity factor is set (i.e. Berk has a velocity factor of 8)...

48962

JR NZ,48970

...then skip ahead to 48970

48964

LD HL,35457

Point HL at script data for Berk landing (after jump)

48967

...and execute

48970

LD HL,35371

Point HL at script data for Berk lying on floor stunned and getting up

48973

...and execute