Господи, что вы пишете. Нафига вы все в одну кучу написали? Сделайте функцию, как я написал в сообщении выше.
А функцию StartScene и все, что с ней связано, отдельно. Но в ней же startThread(CreatureXXXShouldSurvive, "имя героя", айди существа). И еще. Заменять нужно на свои фантазии только там, где стоит очевидное для замены: XXX или русская фраза.
P.s. Я с телефона пишу, но когда вернусь домой к пк, напишу вам полностью правильный скрипт, если не докумекаете сами.