Elikkä jos joku osaa sanoa, millä ohjelmalla ja miten voisin tehdä johonkin esim. tekstiin peilikuvan tähän tyyliin:
Peilikuva
Re: Peilikuva
Millä? Mihin?Walty wrote:Elikkä jos joku osaa sanoa, millä ohjelmalla ja miten voisin tehdä johonkin esim. tekstiin peilikuvan tähän tyyliin:
Re: Peilikuva
Peilikuvan saa tehtyä niin helposti millä tahansa ohjelmalla että käännät vain kuvan ylösalaisin kun olet skaalaamassa sitä.
Re: Peilikuva
Nyt kun kuitenkin ollaan CoolBasic foorumeilla niin täytyy ehdottaa CoolBasicin käyttöä esimerkiksi seuraavan koodin avustuksella:
Code: Select all
img = MakeImage(400,150)
mirrorimg = MakeImage(400,150)
f=LoadFont("impact",180)
//luodaan alkuperäinen kuva
DrawToImage img
For i=0 To 149
Color i*1.5,106+i,255
Line 0,i,400,i
Next i
SetFont f
Color 0,80,255
Text 5,15,"LOREM"
DrawToScreen
//tässä tapahtuu kuvan kääntäminen
DrawToImage mirrorimg
//piirretään sininen pohja
Box 0,0,400,150,1
//käydään alkuperäisen kuvan pikselit läpi
For x=0 To 400
For y=0 To 149
//etitään kuvasta tekstinvärisiä pikseleitä
PickImageColor img,x,y
If getRGB(RED)=0 And getRGB(GREEN)=80 And getRGB(BLUE)=255 Then
//piirretään ne valkoisina ja kääntäen pystysuunnassa
Color cbwhite
Dot x,149-y
EndIf
Next y
Next x
DrawToScreen
Repeat
DrawImage img,0,0
DrawImage mirrorimg,0,150
DrawScreen
Forever
-
- Forum Veteran
- Posts: 2396
- Joined: Tue Aug 28, 2007 4:20 pm
Re: Peilikuva
Jos taustan ei tarvitse muuttua, ehdotan moninkertaisesti nopeampaa tapaa:
Code: Select all
mirrorimg = CloneImage(img)
ResizeImage mirrorimg,ImageWidth(img),-ImageHeight(img)
Re: Peilikuva
Itse tein peilikuvan Paintilla tähän tapaan:
-Ensiksi rajaat kuvan valintatyökalulla.
-Sitten kopioit kuvan alkuperäisen alapuolelle.
-Sen jälkeen valitset käännä tai kierrä -kohdasta "käännä pystysuunnassa" -toiminto.
Ja nyt saat aikaan peilatun kuvan.
-Ensiksi rajaat kuvan valintatyökalulla.
-Sitten kopioit kuvan alkuperäisen alapuolelle.
-Sen jälkeen valitset käännä tai kierrä -kohdasta "käännä pystysuunnassa" -toiminto.
Ja nyt saat aikaan peilatun kuvan.
Re: Peilikuva
Paintilla:
Valitse alue(rajaustyökalu) -> Control C(kopioit kohdan) -> Control V(Liitä kohta kopiointikohdan alapuolelle) -> Control + R -> valitse käännä pystysuunnassa -> Hienosäädä liitetyn kuvan paikkaa.
Valitse alue(rajaustyökalu) -> Control C(kopioit kohdan) -> Control V(Liitä kohta kopiointikohdan alapuolelle) -> Control + R -> valitse käännä pystysuunnassa -> Hienosäädä liitetyn kuvan paikkaa.
Solar Eclipse
We're in a simulation, and God is trying to debug us.