SCRIPT_START script_0800D190
	BeginBlock
	SetEntitySpeed 0x0100
	EndBlock
	_0807EDD4 0x0170, 0x0140
	_0807EB44 0x0002
	DoPostScriptAction 0x0000
	_0807E5F8 0x00000008
	Call sub_080791BC
SCRIPT_END