1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. General Kaboom

Beiträge von General Kaboom

  • Elektronische Tanzmusik

    • General Kaboom
    • 8. Januar 2013 um 08:54
    Zitat von Marthog

    Ich höre eigentlich kaum elektronische Musik, aber E Nomine finde ich ganz gut. Beispiel

    Dann bin ich also doch nicht der einzige Freak der die mag :D

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 8. Januar 2013 um 07:21

    Naja ich vermute mal so eine Challenge um Feiertage ist zwar gut gemeint, aber so wirklich erfolgsversprechend nicht, ich würde ja auch nicht unbedingt die ganzen Weihnachtsferien vor m PC sitzen wollen.

  • Elektronische Tanzmusik

    • General Kaboom
    • 7. Januar 2013 um 12:10

    Defqon 1 und Tomorrowland sind so Stationen die ich in den Nächsten Jahren auch mal hin will. Bisher hab ich mich wenn überhaupt mit der Streetparade begnügen müssen.

  • Elektronische Tanzmusik

    • General Kaboom
    • 7. Januar 2013 um 11:47

    Scritch bis auf dodos und diese komische schildkrötenart aus traumschiff surprise stirbt nichts definitiv aus ;) Es gibt noch vile Jumpstyler es ist nur nicht mehr so populär weil vielen das ewige gehopse zu anstrengend ist :D

    Yaerox definitiv ^^ jetzt bräucht ich nur auch ein auto aktuel hab ich den effekt nur im bett (subwoofer unterm bett macht laune :) ).

  • Elektronische Tanzmusik

    • General Kaboom
    • 7. Januar 2013 um 11:16

    Aktueller Spitzenreiter ist bei mir Techno auf Rang 2 wäre Hardstyle dann Dupstep (das war früher mal mein Favorit, dann kam Skrillex und der ganze Hype weshalb ich mich daraus zurückgezogen habe, gibt zwar auch von ihm 1-2 gute Tracks aber so wirklich Dubstep ist es halt nicht mehr).
    Dann wäre gelegentlich noch Hardcore (vorsicht, ist nicht dasselbe wie Hardstyle) und schon etwas länger her aber Chiptunes fand ich auch mal ganz witzig, die sind zum Tanzen aber eher ungeeignet ausser man will herumspringen wie ein Super Mario auf xtc.
    Ich persönlich versuche mich deshalb gerade an Jumpstyle, aber da ich dafür anscheinend so absolut kein Talent habe werd ich mich vermutlich auch auf den Shuffle "umschulen" sieht schliesslich auch geil aus :D

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 2. Januar 2013 um 00:03

    Ich finds natürlich auch schade...es verwundert mich auch, dass nichtmal EIN Skript abgegeben wurde. Naja vermutlich hat dass auch mit den Anfangs sehr unklaren Regeln zu tun. Ich werde bestimmt irgendwann dieses Jahr noch einen (hoffentlich besser resultierenden) Versuch starten, allerdings muss sich mein Konto durch die ganzen Weihnachtsgeschenke und die schlussendlich verschenkten Preise ziehmlich heftig erholen. Ihr hört von mir, wenn ich wieder was für euch habe (einen Ansatz habe ich durch diesen Misserfolg ja bereits).

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 1. Januar 2013 um 15:09

    Naja...wie zu erwarten wurden keine Abgaben getätigt. Somit ist diese Challenge gewinnerlos beendet, die Preise hab ich anderoweitig verschenkt.

    Gun-Food bitte schliessen

  • Das AutoIt T-Shirt

    • General Kaboom
    • 31. Dezember 2012 um 19:02

    Deine "Designs" sind...nett, aber das wars auch schon. So richtig kaufwürdig ist keiner. Ist ja gut und recht wenn du so nen Shop aufbauen willst, aber dann sollten die Verkaufsgegenstände schon was hermachen.
    Es weist einfach nichts darauf hin, dass autoit eine Programmiersprache sein soll, so wie ich das sehe, würde im Moment jeder mich fragen: "Hey, was soll dieses komische Logo auf deinem Shirt darstellen" wenn ich eins deiner Shirts tragen würde.
    Es muss auch irgendwie erkennbar sein, wofür dieses "A" steht. Jeder kann ein X-Beliebiges Bild in diese "A-Form" schneiden, dass ist eine Sache von 20-30 Sekunden. Wenn du diesen Shop ernsthaft führen willst, solltest du dir etwas mehr Zeit lassen für deine Entwürfe und nicht alle paar Wochen mal kurz was aus dem Ärmel schütteln. Und wenn du halt einfach noch nicht so viele Ideen hast, solltest du andere Leute darum bitten und erst ein bisschen üben bevor so halbwegs zusammengeschustertes Zeugs rauskommt.

  • Coole Bilder berechnen (Domain coloring / complex numbers) (Assembler)

    • General Kaboom
    • 27. Dezember 2012 um 11:05

    Sehr schön :love:

    Sorry aber ich konnte mir nicht verkneifen, noch etwas daran rumzubasteln :D
    Ich weiss, ich hab nur ein paar Linien etwas verändert, deshalb sag ich auch nicht ICH habs geschrieben.
    Da ein bisschen was weggelassen und hier ein bisschen was hinzugefügt und zack...wird daraus ein wunderschöner (noch etwas leicht umgehbarer) Screensaver :thumbup:

    Spoiler anzeigen
    [autoit]

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

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

    Opt("MustDeclareVars", 1)
    Opt("GUIOnEventMode", 1)

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

    Global $t_ASM_CalcRangeValues = DllStructCreate("byte[106]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_CalcRangeValues, 1, "0x8B7C24048B7424108B44240889068B44240C894604660F107E08660F107618BA000000008B5C24080FAFDAB90000000089D801C86BC010660F106E18660F6EE9F30FE6ED660F6EE2F30FE6E4660FC6EC44660F5CEE660F59EF660F112C07413B0E72CD423B560472BBC3") ;write opcodes into memory

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

    Global $t_ASM_Calc_Color = DllStructCreate("byte[609]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_Color, 1, "0x9BDBE38B7C24048B7424088B4C240C8B5424109BD97A489BDBE266C7424A6307D96A4ADD42184989CB6BDB10DD441E08DD041ED9F3DD4250DEE9D9E49BDFE09B9E7311D9E59BDFE09B9E7204D8C1EBEADDD8D9EED8F1DD4238DEC9DD1AD9E8660F103C1E660F59FF660F70F7EE660F58FE660F51FF660F117A08DD4208D8CAD9FED9E1DD5208DD4220DD041ED8CCD9FEDD441E08D8CDD9FEDEC9D9E1D9E49BDFE09B9E7412D9F1D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9DD4228DD4230D9E8D8E4D8E3D8C8D8C2D9FAD9E8D8E5D8C4D8C1D8CADDDBDDD8DDD8DC52409BDFE09E7606DDD8D9E8EB0DD9E49BDFE09B9E7304DDD8D9EEDD5A10DC52409BDFE09B9E7606DDD8D9E8EB0DD9E49BDFE09B9E7304DDD8D9EE660F103ADD02D9FCDD1ADED9DDD8660F1032660F5CFEB801000000660F6EC0F30FE6C0660F106A08660F106210660F28D0660F5CD7660F59D5660F28D8660F5CDA660F59DC660F28CD660F59CF660F28D0660F5CD1660F59D4660F5CC5660F59C4F20FE6F6660F7EF083F800770E660F28FC660F28F3660F28E8EB5883F801770E660F28FA660F28F4660F28E8EB4583F802770E660F28F8660F28F4660F28EBEB3283F803770E660F28F8660F28F2660F28ECEB1F83F804770E660F28FB660F28F0660F28ECEB0C660F28FC660F28F0660F28EAB8FF000000660F6EC0660F6EC8F30FE6C0660F59F8660F59F0660F59E8660F6FD9660F72F318F20FE6FF660FDBF9660F6FD7660F72F210660FEBDAF20FE6F6660FDBF1660F6FD6660F72F208660FEBDAF20FE6ED660FDBE9660FEBDD89CB6BDB04660F7E1C1F83F9000F85CCFDFFFF9BDBE2D96A48C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CLog = DllStructCreate("byte[75]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CLog, 1, "0x9BDBE38B7C24048B4C24088B74240C4989CB6BDB10D9EDDD041FD8C8DD441F08D8C8DEC1D9FAD9F1DD441F08DD041FD9F3DC169BDFE09E7605DD4608DEE9DD5C1F08DD1C1F83F90075C5C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CSQRT = DllStructCreate("byte[115]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CSQRT, 1, "0x8B7C24048B4C24088B74240C660F1006660F104E10660F57D24989CB6BDB10660F103C1F660F28F7660F59F6660F70EEEE660F58F5660F51F6660F70F644660F70EF44660F59E8660F58F5660F59F1660F51F6660FC2FA01660F50F7F7C6020000007404660F59F0660F11341F83F90075A7C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CSin = DllStructCreate("byte[117]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CSin, 1, "0x8B7C24048B4C24088B74240C4989CB6BDB10DD441F08D9EADEC9D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9D9EEDD441F08DEE9D9EADEC9D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9D9C1D9C1DEE9DD06DEC9DD041FD9FFDEC9DD5C1F08DEC1DD06DEC9DD041FD9FEDEC9DD1C1F83F9007598C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CCos = DllStructCreate("byte[117]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CCos, 1, "0x8B7C24048B4C24088B74240C4989CB6BDB10DD441F08D9EADEC9D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9D9EEDD441F08DEE9D9EADEC9D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9D9C1D9C1DEE9DD06DEC9DD041FD9FEDEC9DD5C1F08DEC1DD06DEC9DD041FD9FFDEC9DD1C1F83F9007598C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CTan = DllStructCreate("byte[134]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CTan, 1, "0x8B7C24048B4C24088B74240C8B542410660F1006B801000000660F6EC8F30FE6C9660F70C9444989CB6BDB10660F103C1A660F28F7660F59F6660F70EEEE660F58F5660F70F644660F28E9660F5EEE660F10341E660F70E74E660F59FE660F59F4660F70E74E660F5CFC660F70E64E660F5CF4660F14FE660F59FD660F113C1F83F90075A1C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CExp = DllStructCreate("byte[70]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CExp, 1, "0x8B7C24048B4C24084989CB6BDB10DD041FD9EADEC9D9C0D9FCDCE9D9C9D9F0D9E8DEC1D9FDDDD9D9C0DD441F08D9FFDEC9DD1C1FDD441F08D9FEDEC9DD5C1F0883F90075C3C3") ;write opcodes into memory

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

    Global $t_ASM_Calc_CPow = DllStructCreate("byte[42]") ;reserve Memory for opcodes
    DllStructSetData($t_ASM_Calc_CPow, 1, "0x8B7C24048B4C24088B74240C660F10064989CB6BDB10660F100C1F660F59C8660F110C1F83F90075E7C3") ;write opcodes into memory

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

    Global Const $cPI = ATan(1) * 4
    Global Const $c2PI = $cPI * 2
    Global Const $cPI2 = $cPI / 2
    Global Const $cDegToRad = $cPI / 180

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

    _GDIPlus_Startup()

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

    Global $iWidth = @DesktopWidth
    Global $iHeight = @DesktopHeight

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

    Global $hGui = GUICreate("", $iWidth, $iHeight, "", "", BitOR($WS_SYSMENU,$WS_MAXIMIZE,$WS_POPUP), BitOR($WS_EX_TOPMOST,$WS_EX_WINDOWEDGE))
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
    Global $hGraphics = _GDIPlus_GraphicsCreateFromHWND($hGui)
    Global $hBmpBuffer = _GDIPlus_BitmapCreateFromGraphics($iWidth, $iHeight, $hGraphics)
    Global $hGfxBuffer = _GDIPlus_ImageGetGraphicsContext($hBmpBuffer)
    _GDIPlus_GraphicsSetSmoothingMode($hGfxBuffer, 2)
    _GDIPlus_GraphicsClear($hGfxBuffer, 0xFF000000)

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

    GUIRegisterMsg($WM_PAINT, "WM_PAINT")
    GUIRegisterMsg($WM_ERASEBKGND, "WM_PAINT")

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

    GUISetState(@SW_SHOW, $hGui)

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

    Global $hImage
    Global $aInfo
    While True
    _New()
    Sleep(10000)
    WEnd

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

    Func _New()
    _GDIPlus_ImageDispose($hImage)

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

    Local $iAlgo1 = Random(0, 10, 1)
    Local $iAlgo2 = Random(0, 10, 1)
    Local $iAlgo3 = Random(0, 10, 1)
    Local $iR = Random(1, 24, 1)
    Local $fColorOff = Random(0, 360)
    Local $fVal1 = Random(0, 3)
    Local $fVal2 = Random(0, 0.1)
    $hImage = _CreateImage($iWidth, $iHeight, $iAlgo1, $iAlgo2, $iAlgo3, $iR, $iR, 0.5, 0.5, $fColorOff, $fVal1, $fVal2)

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

    _GDIPlus_GraphicsDrawImageRect($hGfxBuffer, $hImage, 0, 0, $iWidth, $iHeight)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBmpBuffer, 0, 0)
    EndFunc ;==>_New

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

    Func _CreateImage($iW, $iH, $iAlgo1 = 0, $iAlgo2 = 0, $iAlgo3 = 0, $fRangeX = 6, $fRangeY = 6, $fXOff = 0.5, $fYOff = 0.5, $fColorOff = 0, $fVal1 = 0.3, $fVal2 = 0.01)
    Local $aResult = DllCall($ghGDIPDll, "uint", "GdipCreateBitmapFromScan0", "int", $iW, "int", $iH, "int", 0, "int", 0x0026200A, "ptr", 0, "int*", 0)
    If @error Or Not IsArray($aResult) Then Return SetError(1, 1, False)
    Local $hBitmap = $aResult[6]

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

    Local $tData = _GDIPlus_BitmapLockBits($hBitmap, 0, 0, $iW, $iH, $GDIP_ILMWRITE, $GDIP_PXF32ARGB)
    Local $iStride = DllStructGetData($tData, "Stride")
    Local $iBmpW = DllStructGetData($tData, "Width")
    Local $iBmpH = DllStructGetData($tData, "Height")
    Local $pScan0 = DllStructGetData($tData, "Scan0")

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

    Local $tComplex = DllStructCreate("double[" & $iBmpW * $iBmpH * 2 & "];")
    Local $pComplex = DllStructGetPtr($tComplex)

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

    Local $iW1 = $iW - 1
    Local $iH1 = $iH - 1
    Local $fRngX = $fRangeX / $iW1
    Local $fRngY = $fRangeY / $iH1
    $fXOff *= $iW1
    $fYOff *= $iH1

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

    Local $tVar = DllStructCreate("uint W; uint H; double RangeX; double RangeY; double XOff; double YOff;")
    DllStructSetData($tVar, "RangeX", $fRngX)
    DllStructSetData($tVar, "RangeY", $fRngY)
    DllStructSetData($tVar, "XOff", $fXOff)
    DllStructSetData($tVar, "YOff", $fYOff)

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

    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_CalcRangeValues), "ptr", $pComplex, "uint", $iW, "uint", $iH, "ptr", DllStructGetPtr($tVar))
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_CalcRangeValues", "ptr", $pComplex, "uint", $iW, "uint", $iH, "ptr", DllStructGetPtr($tVar))
    $tVar = 0

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

    Switch $iAlgo1
    Case 1
    _Algo_Sqrt($pComplex, $iBmpW * $iBmpH)
    Case 2
    _Algo_Log($pComplex, $iBmpW * $iBmpH)
    Case 3
    _Algo_Sin($pComplex, $iBmpW * $iBmpH)
    Case 4
    _Algo_Cos($pComplex, $iBmpW * $iBmpH)
    Case 5
    _Algo_Tan($pComplex, $iBmpW * $iBmpH)
    Case 6
    _Algo_Exp($pComplex, $iBmpW * $iBmpH)
    Case 7
    _Algo_Pow($pComplex, $iBmpW * $iBmpH, 2)
    EndSwitch

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

    Switch $iAlgo2
    Case 1
    _Algo_Sqrt($pComplex, $iBmpW * $iBmpH)
    Case 2
    _Algo_Log($pComplex, $iBmpW * $iBmpH)
    Case 3
    _Algo_Sin($pComplex, $iBmpW * $iBmpH)
    Case 4
    _Algo_Cos($pComplex, $iBmpW * $iBmpH)
    Case 5
    _Algo_Tan($pComplex, $iBmpW * $iBmpH)
    Case 6
    _Algo_Exp($pComplex, $iBmpW * $iBmpH)
    Case 7
    _Algo_Pow($pComplex, $iBmpW * $iBmpH, 2)
    EndSwitch

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

    Switch $iAlgo3
    Case 1
    _Algo_Sqrt($pComplex, $iBmpW * $iBmpH)
    Case 2
    _Algo_Log($pComplex, $iBmpW * $iBmpH)
    Case 3
    _Algo_Sin($pComplex, $iBmpW * $iBmpH)
    Case 4
    _Algo_Cos($pComplex, $iBmpW * $iBmpH)
    Case 5
    _Algo_Tan($pComplex, $iBmpW * $iBmpH)
    Case 6
    _Algo_Exp($pComplex, $iBmpW * $iBmpH)
    Case 7
    _Algo_Pow($pComplex, $iBmpW * $iBmpH, 2)
    EndSwitch

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

    $tVar = DllStructCreate("double Hue; double Sat; double Val; double 2PI; double Exp; double 001; double Div2; double 6; double 1; uint CW; double ColorOff;")
    DllStructSetData($tVar, "2PI", $c2PI)
    DllStructSetData($tVar, "Exp", $fVal1)
    DllStructSetData($tVar, "001", $fVal2)
    DllStructSetData($tVar, "Div2", 0.5)
    DllStructSetData($tVar, "6", 6)
    DllStructSetData($tVar, "1", 1)
    DllStructSetData($tVar, "ColorOff", Mod($fColorOff, 360) * $cDegToRad)

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

    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_Color), "ptr", $pScan0, "ptr", $pComplex, "uint", $iBmpW * $iBmpH, "ptr", DllStructGetPtr($tVar))
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_Color", "ptr", $pScan0, "ptr", $pComplex, "uint", $iBmpW * $iBmpH, "ptr", DllStructGetPtr($tVar))

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

    _GDIPlus_BitmapUnlockBits($hBitmap, $tData)

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

    Return $hBitmap
    EndFunc ;==>_CreateImage

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

    Func _Algo_Log($pComplex, $iPixel)
    Local $tVar = DllStructCreate("double PI; double 2PI;")
    DllStructSetData($tVar, "PI", $cPI)
    DllStructSetData($tVar, "2PI", $c2PI)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CLog), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar), "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CLog", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar))
    EndFunc ;==>_Algo_Log

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

    Func _Algo_Sqrt($pComplex, $iPixel)
    Local $tVar = DllStructCreate("double[4];")
    DllStructSetData($tVar, 1, 1, 1)
    DllStructSetData($tVar, 1, -1, 2)
    DllStructSetData($tVar, 1, 0.5, 3)
    DllStructSetData($tVar, 1, 0.5, 4)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CSQRT), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar), "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CSQRT", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar))
    EndFunc ;==>_Algo_Sqrt

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

    Func _Algo_Sin($pComplex, $iPixel)
    Local $tVar = DllStructCreate("double;")
    DllStructSetData($tVar, 1, 0.5)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CSin), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar), "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CSin", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar))
    EndFunc ;==>_Algo_Sin

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

    Func _Algo_Cos($pComplex, $iPixel)
    Local $tVar = DllStructCreate("double;")
    DllStructSetData($tVar, 1, 0.5)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CCos), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar), "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CCos", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar))
    EndFunc ;==>_Algo_Cos

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

    Func _Algo_Tan($pComplex, $iPixel)
    Local $iSize = $iPixel * 2 * 8
    Local $tComplex_Sin = DllStructCreate("byte[" & $iSize & "];")
    Local $tComplex_Cos = DllStructCreate("byte[" & $iSize & "];")
    Local $tComplex = DllStructCreate("byte[" & $iSize & "];", $pComplex)

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

    Local $bData = DllStructGetData($tComplex, 1)
    DllStructSetData($tComplex_Sin, 1, $bData)
    DllStructSetData($tComplex_Cos, 1, $bData)

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

    _Algo_Sin(DllStructGetPtr($tComplex_Sin), $iPixel)
    _Algo_Cos(DllStructGetPtr($tComplex_Cos), $iPixel)

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

    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CTan), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tComplex_Sin), "ptr", DllStructGetPtr($tComplex_Cos))
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CTan", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tComplex_Sin), "ptr", DllStructGetPtr($tComplex_Cos))
    EndFunc ;==>_Algo_Tan

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

    Func _Algo_Exp($pComplex, $iPixel)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CExp), "ptr", $pComplex, "uint", $iPixel, "int", 0, "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CExp", "ptr", $pComplex, "uint", $iPixel)
    EndFunc ;==>_Algo_Exp

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

    Func _Algo_Pow($pComplex, $iPixel, $fExp)
    _Algo_Log($pComplex, $iPixel)
    Local $tVar = DllStructCreate("double[2];")
    DllStructSetData($tVar, 1, $fExp, 1)
    DllStructSetData($tVar, 1, $fExp, 2)
    DllCall("user32.dll", "none", "CallWindowProcW", "ptr", DllStructGetPtr($t_ASM_Calc_CPow), "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar), "int", 0)
    ;$_ASSEMBLEIT_FLAG = 0
    ;_AssembleIt("none", "_ASM_Calc_CPow", "ptr", $pComplex, "uint", $iPixel, "ptr", DllStructGetPtr($tVar))
    _Algo_Exp($pComplex, $iPixel)
    EndFunc ;==>_Algo_Pow

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

    Func WM_PAINT($hWnd, $uMsgm, $wParam, $lParam)
    _GDIPlus_GraphicsDrawImage($hGraphics, $hBmpBuffer, 0, 0)
    Return $GUI_RUNDEFMSG
    EndFunc ;==>WM_PAINT

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

    Func _Exit()
    _GDIPlus_BitmapDispose($hImage)
    _GDIPlus_GraphicsDispose($hGfxBuffer)
    _GDIPlus_BitmapDispose($hBmpBuffer)
    _GDIPlus_GraphicsDispose($hGraphics)
    _GDIPlus_Shutdown()
    Exit
    EndFunc ;==>_Exit

    [/autoit]


    Edit: Das ganze noch als fertig kompilierter Screensaver, "rechtsklick->installieren" und fertig :love:

    Dateien

    Magic_Colour.zip 406,87 kB – 320 Downloads
  • WARNUNG! Alle Battlefield 3 Spieler: LESEN!

    • General Kaboom
    • 20. Dezember 2012 um 19:12

    Hmm...zum Glück zocke ich 1. kein Battlefield im Moment und 2. auf meinem Gamer-PC keine Lust auf AutoIt

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 19. Dezember 2012 um 11:44

    Update: die Abgabefrist wurde wie versprochen auf den 31. Dezember verlängert, da anscheinend sonst niemand fertig wird (ausserdem habe ich die Preise noch nicht bekommen). Ich hoffe, das motiviert einige Personen doch noch teilzunehmen ;)

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 18. Dezember 2012 um 14:27

    Naja, sieht nicht so aus, als ob viele im Moment Zeit hätten. Ich verlängere in diesem Fall mal auf den 1. Januar, vieleicht kann sich doch noch jemand durchringen weniger zu feiern ;)

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 18. Dezember 2012 um 11:19
    Zitat von Mars

    Ich hab nix^^
    Meine Idee würde in einem 2k-Zeilen Skript enden. Und da ich zurzeit lieber jeden Abend einen hebe und mich auf Weihnachten & Silvester freue habe ich keine Zeit dafür.
    Zu viel Party zum Programmieren. Freunde gehen nunmal vor.

    Das kann ich nachvollziehen, ich hoste die Challenge nur, Zeit zum Programmieren selbst hätte ich auch keine.
    Acer eigentlich war die Frage ja: "Hat jemand WAS" nicht "Hat jemand NICHTS" :D

  • Weihnachtsscripting-Challenge

    • General Kaboom
    • 18. Dezember 2012 um 07:31

    So ich frag mal wieder nach dem Zwischenstand...hat jemand bereits etwas abzugeben?

  • Survial - Dokumentation mit AutoIt erstellen

    • General Kaboom
    • 17. Dezember 2012 um 11:42

    Er hat ja bereits gesagt, dass es kein "Spiel" wird.
    Eher sowas wie das "Schlaue Buch" vieleicht, so eine Art Survival-Lexikon

  • Survial - Dokumentation mit AutoIt erstellen

    • General Kaboom
    • 17. Dezember 2012 um 10:05

    Naja...das Thema "Survival" ist nicht so mein Ding. Dazu kommt, das wir diese Woche doch sowieso alle sterben ;)
    Was deine Idee betrifft junge Leute dafür zu begeistern bin ich erfreut das du es versuchst, aber ich erwarte keine grosse Begeisterung der Jugend dafür.
    Ich persönlich bin 18, habe also noch sehr viel kontakt zum Jüngeren Semester und es schockiert mich teilweise, wie wenig die über die Natur wissen.
    Bei uns wurde noch gelehrt "Das ist eine Buche, das eine Eiche...blablabla", heute heisst es nur noch "Jo checkers das ist...BAUM! Und das...Blume. Und das PILZ...nein Susi das sind keine Magic Mushrooms lass die Finger davon!"
    Die Idee ist gut, aber man müsste die schon dazu zwingen das Programm zu benutzen, freiwillig würden die doch nie was lernen :rolleyes:

  • Gurkenbier stellt sich einmal kurz vor...

    • General Kaboom
    • 17. Dezember 2012 um 09:39

    [Blockierte Grafik: http://www.katzenjens.de/moi.jpg]
    WÜRG!!! :rofl:

  • Gurkenbier stellt sich einmal kurz vor...

    • General Kaboom
    • 17. Dezember 2012 um 09:04

    Gott sei Dank hat sich das nicht durchgesetzt!
    Alleine schon beim Gedanken an die Flaschenform fallen mir viele Personen ein, die da auf dumme Gedanken kommen könnten (naja die kommen schon bei Eisteeflaschen auf dumme Gedanken, wirklich wahr) ;)
    Klingt auch mehr nach ner Salatsauce als nach was zu trinken :D

  • Musik Player

    • General Kaboom
    • 17. Dezember 2012 um 08:57

    ^^ hab ich s mir doch gedacht, dass das die ID3-Tags sind. War mir nur dann doch nicht mehr so sicher ;)
    Aber das Cover geht dann vermutlich nicht. Soweit ich weiss müsste man dieses dann sepparat herunterladen, oder?

  • Musik Player

    • General Kaboom
    • 16. Dezember 2012 um 02:54

    Hallo Inferno

    Was hast du denn bis jetzt schon? Poste doch mal den Code, den du bis jetzt hast ;)
    Für die Titelinformationen, müssen bei der gewünschten Datei natürlich noch irgendwie solche Informationen vorhanden sein.

    C U

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™