forum.boolean.name - Показать сообщение отдельно - Еще раз о львах. Тех самых, что в пустыне.

Spiderman · 28.08.2008, 19:58

Еще вариант!
Программист в [цензура] пьян!!!

Graphics3D 800,600,32,2

CreateTerrain(128,128)
lion=LoadAnimMesh("c:\porno\pugasheva\lion.3ds")
kletka=LoadMesh("c:\porno\pugasheva\kletka.3ds")

cam = CreateCamera() : PositionEntity cam,0,90,0

Const type_lion=0
Const type_kletka=1

Collisions type_lion,type_kletka,2,2 

PositionEntity lion,EntityX(kletka),EntityY(kletka),EntityZ(kletka)

While Not KeyHit(1) 

UpdateWorld
RenderWorld

If Collisions type_lion,type_kletka Then
Text 10,10,"лев пойман!"
Else
RuntimeError "бл...[цензура] какого...[цензура] [цензура] [цензура]"
EndIf

Flip
Wend
End

28.08.2008, 19:58	#10
Spiderman Знающий Регистрация: 28.07.2008 Адрес: Киев Сообщений: 228 Написано 61 полезных сообщений (для 191 пользователей)	Ответ: Еще раз о львах. Тех самых, что в пустыне. Еще вариант! Программист в [цензура] пьян!!! Graphics3D 800,600,32,2 CreateTerrain(128,128) lion=LoadAnimMesh("c:\porno\pugasheva\lion.3ds") kletka=LoadMesh("c:\porno\pugasheva\kletka.3ds") cam = CreateCamera() : PositionEntity cam,0,90,0 Const type_lion=0 Const type_kletka=1 Collisions type_lion,type_kletka,2,2 PositionEntity lion,EntityX(kletka),EntityY(kletka),EntityZ(kletka) While Not KeyHit(1) UpdateWorld RenderWorld If Collisions type_lion,type_kletka Then Text 10,10,"лев пойман!" Else RuntimeError "бл...[цензура] какого...[цензура] [цензура] [цензура]" EndIf Flip Wend End __________________ Тяжела жизнь программиста: радость находки своего бага всегда омрачает осознание собственной тупости...
(Offline)