Тема: RTS
Показать сообщение отдельно
Старый 10.02.2011, 18:10   #1
}{@KeR
ПроЭктировщик
 
Регистрация: 01.02.2011
Сообщений: 148
Написано 7 полезных сообщений
(для 8 пользователей)
Смех RTS

Вот у мя примерчик
Graphics3D 1024,768,32,2
SetBuffer BackBuffer
()
c=CreateCamera()
cub=CreateCube()
MoveEntity cub,0,0,10

Global Ramkax1
Global Ramkay1


Repeat
Cls 

RenderWorld
()
Ramka()
Flip()
Until KeyHit(1)
End 


Function Ramka()
If 
MouseHit(1Then 
        Ramkax1
=MouseX()
        
Ramkay1=MouseY()
EndIf 
If 
MouseDown(1Then
        Color 20
,200,20
        Ramkax2
=MouseX()
        
Ramkay2=MouseY()
        
Line Ramkax1,Ramkay1,Ramkax2,Ramkay1
        Line Ramkax1
,Ramkay2,Ramkax2,Ramkay2
        Line Ramkax1
,Ramkay1,Ramkax1,Ramkay2
        Line Ramkax2
,Ramkay1,Ramkax2,Ramkay2
Else
        
Ramkax1=MouseX()
        
Ramkay1=MouseY()
EndIf 
End Function 
Как сделать проверку НАХОДИТСЯ ОБЪЕКТ ВНУТРИ РАМКИ ИЛИ НЕТ???
(Offline)
 
Ответить с цитированием