summaryrefslogtreecommitdiff
path: root/engine/movement.asm
blob: 4c3e1d03b17a0927458194e3c9e32494457b1310 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
MovementPointers: ; 5075
	dw Movement_turn_head_down
	dw Movement_turn_head_up
	dw Movement_turn_head_left
	dw Movement_turn_head_right
	dw Movement_half_step_down
	dw Movement_half_step_up
	dw Movement_half_step_left
	dw Movement_half_step_right
	dw Movement_slow_step_down
	dw Movement_slow_step_up
	dw Movement_slow_step_left
	dw Movement_slow_step_right
	dw Movement_step_down
	dw Movement_step_up
	dw Movement_step_left
	dw Movement_step_right
	dw Movement_big_step_down
	dw Movement_big_step_up
	dw Movement_big_step_left
	dw Movement_big_step_right
	dw Movement_slow_slide_step_down
	dw Movement_slow_slide_step_up
	dw Movement_slow_slide_step_left
	dw Movement_slow_slide_step_right
	dw Movement_slide_step_down
	dw Movement_slide_step_up
	dw Movement_slide_step_left
	dw Movement_slide_step_right
	dw Movement_fast_slide_step_down
	dw Movement_fast_slide_step_up
	dw Movement_fast_slide_step_left
	dw Movement_fast_slide_step_right
	dw Movement_turn_away_down
	dw Movement_turn_away_up
	dw Movement_turn_away_left
	dw Movement_turn_away_right
	dw Movement_turn_in_down
	dw Movement_turn_in_up
	dw Movement_turn_in_left
	dw Movement_turn_in_right
	dw Movement_turn_waterfall_down
	dw Movement_turn_waterfall_up
	dw Movement_turn_waterfall_left
	dw Movement_turn_waterfall_right
	dw Movement_slow_jump_step_down
	dw Movement_slow_jump_step_up
	dw Movement_slow_jump_step_left
	dw Movement_slow_jump_step_right
	dw Movement_jump_step_down
	dw Movement_jump_step_up
	dw Movement_jump_step_left
	dw Movement_jump_step_right
	dw Movement_fast_jump_step_down
	dw Movement_fast_jump_step_up
	dw Movement_fast_jump_step_left
	dw Movement_fast_jump_step_right
	dw Function5293
	dw Function529c
	dw Movement_remove_fixed_facing
	dw Movement_fix_facing
	dw Function52b7
	dw Movement_hide_person
	dw Movement_show_person
	dw Function5226
	dw Function522a
	dw Function522e
	dw Function5232
	dw Function5236
	dw Function523a
	dw Movement_accelerate_last
	dw Movement_step_sleep
	dw Movement_step_end
	dw Function51db
	dw Movement_remove_person
	dw Function51b8
	dw Function5210
	dw Movement_teleport_from
	dw Movement_teleport_to
	dw Movement_skyfall
	dw Movement_step_wait5
	dw Function525f
	dw Function5189
	dw Function51ab
	dw Movement_hide_emote
	dw Movement_show_emote
	dw Movement_step_shake
	dw Function5279
	dw Function5196
	dw Function516a
	dw Function513e
; 5129


Movement_teleport_from: ; 5129
	ld hl, $0009
	add hl, bc
	ld [hl], $c
	ret
; 5130

Movement_teleport_to: ; 5130
	ld hl, $0009
	add hl, bc
	ld [hl], $d
	ret
; 5137

Movement_skyfall: ; 5137
	ld hl, $0009
	add hl, bc
	ld [hl], $e
	ret
; 513e

Function513e: ; 513e
	ld hl, $0009
	add hl, bc
	ld [hl], $19
	ret
; 5145

Movement_step_wait5: ; 5145
	call GetSpriteDirection
	rlca
	rlca
	ld hl, $000c
	add hl, bc
	ld [hl], a
	ld hl, $000b
	add hl, bc
	ld [hl], $4
	call Function505e
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0009
	add hl, bc
	ld [hl], $3
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ret
; 516a

Function516a: ; 516a
	call GetSpriteDirection
	rlca
	rlca
	ld hl, $000c
	add hl, bc
	ld [hl], a
	call Function505e
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ld hl, $0009
	add hl, bc
	ld [hl], $12
	ret
