Kann mir jamand zwei Grafiken überarbeiten!
Übersicht

sven123Betreff: Kann mir jamand zwei Grafiken überarbeiten! |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Nun ich arbeite nur mit Paint und ich bin auch kein guter Grafiker.Ich hätte hier zwei Bilder diese sollen einen einheitlich schwarzen Hintergrund bekommen weil ja sonst die Transparenz unter BB nicht so richtig funtzt.
http://home.arcor.de/sven12345678910/Komet.bmp http://home.arcor.de/sven12345678910/Raumer2a.bmp |
||
Amd Athlon 2200+,Saphire Atlantis Radeon9800pro,1024 MB DDR RAm,40 Gb Festblatte.
'in shâ'a llâh=so Gott will Fertiges Projekt:Invasion der Heuschrecken |
MaGus |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Ich hatte vor relativ langer Zeit das gleiche Problem, dass Bilder nicht mit völlig gleichfarbigem Hintergrund gespeichert wurden. Hab mir dann eine kleine Funktion geschrieben, die alle Pixel mit r<10, g<10 und b<10, also annähernd schwarz, auf völlig schwarz setzt.
Code: [AUSKLAPPEN] Graphics 1024,768,32
img=LoadImage(" ") ;<<da den Dateinamen vom entsprechenden Bild angeben weite=ImageWidth(img) hoehe=ImageHeight(img) SetBuffer ImageBuffer(img) For z=0 To weite For y=0 To hoehe rgb=ReadPixel(z,y) a=(rgb And $FF000000)/$1000000 r=(rgb And $FF0000)/$10000 g=(rgb And $FF00)/$100 b=rgb And $FF If r<10 ;Möglicherweise diese 3 Werte erhöhen, falls das gewünschte Ergebnis nicht erzielt wird If g<10 ;"" If b<10 ;"" rgb=a*$1000000 + 255*$10000 + 0*$100 + 255 WritePixel(z,y,rgb) EndIf EndIf EndIf Next Next SaveImage(img," .bmp") ;<<Da den Dateinamen vom bearbeiteten Bild Du musst nur noch die kommentierten Stellen entsprechend ändern, sollte dann funktionieren |
||
sven123 |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Danke | ||
Amd Athlon 2200+,Saphire Atlantis Radeon9800pro,1024 MB DDR RAm,40 Gb Festblatte.
'in shâ'a llâh=so Gott will Fertiges Projekt:Invasion der Heuschrecken |
sven123 |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Funtzt aber net so ganz! | ||
Amd Athlon 2200+,Saphire Atlantis Radeon9800pro,1024 MB DDR RAm,40 Gb Festblatte.
'in shâ'a llâh=so Gott will Fertiges Projekt:Invasion der Heuschrecken |
MaGus |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
oh, sry, das war noch so eingestellt das der Background pink wird, außerdem war die Empfindlichkeit für deine Bilder zu niedrig. probier das, falls es noch nicht ganz funktioniert experiementier mit den 3 Farbwerten rum(Siehe Kommentar), sollte aber gehen, habs mit dem Komet getestet.
[Edit:]Beim Raumer musst du die 3 Werte niedriger stellen, ca 60, sonst wird der Graue Teil entfernt. Code: [AUSKLAPPEN] Graphics 1024,768,32
img=LoadImage("komet.bmp") ;<<da den Dateinamen vom entsprechenden Bild angeben weite=ImageWidth(img) hoehe=ImageHeight(img) SetBuffer ImageBuffer(img) For z=0 To weite For y=0 To hoehe rgb=ReadPixel(z,y) a=(rgb And $FF000000)/$1000000 r=(rgb And $FF0000)/$10000 g=(rgb And $FF00)/$100 b=rgb And $FF If r<110 ;Möglicherweise diese 3 Werte erhöhen, falls das gewünschte Ergebnis nicht erzielt wird If g<110 ;"" If b<110 ;"" rgb=a*$1000000 + 0*$10000 + 0*$100 + 0 WritePixel(z,y,rgb) EndIf EndIf EndIf Next Next SaveImage(img,"komet2.bmp") ;<<Da den Dateinamen vom bearbeiteten Bild |
||
sven123 |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
Ich hätte hier noch eine Grafik und ich schaffe es nicht ihr einen Schwartzen Hintergrund zu Verpassen ohne die Grafik zu beschätigen!
![]() könntet ihr das vieleich für mich Erldigen. MFG euer Sven123 |
||
Amd Athlon 2200+,Saphire Atlantis Radeon9800pro,1024 MB DDR RAm,40 Gb Festblatte.
'in shâ'a llâh=so Gott will Fertiges Projekt:Invasion der Heuschrecken |
NetPad |
![]() Antworten mit Zitat ![]() |
|
---|---|---|
hab das mal im paint gemacht...
http://www.patrikhadorn.ch.vu/...chiffe.bmp ich glaube das war mal komprimiert und daher sind die farben ein bischen ineinander "verloffen".... |
||
Übersicht


Powered by phpBB © 2001 - 2006, phpBB Group