Beiträge von Alizame

Alizame

der rap von nem typen aus automans parallelklasse ist echt behindert xD

SEuBo du kannst es echt!

MMEEHHRR!!BITTE!

Alizame

@Sprenger ich kann dir vllt helfen beim tags lesen (ist ja mit der bass.dll oder??)

Spoiler anzeigen

[autoit]

$MusicHandle = _BASS_StreamCreateFile(False, $file, 0, 0, 0) ;hast du ja wahrscheinlich schon!
$ID3Title = _Bass_Tags_Read($MusicHandle, '%IFV1(%TRCK,%TRCK. )%IFV2(%ARTI,%ICAP(%ARTI), Nichts) - %IFV2(%TITL,%ICAP(%TITL) , Nichts )')
$ID3Album = _Bass_Tags_Read($MusicHandle, '%IFV1(%ALBM,%IUPC(%ALBM))')
GUICtrlSetData($Label1,$ID3Title&" - "&$ID3Album)

[/autoit]

ich hoffe ich habe mich da richtig informiert^^

Alizame

super!mehr!

Alizame

ist gut!!will auch sowas jetzt machen!also mit opengl^^

Alizame

da sich niemand mehr meldet fange ich nun mit OpenGL an und gebe mich geschlagen^^

Alizame

ich hoffe diesmal gibts mehr lob:

Spoiler anzeigen

---Private---191
---Public---113

---Private---82
---Public---112

---Private---80
---Public---130

---Private---86
---Public---118

---Private---72
---Public---114

---Private---80
---Public---111

---Private---82
---Public---111

---Private---75
---Public---110

---Private---77
---Public---112

---Private---79
---Public---110

---Private---77
---Public---109

---Private---70
---Public---108

---Private---69
---Public---112

---Private---81
---Public---118

---Private---70
---Public---120

---Private---71
---Public---112

---Private---71
---Public---113

---Private---66
---Public---112

---Private---67
---Public---114

---Private---70
---Public---111

---Private---65
---Public---113

---Private---70
---Public---109

---Private---74
---Public---114

---Private---89
---Public---108

---Private---70
---Public---111

---Private---71
---Public---112

---Private---70
---Public---109

---Private---80
---Public---112

---Private---73
---Public---109

---Private---85
---Public---113

---Private---67
---Public---189

---Private---73
---Public---113

---Private---79
---Public---111

---Private---71
---Public---120

---Private---72
---Public---123

---Private---75
---Public---108

---Private---78
---Public---111

---Private---99
---Public---109

---Private---71
---Public---113

---Private---78
---Public---110

---Private---75
---Public---113

---Private---71
---Public---109

---Private---74
---Public---116

---Private---79
---Public---113

---Private---71
---Public---115

---Private---66
---Public---119

---Private---71
---Public---113

---Private---73
---Public---109

---Private---70
---Public---109

---Private---71
---Public---111

Alizame

du kannst das fenster immer im vordergrund halten:

[autoit]

WinSetOnTop ( "title", "text", flag )

[/autoit]

Alizame

r bei mir nun auch schon 3mal >,<

aber jetzt gehts wieder (1woche her...)

Alizame

Marthog child gibts, geht aber nicht (dann ist die flinte komplett weg!)

Edit\\ bin mal auf die idee gekommen die kamera als child vond er flinte zu machen, die flinte bleibt an irhem platz, während sie bewegt wird, die kamera(child) bewegt sich aber xD
ich glaube das liegt an dem modell der flinte

Alizame

HI

Ich arbeite seit neustem mit der Irrlicht.au3 .
also jetzt möchte ich ein kleines spiel damit machen, sodass sich ne Shutgun(?) sich mit der Camera dreht. Also muss ich $X,$Y,$Z verändern und dann "SetPosition($Node,$X,$Y,$Z)" oder?
aber die Shutgun(?) bleibt an der stelle! (nur beim ersten aufruf geht es glaube ich mit SetPosition!) Die macht auch so ein paar "kunststücke"

aber irgendwie will ich das anders haben

Source

[autoit]

