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

Pozytywka Attiny2313

abakuz 05 Paź 2008 10:54 2300 10
REKLAMA
  • #1 5600468
    abakuz
    Poziom 10  
    Witam,
    mam taki kod:
    
    
    $regfile = "attiny2313.dat"                                
    $crystal = 8000000                         
    
    
    Config Portb = Input                                       
    Portb = &B00000000                                 
    Config Portd = Output                                 
    Portd = &B0000000                                
    
    
    Speaker Alias Portd.0
    
    Do
    
        'Europe :: Final Countdown
        Sound Speaker , 124 , 675                               'H2(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Sound Speaker , 248 , 675                               'H2(1/8)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 165 , 1011                              'E2(1/8)
        Waitms 250                                              'P(1/8)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 131 , 637                               'C3(1/16)
        Sound Speaker , 124 , 675                               'H2(1/16)
        Sound Speaker , 131 , 637                               'C3(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 124 , 675                               'H2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 220 , 758                               'A2(1/8)
        Waitms 125                                              'P(1/16)
        Waitms 250                                              'P(1/8)
        Sound Speaker , 131 , 637                               'C3(1/16)
        Sound Speaker , 124 , 675                               'H2(1/16)
        Sound Speaker , 262 , 637                               'C3(1/8)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 165 , 1011                              'E2(1/8)
        Waitms 250                                              'P(1/8)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Sound Speaker , 98 , 850                                'G2(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 98 , 850                                'G2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 92 , 901                                'Fis2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 196 , 850                               'G2(1/8)
        Wait 2
    
        'Corona :: Rythm of The Night
        Sound Speaker , 65 , 1274                               'C2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 87 , 954                                'F2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 98 , 850                                'G2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 87 , 954                                'F2(1/16)
                    Sound Speaker , 117 , 715                   'Ais2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 98 , 850                                'G2(1/16)
        Waitms 125                                              'P(1/16)
        Sound Speaker , 110 , 758                               'A2(1/16)
        Sound Speaker , 87 , 954                                'F2(1/16)
        Waitms 125                                              'P(1/16)
        Wait 2
    
        Loop
    
    
    
    End                                                      
    

    Wg. TEJ strony, procesor powinien zagrac melodie the final count down, jednak ja slysze tylko niskie dzwieki i nawet nie w tym rytmie.

    Dziekuje za odpowiedzi, pozdrawiam]Link[/url]
  • REKLAMA
  • REKLAMA
  • #3 5600722
    abakuz
    Poziom 10  
    A ktore dokladnie pola mam znaznaczyc zeby bylo dobrze?

    Dziekuje za pomoc
  • REKLAMA
  • #5 5600856
    abakuz
    Poziom 10  
    Ale wlasnie wydaje mi sie, ze mam zaznaczony ten a mimo to nadal dziala jak dzialalo. To nie ma byc przypadkiem Int. RC Osc. 8MHz; Start-up time: 14CK + 65 ms;. Jestem w tym troche ciemny, wybaczcie ;p

    dzieki za pomoc
  • REKLAMA
  • #7 5600902
    abakuz
    Poziom 10  
    No ale juz mam to zaznaczone ;P Divide clock by 8 internally; (CKDIV8=0). Chyba ze musze to odznaczyc bo sam juz nie wiem ; P
  • #9 5600940
    abakuz
    Poziom 10  
    Ech no dobra bede szukal ;P dzieki za pomoc. Niestety nic nie wymyslilem ;P
  • #11 5601026
    abakuz
    Poziom 10  
    Haha dzieki ;D balem sie ze znowu cos popsuje bo pare razy tak ustawilem fuse bity ze potem nie moglem tego odkrecic ;P odznaczylem i dziala super wielkie dzieki ;D
REKLAMA