; 5189

Function5189: ; 5189
	ld hl, $000b
	add hl, bc
	ld [hl], $6
	ld hl, $0009
	add hl, bc
	ld [hl], $10
	ret
; 5196

Function5196: ; 5196
	call Function505e
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $000b
	add hl, bc
	ld [hl], $1
	ld hl, $0009
	add hl, bc
	ld [hl], $11
	ret
; 51ab

Function51ab: ; 51ab
	ld hl, $000b
	add hl, bc
	ld [hl], $6
	ld hl, $0009
	add hl, bc
	ld [hl], $1
	ret
; 51b8

Function51b8: ; 51b8
	ld hl, $001b
	add hl, bc
	ld [hl], $0
	jp Function5065
; 51c1

Movement_step_end: ; 51c1
	call Function4769
	ld hl, $0003
	add hl, bc
	ld [hl], a
	ld hl, $001b
	add hl, bc
	ld [hl], $0
	ld hl, VramState
	res 7, [hl]
	ld hl, $0009
	add hl, bc
	ld [hl], $1
	ret
; 51db

Function51db: ; 51db
	call Function4769
	ld hl, $0003
	add hl, bc
	ld [hl], a
	ld hl, $001b
	add hl, bc
	ld [hl], $0
	call Function505e
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0009
	add hl, bc
	ld [hl], $3
	ld hl, VramState
	res 7, [hl]
	ret
; 51fd

Movement_remove_person: ; 51fd
	call Function4357
	ld hl, $d4cd
	ld a, [hConnectionStripLength]
	cp [hl]
	jr nz, .asm_520a
	ld [hl], $ff

.asm_520a
	ld hl, VramState
	res 7, [hl]
	ret
; 5210

Function5210: ; 5210
	ld hl, $000b
	add hl, bc
	ld [hl], $1
	ld hl, $0009
	add hl, bc
	ld [hl], $4
	ld hl, VramState
	res 7, [hl]
	ret
; 5222

Movement_show_person: ; 5222
	ld a, $1
	jr Function5247

Function5226: ; 5226
	ld a, $2
	jr Function5247

Function522a: ; 522a
	ld a, $3
	jr Function5247

Function522e: ; 522e
	ld a, $4
	jr Function5247

Function5232: ; 5232
	ld a, $5
	jr Function5247

Function5236: ; 5236
	ld a, $6
	jr Function5247

Function523a: ; 523a
	ld a, $7
	jr Function5247

Movement_accelerate_last: ; 523e
	ld a, $8
	jr Function5247

Movement_step_sleep: ; 5242
; parameters:
;	duration (DecimalParam)

	call Function505e
	jr Function5247

Function5247: ; 5247
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0009
	add hl, bc
	ld [hl], $3
	ld hl, $000b
	add hl, bc
	ld [hl], $1
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ret
; 525f

Function525f: ; 525f
	ld a, $1
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0009
	add hl, bc
	ld [hl], $b
	ld hl, $000b
	add hl, bc
	ld [hl], $3
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ret
; 5279

Function5279: ; 5279
	ld a, $18
	ld hl, $000a
	add hl, bc
	ld [hl], a
	ld hl, $0009
	add hl, bc
	ld [hl], $3
	ld hl, $000b
	add hl, bc
	ld [hl], $b
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ret
; 5293

Function5293: ; 5293
	ld hl, $0004
	add hl, bc
	res 3, [hl]
	jp Function5065
; 529c

Function529c: ; 529c
	ld hl, $0004
	add hl, bc
	set 3, [hl]
	jp Function5065
; 52a5

Movement_remove_fixed_facing: ; 52a5
	ld hl, $0004
	add hl, bc
	res 2, [hl]
	jp Function5065
; 52ae

Movement_fix_facing: ; 52ae
	ld hl, $0004
	add hl, bc
	set 2, [hl]
	jp Function5065
; 52b7

Function52b7: ; 52b7
	ld hl, $0004
	add hl, bc
	res 0, [hl]
	jp Function5065
; 52c0

Movement_hide_person: ; 52c0
	ld hl, $0004
	add hl, bc
	set 0, [hl]
	jp Function5065
; 52c9

Movement_hide_emote: ; 52c9
	call Function5579
	jp Function5065