$Title = "Irrlicht"
$fps = 0
#include "IrrlichtPluginUtils.au3"
#include <Misc.au3>
AutoItSetOption("TrayIconHide", 1)
Opt("WinTitleMatchMode", 3)
;~ CreateDevice($EDT_DIRECT3D9, 640, 480, 16, 0, 0, 0)
CreateDevice($EDT_DIRECT3D9, @DesktopWidth - 200, @DesktopHeight - 200, 16, 0, 0, 0)
SetWindowCaption($Title)
$Light = AddLightSceneNode(0, 2000, 2000, 0, 1, 1, 1, 10000)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$Camera = AddCameraSceneNodeFPS(0, 100, 200, 1, 0.8)
SetPosition($Camera, 50, 25, 50)
SetTarget($Camera, 0, 25, 0)
$X = 50
$Y = 25
$Z = 50
$ModelsDir = @ScriptDir & "\data\"
GUISetCursor(16,1, WinGetHandle($Title, ""))

[/autoit] [autoit][/autoit] [autoit]

AddZipFileArchive($ModelsDir & "map-20kdm2.pk3")
$MapMesh = GetMesh("20kdm2.bsp")
$MapNode = AddOctTreeSceneNode($MapMesh)
SetPosition($MapNode, -1300, -144, -1249)
;###################################################################################################
$ModelsDir = @ScriptDir & "\"
;Getting meshs
$CharMesh = GetMesh($ModelsDir & "spos_weapon.md2")

[/autoit] [autoit][/autoit] [autoit]

;Creating scene nodes
$Node = AddAnimatedMeshSceneNode($CharMesh)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

SetMaterialTexture($Node, 0, GetTexture($ModelsDir & "spos_weapon.png"))
;~ SetMD2Animation( $Node, $EMAT_Stand )
AddChild( $Camera, $Node )
SetLoopMode($Node, 1)
SetPosition($Node, 50,25,50)
SetTarget($Node, 0, 25, 0)
;###################################################################################################

[/autoit] [autoit][/autoit] [autoit]

;Add Sky
AddSkyBoxSceneNode( GetTexture("data\skybox\irrlicht2_up.jpg"), GetTexture("data\skybox\irrlicht2_dn.jpg"), GetTexture("data\skybox\irrlicht2_lf.jpg"), GetTexture("data\skybox\irrlicht2_rt.jpg"), GetTexture("data\skybox\irrlicht2_ft.jpg"), GetTexture("data\skybox\irrlicht2_bk.jpg"))

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$MapSelector = CreateOctTreeTriangleSelector($MapMesh, $MapNode)
SetTriangleSelector($MapNode, $MapSelector)

[/autoit] [autoit][/autoit] [autoit]

$MapCameraAnimator = CreateCollisionResponseAnimator($MapSelector, $Camera, 25, 50, 25, 0, -1, 0, 0, 0, 0)
AddAnimator($Camera, $MapCameraAnimator)
DropAnimator($MapCameraAnimator)

[/autoit] [autoit][/autoit] [autoit]

AdlibRegister(_SettingCameraA(1), 50)
AdlibRegister("_FPS", 1000)
While IrrRun()
$fps += 1
BeginScene(True, True, 255, 100, 100, 100)

[/autoit] [autoit][/autoit] [autoit]

SceneDraw()
GuiDraw()

[/autoit] [autoit][/autoit] [autoit]

EndScene()
Sleep(20)
If _IsPressed("1B") Then Exit
$fps += 1
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func _SettingCameraA($doll)
If _IsPressed(25) Then
$Z -= $doll
$Y -= $doll * 2
SetPosition($Node, $X, $Y, $Z)
SetPosition($Camera, $X, $Y - 100, $Z)
EndIf
If _IsPressed(26) Then
$X -= $doll
$Y -= $doll * 2
SetPosition($Node, $X, $Y, $Z)
SetPosition($Camera, $X, $Y, $Z)
EndIf
If _IsPressed(27) Then
$Z += $doll
$Y -= $doll * 2
SetPosition($Node, $X, $Y, $Z)
SetPosition($Camera, $X, $Y, $Z)
EndIf
If _IsPressed(28) Then
$X += $doll
$Y -= $doll * 2
SetPosition($Node, $X, $Y, $Z)
SetPosition($Camera, $X, $Y, $Z)
EndIf
EndFunc ;==>_SettingCameraA

