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

Przycisk przerzutnik jak najlepiej zrealizowac?

kobi 31 Mar 2009 13:40 1799 14
REKLAMA
  • #1 6357494
    kobi
    Poziom 22  
    Witam
    Jak najlepiej zrobić aby za pomocą jednego przycisku przeskakiwać miedzy kilkoma zakładkami? Powiedzmy na jednej zakładce jest realizowany pomiar temp. i wyświetlanie go na LCD na drugiej regulacja wentylatora a na 3 coś tam jeszcze.
  • REKLAMA
  • #3 6357545
    kobi
    Poziom 22  
    Tak w ogole to chodzi o bascoma. I dac sie dalo ale nie dziala mi to jak powinno :/
  • REKLAMA
  • #5 6357565
    mirekk36
    Poziom 42  
    tak w ogóle .....

    kobi napisał:
    Tak wogule to chodzi o bascoma. I dac sie dalo ale nie dziala mi to jak powinno :/


    .... to kolega sam wie o co mu chodzi ???? czy może nastąpił nieoczekiwany przerost formy nad treścią - a program zaczął żyć własnym życiem gdyż przekroczona została ilość IF'ów ????

    .... skoro dać się dało - to jak to może być ???? , że nie działa jak powinno. Przyznam, że mnie też zaczyna przerastać ten twój problem .... ale może jak coś więcej napiszesz to uda się wspólnymi siłami coś pokombinować.
  • REKLAMA
  • #6 6357596
    dawid512
    Poziom 32  
    Cytat:
    Powiecmy na jednej zakladce jest realizowany pomiar temp. i wyswietlanie go na LCD na drugiej regulacja wentylatora a na 3 cos tam jeszcze.


    Powiedzmy że są podprogramy :]
  • #7 6357717
    wader_669
    Poziom 28  
    
    dim i as byte
    
    do
    if s1=0 then
    waitms 45
    bitwait s1, set
    
    incr i
    
    end if
    
    select case i
    case 0: call temperatura
    case 1: call Wentylator
    .....
    ....
    end select
    
    loop
    end
    


    Dodano po 2 [minuty]:

    Ja z kolegi ortografi nie bede sie nabijal, poniewaz sam mam z tym problemy :P (za to tez posiadam odpowiednie papiery na moje dysmozgowie, wiadomo w zadnym stopniu mnie to nie zwalnia)
  • #8 6358105
    jankolo
    Spoczywaj w Pokoju
    kobi, proszę niezwłocznie poprawic błędy w postach.
  • REKLAMA
  • #9 6360896
    kobi
    Poziom 22  
    kod:
    
    $regfile = "m16def.dat"
    $crystal = 14745600
    
    $lib "glcdKS108.lbx"
    Config Porta = Output
    Config 1wire = Portc.1
    Config Graphlcd = 128 * 64sed , Dataport = Porta , Controlport = Portc , Ce = 3 , Ce2 = 4 , Cd = 7 , Rd = 6 , Reset = 2 , Enable = 5
    Setfont Font8x8
    Config Pind.5 = Output
    Config Pind.1 = Input
    
    
    
    
    
    
    Dim Adrs(16) As Byte
    Dim T As Integer , X As Byte
    Dim T1 As Single
    Dim A As Byte
    Declare Sub Pomiar_temp
    Declare Sub Zakladka
    Showpic 0 , 0 , Ford
    Wait 1
    
    A = 0
    
    Do
    Call Zakladka
    Loop
    
    
    End
    
    'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx zakladka pomiaru temp
    Sub Zakladka
    
         Do
    
              If A = 4 Then
                 A = 0
                 End If
                 Incr A
             Select Case A
    
                Case 1:
                 Showpic 0 , 0 , Temp
    
                 Do
                 X = 1
                 Adrs(x) = 1wsearchfirst()
                 X = 9
                 Adrs(x) = 1wsearchnext()
    
    
    
                  X.3 = 0
    
                  Call Pomiar_temp
                 Lcdat 2 , 64 , T1 ; "oC"
                 X.3 = 1
                 Call Pomiar_temp
                 Lcdat 7 , 30 , T1 ; "oC"
    
    
                 Debounce Pind.1 , 0 , Zakladka
                 Loop
                Return
    
                Case 2:
                Cls
                Lcdat 2 , 32 , "Zakladka "
                Lcdat 3 , 32 , "w"
                Lcdat 4 , 32 , "budowie" ; A
    
                Do
                Showpic 5 , 5 , Climagar1
                Waitms 100
    
                Showpic 5 , 5 , Climagar2
                Waitms 100
    
                Debounce Pind.1 , 0 , Zakladka
    
                Loop
                Return
                Case 3:
                Cls
                Do
                Debounce Pind.1 , 0 , Zakladka
                Lcdat 2 , 1 , "Zakladka "
                Lcdat 3 , 1 , "w"
                Lcdat 4 , 1 , "budowie" ; A
                Waitms 200
                Loop
                Return
    
             End Select
           Loop
    End Sub
    
    Sub Pomiar_temp
    
       1wreset
       1wwrite &H55
       1wwrite Adrs(x) , 8
       1wwrite &H44
       Waitms 750
       1wreset
       1wwrite &H55
       1wwrite Adrs(x) , 8
       1wwrite &HBE
    
       T = 1wread(2)
       Shift T , Right , 3
       If T.12 = 1 Then
       T = T Or &B1110000000000000
       End If
       T1 = T
       Shift T1 , Right , 1
    
      End Sub
    
    
    
    
    
     'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
    Climagar1:
    $bgf "climagar1.bgf"
    Climagar2:
    $bgf "climagar2.bgf"
    Temp:
    $bgf "temp.bgf"
    Ford:
     $bgf "ford.bgf"
    $include "font8x8.font"
    


    Zrobiłem to w podobny sposób Tyle ze mi chodzi a to aby program po wybraniu zakładki ciągle wykonywał daną operacje która jest w zakładce aż do naciśnięcia przycisku i przeskoczenia do następnej zakładki Ja to wrzuciłem do Do Loop i teraz mam problem z wyjściem z tej pętli Wrzuciłem tam funkcje Debounce jednak szybkość przejścia do następnej zakładki jest uzależniona od opóźnień i długości kodu w zakładce (np pomiar temp wymagane opużnienie 750ms)
  • #10 6360986
    mirekk36
    Poziom 42  
    kobi - nie ważne ile masz lat ... nie ważne czy masz dysortografię, dysleksję czy inne czort wie co ... (kiedyś to się nazywało zwykłe lenistwo do nauki) ....

    ale jak się czyta twoje posty i takie wyrazy jak:

    kobi napisał:
    ... wzucilem do ......... Wżuciłem tam funkcje Debounce ....... jednak szybkość przejscie ......... ....... od opuźnień ..... ........wymagane opużnienie


    wzuciłem , Wżuciłem , opuźnień , opnienie

    to przepraszam ale aż się wymiotować chce.

    poza tym niby udajesz że nie korzystasz z polskich ogonków bo prawie w całym tekście ich nie wstawiasz , aż tu nagle pod koniec proszę - jednak masz te ogonki w kompie i na klawiaturze bo przecież piszesz:

    Wżuciłem czy szybkość


    kolejna sprawa to - w całym tekście, który powyżej napisałeś nie użyłeś ani jednej kropki oraz/i ani jednego przecinka !!! (masakra do czytania i zrozumienia tego co chciałbyś przekazać innym)

    o tym, że kodu nie umieściłeś w znacznikach to już nie wspomnę , bo to mały pikuś przy twoim "mega - błędziarstwie"

    (i wcale się nie czepiam, bo czasem sam zapewne zrobię jakiś błąd, czasem gdzieś mi się wymknie i nie wstawię polskiego ogonka do literki. A jak ktoś mi zwróci uwagę to staram się szybko to poprawić. A ty ??? - olewasz tu wszystko i wszystkich. Pomimo próśb takich jak :
    jankolo napisał:

    kobi, proszę niezwłocznie poprawic błędy w postach.

    , to ty nadal piszesz w swoim narzeczu suachili - zamiast w języku polskim)

    a na zakończenie, specjalnie dla takich ludzi, którzy mają rzeczywiście dysortografię i czasami, podkreślam czasami zrobią błąd - to istnieje tu na elektrodzie taka możliwość jak wciśnięcie klawisza "Pisownia", za pomocą którego można szybko sprawdzić co za "paszkwila" się napisało i wtedy można poprawić swoje wszystkie błędy! .......... co dowodzi, że ty jesteś zwykłym leniwcem i okrutnie zaniżasz poziom tego polskiego forum.
  • #11 6361009
    wader_669
    Poziom 28  
    Kolega mirekk36 ma rację i do tego jeszcze nie wspomniał o kodzie, który po prostu jest do wywalenia.

    A może to żart na Pryma aprilis? Jak nie, to poczytaj jeszcze trochę helpa i postów na elektrodzie (ja dopiero dzięki postom na elektrodzie zrozumiałem jak działają sub-y, skoki i stos)

    ________________________________________________________
    Dzieki Freddie, za poprawki :D
  • #12 6361060
    kobi
    Poziom 22  
    Czyli kod który wydziergałem jest do bani? Jeżeli tak to może ktoś mi to jaśniej wytłumaczy dlaczego
  • #13 6361083
    Freddie Chopin
    Specjalista - Mikrokontrolery
    Przyganiał kocioł garnkowi:

    wader_669 napisał:

    A może to żart na pryma aprilis?

    Zdań nie zaczyna się od spójników.

    wader_669 napisał:

    pryma aprilis

    1. Z wielkiej litery
    2. pr_i_ma

    -> Prima Aprilis http://pl.wikipedia.org/wiki/Prima_aprilis

    Cytat:

    Jak nie...

    "Jeśli nie _ przecinek_ ..."

    Cytat:

    help'a [...] sub'y

    Apostrof (idea przedstawiona w skrócie oczywiście) stosuje sie jedynie do oddzielenia od siebie dwóch samogłosek - http://pl.wikipedia.org/wiki/Apostrof

    Cytat:

    post'ą

    To już w ogóle parodia, a pozatym najczęstszy obecnie bład w internecie (polskim), czyli - mój ulubieniec - celownik liczby mnogiej. Czy na prawdę tak trudno zapamiętać prostą zasadę, że w liczbie mnogiej końcówka celownika to -om? Zawsze. Bez wyjątków.

    Tak na serio teraz - CZY WY NIE MACIE WIĘKSZYCH PROBLEMÓW? Oczywiście moderator jankolo nie ma - to wiem, więc jego nie pytam, bo nawet nie warto - ale czy już wszystkim na tym forum odbija totalnie? Zgadza się - posty autora tego tematu są dosyć kiepskie (oględnie mówiąc), więc załóżmy, że piszę ogólnie (więc ani do mirka, ani do wadera), bo w tym temacie akurat czepianie się ma sens. W każdym temacie, gdy ktoś popełni bład, to od razu wielki problem. Ktoś nie pisze dużych literek - problem. Ktoś nie pisze polskich znaczków - problem. Ktoś pisze totalne bzdury - nie ma problemu. Pewnie dlatego, że niektórzy moderatorzy (na szczęscie żaden z tego działu) nie są w stanie swoją "mondrościom" wyłapać poważnych głupot, więc wyłapują to co i dzieci w podstawówce widzą - ortografię i tym podobne rzeczy. Owszem - ZGADZA SIĘ - trzeba pisać poprawnie, niemniej jednak na tym forum panuje już od dawna mania "hiperpoprawności" i ortografia, wraz z wielkością literek i ogonkami, jest ważniejsza od głównego tematu tego forum. Tym sposobem ktoś kto pisze totalne głupoty, pełne błędów i wręcz nienadające się do czytania nie ponosi żadnych konsekwencji (bo moderator mu skasuje posty raz, drugi i trzeci), a osoby które coś na forum wnoszą łapią ostrzeżenie za ostrzeżeniem.

    To tyle. Over & out.

    4\/3!!
  • #14 6361149
    kobi
    Poziom 22  
    Widzę że tu sami mądrale od języka Polskiego. Może Panowie zmieńcie forum na coś związanego z prof. Miodkiem. Tyle że tam Was zajadą. Wasza wiedza z zakresu j. Polskiego nie dorównuje takim osobom jak w/w prof. Miodek. Wiec przestańcie się czepiać. Przedstawiłem prosty problem dla osób które zajmują się programowaniem. A Wy mi tu ciągle o ortografii. Wiec wracając do tematu i pozostawiając topory wojenne. Ktoś pomoże?
  • #15 6361158
    wader_669
    Poziom 28  
    O kurde. Myslalem, ze post jest napisany poprawnie ortograficznie :(
    Tego nie wiedzialem: http://pl.wikipedia.org/wiki/Apostrof

    Wracajac do tematu poczytaj posty na elektrodzie.

    Dodano po 1 [minuty]:

    1 przepelniasz stos (poczytaj o loop until)
    2 co to za kombinacja sub-a z return ?
REKLAMA