[Mr_Maikl]

Люди! Я занялся изучением Blitz'а совсем недавно, и заранее прошу меня извинить за, вероятно, глупый вопрос. Но я себе уже всю голову сломал, и не могу понять причины странного поведения переменных PozCyrX и PozCyrY.
Мне просто хочется понять причину, по которой переменные отказываются принимать значение меньшее объявленному в начале. И вообще странно себя ведут.... Помогите, а то сойду с ума....





Graphics3D 1920,1080,32,1
SetBuffer BackBuffer ()


Laits1=CreateLight()
kyrsor=LoadMesh("D:\Prog\Kyrsor4.b3d")
TextureGround=LoadTexture ("D:\Prog\Texture1.jpg")

PointRotate=CreatePivot()


MainCam=CreateCamera(PointRotate)


PozCyrX=0
PozCyrY=200


Color 0,200,0

VertCam#=160
SizeCyr#=1

RadCamX#=0
RadCamY#=0



PositionEntity Laits1,0,60,-70
PositionEntity MainCam,0,VertCam#,-160
RotateEntity MainCam,45,RadCamX#,0
MoveMarker=CreatePivot(Kyrsor)


ScaleTexture TextureGround,32,32


terrain=CreateTerrain( 32 )


ScaleEntity terrain,10,1,10



EntityTexture terrain,TextureGround



Repeat

PositionEntity PointRotate,PozCyrX,1,PozCyrY
PositionEntity MoveMarker,0,0,0
PositionEntity kyrsor,PozCyrX,1,PozCyrY

aX=MouseXSpeed()
aY=MouseYSpeed()

VertCam#=VertCam#+(MouseZSpeed()*3)


If MouseDown(2)=1 Then RadCamX#=RadCamX#-aX RadCamY#=RadCamY#+aY RotateEntity PointRotate ,RadCamY#,RadCamX#,0 RotateEntity Kyrsor ,0,RadCamX#,0 Goto lab1


MoveEntity MoveMarker,aX,0,aY-(aY*2)



PozCyrX=EntityX (MoveMarker,1)
PozCyrY=EntityZ (MoveMarker,1)




.lab1

ScaleEntity kyrsor,SizeCyr,SizeCyr,SizeCyr

SizeCyr#=SizeCyr#-0.01
If SizeCyr#<0.4 Then SizeCyr#=1


PositionEntity MainCam,0,VertCam#,-160


RenderWorld
UpdateWorld

Flip

Until KeyHit(1)

End