[/autoit] [autoit][/autoit] [autoit]

Func _FPS()
ToolTip("FPS: " & $fps, 0, 0)
$fps = 0
EndFunc ;==>_FPS

[/autoit] [autoit][/autoit] [autoit]

;ich weiß es ist noch opimierbar!

[/autoit]

Hier zum Download

Alizame

cool
aber, warum

[autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit ;hier exit
;;;;;;andere;;;;;;
Case $Button4
_Exit() ;hier _exit()
EndSwitch
WEnd

[/autoit]

irgendwie komisch xD

Alizame

jo geht:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$Group1 = GUICtrlCreateGroup("Bild ist hier drin!", 128, 48, 473, 321)
$Pic1 = GUICtrlCreatePic("", 136, 64, 460, 300, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
GUICtrlCreateGroup("", -99, -99, 1, 1);irrelevant, nur damit man weiß wo das bild ist!
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Pic1
;deine func
MsgBox(0,"","")
EndSwitch
WEnd

[/autoit]

Edit\\ zu spät, dafür mit beispiel^^

Alizame

das ist mein problem: das war die map ausm beispiel!!!

Edit\\ decompiled im anhang!!

Alizame

hier mal was mit irrlicht.au3 und dem beispiel + himmel + gehen!!!!

ESC = beenden, MOUSE = drehen,PFEILTASTEN = laufen

aber an manchen stellen läuft er nciht weiter, ich vermute die "Camera" ist zu hoch! >,<

Edit\\ ups, sorry für doppelpost!!!

Alizame

erst dachte ich das soll sowas wie ein notebook mit touch sein, aber als ich mir da mal so berichte durgelesen habe is das eher ein riesiger ipod touch...

Alizame

am anfang geht beimir ca. 10sek prozessorleistung auf ca. 100% , dann kommt die gui und dann bleibts bei ca. 1%

Alizame

bis auf das es mega prozessor zieht ists super!!!
weiter so

Alizame

hier mal was in 2D von name22 ...
habe ich noch gefunden in "Private Nachrichten"

Edit\\ ich bin für irrlicht.au3°!!!!!!!!!!!!alter ist die geil!

Alizame

mein versuch:

Spoiler anzeigen

[autoit]

;width/heigth habe ich erstmal rausgelassen, weil ich ncith weiß wie ich erkennen soll obs verschoben oder resized werden soll!

[/autoit] [autoit][/autoit] [autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Misc.au3>

[/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 415, 465, 192, 124)
$Label1 = GUICtrlCreateLabel("Label1", 112, 40, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 88, 144, 121, 21)
$Button1 = GUICtrlCreateButton("Button1", 72, 272, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
$pos = GUIGetCursorInfo()
If $pos[4] <> 0 And _IsPressed(01) Then
$poscon = ControlGetPos($Form1,"",$pos[4])
$var = $poscon[2] / 2
$var2 = $poscon[3] /2
While _IsPressed(01)
$posnow = GUIGetCursorInfo()
GuiCtrlSetPos($pos[4],$posnow[0]-$var,$posnow[1]-$var2,Default,Default)
WEnd
EndIf
WEnd

[/autoit]

er klappt eig ganz gut!!

Alizame

finde es gut!

Beiträge von Alizame

Der musikalische SEuBo

Audio Slide Beta 0.7b

Der musikalische SEuBo

OpenGl - Rotating Scaling Cube

Irrlicht.au3 fehler?

Bitte mal Testen GetWANIP (Neuer Server)

GDI plus

Server Überlastet?

Irrlicht.au3 fehler?

Irrlicht.au3 fehler?

Skriptsperrer [UPDATE 2.Juli 15:49]

Bild als Button

Projekt !!!VORSCHLAG!!!

Projekt !!!VORSCHLAG!!!

iPad

OpenGL Progress

OpenGL Progress

Projekt !!!VORSCHLAG!!!

Control soll Benutzer "resizen" und verschieben können (Fortführung)

Zeichen- und Wortzähler