Beiträge von Techmix

  • Suche 2D-Grafiker für Flutch

    Hy!
    Du Sorry, ich kann aber mal so garnichts mit den Dateien anfangen!

    Zitat

    Dateiformat: .png, .bmp, kein jpg - und bitte die einzelnen Grafiken auch transparent erstellen.

    Aber ich habe mal selber deine Grafik zerrissen und in eine RAR gepackt - So kann ich was damit anfangen. So hat das eine klare Struktur und ich kann es in Ruhe einbauen OHNE dabei noch Zig-Tausende Grafiken bearbeiten zu müssen :D
    Aber es dient so auch nur als Beispiel, bitte die Grafiken nicht erst später zerstückeln sondern gleich Seperat erstellen.

    Grüsse!

    [EDIT]
    Also das ganze hat auch einen tieferen Sinn - ich arbeite mit Sprites! Dadurch kann ich z.B. die Buchstaben einwenig in Bewegung setzten und so.

  • Suche 2D-Grafiker für Flutch

    Hey gar nicht mal so schlecht - ich entscheide zwar nicht über das Design - ABER wenn du auch noch die verwendeten Grafiken seperat zur verfügung stellst, dann kann man mal Gucken!
    Also einmal das fertige Design (in 1024x768) und einmal alle Grafiken einzeln - und für ganz Doofe (also für mich) noch einen kleinen Text mit Angaben darüber an welcher Position welche Grafik zu finden ist!
    Dateiformat: .png, .bmp, kein jpg - und bitte die einzelnen Grafiken auch transparent erstellen.

    Aber ob das jetzt verwendet wird Entscheidet ein anderer ;)

    Grüsse!

  • Suche 2D-Grafiker für Flutch

    Gimp geht auch sehr Gut! Und bitte darauf achten, das WENN iwelche Grafiken Transparent sein sollen - diese auch bitte mit Transparenz erstellen! Als Dateiformate sind .png und .bmp zu verwenden (.tga, .tiff auch - wer´s braucht)

    Grüsse von
    Techmix!

  • $Var zu "$Var" - Variablenname zu Text?

    Hallo!
    Eingentlich gibt es ja auch gar kein Problem, ich habe mir ja eine funktionierende SQL-Abfrage gemacht - hatte bloß überlegt wie ich diese eben verbessern könnte. Da hatte ich mich an die Befehle Eval und Assign erinnert und fragte mich ob dieses auch in die andere Richtung möglich währe ;) Und den Spoiler da unten hatte ich ja auch nur schnell dahergetippt - ist kein keil von meinem Programm oder so.

    Falls doch noch jemand was dazu einfällt, einfach Schreiben!

    Grüsse!

  • $Var zu "$Var" - Variablenname zu Text?

    Das ging ja mal schnell :)

    Also im prinzip will ich mir eine einfache SQLight Abfrage machen - eine Komfortable.

    Spoiler anzeigen
    [autoit]


    ; So ist die SQLight.db aufgebaut
    $_SQLdata&="" & _; Path Data
    "CREATE TABLE IF NOT EXISTS 'Settings_Path' (" & _
    "'ID','Data'" & _
    ");" & _
    "INSERT INTO 'Settings_Path' VALUES ('$e_Pa_Main', '"&@ScriptDir&"\Data\'); "
    ; ...

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

    ; Da ich mit Arrays Arbeite, habe ich auch mich auch für Enum´s entschieden - ich wollt diese eben quasi 'doppelt' verwenden...
    Enum $e_Pa_Main, $e_Pa_Last
    Global $s_Path[$e_Pa_Last]
    $s_Path[$e_Pa_Main] = _GettingData($e_Pa_Main)

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

    ; Dieses ist jetzt eine Fiktive SQLight Abfrage
    Func _GettingData($_Txt=_Var2Txt($_Var))
    Local $_Section, $_Key
    ; Die Variable Checken
    if StringInStr($_Txt, "e_Pa", 1) then
    $_Section = "Settings_Path"
    $_Key = $_Txt
    endif

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

    ; Fiktives SQL-Gedöns
    dim $hQuery, $aNames, $aRow
    _SQLite_Query(-1, "SELECT * FROM '"&$_Section&"' ORDER BY '"&$_Key&"';", $hQuery)
    While _SQLite_FetchData ($hQuery, $aRow, False, False) = $SQLITE_OK
    if $aRow[0] = $_key then ExitLoop
    WEnd
    _SQLite_QueryFinalize($hQuery)
    if $aRow[0] = $_key then Return $aRow

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

    return 0 ; Falls kein Eintrag gefunden wurde
    Endfunc

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

    Func _Var2Txt($_Var)
    ; Hier den Variablennamen zu Text umwandeln und zurückgeben
    return $s_Return
    Endfunc

    [/autoit]

    Ich hoffe ich konnte es etwas verdeutlichen...
    In dem Beispiel soll mir die Funktion '_Var2Txt' die angegebene Variable als Text zurückgeben (oder weiß ich was hier eben machen kann). Ich wollt mir dadurch das Handling in zusammenspiel von Array´s und SQLight Abfragen erleichtern.

    Grüsse!

  • Prüfen pb Inputbox mit Inhalt gefüllt ist und zusammenrechnen

    Nabend!

    Ich habe grad kurz geschaut und denke ich weiß wo der Fehler lag:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=c:\program files (x86)\autoit3\koda\forms\rechner.kxf
    $Form1_1 = GUICreate("Angebotsrechner", 658, 625, 237, 137)
    $Group1 = GUICtrlCreateGroup("Wareneinkauf", 8, 16, 537, 161)
    $HEK = GUICtrlCreateLabel("Händler EK", 40, 48, 58, 17)
    $VERSI = GUICtrlCreateLabel("Versicherung", 296, 48, 66, 17)
    $UMW = GUICtrlCreateLabel("Umweltpauschale", 40, 80, 88, 17)
    $VERSA = GUICtrlCreateLabel("Versandkosten", 296, 80, 75, 17)
    $SK = GUICtrlCreateLabel("Sonstige Kosten", 40, 112, 81, 17)
    $MWST = GUICtrlCreateLabel("MwSt. %", 296, 112, 45, 17)
    $MAGE = GUICtrlCreateLabel("Mage %", 40, 144, 42, 17)
    $VK = GUICtrlCreateLabel("Verkaufspreis", 296, 144, 68, 17)
    $HEK_IN = GUICtrlCreateInput("", 192, 48, 65, 21)
    $UMW_IN = GUICtrlCreateInput("", 192, 80, 65, 21)
    $SK_IN = GUICtrlCreateInput("", 192, 112, 65, 21)
    $MAGE_IN = GUICtrlCreateInput("", 192, 144, 65, 21)
    $VERSI_IN = GUICtrlCreateInput("", 448, 48, 65, 21)
    $VERSA_IN = GUICtrlCreateInput("", 448, 80, 65, 21)
    $VK_OUT = GUICtrlCreateLabel("€", 448, 144, 66, 17)
    $MWST_IN = GUICtrlCreateInput("", 448, 112, 65, 21)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group2 = GUICtrlCreateGroup("Stundenansatz", 8, 192, 537, 129)
    $SS_P = GUICtrlCreateLabel("Stundensatz Privatkunde", 40, 224, 123, 17)
    $SS_G = GUICtrlCreateLabel("Stundensatz Geschäftskunde", 40, 256, 144, 17)
    $GES_H_GEPL = GUICtrlCreateLabel("Geplante Gesamtstundenzahl", 296, 224, 143, 17)
    $SUMME_H = GUICtrlCreateLabel("Summe Stunden", 40, 288, 82, 17)
    $SS_P_IN = GUICtrlCreateInput("", 192, 224, 65, 21)
    $SS_GK_IN = GUICtrlCreateInput("", 192, 256, 65, 21)
    $S_GE = GUICtrlCreateInput("", 448, 224, 65, 21)
    $STUNDENSUMME = GUICtrlCreateLabel("€", 448, 288, 66, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group3 = GUICtrlCreateGroup("Anfahrtskosten", 8, 336, 537, 129)
    $Label11 = GUICtrlCreateLabel("Kilometerpauschale", 40, 368, 96, 17)
    $Label12 = GUICtrlCreateLabel("Anfahrtskilometer", 40, 400, 85, 17)
    $GEP_ANZ_ANF = GUICtrlCreateLabel("Geplante Anzahl Anfahrten", 296, 368, 131, 17)
    $Label14 = GUICtrlCreateLabel("Summe Anfahrten / Kilometer", 40, 432, 142, 17)
    $KILO_P = GUICtrlCreateInput("", 192, 368, 65, 21)
    $KILO_AN = GUICtrlCreateInput("", 192, 400, 65, 21)
    $ANZ_FAHR = GUICtrlCreateInput("", 448, 368, 65, 21)
    $H_Gesamt = GUICtrlCreateLabel("€", 448, 432, 66, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $UEBERN_WARE = GUICtrlCreateButton("Übernahme", 562, 136, 75, 25, 0)
    $ERRECHNEN_WARE = GUICtrlCreateButton("Errechnen", 562, 88, 75, 25, 0)
    $LEEREN_WARE = GUICtrlCreateButton("Leeren", 562, 40, 75, 25, 0)
    $UEBERNAHME_STUNDEN = GUICtrlCreateButton("Übernahme", 562, 286, 75, 25, 0)
    $ERRECHNEN_STUNDEN = GUICtrlCreateButton("Errechnen", 562, 246, 75, 25, 0)
    $LEEREN_STUNDEN = GUICtrlCreateButton("Leeren", 562, 206, 75, 25, 0)
    $UEBERNAHME_ANFAHRT = GUICtrlCreateButton("Übernahme", 562, 434, 75, 25, 0)
    $ERRECHNEN_ANFAHRT = GUICtrlCreateButton("Errechnen", 562, 394, 75, 25, 0)
    $LEEREN_ANFAHRT = GUICtrlCreateButton("Leeren", 562, 354, 75, 25, 0)
    $Group4 = GUICtrlCreateGroup("Gesamtkostenaufstellung", 8, 480, 537, 129)
    $Label5 = GUICtrlCreateLabel("Ware", 40, 512, 30, 17)
    $Label6 = GUICtrlCreateLabel("Stunden", 40, 544, 44, 17)
    $Label7 = GUICtrlCreateLabel("Anfahrten", 40, 576, 50, 17)
    $Label8 = GUICtrlCreateLabel("Gesamtkosten", 296, 512, 72, 17)
    $GES_KOSTEN_OUT = GUICtrlCreateLabel("€", 448, 512, 66, 17)
    $WARE_OUT = GUICtrlCreateLabel("€", 192, 512, 74, 17)
    $STUNDEN_OUT = GUICtrlCreateLabel("€", 192, 544, 74, 17)
    $ANFAHRTEN_OUT = GUICtrlCreateLabel("€", 192, 576, 74, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $ERRECHNEN_GESAMT = GUICtrlCreateButton("Errechnen", 562, 530, 75, 25, 0)
    GUISetState(@SW_SHOW)

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

    #EndRegion ### END Koda GUI section ###
    Global $Var_WARE
    Global $Var_STUNDEN
    Global $Var_KM

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $ERRECHNEN_WARE
    $wert01 = GUICtrlRead ($HEK_IN)
    $wert02 = GUICtrlRead ($UMW_IN)
    $wert03 = GUICtrlRead ($SK_IN)
    $wert04 = GUICtrlRead ($MAGE_IN)
    $wert05 = GUICtrlRead ($VERSI_IN)
    $wert06 = GUICtrlRead ($VERSA_IN)
    $wert07 = GUICtrlRead ($MWST_IN)
    $_Data = (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) + (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) / 100 * $wert04 )) + (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) / 100 * $wert07 )
    $Var_WARE = GUICtrlSetData($VK_OUT, $_Data & ' €')

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

    Case $UEBERN_WARE
    ;~ GUICtrlSetData($WARE_OUT, $Var_WARE)
    GUICtrlSetData($WARE_OUT, $_Data)

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

    ; (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) + (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) / 100 * $wert04 )) + (( $wert01 + $wert02 + $wert03 + $wert05 + $wert06 ) / 100 * $wert07 ) & ' €')

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

    Case $ERRECHNEN_STUNDEN
    If GUICtrlRead($SS_P_IN) <> '' ANd GUICtrlRead($SS_GK_IN) <> '' Then
    MsgBox(0, '', 'Bist Du verwirrt?')
    GUICtrlSetData($SS_GK_IN, '')
    GUICtrlSetData($SS_P_IN, '')
    ContinueCase
    EndIf
    If GUICtrlRead($SS_GK_IN) <> '' Then GUICtrlSetData($STUNDENSUMME, GUICtrlRead($SS_GK_IN)* GUICtrlRead($S_GE) & ' €')
    If GUICtrlRead($SS_P_IN) <> '' Then GUICtrlSetData($STUNDENSUMME, GUICtrlRead($SS_P_IN)* GUICtrlRead($S_GE) & ' €')

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

    Case $UEBERNAHME_STUNDEN
    If GUICtrlRead($SS_P_IN) <> '' ANd GUICtrlRead($SS_GK_IN) <> '' Then
    MsgBox(0, '', 'Bist Du verwirrt?')
    GUICtrlSetData($SS_GK_IN, '')
    GUICtrlSetData($SS_P_IN, '')
    ContinueCase
    EndIf
    If GUICtrlRead($SS_GK_IN) <> '' Then GUICtrlSetData($STUNDEN_OUT, GUICtrlRead($SS_GK_IN)* GUICtrlRead($S_GE) & ' €')
    If GUICtrlRead($SS_P_IN) <> '' Then GUICtrlSetData($STUNDEN_OUT, GUICtrlRead($SS_P_IN)* GUICtrlRead($S_GE) & ' €')

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

    EndSwitch

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

    WEnd

    [/autoit]

    Schau dir mal genau die Zeile 85 an. Da habe ich den Wert eifach in einer Variable gespeichert - und diese wird jetzt in Zeile 90 Angezeigt. So kann man das lösen.
    Du könntest aber auch einfach das Control auslesen ($Var_WARE) mit GUICtrlRead.

    Ich hoffe ich konnte helfen - und habe auch den richtigen Fehler erwischt ;)

    Grüsse!

  • Flutch - Erobert die Welt

    Also ich habe es hier bei mir auf´m Rechner getestet...
    Bei mir macht der Charakter garnix bei der Animation '$IRR_EMAT_RUN' und er Läuft bei '$IRR_EMAT_STAND' - Sieht für mich nach ner unkorrekten Animationssequenz aus...

    Grüsse!

  • Boot wird manchmal nicht gestartet

    Neeee leider nicht...
    Scheint ein Hardware deffekt zu sein, habe (fast) die gleichen Probleme da mit dem Arbeitsspeicher - der muß auch manchmal gewackelt werden, sonst fehlen 512MB. Vielleicht ne Verfettung oder ähnliche verschmutzungen...
    Ich mach auch 'regelmässig' den PC mit nem Pinsel sauber - war auch schon mit Nagellackentferner bei den Kontakten bei. Alles ohne Erfolg - Er zickt regelmässig rum, deswegen läuft er momentan auch 24/7 - damit er läuft :)

    Grüsse!

  • Flutch - Erobert die Welt

    Hallo!
    Also ich habe mir das Script mal angeschaut - Du (oder Ihr) habt ein Problem mit der Animation? Ich habe einfach mal bei Zeile 179-187 was eingebaut - so könnte man das lösen. Besser geht das aber durch direktes ansteuern der Animationen mit '_IrrPlayNodeMD2Animation' - dafür müsst Ihr die Animationen aber auch Korrekt erstellen bzw. an die richtige Position setzten.

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_UseX64=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

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

    #include <au3Irrlicht2.au3>
    #include <Misc.au3>
    #include <File.au3>

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

    opt("MustDeclareVars", True)
    HotKeySet("{ESC}", "_exit")

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

    Global $degree = -180
    Global $degZ = 70

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

    Global $MapMesh, $MapNode, $Camera, $Charakter, $CharakterNode, $MapTexture, $CharakterTexture, $selector, $outHitPosition, $outFalling
    Global $screen_width, $screen_height, $gravity[3], $velocity[3], $ellipsoidRadius[3],$pMouseEvent
    Global $aMousePos[2], $aPoint[3], $aDirect[3], $aCamPos[3], $aDirectCha[3], $DifV[3], $DivL, $aAlpha, $Light[5], $RotFaktor
    Global $Entfernung = 5, $i[5]

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

    Global $dir = _PathFull( @ScriptDir & "\Meshes\md2\" ) ;

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

    $screen_width = 800
    $screen_height = 600

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

    _IrrStartAdvanced ( $IRR_EDT_OPENGL, @DesktopWidth, @DesktopHeight, $IRR_BITS_PER_PIXEL_32, _
    $IRR_Windowed, $IRR_SHADOWS, $IRR_CAPTURE_EVENTS, $IRR_VERTICAL_SYNC_OFF, _
    0, $IRR_ON, 2, $IRR_ON)

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

    _IrrSetWindowCaption( "Flutch - Das neue Rollenspiel" )

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

    $MapMesh = _IrrGetMesh( $dir & "map/map.obj" )
    $MapTexture = _IrrGetTexture( $dir & "map/map.png" )
    $MapNode = _IrrAddMeshToSceneAsOcttree( $MapMesh )
    _IrrSetNodeMaterialTexture( $MapNode, $MapTexture, 0 )
    _IrrSetNodeMaterialFlag( $MapNode, $IRR_EMF_GOURAUD_SHADING, $IRR_ON )
    _IrrSetNodeScale( $MapNode, 1, 0.5, 1 )

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

    $Charakter = _IrrGetMesh( $dir & "flutch.md2" )
    $CharakterTexture = _IrrGetTexture( $dir & "flutch.bmp" )
    $CharakterNode = _IrrAddMeshToScene( $Charakter )
    _IrrSetNodeMaterialTexture( $CharakterNode, $CharakterTexture, 0 )
    _IrrSetNodeMaterialFlag( $CharakterNode, $IRR_EMF_GOURAUD_SHADING, $IRR_ON )
    _IrrSetNodeScale( $CharakterNode, 26/40, 26/40, 26/40 )
    _IrrSetNodeAnimationSpeed($CharakterNode, 120)

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

    $selector = _IrrGetCollisionGroupFromComplexMesh( $MapMesh, $MapNode )
    _IrrAddLight( $IRR_NO_PARENT, 0, 500, 0, 255, 255, 200, 1)

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

    $aPoint[0] = 0.0
    $aPoint[1] = 1500.0/40
    $aPoint[2] = 0.0

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

    $gravity[0] = 0.0
    $gravity[1] = -0.2
    $gravity[2] = 0.0

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

    $velocity[0] = 0.0
    $velocity[1] = 0.0
    $velocity[2] = 0.0

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

    $aCamPos[0] = 1750.0
    $aCamPos[1] = 149.0
    $aCamPos[2] = 1369.0

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

    $aDirectCha[0] = 0.0
    $aDirectCha[1] = 0.0
    $aDirectCha[2] = 0.0

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

    $ellipsoidRadius[0] = 0.3
    $ellipsoidRadius[1] = 0.8
    $ellipsoidRadius[2] = 0.3

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

    $Camera = _IrrAddCamera( $aCamPos[0], $aCamPos[1], $aCamPos[2], $aPoint[0], $aPoint[1], $aPoint[2] )
    _IrrSetNodePosition($CharakterNode, $aPoint[0], $aPoint[1], $aPoint[2])

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

    _IrrHideMouse()
    MouseMove( @DesktopWidth/2, @DesktopHeight/2, 0 )
    $aMousePos[0] = 0.0
    $aMousePos[1] = 0.0

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

    WHILE _IrrRunning()
    _IrrBeginScene( 255,255,0 )

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

    _Direction_calc()

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

    while _IrrMouseEventAvailable()
    $pMouseEvent = _IrrReadMouseEvent()
    if __getMouseEvt($pMouseEvent, $EVT_MOUSE_IACTION) = $IRR_EMIE_MOUSE_WHEEL then
    if (__getMouseEvt($pMouseEvent,$EVT_MOUSE_FDELTA) < 0 And $Entfernung < 12) Or _
    (__getMouseEvt($pMouseEvent,$EVT_MOUSE_FDELTA) > 0 And $Entfernung > 2) then
    $Entfernung -= __getMouseEvt($pMouseEvent, $EVT_MOUSE_FDELTA)/2
    endif
    endif
    wend

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

    _IrrGetCollisionResultPosition ( _
    $selector, _
    $aPoint, _
    $ellipsoidRadius, _
    $velocity, _
    $gravity, _
    0.0005, _
    $aPoint, _
    $outHitPosition, _
    $outFalling )

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

    _move()

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

    _IrrSetCameraTarget( $Camera, $aPoint[0], $aPoint[1], $aPoint[2] )

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

    _IrrDrawScene()

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

    _IrrEndScene()
    WEND

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

    Func _exit()
    _IrrStop()
    Exit
    EndFunc ; _exit

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

    Func _Direction_calc()
    Local $pKeyEvent, $keyCode

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

    $aMousePos = MouseGetPos()
    MouseMove( @DesktopWidth/2, @DesktopHeight/2, 0 )
    $aMousePos[0] -= @DesktopWidth/2
    $aMousePos[1] -= @DesktopHeight/2

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

    Local $aDirectLength = ( $aDirect[0]^2 + $aDirect[2]^2 )^(1/2)
    Local $MoveSpeed = 0.07
    If $velocity[1] > 0 Then $velocity[1] -= 0.25

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

    If $aMousePos[0] < 0 Then
    $degree -= $aMousePos[0]/15
    If $degree >= 180 Then $degree = -180
    ElseIf $aMousePos[0] > 0 Then
    $degree -= $aMousePos[0]/15
    If $degree <= -180 Then $degree = 180
    EndIf

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

    If $aMousePos[1] < 0 Then
    If $degZ < 179 Then $degZ -= $aMousePos[1]/15
    ElseIf $aMousePos[1] > 0 Then
    If $degZ > 1 Then $degZ -= $aMousePos[1]/15
    EndIf

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

    $aDirect[0] = $aPoint[0] - $aCamPos[0]
    $aDirect[1] = $aPoint[1] - $aCamPos[1]
    $aDirect[2] = $aPoint[2] - $aCamPos[2]

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

    $velocity[0] = 0.0
    $velocity[2] = 0.0

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

    If _IsPressed("57") Then ; W drücken
    $velocity[0] = $aDirect[0]/$aDirectLength*$MoveSpeed
    $velocity[2] = $aDirect[2]/$aDirectLength*$MoveSpeed
    $RotFaktor = 180-$degree + 90
    ElseIf _IsPressed("53") Then ; S drücken
    $velocity[0] = -$aDirect[0]/$aDirectLength*$MoveSpeed
    $velocity[2] = -$aDirect[2]/$aDirectLength*$MoveSpeed
    $RotFaktor = 180-$degree - 90
    EndIf

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

    If _IsPressed("41") Then ; A drücken
    $velocity[0] = -$aDirect[2]/$aDirectLength*$MoveSpeed
    $velocity[2] = $aDirect[0]/$aDirectLength*$MoveSpeed
    $RotFaktor = 180-$degree
    ElseIf _IsPressed("44") Then ; D drücken
    $velocity[0] = $aDirect[2]/$aDirectLength*$MoveSpeed
    $velocity[2] = -$aDirect[0]/$aDirectLength*$MoveSpeed
    $RotFaktor = 180-$degree + 180
    EndIf

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

    If _IsPressed("20") Then ; Leer drücken (springen)
    $velocity[1] = 1
    EndIf

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

    If not _IsPressed("57") and not _IsPressed("53") and not _IsPressed("41") and not _IsPressed("44") Then
    ; Nicht bewegen
    ;~ _IrrPlayNodeMD2Animation($CharakterNode, $IRR_EMAT_STAND)
    _IrrSetNodeAnimationSpeed($CharakterNode, 0)
    Else
    ; Bewegen
    ;~ _IrrPlayNodeMD2Animation($CharakterNode, $IRR_EMAT_RUN)
    _IrrSetNodeAnimationSpeed($CharakterNode, 120)
    EndIf

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

    ;~ while _IrrKeyEventAvailable()

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

    ;~ $pKeyEvent = _IrrReadKeyEvent()
    ;~ $keyCode = __getKeyEvt($pKeyEvent, $EVT_KEY_IKEY)

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

    ;~ Switch $keyCode
    ;~ case $KEY_KEY_W ; "W" drücken
    ;~ $velocity[0] += $aDirect[0]/$aDirectLength*$MoveSpeed
    ;~ $velocity[2] += $aDirect[2]/$aDirectLength*$MoveSpeed
    ;~ $RotFaktor = 180-$degree + 90

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

    ;~ case $KEY_KEY_D ; "D" drücken
    ;~ $velocity[0] += $aDirect[2]/$aDirectLength*$MoveSpeed
    ;~ $velocity[2] += -$aDirect[0]/$aDirectLength*$MoveSpeed
    ;~ $RotFaktor = 180-$degree + 180

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

    ;~ case $KEY_KEY_A ; "A" drücken
    ;~ $velocity[0] += -$aDirect[2]/$aDirectLength*$MoveSpeed
    ;~ $velocity[2] += $aDirect[0]/$aDirectLength*$MoveSpeed
    ;~ $RotFaktor = 180-$degree

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

    ;~ case $KEY_KEY_S ; "S" drücken
    ;~ $velocity[0] += -$aDirect[0]/$aDirectLength*$MoveSpeed
    ;~ $velocity[2] += -$aDirect[2]/$aDirectLength*$MoveSpeed
    ;~ $RotFaktor = 180-$degree - 90
    ;~ EndSwitch
    ;~ wend

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

    EndFunc

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

    Func _move()
    Local Const $pi = 3.14159265358979323846264338327950288419716939937510582097
    Local Const $deg2rad = $pi/180
    Local $rad = $degree * $deg2rad
    $aCamPos[0] = $Entfernung * Sin($degZ * $deg2rad) * Cos($rad) + $aPoint[0]
    $aCamPos[2] = $Entfernung * Sin($degZ * $deg2rad) * Sin($rad) + $aPoint[2]
    $aCamPos[1] = $Entfernung * Cos($degZ * $deg2rad) + $aPoint[1]

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

    _IrrSetNodePosition($Camera, $aCamPos[0], $aCamPos[1], $aCamPos[2])
    _IrrSetNodePosition($CharakterNode, $aPoint[0], $aPoint[1], $aPoint[2])
    _IrrSetNodeRotation($CharakterNode, 0, $RotFaktor, 0)
    EndFunc

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

    Grüsse!

  • Boot wird manchmal nicht gestartet

    Ich habe ein ganz ähnlichs Problem, meiner startet auch nur 50%ig - Entweder Bootet er ganz normal oder überhaupt nicht, dan Piepst er wie wild rum und der Bildschirm bleibt aus.
    Dann muß ich einfach an dem Monitoranschluß der GraKa wackeln - und er Bootet wieder...

    Nur woran genau das liegt weiß ich auch nicht ;)

    Grüsse!

  • AutoC++

    Nabend!

    Also wenn du mir noch sagen kannst wofür man AutoC++ einsetzten sollte, dann währe ich ne Spur schlauer :D Mir fällt so spontan kein Anwendungfall ein ?(
    Viellecht um einfacher C++ Funktionen in Au3 zu interpretieren?

    Aber sonst find ich das es echt ne gute Idee ist!
    Und wie sieht das mit der Geschwindigkeit aus, also gleich (langsam) wie AU3 oder wat?

    Grüsse!