Ich möchte mal eure Kreativität sehen 
Das ist kein Wettbewerb, eher eine kleine Sammlung. Erstellt ein schönes Bild mit Bezug zu AutoIt (auch wenns nur das Logo ist).
Ich gehe da mal mit guten Beispiel voran:
[Blockierte Grafik: http://i40.img-up.net/mug6669.png]
Und hier ist ein Wallpaper (das AutoItlogo als Grafitti) Achtung 6MB. Am besten gleich Speichern:
http://u68i.img-up.net/grafittif96e.png?l=de
Lets have fun!
moin moin,
für Tasse oder T-Shirt
Meinst du so was in der Art ?
Edit: Hast nicht angegeben ob du eine bestimmte Größe haben möchtest.
oh-ha
Hier mal was von mir:
[Blockierte Grafik: http://hegi.tk/public/autoit/Linien.jpg]
Edit: Hier nochmal ein Motiv in 3 unterschiedlichen Varianten:
[Blockierte Grafik: http://hegi.tk/public/autoit/Leuchten.jpg]
[Blockierte Grafik: http://hegi.tk/public/autoit/Leuchten2.jpg]
[Blockierte Grafik: http://hegi.tk/public/autoit/Leuchten3.jpg]
Will ich auch mal meinen (bescheidenen) Beitrag dazu leisten:
[Blockierte Grafik: http://sninfando.magix.net/public/AutoIt.de_Header.png]
Habe ich ja schon in der SB gezeigt, aber hier nochmal für alle. 
Das sieht im Vergleich zu den anderen Bildern natürlich langweilig aus.
Allerdings hat meines eine 'tiefere Bedeutung', wenn man so will.
Dieses Bild wurde mit AutoIt & GDI+ erzeugt. 
Ich erspare mir jetzt jede weitere Erklärung: Das Skript sagt alles. 
#include <Array.au3>
#include <GDIPlus.au3>
#include <GDIP.au3>
$iCellSize = InputBox("", "Cellsize (px):")
[/autoit] [autoit][/autoit] [autoit]$sInput = InputBox("", "String to encode:")
$aInput = StringSplit($sInput, "")
Dim $aBinary[$aInput[0]]
For $i = 1 To $aInput[0]
$aBinary[$i - 1] = _FillWithZeros(_TranslateBase(Asc($aInput[$i]), 10, 2))
Next
_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$iBorder = 0.075 ;$iCellSize * $iBorder = Randdicke
[/autoit] [autoit][/autoit] [autoit]$hBrushTrue = _GDIPlus_LineBrushCreate(0, 0, $iCellSize * (1 - 2 * $iBorder), $iCellSize * (1 - 2 * $iBorder), 0xFF0000BB, 0xFF0000FF, 3)
$hBrushFalse = _GDIPlus_LineBrushCreate(0, 0, $iCellSize * (1 - 2 * $iBorder), $iCellSize * (1 - 2 * $iBorder), 0xFF000077, 0xFF0000BB, 3)
$hGUI = GUICreate("Binary", $iCellSize * 8, $iCellSize * $aInput[0])
GUISetState()
$hGraphics = _GDIPlus_GraphicsCreateFromHWND($hGUI)
$hBitmap = _GDIPlus_BitmapCreateFromGraphics($iCellSize * 8, $iCellSize * $aInput[0], $hGraphics)
$hBuffer = _GDIPlus_ImageGetGraphicsContext($hBitmap)
_GDIPlus_GraphicsFillRect($hBuffer, 0, 0, $iCellSize * 8, $iCellSize * $aInput[0])
[/autoit] [autoit][/autoit] [autoit]For $iY = 1 To $aInput[0]
$aActualLine = StringSplit($aBinary[$iY - 1], "")
For $iX = 1 To 8
If $aActualLine[$iX] = "1" Then
$hBrush = $hBrushTrue
Else
$hBrush = $hBrushFalse
EndIf
_GDIPlus_GraphicsFillRoundRect($hBuffer, (($iX - 1) * $iCellSize) + $iCellSize * $iBorder, (($iY - 1) * $iCellSize) + $iCellSize * $iBorder, $iCellSize * (1 - 2 * $iBorder), $iCellSize * (1 - 2 * $iBorder), 30, $hBrush)
Next
Next
_GDIPlus_GraphicsDrawImageRect($hGraphics, $hBitmap, 0, 0, $iCellSize * 8, $iCellSize * $aInput[0])
[/autoit] [autoit][/autoit] [autoit]While True
$iMsg = GUIGetMsg()
If $iMsg = -3 Then
_GDIP_Exit()
Exit
EndIf
WEnd
Func _TranslateBase($sNumber, $iOldBase = 10, $iNewBase = 2)
;by eukalyptus
If $iOldBase < 2 Or $iOldBase > 128 Or $iNewBase < 2 Or $iNewBase > 128 Then Return SetError(1, 1, False)
Local $iNum, $aRes, $tChr = DllStructCreate("char[64];")
If $iOldBase <> 10 Then
$aRes = DllCall("msvcrt.dll", "uint64:cdecl", "_strtoui64", "str", $sNumber, "ptr", 0, "int", $iOldBase)
If @error Then Return SetError(1, 2, False)
$iNum = $aRes[0]
Else
$iNum = Int($sNumber)
EndIf
$aRes = DllCall("msvcrt.dll", "ptr:cdecl", "_i64toa", "int64", $iNum, "ptr", DllStructGetPtr($tChr), "int", $iNewBase)
If @error Then Return SetError(1, 3, False)
Return DllStructGetData($tChr, 1)
EndFunc ;==>_TranslateBase
Func _FillWithZeros($bValue)
;chesstiger
$bReturn = $bValue
For $i = 1 To 8 - StringLen($bValue)
$bReturn = 0 & $bReturn
Next
Return $bReturn
EndFunc ;==>_FillWithZeros
Func _GDIP_Exit()
$sName = InputBox("", "Filename:")
If @error <> 1 Then _GDIPlus_ImageSaveToFile($hBitmap, $sName)
_GDIPlus_ImageDispose($hBitmap)
_GDIPlus_BrushDispose($hBrushTrue)
_GDIPlus_BrushDispose($hBrushFalse)
_GDIPlus_GraphicsDispose($hGraphics)
_GDIPlus_Shutdown()
EndFunc ;==>_GDIP_Exit
Func _GDIPlus_GraphicsFillRoundRect($hGraphics, $iX, $iY, $iWidth, $iHeight, $iRadius = 30, $hBrush = 0)
;TheShadowAE / CreativeName: erstellt
Local $hPath = _GDIPlus_PathCreate(1)
_GDIPlus_PathAddPie($hPath, $iX, $iY, $iRadius, $iRadius, 180, 90)
_GDIPlus_PathAddPie($hPath, $iX + $iWidth - $iRadius, $iY, $iRadius, $iRadius, 270, 90)
_GDIPlus_PathAddPie($hPath, $iX + $iWidth - $iRadius, $iY + $iHeight - $iRadius, $iRadius, $iRadius, 0, 90)
_GDIPlus_PathAddPie($hPath, $iX, $iY + $iHeight - $iRadius, $iRadius, $iRadius, 90, 90)
_GDIPlus_PathAddRectangle($hPath, $iX, $iY + $iRadius / 2, $iWidth, $iHeight - $iRadius)
_GDIPlus_PathAddRectangle($hPath, $iX + $iRadius / 2, $iY, $iWidth - $iRadius, $iHeight)
_GDIPlus_PathCloseFigure($hPath)
_GDIPlus_GraphicsFillPath($hGraphics, $hPath, $hBrush)
_GDIPlus_PathDispose($hPath)
EndFunc ;==>_GDIPlus_GraphicsFillRoundRect
lg, chess
Meine 2 Bilder
[Blockierte Grafik: http://epvp.devsome.com/au3/Au3_1.png]
[Blockierte Grafik: http://epvp.devsome.com/au3/Au3_2.png]
Ich hab es auch mal schnell versucht:
Ich hab es auch mal schnell versucht:
Schön clean, gefällt mir bis jetzt am besten 
