pokecrystal-board/engine/events/forced_movement.asm

52 lines
692 B
NASM
Raw Normal View History

Script_ForcedMovement::
2015-11-11 13:11:08 -08:00
checkcode VAR_FACING
2018-02-02 18:09:17 -08:00
ifequal DOWN, .down
ifequal UP, .up
ifequal LEFT, .left
ifequal RIGHT, .right
2015-11-11 13:11:08 -08:00
end
.up
2015-11-11 13:11:08 -08:00
applymovement PLAYER, .MovementData_up
end
.down
2015-11-11 13:11:08 -08:00
applymovement PLAYER, .MovementData_down
end
.right
2015-11-11 13:11:08 -08:00
applymovement PLAYER, .MovementData_right
end
.left
2015-11-11 13:11:08 -08:00
applymovement PLAYER, .MovementData_left
end
.MovementData_up:
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_in DOWN
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_head DOWN
2015-11-11 13:11:08 -08:00
step_end
.MovementData_down:
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_in UP
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_head UP
2015-11-11 13:11:08 -08:00
step_end
.MovementData_right:
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_in LEFT
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_head LEFT
2015-11-11 13:11:08 -08:00
step_end
.MovementData_left:
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_in RIGHT
2015-11-15 18:28:15 -08:00
step_dig 16
2016-05-14 10:46:14 -07:00
turn_head RIGHT
2015-11-11 13:11:08 -08:00
step_end