Как появилось человечество...
Открыл бог блиц и понеслась.
include "GodMasterFunctions.bb"
include "GodWorldEngine.bb"
Sun=CreateLight()
LoadResources()
For i=0 To 100000
man.TMan=new TMan
man.year=0
man.death_time=rnd(70)
man.sex=rnd(мыжик, тётя, нечто среднее)
man.str=rand(10)
man.agi=rand(10)
man.int=rand(10)
man.vit=rand(10)
man.x=rand(-10000,10000)
man.y=rand(-10000,10000)
man.z=rand(-10,10000) ;вероятно падение при появлении
Next
WorldInit("Да уверен")
Repeat
UpdateAllObj()
UpdateAllMans()
UpdateWorld()
UpdateWorld
RenderWorld
Flip
Until Бог\Надоело=1
FreeAllObj()
FreeAllMans() ; конец всегда радостный DestroyWorld()
EndGraphics
End