Vítejte na Elektro Bastlírně
Nuke - Elektro Bastlirna
  Vytvořit účet Domů · Fórum old · Download · Upload · Účet · Zprávy · Hledat na fóru · Hledat v článcích

Nuke - Elektro Bastlirna: Diskuzní fórum

Diskuzní fórum Elektro Bastlírny :: Zobrazit téma - Bascom...jen mala rada:)
 FAQFAQ   HledatHledat   Uživatelské skupinyUživatelské skupiny   ProfilProfil   Soukromé zprávySoukromé zprávy   PřihlášeníPřihlášení 

Bascom...jen mala rada:)

 
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů
Zobrazit předchozí téma :: Zobrazit následující téma  
Autor Zpráva
radar0101
Zúčastněný
Zúčastněný



Založen: Jun 15, 2010

PříspěvekZaslal: čt červenec 22 2010, 23:35    Předmět: Bascom...jen mala rada:) Citovat

Zdravim.
Můžete mě nekdo vysvetlit co dela toto..například:
kód:
B = A(1) Xor &H17
B = A + &H17

a misto xor AND udela co?
Normální připady použiti and or atd..chapu, to je jasny.
Ale tenhle zápis nevím přesně jak funguje.
Moc dik za rady.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
procesor
Super uživatel
Super uživatel



Založen: Oct 02, 2009

PříspěvekZaslal: pá červenec 23 2010, 7:28    Předmět: Citovat

Bascom s tým nemá nič (veľa) spoločné.
Bez trochy námahy to nepôjde.
(miesto funkcie xor udelá funkciu and Smile )


Naposledy upravil procesor dne pá červenec 23 2010, 7:50, celkově upraveno 1 krát.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Andrea
Team boss
Team boss



Založen: Sep 07, 2007

PříspěvekZaslal: pá červenec 23 2010, 7:34    Předmět: Re: Bascom...jen mala rada:) Citovat

radar0101 napsal(a):
Normální připady použiti and or atd..chapu, to je jasny.

Já teda nevím, co je to normální, ale co ti na tom zápisu přijde nenormálního?
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
AB1
Zúčastněný
Zúčastněný



Založen: Nov 23, 2009

PříspěvekZaslal: pá červenec 23 2010, 7:41    Předmět: Citovat

&h17 = &b10111
B = A(1) xor &b00010111

V B bude hodnota A(1) s invertovanými bity 0,1,2,4.

Příklad:
X = &b11111111
X xor &b00010111 = &b11101000
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
radar0101
Zúčastněný
Zúčastněný



Založen: Jun 15, 2010

PříspěvekZaslal: pá červenec 23 2010, 8:13    Předmět: Citovat

AB1 napsal(a):
&h17 = &b10111
B = A(1) xor &b00010111

V B bude hodnota A(1) s invertovanými bity 0,1,2,4.

Příklad:
X = &b11111111
X xor &b00010111 = &b11101000


Supr moc dik AB1:) Takhle me to uplne stacilo napsat.
Ale ale mam pro tebe jeste jednu otazecku AB1.
kód:

Dim Vstup As Byte
Dim A As String * 8
Dim B(8) As Byte At A Overlay
Dim X As Byte

Vstup = &B10101010

Do

A = Bin(vstup)

For X = 1 To 8
If B(x) = 48 Then B(x) = 0
If B(x) = 49 Then B(x) = 1
Next

Print B(1) ; B(2) ; B(3) ; B(4) ; B(5) ; B(6) ; B(7) ; B(8)

Loop
End

Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast. Ja to dělam takhle.
Není na to nějaky jednodušší řešení:)
Dííky
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
radar0101
Zúčastněný
Zúčastněný



Založen: Jun 15, 2010

PříspěvekZaslal: pá červenec 23 2010, 11:26    Předmět: Citovat

tak dobry k tomu predtim...uz jsem to vyřesil MIDEM a je to lepsi:)
Každopádně moc dik:)
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
AB1
Zúčastněný
Zúčastněný



Založen: Nov 23, 2009

PříspěvekZaslal: pá červenec 23 2010, 11:42    Předmět: Citovat

citace:
Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast


Není jednodušší toto?
kód:
dim vstup as byte
dim x as bit

x = vstup.0  //bit0
x = vstup.1  //bit1
x = vstup.2  //bit2
atd
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
radar0101
Zúčastněný
Zúčastněný



Založen: Jun 15, 2010

PříspěvekZaslal: pá červenec 23 2010, 13:41    Předmět: Citovat

AB1 napsal(a):
citace:
Potřebuju dostat z bynarni hodnoty jednotlivý bity zvlast


Není jednodušší toto?
kód:
dim vstup as byte
dim x as bit

x = vstup.0  //bit0
x = vstup.1  //bit1
x = vstup.2  //bit2
atd


OOOOOO panecku paradaaa:)Supr moc dik.....zas az takhle jednoduše že to jde, to jsem necekal:D
DIK
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Zobrazit příspěvky z předchozích:   
Přidat nové téma   Zaslat odpověď       Obsah fóra Diskuzní fórum Elektro Bastlírny -> Programování PIC, ATMEL, EEPROM a dalších obvodů Časy uváděny v GMT + 1 hodina
Strana 1 z 1

 
Přejdi na:  
Nemůžete odesílat nové téma do tohoto fóra.
Nemůžete odpovídat na témata v tomto fóru.
Nemůžete upravovat své příspěvky v tomto fóru.
Nemůžete mazat své příspěvky v tomto fóru.
Nemůžete hlasovat v tomto fóru.
Nemůžete připojovat soubory k příspěvkům
Můžete stahovat a prohlížet přiložené soubory

Powered by phpBB © 2001, 2005 phpBB Group
Forums ©
Nuke - Elektro Bastlirna

Informace na portálu Elektro bastlírny jsou prezentovány za účelem vzdělání čtenářů a rozšíření zájmu o elektroniku. Autoři článků na serveru neberou žádnou zodpovědnost za škody vzniklé těmito zapojeními. Rovněž neberou žádnou odpovědnost za případnou újmu na zdraví vzniklou úrazem elektrickým proudem. Autoři a správci těchto stránek nepřejímájí záruku za správnost zveřejněných materiálů. Předkládané informace a zapojení jsou zveřejněny bez ohledu na případné patenty třetích osob. Nároky na odškodnění na základě změn, chyb nebo vynechání jsou zásadně vyloučeny. Všechny registrované nebo jiné obchodní známky zde použité jsou majetkem jejich vlastníků. Uvedením nejsou zpochybněna z toho vyplývající vlastnická práva. Použití konstrukcí v rozporu se zákonem je přísně zakázáno. Vzhledem k tomu, že původ předkládaných materiálů nelze žádným způsobem dohledat, nelze je použít pro komerční účely! Tento nekomerční server nemá z uvedených zapojení či konstrukcí žáden zisk. Nezodpovídáme za pravost předkládaných materiálů třetími osobami a jejich původ. V případě, že zjistíte porušení autorského práva, kontaktujte administrátora a on sjedná nápravu.


PHP-Nuke Copyright © 2005 by Francisco Burzi. This is free software, and you may redistribute it under the GPL. PHP-Nuke comes with absolutely no warranty, for details, see the license.
Čas potřebný ke zpracování stránky 0.19 sekund