Function create_hero(x#,y#,z#)
hero=LoadAnimMesh("models/pig.b3d")
cam=CreateCamera(hero)
ScaleEntity hero,0.03,0.03,0.03
RotateMesh hero,0,-90,0
PositionEntity cam,0,5,-100
PositionEntity hero,x#,y#,z#
EntityType hero,herot
run=LoadAnimSeq (hero,"models/pig_run.B3D")
End Function
Function update_hero()
If KeyDown(200) MoveEntity hero,0,0,1.5 And AnimSeq=0 Animate hero,1,0.1,run,0
If KeyDown(208) MoveEntity hero,0,0,-1.5
If KeyDown(203) TurnEntity hero,0,1,0
If KeyDown(205) TurnEntity hero,0,-1,0
End Function
Чето не работает