BlitzModeller

Blitz3D Forums/Blitz3D Programming/BlitzModeller

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Here is the fix.

------------------------------------------------------------
In Modeller.bb

*** --- Replace --- ***

if SelectMode = 1 then
...
...
...
endif

*** --- With --- ***

If SelectMode = 1 Then

If MouseDown(1)=True Then
;20 , 40 , 240 , 240
;260 , 40 , 240, 240
;20 , 280 , 240, 240
;260 , 280 , 240, 240
Local xpos = 0
Local ypos = 0
If (NG_MouseX >= 20) And (NG_MouseX <= 260) And (NG_MouseY >= 40) And (NG_MouseY <= 280) Then ;Were on the top left camera
xpos = NG_MouseX - 20
ypos = NG_MouseY - 40
CameraPick(cam, xpos, ypos)
SelectedObject = PickedEntity()
SelectMode = 0
ElseIf (NG_MouseX >= 260) And (NG_MouseX <= 500) And (NG_MouseY >= 40) And (NG_MouseY <= 280) Then ;Were on the bottom left camera
xpos = NG_MouseX - 260
ypos = NG_MouseY - 40
CameraPick(cam2, xpos, ypos)
SelectedObject = PickedEntity()
SelectMode = 0
ElseIf (NG_MouseX >= 20) And (NG_MouseX <= 260) And (NG_MouseY >= 280) And (NG_MouseY <= 520) Then ;Were on the top right camera
xpos = NG_MouseX - 20
ypos = NG_MouseY - 280
CameraPick(cam3, xpos, ypos)
SelectedObject = PickedEntity()
SelectMode = 0
ElseIf (NG_MouseX >= 260) And (NG_MouseX <= 500) And (NG_MouseY >= 280) And (NG_MouseY <= 520) Then ;Were on the bottom right camera
xpos = NG_MouseX - 260
ypos = NG_MouseY - 280
CameraPick(cam4, xpos, ypos)
SelectedObject = PickedEntity()
SelectMode = 0

EndIf
EndIf

EndIf

----------------------------------------------------------

This will allow you to select an object in any of the views.