logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Jak przesuwać grafikę w Bascom z góry na dół bez wielu rysunków?

maniio 12 Gru 2005 01:43 1413 3
REKLAMA
  • #1 2075881
    maniio
    Poziom 14  
    Posty: 149
    Pomógł: 3
    Ocena: 9
    Witam mam cos takiego:

    http://www.wszeit.prv.pl/pliki/002.jpg

    i chcialem to przesowac powiedzmy z gory na dol....

    wiem ze mozna zrobic 64 rysunki i dac opozninia, ale moze zacie jakies inne pomysly :)
  • REKLAMA
  • #2 2075906
    elektryk
    Poziom 42  
    Posty: 11029
    Pomógł: 439
    Ocena: 240
    Jeden mały rysunek w pamięci, przed wyświetleniem kasować ekran wyświetlacza i wysyłać rysunek od określonego adresu (zmiennego).
  • REKLAMA
  • #3 2075967
    crazy_phisic
    VIP Zasłużony dla elektroda
    Posty: 2244
    Pomógł: 278
    Ocena: 130
    Przeciez w bascomie aby umieścić grafikę musisz podać współrzędną x i y. wystarczy teraz tak jak napisał elektryk w petli zmieniać jedną z nich, nawet nie bedzie trzeba kasowac ekranu jeśli rysunek ma "kontur".

    Pozdrawiam
  • #4 2076761
    maniio
    Poziom 14  
    Posty: 149
    Pomógł: 3
    Ocena: 9
    zrobilem jak pisaliscie, ale mam problem:

    jak "wczytuje" rysunek)powoli mi sie pojawia na wyswietlaczu, to migaja glupoty w "drugiej" czesci wyswietlacza(tak jakby przemiatał mi ten rysunek tylko w tej czesci) a to co chce pojawia sie niby ok, gdy dojdzie do kolumny 64, to znikaja te smieci, ale rysunek ktory wklejam jest w polowie obnizony o jeden rzad w czesci C2 wyswietlacza

    program wyglada tak:
    Cytat:
    $lib "glcdks108.lbx"
    $crystal = 16000000
    $regfile = "m32def.dat"

    Config Graphlcd = 128 * 64sed , Dataport = Portb , Controlport = Portd , Ce = 3 , Ce2 = 2 , Cd = 0 , Rd = 4 , Reset = 5 , Enable = 1
    Dim X As Integer

    Cls
    For X = -128 To 0
    Showpic X , 0 , Ford_logo
    Waitms 20
    Next

    Waitms 2000
    Cls
    Showpic 20 , 0 , Temp_zew

    End
    Ford_logo:
    $bgf "ford_logo.bgf"
    Temp_zew:
    $bgf "temp_zew.bgf"

    PS. mam nadzieje ze dobrze wytłumaczylem :)
REKLAMA