kann einer vlt ein link posten wo die farb codes sind
und auch mit spezialeffekten falls das möglich ist??
danke
Farben
-
- [ gelöst ]
-
crocojunk -
22. März 2010 um 14:59 -
Geschlossen -
Erledigt
-
-
Hier die Spezialeffekte:
http://www.youtube.com/results?search_query=special+effects&search_type=&aq=1Hier die Farbcodes:
http://tinyurl.com/yhcudp9oder hier:
[LINK ENTFERNT]Edit GtaSpider: Wie oft sollen wir das noch sagen? Keine Links zu diesem Forum, die haben hier nichts zu suchen! --> 1. Verwarnung
//EDIT SEuBo: Himmel Hergott nochmal... man wird doch wohl noch n ***** script posten dürfe, dass einem nen Farbcode ausgibt...Spoiler anzeigen
[autoit]#include <Misc.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $iMode = 1, $R, $G, $B#region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$hGUI = GUICreate("Farbauswahl", 511, 177, 192, 124)
$cLbl_R = GUICtrlCreateLabel("R (0)", 160, 20, 36, 17)
$cLbl_G = GUICtrlCreateLabel("G (0)", 160, 50, 36, 17)
$cLbl_B = GUICtrlCreateLabel("B (0)", 160, 80, 36, 17)
$cGra_Col = GUICtrlCreateGraphic(8, 8, 145, 161)
GUICtrlSetBkColor(-1, 0)
$cSld_R = GUICtrlCreateSlider(210, 8, 281, 33)
$cSld_G = GUICtrlCreateSlider(210, 43, 281, 33)
$cSld_B = GUICtrlCreateSlider(210, 79, 281, 33)
;~ $cBtn_Pick = GUICtrlCreateButton("Pick", 432, 136, 33, 33)
$cBtn_Choose = GUICtrlCreateButton("Choose", 352, 136, 65, 33)
$cInp_Col = GUICtrlCreateInput("0x000000", 160, 144, 161, 21)
$cRad_Hex = GUICtrlCreateRadio("Hex", 160, 112, 65, 25)
GUICtrlSetState(-1, $GUI_CHECKED)
$cRad_Dec = GUICtrlCreateRadio("Dec", 230, 112, 81, 25)GUIRegisterMsg($WM_HSCROLL, "_Slider")
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $cRad_Dec, $cRad_Hex
If GUICtrlRead($cRad_Dec) = 1 Then $iMode = 0
If GUICtrlRead($cRad_Hex) = 1 Then $iMode = 1
_Slider()
Case $cBtn_Choose
$nColor = _ChooseColor(2, 0, 0, $hGUI)
If Not @error Then
_SliderWrapper($nColor)
EndIf
;~ Case $cBtn_Pick
EndSwitch
WEndFunc _SliderWrapper($nColor)
[/autoit] [autoit][/autoit] [autoit]
GUICtrlSetData($cSld_R, BitAND(BitShift($nColor, 16) / 2.55, 0xFF))
GUICtrlSetData($cSld_G, BitAND(BitShift($nColor,
/ 2.55, 0xFF))
GUICtrlSetData($cSld_B, BitAND($nColor, 0xFF) / 2.55)
_Slider()
EndFunc ;==>_SliderWrapperFunc _Slider()
[/autoit]
Global $R = Round(GUICtrlRead($cSld_R) * 2.55), $G = Round(GUICtrlRead($cSld_G) * 2.55), $B = Round(GUICtrlRead($cSld_B) * 2.55)
GUICtrlSetData($cLbl_R, "R (" & $R & ")")
GUICtrlSetData($cLbl_G, "G (" & $G & ")")
GUICtrlSetData($cLbl_B, "B (" & $B & ")")
Local $nCol = BitShift(BitShift(BitShift(0, -8) + $R, -8) + $G, -8) + $B
If $iMode = 0 Then GUICtrlSetData($cInp_Col, Floor($nCol))
If $iMode = 1 Then GUICtrlSetData($cInp_Col, '0x' & Hex($nCol, 6))
GUICtrlSetBkColor($cGra_Col, $nCol)
EndFunc ;==>_Slider -
meinst du HEX-codes?
-
eine sache das mit dem zweiten link das war geil xD
und ich meinte mit spezial effekten so blitze als disign.
-
Dsa mit SEuBo's Verwarnung versteh ich auch nicht. Wenn die Leute merken, dass sie
hier keine Unterstützung für Bots kriegen, werden sie ja wohl so schlau sein und bei Google
"Autoit" und "Bot" eingeben können, dann kommt man auch auf diese Seiten ~.~
Edit GtaSpider: Exakt, aber wir werden diese Seite auf keinen Fall auf irgendeine Weise unterstützen, sei es nur mit Links zu Bot Foren jeglicher Art. Wir haben SeuBo schon oft genug mündlich Verwarnt... -
geht das denn überhaupt mit blitzen und so oder nur einfarbig??
geht das jetzt oder nicht??
-
ähmm ja also ich weiß nicht ich kenn mich nicht damit aus
kann mir das einer mal erklären
geht das jetzt mit den spicial disign
-
Hast du alle für die beantwortung deiner Frage relevanten Informationen aus deinem 1. Post gelöscht? Kannst du mir mal sagen was du mit Spezialeffekten meinst? Unter Blitzen kann ich mir nämlich einiges vorstellen.