; 52cf

Movement_show_emote: ; 52cf
	call Function5547
	jp Function5065
; 52d5

Movement_step_shake: ; 52d5
; parameters:
;	displacement (DecimalParam)

	call Function505e
	call Function5565
	jp Function5065
; 52de

Movement_turn_head_down: ; 52de
	ld a, $0
	jr Function52ee

Movement_turn_head_up: ; 52e2
	ld a, $4
	jr Function52ee

Movement_turn_head_left: ; 52e6
	ld a, $8
	jr Function52ee

Movement_turn_head_right: ; 52ea
	ld a, $c
	jr Function52ee

Function52ee: ; 52ee
	ld hl, $0008
	add hl, bc
	ld [hl], a
	ld hl, $000b
	add hl, bc
	ld [hl], $1
	ld hl, $0007
	add hl, bc
	ld [hl], $ff
	ret
; 5300

Movement_slow_step_down: ; 5300
	ld a, $0
	jp Function5412
; 5305

Movement_slow_step_up: ; 5305
	ld a, $1
	jp Function5412
; 530a

Movement_slow_step_left: ; 530a
	ld a, $2
	jp Function5412
; 530f

Movement_slow_step_right: ; 530f
	ld a, $3
	jp Function5412
; 5314

Movement_step_down: ; 5314
	ld a, $4
	jp Function5412
; 5319

Movement_step_up: ; 5319
	ld a, $5
	jp Function5412
; 531e

Movement_step_left: ; 531e
	ld a, $6
	jp Function5412
; 5323

Movement_step_right: ; 5323
	ld a, $7
	jp Function5412
; 5328

Movement_big_step_down: ; 5328
	ld a, $8
	jp Function5412
; 532d

Movement_big_step_up: ; 532d
	ld a, $9
	jp Function5412
; 5332

Movement_big_step_left: ; 5332
	ld a, $a
	jp Function5412
; 5337

Movement_big_step_right: ; 5337
	ld a, $b
	jp Function5412
; 533c


Movement_turn_away_down: ; 533c
	ld a, $0
	jp Function5446
; 5341

Movement_turn_away_up: ; 5341
	ld a, $1
	jp Function5446
; 5346

Movement_turn_away_left: ; 5346
	ld a, $2
	jp Function5446
; 534b

Movement_turn_away_right: ; 534b
	ld a, $3
	jp Function5446
; 5350

Movement_turn_in_down: ; 5350
	ld a, $4
	jp Function5446
; 5355

Movement_turn_in_up: ; 5355
	ld a, $5
	jp Function5446
; 535a

Movement_turn_in_left: ; 535a
	ld a, $6
	jp Function5446
; 535f

Movement_turn_in_right: ; 535f
	ld a, $7
	jp Function5446
; 5364

Movement_turn_waterfall_down: ; 5364
	ld a, $8
	jp Function5446
; 5369

Movement_turn_waterfall_up: ; 5369
	ld a, $9
	jp Function5446
; 536e

Movement_turn_waterfall_left: ; 536e
	ld a, $a
	jp Function5446
; 5373

Movement_turn_waterfall_right: ; 5373
	ld a, $b
	jp Function5446
; 5378


Movement_slow_slide_step_down: ; 5378
	ld a, $0
	jp Function5468
; 537d

Movement_slow_slide_step_up: ; 537d
	ld a, $1
	jp Function5468
; 5382

Movement_slow_slide_step_left: ; 5382
	ld a, $2
	jp Function5468
; 5387

Movement_slow_slide_step_right: ; 5387
	ld a, $3
	jp Function5468
; 538c

Movement_slide_step_down: ; 538c
	ld a, $4
	jp Function5468
; 5391

Movement_slide_step_up: ; 5391
	ld a, $5
	jp Function5468
; 5396

Movement_slide_step_left: ; 5396
	ld a, $6
	jp Function5468
; 539b

Movement_slide_step_right: ; 539b
	ld a, $7
	jp Function5468
; 53a0

Movement_fast_slide_step_down: ; 53a0
	ld a, $8
	jp Function5468
; 53a5

Movement_fast_slide_step_up: ; 53a5
	ld a, $9
	jp Function5468
; 53aa

