Как строится Blitz-евский тип?
ProcedureDLL.f RunEngine()
*memory = AllocateMemory(1024)
Structure Object
type.i
mass.f
xPos.f
yPos.f
zPos.f
xSc.f
ySc.f
zSc.f
xRot.f
yRot.f
zRot.f
xSp.f
ySp.f
zSp.f
EndStructure
Protected n.i = 0
Protected NewMap Objects.Object()
AddMapElement(Objects(),"0")
Objects()\mass = 5
Objects()\type = 1
ForEach Objects()
PokeF(*memory + n,Objects())
n = n + 4
Next
ProcedureReturn *memory
EndProcedure
ProcedureDLL.f dpTest(*entity,n.i)
ProcedureReturn PeekF(*entity + n)
EndProcedure
Graphics3D 800,600,32,2
SetBuffer BackBuffer()
cam = CreateCamera()
dpType = dpRunEngine()
While Not KeyHit(1)
UpdateWorld()
RenderWorld()
Text 400,400,dpTest(dpType,4)
Flip
Wend
End
Мне нужно пользоваться типом, созданным на Барсике, вот только, если объявить тип куском памяти, Blitz выдаёт какую-то фигню.
Действовал, исходя из этой таблицы:
