Jump to content

Recommended Posts

Posted

Of course my modeling software doesn't export to any of those, luckily truespace is free and can. The latest version of my software does support .obj, but of course the company I work for didn't purchase the maintenance plan. :mellow: Any possibility of adding other formats? especially STL? seeing that's the prefered file type of 3D printers, or possibly SAT or DWG that are a little more mainstream? Even though OBJ is making strides to become mainstream. Right now this is light years ahead of what I can do and I thank you much. Is it a possibility that this could be used to make a 3d laser scanner? Check out david laser scanner.

As for your code, I don't see what it does differently. And I don't understand the stuff you added at the bottom.

I was trying to make mine better, and I accidentally made this. I call it thinking inside the box.

#include <GUIConstants.au3>
#include <Constants.au3>
#include <WindowsConstants.au3>
#include <WINAPI.au3>
#include "IrrlichtPluginUtils.au3"


HotKeySet("{ESC}", "Terminate")

#Region - GUI Create
$gui = GUICreate("trans", @DesktopWidth, @DesktopHeight, -1, -1, -1, $WS_EX_LAYERED)
GUICtrlCreateLabel("This is text on a transparent Layered GUI", 10, 10, 200, 20, -1, $GUI_WS_EX_PARENTDRAG)
GUICtrlSetTip(-1, "Click label to drag layered window")
$layButt = GUICtrlCreateButton("Button", 10, 40, 40)
GUISetBkColor(0xABCDEF)
_WinAPI_SetLayeredWindowAttributes($gui, 0x010101)
CreateDeviceOnWindow( $gui, $EDT_BURNINGSVIDEO, 10, 10, @DesktopWidth, @DesktopHeight, 32, 0, 0 )
GUISetState()

$Camera = AddCameraSceneNode( 0, 0, 25, -40, 0, 0, 0 )
$Node = AddCubeSceneNode( 10 )
$Au3Texture = GetTexture( "data\au3.bmp" )
SetMaterialTexture( $Node, 0, $Au3Texture )
SetMaterialFlag( $Node, $EMF_LIGHTING, 0 )
$Y = 0
$x = 0
$z = 0
$Ys = 0
$xs = 0
$zs = 0
$start = 0
$directionz = 3
$Directiony = 3
$directionx = 3
$directionzs = 1/64
$Directionys = 1/64
$directionxs = 1/64
#Region - GUI SelectLoop
GUISetStyle($WS_POPUP, -1, $gui)
_WinAPI_SetLayeredWindowAttributes($gui, 0xABCDEF, 255)

While IrrRun( )
setscale($node,$xs,$ys,$zs)
SetRotation( $Node, $x, $Y, $z )

BeginScene( true, true, 0, 171, 205, 239 )

SceneDraw( )
GuiDraw( )

EndScene( )

sleep( 30 )
$ys += $directionys
$xs += $directionxs
$zs += $directionzs
If $ys = 4 Then
    $directionys = 0
    $directionxs = 0
    $directionzs = 0
ElseIf $ys = 0 Then
    Exit
EndIf

$Y += $Directiony
If $Y > 360 Then $Y -= 363
If $Y < 0 Then $Y += 360

$x += $Directionx
If $x > 360 Then $x -= 363
If $x < 0 Then $x += 360

$z += $Directionz
If $z > 360 Then $z -= 363
If $z < 0 Then $z += 360
If $x = 3 and $y = 3 and $z = 3 Then
    If $start < 2 Then
        $start += 1
    ElseIf $start = 2 Then
    $directiony = -10
    $directionx = -10
    $directionz = -10
    $directionys = -3
    $directionxs = -3
    $directionzs = -3
ElseIf $start = 3
    Exit
    EndIf
EndIf


WEnd

Func _WinAPI_SetLayeredWindowAttributes($hwnd, $i_transcolor, $Transparency = 255, $dwFlages = 0x03, $isColorRef = False)
If $dwFlages = Default Or $dwFlages = "" Or $dwFlages < 0 Then $dwFlages = 0x03

If Not $isColorRef Then
$i_transcolor = Hex(String($i_transcolor), 6)
$i_transcolor = Execute('0x00' & StringMid($i_transcolor, 5, 2) & StringMid($i_transcolor, 3, 2) & StringMid($i_transcolor, 1, 2))
EndIf
Local $Ret = DllCall("user32.dll", "int", "SetLayeredWindowAttributes", "hwnd", $hwnd, "long", $i_transcolor, "byte", $Transparency, "long", $dwFlages)
Select
Case @error
Return SetError(@error, 0, 0)
Case $Ret[0] = 0
Return SetError(4, _WinAPI_GetLastError(), 0)
Case Else
Return 1
EndSelect
EndFunc;==>_WinAPI_SetLayeredWindowAttributes

Func Terminate()
Exit 0
EndFunc

Giggity

Posted

The difference: 0x9C800000

To set transparency usefully on "not themed windows". (I hate themes )

We don't need:

$layButt = GUICtrlCreateButton("Button", 10, 40, 40)

About 3d formats:

These are supported by irrlicht not by me. But it's increasing :mellow:

Só o que posso lhe dizer, bom é quando faz mal!My work:Au3Irrlicht - Irrlicht for AutoItMsAgentLib - An UDF for MSAgentAu3GlPlugin T2 - A 3D plugin for AutoIt...OpenGl Plugin - The old version of Au3GlPlugin.MAC Address Changer - Changes the MAC AddressItCopter - A dragonfly R/C helicopter simulator

VW Bug user

Pinheiral (Pinewood) city:

http://pt.wikipedia.org/wiki/Pinheiral

Posted

Many thanks, you should make your plane controlable, so you move him up and down, and have gas and break. And a little bomb that drops out. I'm going to keep playing with this because it has amazing possibilities in the right hands (mwahahah).

Giggity

Posted

Many thanks, you should make your plane controlable, so you move him up and down, and have gas and break. And a little bomb that drops out. I'm going to keep playing with this because it has amazing possibilities in the right hands (mwahahah).

I was thinking something like "click and destroy", but I'm accepting some inspiration :mellow:

Thank you!

Só o que posso lhe dizer, bom é quando faz mal!My work:Au3Irrlicht - Irrlicht for AutoItMsAgentLib - An UDF for MSAgentAu3GlPlugin T2 - A 3D plugin for AutoIt...OpenGl Plugin - The old version of Au3GlPlugin.MAC Address Changer - Changes the MAC AddressItCopter - A dragonfly R/C helicopter simulator

VW Bug user

Pinheiral (Pinewood) city:

http://pt.wikipedia.org/wiki/Pinheiral

Posted

I did it! The native transparency is working. Now you can use only one line. I didn't have much time in recent days, but could do yesterday. If I have more time today, I'll work on triangle selectors. Maybe release a new plugin version on Saturday.

Só o que posso lhe dizer, bom é quando faz mal!My work:Au3Irrlicht - Irrlicht for AutoItMsAgentLib - An UDF for MSAgentAu3GlPlugin T2 - A 3D plugin for AutoIt...OpenGl Plugin - The old version of Au3GlPlugin.MAC Address Changer - Changes the MAC AddressItCopter - A dragonfly R/C helicopter simulator

VW Bug user

Pinheiral (Pinewood) city:

http://pt.wikipedia.org/wiki/Pinheiral

Posted

Very cool. I was trying all sorts of things that either weren't working or broke the plugin completely, if it compiled.

Posted

Very cool. I was trying all sorts of things that either weren't working or broke the plugin completely, if it compiled.

The credit is all yours. Basicaly is your "conquest" translated into C++ :mellow:

Só o que posso lhe dizer, bom é quando faz mal!My work:Au3Irrlicht - Irrlicht for AutoItMsAgentLib - An UDF for MSAgentAu3GlPlugin T2 - A 3D plugin for AutoIt...OpenGl Plugin - The old version of Au3GlPlugin.MAC Address Changer - Changes the MAC AddressItCopter - A dragonfly R/C helicopter simulator

VW Bug user

Pinheiral (Pinewood) city:

http://pt.wikipedia.org/wiki/Pinheiral

Posted

Colocarei seu nome nos créditos assim que puder abrir meu e-mail.

Só o que posso lhe dizer, bom é quando faz mal!My work:Au3Irrlicht - Irrlicht for AutoItMsAgentLib - An UDF for MSAgentAu3GlPlugin T2 - A 3D plugin for AutoIt...OpenGl Plugin - The old version of Au3GlPlugin.MAC Address Changer - Changes the MAC AddressItCopter - A dragonfly R/C helicopter simulator

VW Bug user

Pinheiral (Pinewood) city:

http://pt.wikipedia.org/wiki/Pinheiral

Posted

Não tem certeza que você entende por abrir o seu e-mail? Meu nome é Josh Rowe, se pretende colocar em créditos. Vou ter um pouco irrPhysx nodos até segunda-feira, esperemos, na próxima quarta-feira até o mais tardar. :mellow:

Hopefully that translation didn't turn out too badly, lol. I'll send you an email sometime tonight.

  • 7 months later...
Posted

amazing!

post here a

is possible to use Rendering 3D object to build iTunes interface 'clone' ?

Posted Image

Posted Image

http://blogs.sun.com/chrisoliver/resource/displayShelf.png

Is there any way to build similar GUI with Autoit capable to run external .exe ?

Thank you for any info,

m.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...