Movement_fast_slide_step_left: ; 53aa
	ld a, $a
	jp Function5468
; 53af

Movement_fast_slide_step_right: ; 53af
	ld a, $b
	jp Function5468
; 53b4


Movement_slow_jump_step_down: ; 53b4
	ld a, $0
	jp Function548a
; 53b9

Movement_slow_jump_step_up: ; 53b9
	ld a, $1
	jp Function548a
; 53be

Movement_slow_jump_step_left: ; 53be
	ld a, $2
	jp Function548a
; 53c3

Movement_slow_jump_step_right: ; 53c3
	ld a, $3
	jp Function548a
; 53c8

Movement_jump_step_down: ; 53c8
	ld a, $4
	jp Function548a
; 53cd

Movement_jump_step_up: ; 53cd
	ld a, $5
	jp Function548a
; 53d2

Movement_jump_step_left: ; 53d2
	ld a, $6
	jp Function548a
; 53d7

Movement_jump_step_right: ; 53d7
	ld a, $7
	jp Function548a
; 53dc

Movement_fast_jump_step_down: ; 53dc
	ld a, $8
	jp Function548a
; 53e1

Movement_fast_jump_step_up: ; 53e1
	ld a, $9
	jp Function548a
; 53e6

Movement_fast_jump_step_left: ; 53e6
	ld a, $a
	jp Function548a
; 53eb

Movement_fast_jump_step_right: ; 53eb
	ld a, $b
	jp Function548a
; 53f0


Movement_half_step_down: ; 53f0
	ld a, $0
	jr Function5400

Movement_half_step_up: ; 53f4
	ld a, $4
	jr Function5400

Movement_half_step_left: ; 53f8
	ld a, $8
	jr Function5400

Movement_half_step_right: ; 53fc
	ld a, $c
	jr Function5400

Function5400: ; 5400
	ld hl, $001d
	add hl, bc
	ld [hl], a
	ld hl, $000b
	add hl, bc
	ld [hl], $2
	ld hl, $0009
	add hl, bc
	ld [hl], $a
	ret
; 5412

Function5412: ; 5412
	call Function4690
	call Function463f
	ld hl, $000b
	add hl, bc
	ld [hl], $2
	ld hl, OBJECT_STANDING_TILE
	add hl, bc
	ld a, [hl]
	call Function188e
	jr z, .asm_542d

	call Function1875
	jr c, .asm_5430

.asm_542d
	call Function5556

.asm_5430
	ld hl, $d4cf
	ld a, [hConnectionStripLength]
	cp [hl]
	jr z, .asm_543f

	ld hl, $0009
	add hl, bc
	ld [hl], $2
	ret

.asm_543f
	ld hl, $0009
	add hl, bc
	ld [hl], $6
	ret
; 5446

Function5446: ; 5446
	call Function4690
	call Function463f
	ld hl, $000b
	add hl, bc
	ld [hl], $4
	ld hl, $d4cf
	ld a, [hConnectionStripLength]
	cp [hl]
	jr z, .asm_5461
	ld hl, $0009
	add hl, bc
	ld [hl], $2
	ret

.asm_5461
	ld hl, $0009
	add hl, bc
	ld [hl], $6
	ret
; 5468


Function5468: ; 5468
	call Function4690
	call Function463f
	ld hl, $000b
	add hl, bc
	ld [hl], $1
	ld hl, $d4cf
	ld a, [hConnectionStripLength]
	cp [hl]
	jr z, .asm_5483
	ld hl, $0009
	add hl, bc
	ld [hl], $2
	ret

.asm_5483
	ld hl, $0009
	add hl, bc
	ld [hl], $6
	ret
; 548a


Function548a: ; 548a
	call Function4690
	ld hl, $001f
	add hl, bc
	ld [hl], $0
	ld hl, $0005
	add hl, bc
	res 3, [hl]
	ld hl, $000b
	add hl, bc
	ld [hl], $2
	call Function5529
	ld hl, $d4cf
	ld a, [hConnectionStripLength]
	cp [hl]
	jr z, .asm_54b1
	ld hl, $0009
	add hl, bc
	ld [hl], $8
	ret

.asm_54b1
	ld hl, $0009
	add hl, bc
	ld [hl], $9
	ret
; 54b8